summaryrefslogtreecommitdiff
path: root/app/bin/misc2.c
diff options
context:
space:
mode:
authorJörg Frings-Fürst <debian@jff-webhosting.net>2024-11-14 19:35:45 +0100
committerJörg Frings-Fürst <debian@jff-webhosting.net>2024-11-14 19:35:45 +0100
commitdf5520aa2dae5b3ce7abf8733dcdd152898af163 (patch)
tree00d3047bfb14f682bfb5a21010c731ed649bfed7 /app/bin/misc2.c
parentdf247efec654e512242e4f4f1b0212034f9e01fe (diff)
parentec3c0f6f6e7153fa797dc57a0e95779cbc63a23b (diff)
Merge branch 'release/debian/1_5.3.0GA-1'debian/1_5.3.0GA-1
Diffstat (limited to 'app/bin/misc2.c')
-rw-r--r--app/bin/misc2.c729
1 files changed, 0 insertions, 729 deletions
diff --git a/app/bin/misc2.c b/app/bin/misc2.c
deleted file mode 100644
index 19226cc..0000000
--- a/app/bin/misc2.c
+++ /dev/null
@@ -1,729 +0,0 @@
-/** \file misc2.c
- * Management of information about scales and gauges plus rprintf.
- */
-
-/* XTrkCad - Model Railroad CAD
- * Copyright (C) 2005 Dave Bullis
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- */
-
-#include <stdlib.h>
-#include <stdio.h>
-#ifndef WINDOWS
-#include <unistd.h>
-#include <dirent.h>
-#endif
-#ifdef HAVE_MALLOC_H
-#include <malloc.h>
-#endif
-#include <math.h>
-#include <ctype.h>
-#include <string.h>
-#include <stdarg.h>
-
-#include <stdint.h>
-
-#include "cjoin.h"
-#include "common.h"
-#include "compound.h"
-#include "custom.h"
-#include "draw.h"
-#include "fileio.h"
-#include "i18n.h"
-#include "layout.h"
-#include "messages.h"
-#include "misc.h"
-#include "param.h"
-#include "track.h"
-#include "utility.h"
-
-
-EXPORT long units = 0; /**< measurement units: 0 = English, 1 = metric */
-EXPORT long checkPtInterval = 10;
-EXPORT long autosaveChkPoints = 2;
-
-EXPORT DIST_T curScaleRatio;
-EXPORT char * curScaleName;
-EXPORT DIST_T trackGauge;
-EXPORT long labelScale = 8;
-EXPORT long labelEnable = (LABELENABLE_ENDPT_ELEV|LABELENABLE_CARS);
-EXPORT long labelWhen = 2;
-EXPORT long colorTrack = 0;
-EXPORT long colorDraw = 0;
-EXPORT long constrainMain = 0;
-EXPORT long hideSelectionWindow = 0;
-EXPORT long angleSystem = 0;
-EXPORT DIST_T minLength = 0.1;
-EXPORT DIST_T connectDistance = 0.1;
-EXPORT ANGLE_T connectAngle = 1.0;
-EXPORT long twoRailScale = 16;
-EXPORT long mapScale = 64;
-EXPORT long liveMap = 0;
-EXPORT long preSelect = 0; /**< default command 0 = Describe 1 = Select */
-EXPORT long listLabels = 7;
-EXPORT long layoutLabels = 1;
-EXPORT long descriptionFontSize = 72;
-EXPORT long enableListPrices = 1;
-EXPORT void ScaleLengthEnd(void);
-
-static BOOL_T SetScaleDescGauge(SCALEINX_T scaleInx);
-
-
-/****************************************************************************
- *
- * RPRINTF
- *
- */
-
-
-#define RBUFF_SIZE (8192)
-static char rbuff[RBUFF_SIZE+1];
-static int roff;
-static int rbuff_record = 0;
-
-EXPORT void Rdump( FILE * outf )
-{
- fprintf( outf, "Record Buffer:\n" );
- rbuff[RBUFF_SIZE] = '\0';
- fprintf( outf, "%s", rbuff+roff );
- rbuff[roff] = '\0';
- fprintf( outf, "%s", rbuff );
- memset( rbuff, 0, sizeof rbuff );
- roff = 0;
-}
-
-
-EXPORT void Rprintf(
- char * format,
- ... )
-{
- static char buff[STR_SIZE];
- char * cp;
- va_list ap;
- va_start( ap, format );
- vsprintf( buff, format, ap );
- va_end( ap );
- if (rbuff_record >= 1)
- lprintf( buff );
- for ( cp=buff; *cp; cp++ ) {
- rbuff[roff] = *cp;
- roff++;
- if (roff>=RBUFF_SIZE)
- roff=0;
- }
-}
-
-/****************************************************************************
- *
- * CHANGE NOTIFICATION
- *
- */
-
-
-static changeNotificationCallBack_t changeNotificationCallBacks[20];
-static int changeNotificationCallBackCnt = 0;
-
-EXPORT void RegisterChangeNotification(
- changeNotificationCallBack_t action )
-{
- changeNotificationCallBacks[changeNotificationCallBackCnt] = action;
- changeNotificationCallBackCnt++;
-}
-
-
-EXPORT void DoChangeNotification( long changes )
-{
- int inx;
- for (inx=0;inx<changeNotificationCallBackCnt;inx++)
- changeNotificationCallBacks[inx](changes);
-}
-
-
-/****************************************************************************
- *
- * SCALE
- *
- */
-
-typedef struct {
- char * scale;
- DIST_T ratio;
- DIST_T gauge;
- DIST_T R[3];
- DIST_T X[3];
- DIST_T L[3];
- wIndex_t index;
- DIST_T length;
- BOOL_T tieDataValid;
- tieData_t tieData;
- } scaleInfo_t;
-EXPORT typedef scaleInfo_t * scaleInfo_p;
-static dynArr_t scaleInfo_da;
-#define scaleInfo(N) DYNARR_N( scaleInfo_t, scaleInfo_da, N )
-static tieData_t tieData_demo = {
- 96.0/160.0,
- 16.0/160.0,
- 32.0/160.0 };
-
-//EXPORT SCALEINX_T curScaleInx = -1;
-static scaleInfo_p curScale;
-EXPORT long includeSameGaugeTurnouts = FALSE;
-static SCALEINX_T demoScaleInx = -1;
-
-
-/** this struct holds a gauge description */
-typedef struct {
- char * gauge; /** ptr to textual description eg. 'n3' */
- SCALEINX_T scale; /** index of complete information in scaleInfo_da */
- wIndex_t index;
- } gaugeInfo_t;
-
-EXPORT typedef gaugeInfo_t * gaugeInfo_p;
-
-/** this struct holds a scale description */
-typedef struct {
- char *scaleDesc; /** ptr to textual description eg. 'HO' */
- SCALEINX_T scale; /** index of complete information (standard gauge) in scaleInfo_da */
- wIndex_t index;
- dynArr_t gauges_da; /** known gauges to this scale */
- } scaleDesc_t;
-
-EXPORT typedef scaleDesc_t *scaleDesc_p;
-static dynArr_t scaleDesc_da;
-#define scaleDesc(N) DYNARR_N( scaleDesc_t, scaleDesc_da, N )
-
-
-/**
- * Get the ratio from a scale description. Each member in the list of scale descriptions is
- * linked to an entry in the simple linear list of all scales/gauges. From there the ratio is
- * fetched and returned. Note that there is no error checking on parameters!
- *
- * \param IN sdi index into list of scale descriptions
- * \return ratio for scale
- */
-
-EXPORT DIST_T GetScaleDescRatio( SCALEDESCINX_T sdi )
-{
- return GetScaleRatio( scaleDesc(sdi).scale );
-}
-
-/**
- * Get the index into the linear list from a scale description and a gauge. All information about a
- * scale/ gauge combination is stored in a linear list. The index in that list for a given scale and the
- * gauge is returned by this function. Note that there is no error checking on parameters!
- *
- * \param IN scaleInx index into list of scale descriptions
- * \param IN gaugeInx index into list of gauges available for this scale
- * \return index into master list of scale/gauge combinations
- */
-
-EXPORT SCALEINX_T GetScaleInx( SCALEDESCINX_T scaleInx, GAUGEINX_T gaugeInx )
-{
- scaleDesc_t s;
- gaugeInfo_p g;
-
- s = scaleDesc(scaleInx);
- g = &(DYNARR_N(gaugeInfo_t, s.gauges_da, gaugeInx));
-
- return g->scale;
-
-}
-EXPORT DIST_T GetScaleTrackGauge( SCALEINX_T si )
-{
- return scaleInfo(si).gauge;
-}
-
-EXPORT DIST_T GetScaleRatio( SCALEINX_T si )
-{
- return scaleInfo(si).ratio;
-}
-
-EXPORT char * GetScaleName( SCALEINX_T si )
-{
- if ( si == -1 )
- return "DEMO";
- if ( si == SCALE_ANY )
- return "*";
- else if ( si < 0 || si >= scaleInfo_da.cnt )
- return "Unknown";
- else
- return scaleInfo(si).scale;
-}
-
-EXPORT void GetScaleEasementValues( DIST_T * R, DIST_T * L )
-{
- wIndex_t i;
- for (i=0;i<3;i++) {
- *R++ = curScale->R[i];
- *L++ = curScale->L[i];
- }
-}
-
-
-EXPORT tieData_p GetScaleTieData( SCALEINX_T si )
-{
- scaleInfo_p s;
- DIST_T defLength;
-
- if ( si == -1 )
- return &tieData_demo;
- else if ( si < 0 || si >= scaleInfo_da.cnt )
- return &tieData_demo;
- s = &scaleInfo(si);
- if ( !s->tieDataValid ) {
- sprintf( message, "tiedata-%s", s->scale );
- defLength = (96.0-54.0)/s->ratio+s->gauge;
- wPrefGetFloat( message, "length", &s->tieData.length, defLength );
- wPrefGetFloat( message, "width", &s->tieData.width, 16.0/s->ratio );
- wPrefGetFloat( message, "spacing", &s->tieData.spacing, 2*s->tieData.width );
- }
- return &scaleInfo(si).tieData;
-}
-
-EXPORT char *GetScaleDesc( SCALEDESCINX_T inx )
-{
- return scaleDesc(inx).scaleDesc;
-}
-
-EXPORT char *GetGaugeDesc( SCALEDESCINX_T scaleInx, GAUGEINX_T gaugeInx )
-{
- scaleDesc_t s;
- gaugeInfo_p g;
-
- s = scaleDesc(scaleInx);
- g = &(DYNARR_N(gaugeInfo_t, s.gauges_da, gaugeInx));
-
- return g->gauge;
-}
-
-void
-SetScaleGauge(SCALEDESCINX_T desc, GAUGEINX_T gauge)
-{
- dynArr_t gauges_da;
-
- gauges_da = (scaleDesc(desc)).gauges_da;
- SetLayoutCurScale(((gaugeInfo_p)gauges_da.ptr)[gauge].scale);
-}
-
-static BOOL_T
-SetScaleDescGauge(SCALEINX_T scaleInx)
-{
- int i, j;
- char *scaleName = GetScaleName(scaleInx);
- DIST_T scaleRatio = GetScaleRatio(scaleInx);
- dynArr_t gauges_da;
-
- for (i = 0; i < scaleDesc_da.cnt; i++) {
- char *t = strchr(scaleDesc(i).scaleDesc, ' ');
- /* are the first characters (which describe the scale) identical? */
- if (!strncmp(scaleDesc(i).scaleDesc, scaleName, t - scaleDesc(i).scaleDesc)) {
- /* if yes, are we talking about the same ratio */
- if (scaleInfo(scaleDesc(i).scale).ratio == scaleRatio) {
- /* yes, we found the right scale descriptor, so now look for the gauge */
- SetLayoutCurScaleDesc( i );
- gauges_da = scaleDesc(i).gauges_da;
- SetLayoutCurGauge(0);
- for (j = 0; j < gauges_da.cnt; j++) {
- gaugeInfo_p ptr = &(DYNARR_N(gaugeInfo_t, gauges_da, j));
- if (scaleInfo(ptr->scale).gauge == GetScaleTrackGauge(scaleInx)) {
- SetLayoutCurGauge( j );
- break;
- }
- }
- break;
- }
- }
- }
-
- return TRUE;
-}
-
-EXPORT SCALEINX_T LookupScale( const char * name )
-{
- wIndex_t si;
- DIST_T gauge;
- if ( strcmp( name, "*" ) == 0 )
- return SCALE_ANY;
- for ( si=0; si<scaleInfo_da.cnt; si++ ) {
- if (strcmp( scaleInfo(si).scale, name ) == 0)
- return si;
- }
- if ( isdigit((unsigned char)name[0]) ) {
- gauge = atof( name );
- for ( si=0; si<scaleInfo_da.cnt; si++ ) {
- if (scaleInfo(si).gauge == gauge)
- return si;
- }
- }
- NoticeMessage( MSG_BAD_SCALE_NAME, "Ok", NULL, name, sProdNameLower );
- si = scaleInfo_da.cnt;
- DYNARR_APPEND( scaleInfo_t, scaleInfo_da, 10 );
- scaleInfo(si) = scaleInfo(0);
- scaleInfo(si).scale = MyStrdup( name );
- return si;
-}
-
-
-EXPORT BOOL_T CompatibleScale(
- BOOL_T isTurnout,
- SCALEINX_T scale1,
- SCALEINX_T scale2 )
-{
- if ( scale1 == scale2 )
- return TRUE;
- if ( scale1 == SCALE_DEMO || scale2 == SCALE_DEMO )
- return FALSE;
- if ( scale1 == demoScaleInx || scale2 == demoScaleInx )
- return FALSE;
- if ( isTurnout ) {
- if ( includeSameGaugeTurnouts &&
- scaleInfo(scale1).gauge == scaleInfo(scale2).gauge )
- return TRUE;
- } else {
- if ( scale1 == SCALE_ANY )
- return TRUE;
- if ( scaleInfo(scale1).ratio == scaleInfo(scale2).ratio )
- return TRUE;
- }
- return FALSE;
-}
-
-/** Split the scale and the gauge description for a given combination. Eg HOn3 will be
- * split to HO and n3.
- * \param scaleInx IN scale/gauge combination
- * \param scaleDescInx OUT scale part
- * \param gaugeInx OUT gauge part
- * \return TRUE
- */
-
-EXPORT BOOL_T
-GetScaleGauge( SCALEINX_T scaleInx, SCALEDESCINX_T *scaleDescInx, GAUGEINX_T *gaugeInx)
-{
- int i, j;
- char *scaleName = GetScaleName( scaleInx );
- DIST_T scaleRatio = GetScaleRatio( scaleInx );
- dynArr_t gauges_da;
-
- for( i = 0; i < scaleDesc_da.cnt; i++ ) {
- char *t = strchr( scaleDesc(i).scaleDesc, ' ' );
- /* are the first characters (which describe the scale) identical? */
- if( !strncmp( scaleDesc(i).scaleDesc, scaleName, t - scaleDesc(i).scaleDesc )) {
- /* if yes, are we talking about the same ratio */
- if( scaleInfo(scaleDesc(i).scale).ratio == scaleRatio ) {
- /* yes, we found the right scale descriptor, so now look for the gauge */
- *scaleDescInx = i;
- gauges_da = scaleDesc(i).gauges_da;
- *gaugeInx = 0;
- for( j = 0; j < gauges_da.cnt; j++ ) {
- gaugeInfo_p ptr = &(DYNARR_N( gaugeInfo_t, gauges_da, j ));
- if( scaleInfo(ptr->scale).gauge == GetScaleTrackGauge( scaleInx )) {
- *gaugeInx = j;
- break;
- }
- }
- break;
- }
- }
- }
-
- return TRUE;
-}
-
-/**
- * Setup XTrkCad for the newly selected scale/gauge combination.
- *
- * \param newScaleInx IN the index of the selected scale/gauge combination
- */
-
-static void
-SetScale( SCALEINX_T newScaleInx )
-{
- if (newScaleInx < 0 && newScaleInx >= scaleInfo_da.cnt) {
- NoticeMessage( MSG_BAD_SCALE_INDEX, _("Ok"), NULL, (int)newScaleInx );
- return;
- }
- SetLayoutCurScale((SCALEINX_T)newScaleInx );
- curScale = &scaleInfo(newScaleInx);
- trackGauge = curScale->gauge;
- curScaleRatio = curScale->ratio;
- curScaleName = curScale->scale;
-
- SetLayoutCurScaleDesc( 0 );
-
- SetScaleDescGauge((SCALEINX_T)newScaleInx);
-
-
- if (!inPlayback)
- wPrefSetString( "misc", "scale", curScaleName );
-
- // now load the minimum radius for the newly selected scale
- LoadLayoutMinRadiusPref(curScaleName, curScale->R[0]);
-}
-
-/**
- * Check the new scale value and update the program if a valid scale was passed
- *
- * \param newScale IN the name of the new scale
- * \returns TRUE if valid, FALSE otherwise
- */
-
-EXPORT BOOL_T DoSetScale(
- char * newScale )
-{
- SCALEINX_T scale;
- char * cp;
- BOOL_T found = FALSE;
-
- if ( newScale != NULL ) {
- cp = newScale+strlen(newScale)-1;
- while ( *cp=='\n' || *cp==' ' || *cp=='\t' ) cp--;
- cp[1] = '\0';
- while (isspace((unsigned char)*newScale)) newScale++;
- for (scale = 0; scale<scaleInfo_da.cnt; scale++) {
- if (strcasecmp( scaleInfo(scale).scale, newScale ) == 0) {
- SetLayoutCurScale(scale);
- found = TRUE;
- break;
- }
- }
- // was a valid scale given?
- if( found ) {
- DoChangeNotification( CHANGE_SCALE );
- }
- }
-
- return found;
-}
-
-/**
- * Setup the data structures for scale and gauge. XTC reads 'scales' into an dynamic array,
- * but doesn't differentiate between scale and gauge.
- * This da is split into an dynamic array of scales. Each scale holds a dynamic array of gauges,
- * with at least one gauge per scale (ie standard gauge)
- *
- * For usage in the dialogs, a textual description for each scale or gauge is provided
- *
- * \return TRUE
- */
-
-EXPORT BOOL_T DoSetScaleDesc( void )
-{
- SCALEINX_T scaleInx;
- SCALEINX_T work;
- SCALEDESCINX_T descInx;
- scaleDesc_p s = NULL;
- gaugeInfo_p g;
- char *cp;
- DIST_T ratio;
- BOOL_T found;
- char buf[ 80 ];
- int len;
-
- for( scaleInx = 0; scaleInx < scaleInfo_da.cnt; scaleInx++ ) {
- ratio = DYNARR_N( scaleInfo_t, scaleInfo_da, scaleInx ).ratio;
-
- /* do we already have a description for this scale? */
- found = 0;
-
- if( scaleDesc_da.cnt > 0 ) {
- for( descInx = 0; descInx < scaleDesc_da.cnt; descInx++ ) {
- work = scaleDesc(descInx).scale;
- if( scaleInfo(work).ratio == scaleInfo(scaleInx).ratio ) {
- if( !strncmp( scaleInfo(work).scale, scaleInfo(scaleInx).scale, strlen(scaleInfo(work).scale)))
- found = TRUE;
- }
- }
- }
-
-
- if( !found ) {
- /* if no, add as new scale */
-
- DYNARR_APPEND( scaleDesc_t, scaleDesc_da, 1 );
-
- s = &(scaleDesc( scaleDesc_da.cnt-1 ));
-
- s->scale = scaleInx;
-
- sprintf( buf, "%s (1/%.1f)", scaleInfo(scaleInx).scale, scaleInfo(scaleInx).ratio );
- s->scaleDesc = MyStrdup( buf );
-
- /* initialize the array with standard gauge */
-
- DYNARR_APPEND( gaugeInfo_t, s->gauges_da, 10 );
-
- g = &(DYNARR_N( gaugeInfo_t, s->gauges_da, (s->gauges_da).cnt - 1 ));
- g->scale = scaleInx;
- sprintf( buf, "Standard (%.1fmm)", scaleInfo(scaleInx).gauge*25.4 );
- g->gauge = MyStrdup( buf );
-
- } else {
- /* if yes, is this a new gauge to the scale? */
- DYNARR_APPEND( gaugeInfo_t, s->gauges_da, 10 );
- g = &(DYNARR_N( gaugeInfo_t, s->gauges_da, (s->gauges_da).cnt - 1 ));
- g->scale = scaleInx;
- cp = strchr( s->scaleDesc, ' ' );
- if( cp )
- len = cp - s->scaleDesc;
- else
- len = strlen(s->scaleDesc);
- sprintf( buf, "%s (%.1fmm)", scaleInfo(scaleInx).scale+len, scaleInfo(scaleInx).gauge*25.4 );
- g->gauge = MyStrdup( buf );
- }
- }
-
- return( TRUE );
-}
-
-static BOOL_T AddScale(
- char * line )
-{
- wIndex_t i;
- BOOL_T rc;
- DIST_T R[3], X[3], L[3];
- DIST_T ratio, gauge;
- char scale[40];
- scaleInfo_p s;
-
- if ( (rc=sscanf( line, "SCALE %[^,]," SCANF_FLOAT_FORMAT "," SCANF_FLOAT_FORMAT "",
- scale, &ratio, &gauge )) != 3) {
- SyntaxError( "SCALE", rc, 3 );
- return FALSE;
- }
- for (i=0;i<3;i++) {
- line = GetNextLine();
- if ( (rc=sscanf( line, "" SCANF_FLOAT_FORMAT "," SCANF_FLOAT_FORMAT "," SCANF_FLOAT_FORMAT "",
- &R[i], &X[i], &L[i] )) != 3 ) {
- SyntaxError( "SCALE easement", rc, 3 );
- return FALSE;
- }
- }
-
- DYNARR_APPEND( scaleInfo_t, scaleInfo_da, 10 );
- s = &scaleInfo(scaleInfo_da.cnt-1);
- s->scale = MyStrdup( scale );
- s->ratio = ratio;
- s->gauge = gauge;
- s->index = -1;
- for (i=0; i<3; i++) {
- s->R[i] = R[i]/ratio;
- s->X[i] = X[i]/ratio;
- s->L[i] = L[i]/ratio;
- }
- s->tieDataValid = FALSE;
- if ( strcmp( scale, "DEMO" ) == 0 )
- demoScaleInx = scaleInfo_da.cnt-1;
- return TRUE;
-}
-
-
-EXPORT void ScaleLengthIncrement(
- SCALEINX_T scale,
- DIST_T length )
-{
- char * cp;
- int len;
- if (scaleInfo(scale).length == 0.0) {
- if (units == UNITS_METRIC)
- cp = "999.99m SCALE Flex Track";
- else
- cp = "999' 11\" SCALE Flex Track";
- len = strlen( cp )+1;
- if (len > enumerateMaxDescLen)
- enumerateMaxDescLen = len;
- }
- scaleInfo(scale).length += length;
-}
-
-EXPORT void ScaleLengthEnd( void )
-{
- wIndex_t si;
- int count;
- DIST_T length;
- char tmp[STR_SIZE];
- FLOAT_T flexLen;
- long flexUnit;
- FLOAT_T flexCost;
- for (si=0; si<scaleInfo_da.cnt; si++) {
- sprintf( tmp, "price list %s", scaleInfo(si).scale );
- wPrefGetFloat( tmp, "flex length", &flexLen, 0.0 );
- wPrefGetInteger( tmp, "flex unit", &flexUnit, 0 );
- wPrefGetFloat( tmp, "flex cost", &flexCost, 0.0 );
- tmp[0] = '\0';
- if ((length=scaleInfo(si).length) != 0) {
- sprintf( tmp, "%s %s Flex Track", FormatDistance(length), scaleInfo(si).scale );
- for (count = strlen(tmp); count<enumerateMaxDescLen; count++)
- tmp[count] = ' ';
- tmp[enumerateMaxDescLen] = '\0';
- count = 0;
- if (flexLen > 0.0) {
- count = (int)ceil( length / (flexLen/(flexUnit?2.54:1.00)));
- }
- EnumerateList( count, flexCost, tmp );
- }
- scaleInfo(si).length = 0;
- }
-}
-
-
-
-EXPORT void LoadScaleList( wList_p scaleList )
-{
- wIndex_t inx;
- for (inx=0; inx<scaleDesc_da.cnt-(extraButtons?0:1); inx++) {
- scaleDesc(inx).index =
- wListAddValue( scaleList, scaleDesc(inx).scaleDesc, NULL, (void*)(intptr_t)inx );
- }
-}
-
-EXPORT void LoadGaugeList( wList_p gaugeList, SCALEDESCINX_T scale )
-{
- wIndex_t inx;
- scaleDesc_t s;
- gaugeInfo_p g;
- dynArr_t *gauges_da_p;
-
- s = scaleDesc(scale);
- gauges_da_p = &(s.gauges_da);
- g = gauges_da_p->ptr;
- g = s.gauges_da.ptr;
-
- wListClear( gaugeList ); /* remove old list in case */
- for (inx=0; inx<gauges_da_p->cnt; inx++) {
- (g[inx]).index = wListAddValue( gaugeList, (g[inx]).gauge, NULL, (void*)(intptr_t)(g[inx]).scale );
- }
-}
-
-static void ScaleChange( long changes )
-{
- if (changes & CHANGE_SCALE) {
- SetScale( GetLayoutCurScale() );
- }
-}
-
-/*****************************************************************************
- *
- *
- *
- */
-
-EXPORT void Misc2Init( void )
-{
- AddParam( "SCALE ", AddScale );
- wPrefGetInteger( "draw", "label-when", &labelWhen, labelWhen );
- RegisterChangeNotification( ScaleChange );
- wPrefGetInteger( "misc", "include same gauge turnouts", &includeSameGaugeTurnouts, 1 );
-}