summaryrefslogtreecommitdiff
path: root/app/tools
diff options
context:
space:
mode:
Diffstat (limited to 'app/tools')
-rw-r--r--app/tools/CMakeLists.txt13
-rw-r--r--app/tools/HACKING2
-rw-r--r--app/tools/TurnoutDesigner.xtr918
-rw-r--r--app/tools/halibut/CMakeLists.txt15
-rw-r--r--app/tools/halibut/bk_paper.c12
-rw-r--r--app/tools/halibut/charset/CMakeLists.txt16
-rw-r--r--app/tools/halibut/deflate.c8
-rw-r--r--app/tools/halibut/in_afm.c4
-rw-r--r--app/tools/halibut/input.c2
-rw-r--r--app/tools/halibut/tree234.c2
-rw-r--r--app/tools/halibut/ustring.c4
-rw-r--r--app/tools/halibut/wcwidth.c5
-rw-r--r--app/tools/lib/linux/libzip.abin0 -> 264078 bytes
-rw-r--r--app/tools/listxtp.c6
-rw-r--r--app/tools/pngtoxpm/CMakeLists.txt16
-rw-r--r--app/tools/pngtoxpm/pngtoxpm.c721
16 files changed, 1703 insertions, 41 deletions
diff --git a/app/tools/CMakeLists.txt b/app/tools/CMakeLists.txt
index befe170..433d464 100644
--- a/app/tools/CMakeLists.txt
+++ b/app/tools/CMakeLists.txt
@@ -1,15 +1,10 @@
-set ( sources listxtp.c )
+add_executable(listxtp listxtp.c)
+set_target_properties(listxtp PROPERTIES FOLDER "Param Files")
if (WIN32)
- set ( sources
- ${sources}
- dirent.c)
-
- include_directories( before ${CMAKE_CURRENT_SOURCE_DIR})
+ target_sources(listxtp PRIVATE dirent.c )
endif ()
-
-add_executable( listxtp ${sources})
add_subdirectory(halibut)
-
+add_subdirectory(pngtoxpm)
diff --git a/app/tools/HACKING b/app/tools/HACKING
index fbed100..0b25ea1 100644
--- a/app/tools/HACKING
+++ b/app/tools/HACKING
@@ -17,7 +17,7 @@
*
* 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.
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
int global; /**< this is a global variable */
diff --git a/app/tools/TurnoutDesigner.xtr b/app/tools/TurnoutDesigner.xtr
new file mode 100644
index 0000000..11e8c73
--- /dev/null
+++ b/app/tools/TurnoutDesigner.xtr
@@ -0,0 +1,918 @@
+# XTrackCAD Version: 5.3.0Beta1, Date: Fri May 27 12:14:43 2022
+
+VERSION 12
+ROOMSIZE 96.0 x 48.0
+SCALE DEMO
+ORIG 4.000 0.000 0.000
+# LOG CLOCK Thu May 26 16:02:31 2022
+
+MESSAGE
+Test Turnout Designer
+
+This demo invokes each Turnout Designer and generates the turnout definition.
+Each definition is placed on the layout and Regression checks that each matches.
+
+Instructions:
+ Run xtrkcad with the regression option set to 2:
+ xtrkcad -d regression=2
+
+ Select the recording (Macro|Playback) from $(SRCDIR)/app/tools/TurnoutDesigner.xtr
+
+ Playback the demo. You probably want to choose a faster playback Speed.
+
+Check the log file (Linux: stdout, Windows: xtclog.txt)
+END$MESSAGE
+STEP
+PARAMETER grid horzspacing 12.000
+PARAMETER grid horzdivision 12
+PARAMETER grid horzenable 0
+PARAMETER grid vertspacing 12.000
+PARAMETER grid vertdivision 12
+PARAMETER grid vertenable 0
+PARAMETER grid origx 0.000
+PARAMETER grid origy 0.000
+PARAMETER grid origa 0.000
+PARAMETER grid show 0
+PARAMETER GROUP grid
+PARAMETER easement val 0.000
+PARAMETER easement r 0.000
+PARAMETER easement x 0.000
+PARAMETER easement l 0.000
+PARAMETER GROUP easement
+PARAMETER layout roomsizeX 96.000
+PARAMETER layout roomsizeY 48.000
+PARAMETER layout title1 Empty
+PARAMETER layout title2
+PARAMETER layout mintrackradius 11.000
+PARAMETER layout maxtrackgrade 5.000
+PARAMETER layout backgroundposX 0.000
+PARAMETER layout backgroundposY 0.000
+PARAMETER layout backgroundWidth 0.000
+PARAMETER layout backgroundScreen 0
+PARAMETER layout backgroundAngle 0.000
+PARAMETER GROUP layout
+PARAMETER display color-track 0
+PARAMETER display color-draw 0
+PARAMETER display tunnels 1
+PARAMETER display endpt 2
+PARAMETER display unconnected-endpt 0
+PARAMETER display tiedraw 0
+PARAMETER display centerdraw 0
+PARAMETER display tworailscale 16
+PARAMETER display mapscale 41
+PARAMETER display donthidecursor 0
+PARAMETER display constrainmain 0
+PARAMETER display livemap 0
+PARAMETER display autoPan 0
+PARAMETER display labelenable 0
+PARAMETER display labelscale 8
+PARAMETER display description-fontsize 72
+PARAMETER display hotbarlabels 1
+PARAMETER display layoutlabels 6
+PARAMETER display listlabels 7
+PARAMETER display carhotbarlabels 1 Proto/Manuf
+PARAMETER display trainpause 300
+PARAMETER display hideTrainsInTunnels 0
+PARAMETER GROUP display
+PARAMETER cmdopt preselect 1
+PARAMETER cmdopt rightclickmode 0
+PARAMETER cmdopt selectmode 0
+PARAMETER cmdopt selectzero 1
+PARAMETER GROUP cmdopt
+PARAMETER pref iconsize 1
+PARAMETER pref anglesystem 0
+PARAMETER pref units 0
+PARAMETER pref dstfmt 1
+PARAMETER pref minlength 0.100
+PARAMETER pref connectdistance 0.100
+PARAMETER pref connectangle 1.000
+PARAMETER pref turntable-angle 15.000
+PARAMETER pref coupling-speed-max 100
+PARAMETER pref balloonhelp 1
+PARAMETER pref showflextrack 0
+PARAMETER pref dragpixels 20
+PARAMETER pref dragtimeout 500
+PARAMETER pref mingridspacing 5
+PARAMETER pref checkpoint 0
+PARAMETER pref autosave 0
+PARAMETER pref onstartup 0
+PARAMETER GROUP pref
+PARAMETER rgbcolor snapgrid 65280
+PARAMETER rgbcolor marker 16711680
+PARAMETER rgbcolor border 0
+PARAMETER rgbcolor crossmajor 16711680
+PARAMETER rgbcolor crossminor 255
+PARAMETER rgbcolor normal 0
+PARAMETER rgbcolor selected 16711680
+PARAMETER rgbcolor profile 16711935
+PARAMETER rgbcolor exception 16711808
+PARAMETER rgbcolor tie 16744448
+#PARAMETER rgbcolor bridge 16777215
+#PARAMETER rgbcolor roadbed 12823467
+PARAMETER GROUP rgbcolor
+PARAMETER misc toolbarset 65535
+PARAMETER misc cur-turnout-ep 0
+PARAMETER GROUP misc
+PARAMETER sticky set 67108479
+PARAMETER GROUP sticky
+LAYERS 0 1 0 1 255 0 0 0 0 "Main" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 1 1 0 1 128 0 0 0 0 "Staging" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 2 0 0 1 32768 0 0 0 0 "Switch Machines" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 3 0 0 0 16776960 0 0 0 0 "Lighting and Ductwork" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 4 0 0 1 65280 0 0 0 0 "" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 5 1 0 1 65535 0 0 0 0 "Table Edges" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 6 1 0 1 179456 0 0 0 0 "" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 7 0 0 1 8388736 0 0 0 0 "Scenery Details" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 8 0 0 1 8421376 0 0 0 0 "BenchWork" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 9 1 0 1 16711935 0 0 0 0 "Body Circles" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS 10 0 0 1 255 0 0 0 0 "Old tracks" 1 0 9.750000 0.000000 0.616800 0.100000 0.200000
+LAYERS CURRENT 0
+REDRAW
+RESET
+CTURNOUT DESIGNER SHOW Regular Turnout
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew len1 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew manuf x
+PARAMETER turnoutNew desc1 x
+PARAMETER turnoutNew partno1 x
+PARAMETER turnoutNew desc2 x
+PARAMETER turnoutNew partno2 x
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 1
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 5.000000
+PARAMETER turnoutNew angle0 6.000000
+PARAMETER turnoutNew angleMode 0
+PARAMETER turnoutNew off0 0.750000
+PARAMETER turnoutNew len1 6.000000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1 Regular Left
+PARAMETER turnoutNew partno1 L
+PARAMETER turnoutNew desc2 Regular Right
+PARAMETER turnoutNew partno2 R
+PARAMETER turnoutNew partno1 Reg L
+PARAMETER turnoutNew partno2 Reg R
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno2 Reg R
+
+CTURNOUT DESIGNER SHOW Curved Turnout
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew len1 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew off1 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew angle1 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew desc2
+PARAMETER turnoutNew partno2
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew angle0 4.000000
+PARAMETER turnoutNew angle1 6.000000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1 Curved Left
+PARAMETER turnoutNew partno1 Crv L
+PARAMETER turnoutNew desc2 Curved Right
+PARAMETER turnoutNew partno2 Crv R
+PARAMETER turnoutNew len0 6.000000
+PARAMETER turnoutNew len1 7.000000
+PARAMETER turnoutNew off1 0.500000
+PARAMETER turnoutNew off0 1.000000
+PARAMETER turnoutNew done
+PARAMETER turnoutNew off0 1.000000
+
+CTURNOUT DESIGNER SHOW Cornu Curved Turnout
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew rad2 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew desc2
+PARAMETER turnoutNew partno2
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 1
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 6.000
+PARAMETER turnoutNew angle0 14.500
+PARAMETER turnoutNew off0 1.100
+PARAMETER turnoutNew rad0 18.000
+PARAMETER turnoutNew len1 7.000
+PARAMETER turnoutNew angle1 9.6
+PARAMETER turnoutNew off1 0.770
+PARAMETER turnoutNew rad1 17.000
+PARAMETER turnoutNew toeL 0.500
+PARAMETER turnoutNew rad2 0.000
+PARAMETER turnoutNew desc1 Cornu Curved Left
+PARAMETER turnoutNew partno1 Cor Crv L
+PARAMETER turnoutNew desc2 Cornu Curved Right
+PARAMETER turnoutNew partno2 Cor Crv R
+PARAMETER turnoutNew done
+
+CTURNOUT DESIGNER SHOW Wye Turnout
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew len1 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew off1 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew angle1 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 5.000000
+PARAMETER turnoutNew off0 1.000000
+PARAMETER turnoutNew off1 1.000000
+PARAMETER turnoutNew len1 5.000000
+PARAMETER turnoutNew desc1 Wye
+PARAMETER turnoutNew partno1 Wye
+PARAMETER turnoutNew partno1 Wye
+PARAMETER turnoutNew angle0 3.000000
+PARAMETER turnoutNew angle1 3.000000
+PARAMETER turnoutNew done
+PARAMETER turnoutNew angle1 3.000000
+
+CTURNOUT DESIGNER SHOW Cornu Wye Turnout
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew len1 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew off1 0.000
+PARAMETER turnoutNew rad0 0.000
+PARAMETER turnoutNew rad1 0.000
+PARAMETER turnoutNew rad2 0.000
+PARAMETER turnoutNew toeL 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew angle1 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 1
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 5.000
+PARAMETER turnoutNew angle0 19.500
+PARAMETER turnoutNew off0 1.000
+PARAMETER turnoutNew rad0 18.000
+PARAMETER turnoutNew len1 5.000
+PARAMETER turnoutNew angle1 19.500
+PARAMETER turnoutNew off1 1.000
+PARAMETER turnoutNew rad1 18.000
+PARAMETER turnoutNew toeL 0.354
+PARAMETER turnoutNew rad2 0.000
+PARAMETER turnoutNew desc1 Cornu Wye
+PARAMETER turnoutNew partno1 Cor Wye
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno1 Cor Wye
+
+CTURNOUT DESIGNER SHOW 3-way Turnout
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew len1 0.000
+PARAMETER turnoutNew len2 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew off1 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew angle1 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len2 7.000000
+PARAMETER turnoutNew len0 6.000000
+PARAMETER turnoutNew angle0 3.000000
+PARAMETER turnoutNew off0 1.000000
+PARAMETER turnoutNew off1 1.000000
+PARAMETER turnoutNew angle1 3.000000
+PARAMETER turnoutNew len1 5.000000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1 3-Way
+PARAMETER turnoutNew partno1 3 Way
+PARAMETER turnoutNew len1 6.000000
+PARAMETER turnoutNew done
+PARAMETER turnoutNew len1 6.000000
+
+CTURNOUT DESIGNER SHOW Cornu 3-way Turnout
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew len1 0.000
+PARAMETER turnoutNew len3 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew off1 0.000
+PARAMETER turnoutNew off3 0.000
+PARAMETER turnoutNew rad0 0.000
+PARAMETER turnoutNew rad1 0.000
+PARAMETER turnoutNew rad2 0.000
+PARAMETER turnoutNew rad3 0.000
+PARAMETER turnoutNew toeL 0.000
+PARAMETER turnoutNew toeR 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew angle1 0.000
+PARAMETER turnoutNew angle3 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 1
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 5.000
+PARAMETER turnoutNew angle0 19.2
+PARAMETER turnoutNew off0 1.000
+PARAMETER turnoutNew rad0 18.000
+PARAMETER turnoutNew len1 5.000
+PARAMETER turnoutNew angle1 19.2
+PARAMETER turnoutNew off1 1.000
+PARAMETER turnoutNew rad1 18.000
+PARAMETER turnoutNew len3 6.000
+PARAMETER turnoutNew angle3 0.000
+PARAMETER turnoutNew off3 0.000
+PARAMETER turnoutNew rad3 0.000
+PARAMETER turnoutNew toeL 0.354
+PARAMETER turnoutNew rad2 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1 Cornu 3-Way
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew partno1 Cor 3 Way
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno1 Cor 3 Way
+
+CTURNOUT DESIGNER SHOW Crossing
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew len1 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 6.000000
+PARAMETER turnoutNew angle0 4.000000
+PARAMETER turnoutNew len1 5.000000
+PARAMETER turnoutNew desc1 Xing
+PARAMETER turnoutNew partno1 Xing
+PARAMETER turnoutNew desc1 Crossing
+PARAMETER turnoutNew done
+PARAMETER turnoutNew desc1 Crossing
+CTURNOUT DESIGNER SHOW Single Slipswitch
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew len1 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 5.000000
+PARAMETER turnoutNew angle0 4.000000
+PARAMETER turnoutNew len1 6.000000
+PARAMETER turnoutNew desc1 Single Slip
+PARAMETER turnoutNew partno1 S Slip
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno1 S Slip
+CTURNOUT DESIGNER SHOW Double Slipswitch
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew len1 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER turnoutNew angleMode 0
+PARAMETER turnoutNew slipMode 1
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew angle0 4.000000
+PARAMETER turnoutNew len1 5.000000
+PARAMETER turnoutNew len0 6.000000
+PARAMETER turnoutNew desc1 Double Slip
+PARAMETER turnoutNew partno1 D Slip
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno1 D Slip
+CTURNOUT DESIGNER SHOW Right Crossover
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 7.000000
+PARAMETER turnoutNew off0 1.500000
+PARAMETER turnoutNew desc1 Right Crossover
+PARAMETER turnoutNew partno1 Xovr R
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno1 Xovr R
+CTURNOUT DESIGNER SHOW Left Crossover
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 7.000000
+PARAMETER turnoutNew off0 1.500000
+PARAMETER turnoutNew desc1 Left Crossover
+PARAMETER turnoutNew partno1 Xovr L
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno1 Xovr L
+CTURNOUT DESIGNER SHOW Double Crossover
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew off0 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 7.000000
+PARAMETER turnoutNew off0 1.500000
+PARAMETER turnoutNew desc1 Double Crossover
+PARAMETER turnoutNew partno1 Xovr D
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno1 Xovr D
+CTURNOUT DESIGNER SHOW Straight Section
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 6.000000
+PARAMETER turnoutNew desc1 Straight
+PARAMETER turnoutNew partno1 Str
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno1 Str
+CTURNOUT DESIGNER SHOW Curved Section
+PARAMETER turnoutNew len0 0.000
+PARAMETER turnoutNew angle0 0.000
+PARAMETER turnoutNew manuf Turnout Designer
+PARAMETER turnoutNew desc1
+PARAMETER turnoutNew partno1
+PARAMETER turnoutNew roadbedWidth 0.000
+PARAMETER turnoutNew roadbedLineWidth 0
+PARAMETER turnoutNew color 0
+PARAMETER GROUP turnoutNew
+PARAMETER turnoutNew len0 15.000000
+PARAMETER turnoutNew angle0 15.000000
+PARAMETER turnoutNew desc1 Curved
+PARAMETER turnoutNew partno1 Crv
+PARAMETER turnoutNew done
+PARAMETER turnoutNew partno1 Crv
+MESSAGE
+-----------------------------------------------------
+
+Create an instance of each turnout
+END$MESSAGE
+STEP
+
+HOTBARSELECT Turnout Designer Regular Left Reg L
+MOUSE 2 1.000 1.000
+MOUSE 4 1.000 1.000
+MOUSE 3336 1.000 1.000
+
+HOTBARSELECT Turnout Designer Regular Right Reg R
+MOUSE 2 1.000 3.000
+MOUSE 4 1.000 3.000
+MOUSE 3336 1.000 3.000
+
+HOTBARSELECT Turnout Designer Curved Left Crv L
+MOUSE 2 1.000 4.500
+MOUSE 4 1.000 4.500
+MOUSE 3336 1.000 4.500
+
+HOTBARSELECT Turnout Designer Curved Right Crv R
+MOUSE 2 1.000 7.500
+MOUSE 4 1.000 7.500
+MOUSE 3336 1.000 7.500
+
+HOTBARSELECT Turnout Designer Cornu Curved Left Cor Crv L
+MOUSE 2 1.000 9.500
+MOUSE 4 1.000 9.500
+MOUSE 3336 1.000 9.500
+
+HOTBARSELECT Turnout Designer Cornu Curved Right Cor Crv R
+MOUSE 2 1.000 12.000
+MOUSE 4 1.000 12.000
+MOUSE 3336 1.000 12.000
+
+HOTBARSELECT Turnout Designer Wye Wye
+MOUSE 2 9.500 1.000
+MOUSE 4 9.500 1.000
+MOUSE 3336 9.500 1.000
+
+HOTBARSELECT Turnout Designer Cornu Wye Cor Wye
+MOUSE 2 9.500 3.000
+MOUSE 4 9.500 3.000
+MOUSE 3336 9.500 3.000
+
+HOTBARSELECT Turnout Designer 3-Way 3 Way
+MOUSE 2 9.500 5.000
+MOUSE 4 9.500 5.000
+MOUSE 3336 9.500 3.000
+
+HOTBARSELECT Turnout Designer Cornu 3-Way Cor 3 Way
+MOUSE 2 9.500 7.000
+MOUSE 4 9.500 7.000
+MOUSE 3336 9.500 7.000
+
+HOTBARSELECT Turnout Designer Crossing Xing
+MOUSE 2 9.500 9.000
+MOUSE 4 9.500 9.000
+MOUSE 3336 9.500 9.000
+
+HOTBARSELECT Turnout Designer Single Slip S Slip
+MOUSE 2 9.500 11.000
+MOUSE 4 9.500 11.000
+MOUSE 3336 9.500 11.000
+
+HOTBARSELECT Turnout Designer Double Slip D Slip
+MOUSE 2 9.500 13.000
+MOUSE 4 9.500 13.000
+MOUSE 3336 9.500 13.000
+
+HOTBARSELECT Turnout Designer Right Crossover Xovr R
+MOUSE 2 18.000 1.000
+MOUSE 4 18.000 1.000
+MOUSE 3336 18.000 1.000
+
+HOTBARSELECT Turnout Designer Left Crossover Xovr L
+MOUSE 2 18.000 4.000
+MOUSE 4 18.000 4.000
+MOUSE 3336 18.000 4.000
+
+HOTBARSELECT Turnout Designer Double Crossover Xovr D
+MOUSE 2 18.000 7.000
+MOUSE 4 18.000 7.000
+MOUSE 3336 18.000 7.000
+
+HOTBARSELECT Turnout Designer Straight Str
+MOUSE 2 18.000 10.000
+MOUSE 4 18.000 10.000
+MOUSE 3336 18.000 10.000
+
+HOTBARSELECT Turnout Designer Curved Crv
+MOUSE 2 18.000 12.000
+MOUSE 4 18.000 12.000
+MOUSE 3336 18.000 12.000
+
+MESSAGE
+-----------------------------------------------------
+
+Run Regression Checks
+END$MESSAGE
+STEP
+REGRESSION START 12 Turnout Designer Test Case
+TURNOUT 1 0 0 0 0 DEMO 2 1.000000 1.000000 0 0.000000 "Turnout Designer Regular Left Reg L"
+ E4 1.000000 1.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 7.000000 1.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 6.000000 1.750000 80.405932 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 2
+ P "Reverse" 1 3 4
+ S 0 0.000000 0.000000 0.000000 0.354300 0.000000
+ S 0 0.000000 0.354300 0.000000 6.000000 0.000000
+ C 0 0.000000 -2.486173 0.354300 2.486173 170.405932 9.594068
+ S 0 0.000000 0.768662 0.034773 5.000000 0.750000
+ END$SEGS
+TURNOUT 2 0 0 0 0 DEMO 2 1.000000 3.000000 0 0.000000 "Turnout Designer Regular Right Reg R"
+ E4 1.000000 3.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 7.000000 3.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 6.000000 2.250000 99.594068 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 2
+ P "Reverse" 1 3 4
+ S 0 0.000000 0.000000 0.000000 0.354300 -0.000000
+ S 0 0.000000 0.354300 -0.000000 6.000000 0.000000
+ C 0 0.000000 2.486173 0.354300 -2.486173 0.000000 9.594068
+ S 0 0.000000 0.768662 -0.034773 5.000000 -0.750000
+ END$SEGS
+TURNOUT 3 0 0 0 0 DEMO 2 1.000000 4.500000 0 0.000000 "Turnout Designer Curved Left Crv L"
+ E4 1.000000 4.500000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 8.000000 5.000000 80.405932 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 7.000000 5.500000 75.522488 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 6 4 5
+ P "Reverse" 1 2 3
+ S 0 0.000000 0.000000 0.000000 0.354300 0.000000
+ C 0 0.000000 -13.956569 0.354300 13.956569 165.522488 14.477512
+ S 0 0.000000 3.843442 0.443179 6.000000 1.000000
+ C 0 0.000000 -31.526372 1.396260 31.526372 170.405932 9.594068
+ S 0 0.000000 6.650655 0.440950 7.000000 0.500000
+ S 0 0.000000 0.354300 0.000000 1.396260 0.000000
+ END$SEGS
+TURNOUT 4 0 0 0 0 DEMO 2 1.000000 7.500000 0 0.000000 "Turnout Designer Curved Right Crv R"
+ E4 1.000000 7.500000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 8.000000 7.000000 99.594068 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 7.000000 6.500000 104.477512 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 6 4 5
+ P "Reverse" 1 2 3
+ S 0 0.000000 0.000000 0.000000 0.354300 -0.000000
+ C 0 0.000000 13.956569 0.354300 -13.956569 0.000000 14.477512
+ S 0 0.000000 3.843442 -0.443179 6.000000 -1.000000
+ C 0 0.000000 31.526372 1.396260 -31.526372 0.000000 9.594068
+ S 0 0.000000 6.650655 -0.440950 7.000000 -0.500000
+ S 0 0.000000 0.354300 -0.000000 1.396260 -0.000000
+ END$SEGS
+TURNOUT 5 0 0 0 0 DEMO 2 1.000000 9.500000 0 0.000000 "Turnout Designer Cornu Curved Left Cor Crv L"
+ E4 1.000000 9.500000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 8.000000 10.270000 80.400000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 7.000000 10.600000 75.500000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 2 3 4
+ P "Reverse" 1 5 6 7 8
+ S 0 0.000000 0.000000 0.000000 0.499980 0.001608
+ C 0 0.000000 -23.557999 -0.084688 23.552351 170.856688 7.721184
+ S 0 0.000000 3.658782 0.293681 6.802609 0.737807
+ C 0 0.000000 -17.000000 4.164931 17.531933 170.400000 0.674068
+ C 0 0.000000 -10.187780 0.450483 10.189268 172.093896 7.627733
+ C 0 0.000000 -12.230134 -0.027711 12.183174 164.805564 6.354200
+ S 0 0.000000 3.177751 0.380581 5.806096 1.051001
+ C 0 0.000000 -18.000000 1.493160 18.526658 165.500000 0.636620
+ END$SEGS
+TURNOUT 6 0 0 0 0 DEMO 2 1.000000 12.000000 0 0.000000 "Turnout Designer Cornu Curved Right Cor Crv R"
+ E4 1.000000 12.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 8.000000 11.230000 99.600000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 7.000000 10.900000 104.500000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 2 3 4
+ P "Reverse" 1 5 6 7 8
+ S 0 0.000000 0.000000 0.000000 0.499980 -0.001608
+ C 0 0.000000 23.557999 -0.084688 -23.552351 1.422128 7.721184
+ S 0 0.000000 3.658782 -0.293681 6.802609 -0.737807
+ C 0 0.000000 17.000000 4.164931 -17.531933 8.925932 0.674068
+ C 0 0.000000 10.187780 0.450483 -10.189268 0.278371 7.627733
+ C 0 0.000000 12.230134 -0.027711 -12.183174 8.840236 6.354200
+ S 0 0.000000 3.177751 -0.380581 5.806096 -1.051001
+ C 0 0.000000 18.000000 1.493160 -18.526658 13.863380 0.636620
+ END$SEGS
+TURNOUT 7 0 0 0 0 DEMO 2 9.500000 1.000000 0 0.000000 "Turnout Designer Wye Wye"
+ E4 9.500000 1.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.500000 2.000000 70.528779 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.500000 0.000000 109.471221 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Left" 1 2 3
+ P "Right" 1 4 5
+ S 0 0.000000 0.000000 0.000000 0.354300 0.000000
+ C 0 0.000000 -10.591843 0.354300 10.591843 160.528779 19.471221
+ S 0 0.000000 3.884914 0.605758 5.000000 1.000000
+ C 0 0.000000 10.591843 0.354300 -10.591843 0.000000 19.471221
+ S 0 0.000000 3.884914 -0.605758 5.000000 -1.000000
+ END$SEGS
+TURNOUT 8 0 0 0 0 DEMO 2 9.500000 3.000000 0 0.000000 "Turnout Designer Cornu Wye Cor Wye"
+ E4 9.500000 3.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.500000 4.000000 70.500000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.500000 2.000000 109.500000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Left" 1 2 3 4 5 6
+ P "Right" 1 2 7 8 9 10
+ S 0 0.000000 0.000000 0.000000 0.200000 0.000000
+ S 0 0.000000 0.200000 0.000000 0.354000 0.000000
+ C 0 0.000000 -11.721160 0.500050 11.720250 175.110495 5.603451
+ C 0 0.000000 -7.987944 0.693119 7.988923 165.986563 8.222483
+ C 0 0.000000 -20.842358 -2.596956 20.415677 159.180018 6.303393
+ C 0 0.000000 -18.000000 -1.008523 17.967547 160.500000 0.636620
+ C 0 0.000000 10.805495 0.496564 -10.804555 359.244037 6.074250
+ C 0 0.000000 7.902213 0.624248 -7.899322 6.348994 8.306227
+ C 0 0.000000 29.327974 -4.982624 -28.578689 15.031369 4.476610
+ C 0 0.000000 18.000000 -1.008523 -17.967547 18.863380 0.636620
+ END$SEGS
+TURNOUT 9 0 0 0 0 DEMO 2 9.500000 5.000000 0 0.000000 "Turnout Designer 3-Way 3 Way"
+ E4 9.500000 5.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 15.500000 6.000000 70.528779 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 15.500000 4.000000 109.471221 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 16.500000 5.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Left" 1 2 3
+ P "Normal" 1 6
+ P "Right" 1 4 5
+ S 0 0.000000 0.000000 0.000000 0.525873 0.000000
+ C 0 0.000000 -15.420270 0.525873 15.420270 160.528779 19.471221
+ S 0 0.000000 5.665963 0.881900 6.000000 1.000000
+ C 0 0.000000 15.420270 0.525873 -15.420270 0.000000 19.471221
+ S 0 0.000000 5.665963 -0.881900 6.000000 -1.000000
+ S 0 0.000000 0.525873 0.000000 7.000000 0.000000
+ END$SEGS
+TURNOUT 10 0 0 0 0 DEMO 2 9.500000 7.000000 0 0.000000 "Turnout Designer Cornu 3-Way Cor 3 Way"
+ E4 9.500000 7.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.500000 8.000000 70.800000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.500000 6.000000 109.200000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 15.500000 7.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 2 3 4 5
+ P "Left" 1 2 3 6 7 8 9
+ P "Right" 1 2 10 11 12 13
+ S 0 0.000000 0.000000 0.000000 0.200000 0.000000
+ S 0 0.000000 0.200000 0.000000 0.000000 0.000000
+ S 0 0.000000 0.000000 0.000000 0.354000 0.000000
+ S 0 0.000000 0.354000 0.000000 5.800000 0.000000
+ S 0 0.000000 5.800000 0.000000 6.000000 0.000000
+ C 0 0.000000 -11.463991 0.499120 11.463072 174.997261 5.728053
+ C 0 0.000000 -7.957029 0.675689 7.957092 165.809447 8.252862
+ C 0 0.000000 -22.458410 -3.058640 21.969836 159.488282 5.848707
+ C 0 0.000000 -18.000000 -0.919600 17.998775 160.800000 0.636620
+ C 0 0.000000 13.194589 0.155392 -13.193674 359.325214 5.350882
+ C 0 0.000000 9.251876 0.335646 -9.251448 5.553830 7.631375
+ C 0 0.000000 25.329956 -3.475308 -24.871603 13.518938 5.575451
+ C 0 0.000000 18.000000 -0.919600 -17.998775 18.563380 0.636620
+ END$SEGS
+TURNOUT 11 0 0 0 0 DEMO 2 9.500000 9.000000 0 0.000000 "Turnout Designer Crossing Xing"
+ E4 9.500000 9.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 15.500000 9.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 10.079385 9.625000 284.477512 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.920615 8.375000 104.477512 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 0 2
+ S 0 0.000000 0.000000 0.000000 6.000000 0.000000
+ S 0 0.000000 0.579385 0.625000 5.420615 -0.625000
+ END$SEGS
+TURNOUT 12 0 0 0 0 DEMO 2 9.500000 11.000000 0 0.000000 "Turnout Designer Single Slip S Slip"
+ E4 9.500000 11.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.500000 11.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 9.095262 11.750000 284.477512 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.904738 10.250000 104.477512 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 2 0 3 4
+ P "Reverse" 1 5 4
+ S 0 0.000000 0.000000 0.000000 0.354300 0.000000
+ S 0 0.000000 0.354300 0.000000 5.000000 0.000000
+ S 0 0.000000 -0.404738 0.750000 4.577565 -0.536425
+ S 0 0.000000 4.577565 -0.536425 5.404738 -0.750000
+ C 0 0.000000 16.893060 0.354300 -16.893060 0.000000 14.477512
+ END$SEGS
+TURNOUT 13 0 512 0 0 DEMO 2 9.500000 13.000000 0 0.000000 "Turnout Designer Double Slip D Slip"
+ E4 9.500000 13.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 15.500000 13.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 10.079385 13.625000 284.477512 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 14.920615 12.375000 104.477512 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Cross1" 1 2 3
+ P "Cross2" 4 5 6
+ P "Slip1" 1 7 6
+ P "Slip2" 4 8 3
+ S 0 0.000000 0.000000 0.000000 1.208600 0.000000
+ S 0 0.000000 1.208600 0.000000 4.791400 0.000000
+ S 0 0.000000 4.791400 0.000000 6.000000 0.000000
+ S 0 0.000000 0.579385 0.625000 1.265484 0.447850
+ S 0 0.000000 1.265484 0.447850 4.734516 -0.447850
+ S 0 0.000000 4.734516 -0.447850 5.420615 -0.625000
+ C 0 0.000000 14.103662 1.208600 -14.103662 0.000000 14.477512
+ C 0 0.000000 -14.103662 4.791400 14.103662 180.000000 14.477512
+ END$SEGS
+TURNOUT 14 0 0 0 0 DEMO 2 18.000000 1.000000 0 0.000000 "Turnout Designer Right Crossover Xovr R"
+ E4 18.000000 1.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 25.000000 1.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 18.000000 2.500000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 25.000000 2.500000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 2 0 3 4
+ P "Reverse" 3 5 6 7 2
+ S 0 0.000000 0.000000 0.000000 6.461065 0.000000
+ S 0 0.000000 6.461065 0.000000 7.000000 0.000000
+ S 0 0.000000 0.000000 1.500000 0.538935 1.500000
+ S 0 0.000000 0.538935 1.500000 7.000000 1.500000
+ C 0 0.000000 6.136583 0.538935 -4.636583 0.000000 25.493739
+ S 0 0.000000 3.180197 0.902495 3.819803 0.597505
+ C 0 0.000000 -6.136583 6.461065 6.136583 180.000000 25.493739
+ END$SEGS
+TURNOUT 15 0 0 0 0 DEMO 2 18.000000 4.000000 0 0.000000 "Turnout Designer Left Crossover Xovr L"
+ E4 18.000000 4.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 25.000000 4.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 18.000000 5.500000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 25.000000 5.500000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 2 0 3 4
+ P "Reverse" 1 5 6 7 4
+ S 0 0.000000 0.000000 0.000000 0.538935 0.000000
+ S 0 0.000000 0.538935 0.000000 7.000000 0.000000
+ S 0 0.000000 0.000000 1.500000 6.461065 1.500000
+ S 0 0.000000 6.461065 1.500000 7.000000 1.500000
+ C 0 0.000000 -6.136583 0.538935 6.136583 154.506261 25.493739
+ S 0 0.000000 3.180197 0.597505 3.819803 0.902495
+ C 0 0.000000 6.136583 6.461065 -4.636583 334.506261 25.493739
+ END$SEGS
+TURNOUT 16 0 0 0 0 DEMO 2 18.000000 7.000000 0 0.000000 "Turnout Designer Double Crossover Xovr D"
+ E4 18.000000 7.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 25.000000 7.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 18.000000 8.500000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 25.000000 8.500000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1 2 3 0 4 5 6
+ P "Reverse" 1 7 8 9 6 0 4 10 11 12 3
+ S 0 0.000000 0.000000 0.000000 0.538935 0.000000
+ S 0 0.000000 0.538935 0.000000 6.461065 0.000000
+ S 0 0.000000 6.461065 0.000000 7.000000 0.000000
+ S 0 0.000000 0.000000 1.500000 0.538935 1.500000
+ S 0 0.000000 0.538935 1.500000 6.461065 1.500000
+ S 0 0.000000 6.461065 1.500000 7.000000 1.500000
+ C 0 0.000000 -6.136583 0.538935 6.136583 154.506261 25.493739
+ S 0 0.000000 3.180197 0.597505 3.819803 0.902495
+ C 0 0.000000 6.136583 6.461065 -4.636583 334.506261 25.493739
+ C 0 0.000000 6.136583 0.538935 -4.636583 0.000000 25.493739
+ S 0 0.000000 3.180197 0.902495 3.819803 0.597505
+ C 0 0.000000 -6.136583 6.461065 6.136583 180.000000 25.493739
+ END$SEGS
+TURNOUT 17 0 0 0 0 DEMO 2 18.000000 10.000000 0 0.000000 "Turnout Designer Straight Str"
+ E4 18.000000 10.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 24.000000 10.000000 90.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1
+ S 0 0.000000 0.000000 0.000000 6.000000 0.000000
+ END$SEGS
+TURNOUT 18 0 0 0 0 DEMO 2 18.000000 12.000000 0 0.000000 "Turnout Designer Curved Crv"
+ E4 18.000000 12.000000 270.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ E4 21.882286 12.511113 75.000000 0 0.0 0.0 0.0 0.0 0 0 0 0.000000
+ D 0.000000 0.000000
+ P "Normal" 1
+ C 0 0.000000 -15.000000 0.000000 15.000000 165.000000 15.000000
+ END$SEGS
+REGRESSION END
+
+MESSAGE
+-----------------------------------------------------
+
+Remove the parameter definitions
+END$MESSAGE
+STEP
+
+PARAMETER misc cmdCustmgm
+PARAMETER custmgm inx 0 Turnout Designer DEMO Reg L Regular Left
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Reg R Regular Right
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Crv L Curved Left
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Crv R Curved Right
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Cor Crv L Cornu Curved Left
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Cor Crv R Cornu Curved Right
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Wye Wye
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Cor Wye Cornu Wye
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO 3 Way 3-Way
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Cor 3 Way Cornu 3-Way
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Xing Crossing
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO S Slip Single Slip
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO D Slip Double Slip
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Xovr R Right Crossover
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Xovr L Left Crossover
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Xovr D Double Crossover
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Str Straight
+PARAMETER custmgm delete
+PARAMETER custmgm inx 0 Turnout Designer DEMO Crv Curved
+PARAMETER custmgm delete
+PARAMETER custmgm ok
+
+MESSAGE
+-----------------------------------------------------
+
+End of Playback. Hit Step to exit
+END$MESSAGE
+STEP
diff --git a/app/tools/halibut/CMakeLists.txt b/app/tools/halibut/CMakeLists.txt
index ec7d74b..a4ddc75 100644
--- a/app/tools/halibut/CMakeLists.txt
+++ b/app/tools/halibut/CMakeLists.txt
@@ -1,4 +1,5 @@
-SET(SOURCES
+
+add_executable(halibut
biblio.c
bk_html.c
contents.c
@@ -22,11 +23,13 @@ SET(SOURCES
ustring.c
version.c
wcwidth.c
- )
+)
-INCLUDE_DIRECTORIES(charset)
-ADD_EXECUTABLE(halibut ${SOURCES})
-TARGET_LINK_LIBRARIES(halibut xtrkcad-charset)
+set_target_properties(
+ halibut
+ PROPERTIES FOLDER HelpDocs
+)
+target_link_libraries(halibut xtrkcad-charset)
-ADD_SUBDIRECTORY(charset)
+add_subdirectory(charset)
diff --git a/app/tools/halibut/bk_paper.c b/app/tools/halibut/bk_paper.c
index 97f88b4..8c244b8 100644
--- a/app/tools/halibut/bk_paper.c
+++ b/app/tools/halibut/bk_paper.c
@@ -514,7 +514,7 @@ void *paper_pre_backend(paragraph *sourceform, keywordlist *keywords,
int has_index;
int pagenum;
paragraph index_placeholder_para;
- page_data *first_index_page;
+ page_data *first_index_page = NULL;
init_std_fonts();
fontlist = snew(font_list);
@@ -1707,7 +1707,7 @@ static void wrap_paragraph(para_data *pdata, word *words,
for (p = wrapping; p; p = p->next) {
line_data *ldata;
- word *wd;
+// word *wd;
int len, wid, spaces;
ldata = snew(line_data);
@@ -1732,7 +1732,7 @@ static void wrap_paragraph(para_data *pdata, word *words,
spaces = 0;
len = paper_width_list(&ctx, ldata->first, ldata->end, &spaces);
wid = (p == wrapping ? w - i1 : w - i2);
- wd = ldata->first;
+// wd = ldata->first;
ldata->hshortfall = wid - len;
ldata->nspaces = spaces;
@@ -2296,7 +2296,7 @@ static int render_line(line_data *ldata, int left_x, int top_y,
xr = NULL;
{
- int extra_indent, shortfall, spaces;
+ int extra_indent = 0, shortfall = 0, spaces = 0;
int just = ldata->pdata->justification;
/*
@@ -2344,7 +2344,7 @@ static void render_para(para_data *pdata, paper_conf *conf,
keywordlist *keywords, indexdata *idx,
paragraph *index_placeholder, page_data *index_page)
{
- int last_x;
+ int last_x = 0;
xref *cxref;
page_data *cxref_page;
xref_dest dest;
@@ -2741,7 +2741,7 @@ static word *fake_end_ref(void)
static word *prepare_contents_title(word *first, wchar_t *separator,
word *second)
{
- word *ret;
+ word *ret = NULL;
word **wptr, *w;
wptr = &ret;
diff --git a/app/tools/halibut/charset/CMakeLists.txt b/app/tools/halibut/charset/CMakeLists.txt
index 86521b8..684c70e 100644
--- a/app/tools/halibut/charset/CMakeLists.txt
+++ b/app/tools/halibut/charset/CMakeLists.txt
@@ -1,4 +1,7 @@
-SET(SOURCES
+#
+# Character set conversion library as required for halibut
+
+add_library(xtrkcad-charset
big5enc.c
big5set.c
charset.h
@@ -29,10 +32,11 @@ SET(SOURCES
utf16.c
utf7.c
utf8.c
- xenc.c
- )
-
-INCLUDE_DIRECTORIES(${CMAKE_CURRENT_SOURCE_DIR})
+ xenc.c)
-ADD_LIBRARY(xtrkcad-charset ${SOURCES})
+set_target_properties(
+ xtrkcad-charset
+ PROPERTIES FOLDER HelpDocs
+ )
+ target_include_directories(xtrkcad-charset PUBLIC ${CMAKE_CURRENT_SOURCE_DIR})
diff --git a/app/tools/halibut/deflate.c b/app/tools/halibut/deflate.c
index 6e4cc67..6366708 100644
--- a/app/tools/halibut/deflate.c
+++ b/app/tools/halibut/deflate.c
@@ -266,6 +266,7 @@ static void lz77_compress(struct LZ77Context *ctx,
st->npending -= i;
defermatch.len = 0;
+ defermatch.distance = 0;
deferchr = '\0';
while (len > 0) {
@@ -1203,7 +1204,7 @@ static void outblock(deflate_compress_ctx *out,
*/
for (i = 0; i < 19; i++)
codelen[i] = len3[lenlenmap[i]];
- for (hclen = 19; hclen > 4 && codelen[hclen-1] == 0; hclen--);
+ for (hclen = 19; hclen > 4 && codelen[hclen-1] == 0; hclen--){};
/*
* Now work out the exact size of both the dynamic and the
@@ -2042,7 +2043,8 @@ int deflate_decompress_data(deflate_decompress_ctx *dctx,
{
const coderecord *rec;
const unsigned char *block = (const unsigned char *)vblock;
- int code, bfinal, btype, rep, dist, nlen, header, cksum;
+ int code, bfinal, btype, rep, dist, header, cksum;
+// int nlen;
int error = 0;
if (len == 0) {
@@ -2441,7 +2443,7 @@ int deflate_decompress_data(deflate_decompress_ctx *dctx,
*/
if (dctx->nbits < 16)
goto finished;
- nlen = dctx->bits & 0xFFFF;
+// nlen = dctx->bits & 0xFFFF;
EATBITS(16);
if (dctx->uncomplen == 0)
dctx->state = OUTSIDEBLK; /* block is empty */
diff --git a/app/tools/halibut/in_afm.c b/app/tools/halibut/in_afm.c
index 724bae7..cb2b39c 100644
--- a/app/tools/halibut/in_afm.c
+++ b/app/tools/halibut/in_afm.c
@@ -229,14 +229,14 @@ void read_afm_file(input *in) {
} else if (strcmp(key, "StartKernPairs") == 0 ||
strcmp(key, "StartKernPairs0") == 0) {
int nkerns, i;
- kern_pair *kerns;
+// kern_pair *kerns;
if (!(val = strtok(NULL, " \t"))) {
error(err_afmval, &in->pos, key, 1);
goto giveup;
}
nkerns = atoi(val);
sfree(line);
- kerns = snewn(nkerns, kern_pair);
+// kerns = snewn(nkerns, kern_pair);
for (i = 0; i < nkerns; i++) {
line = afm_read_line(in);
if (line == NULL)
diff --git a/app/tools/halibut/input.c b/app/tools/halibut/input.c
index 256d9c6..0f38569 100644
--- a/app/tools/halibut/input.c
+++ b/app/tools/halibut/input.c
@@ -831,7 +831,7 @@ static void read_file(paragraph ***ret, input *in, indexdata *idx,
*/
par.type = para_Normal;
if (t.type == tok_cmd) {
- int needkw;
+ int needkw = -1;
int is_macro = FALSE;
par.fpos = t.pos;
diff --git a/app/tools/halibut/tree234.c b/app/tools/halibut/tree234.c
index 26d188e..e971453 100644
--- a/app/tools/halibut/tree234.c
+++ b/app/tools/halibut/tree234.c
@@ -1162,7 +1162,7 @@ tree234 *join234r(tree234 *t1, tree234 *t2) {
static node234 *split234_internal(tree234 *t, int index) {
node234 *halves[2], *n, *sib, *sub;
node234 *lparent, *rparent;
- int ki, pki, i, half, lcount, rcount;
+ int ki, pki = 0, i, half, lcount, rcount;
n = t->root;
LOG(("splitting tree %p at point %d\n", t, index));
diff --git a/app/tools/halibut/ustring.c b/app/tools/halibut/ustring.c
index a5d1103..99303ef 100644
--- a/app/tools/halibut/ustring.c
+++ b/app/tools/halibut/ustring.c
@@ -323,12 +323,12 @@ wchar_t *ustrlow(wchar_t *s) {
}
int utoi(wchar_t const *s) {
- int sign = +1;
+// int sign = +1;
int n;
if (*s == L'-') {
s++;
- sign = -1;
+// sign = -1;
}
n = 0;
diff --git a/app/tools/halibut/wcwidth.c b/app/tools/halibut/wcwidth.c
index f4abe23..0ffe9dd 100644
--- a/app/tools/halibut/wcwidth.c
+++ b/app/tools/halibut/wcwidth.c
@@ -144,12 +144,13 @@ int ustrwid(wchar_t const *s, int charset)
wid = 0;
while (len > 0) {
- int err, ret;
+ int err;
+// int ret;
wchar_t const *s_orig;
err = 0;
s_orig = s;
- ret = charset_from_unicode(&s, &len, buf, lenof(buf),
+ /*ret =*/ charset_from_unicode(&s, &len, buf, lenof(buf),
charset, &state, &err);
wid += wcswidth(s_orig, s - s_orig);
if (err) {
diff --git a/app/tools/lib/linux/libzip.a b/app/tools/lib/linux/libzip.a
new file mode 100644
index 0000000..b5cea1c
--- /dev/null
+++ b/app/tools/lib/linux/libzip.a
Binary files differ
diff --git a/app/tools/listxtp.c b/app/tools/listxtp.c
index 35d0daa..93fd2e9 100644
--- a/app/tools/listxtp.c
+++ b/app/tools/listxtp.c
@@ -19,7 +19,7 @@
*
* 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.
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include <stdio.h>
@@ -148,8 +148,10 @@ main( int argc, char **argv )
/*
* if found, store the restof the line and the filename
*/
+ char *bp;
buffer[ strlen( buffer ) - 1 ] = '\0';
- sprintf( buffer, "%s (%s)", buffer + strlen( CONTENTSCOMMAND ) + 1, ent->d_name );
+ bp = buffer;
+ sprintf( buffer, "%s (%s)", bp + strlen( CONTENTSCOMMAND ) + 1, ent->d_name );
results[ cnt ] = malloc( strlen( buffer ) + 1 );
strcpy( results[ cnt ], buffer );
cnt++;
diff --git a/app/tools/pngtoxpm/CMakeLists.txt b/app/tools/pngtoxpm/CMakeLists.txt
new file mode 100644
index 0000000..54f697b
--- /dev/null
+++ b/app/tools/pngtoxpm/CMakeLists.txt
@@ -0,0 +1,16 @@
+# Build pngtoxpm
+
+add_executable(pngtoxpm pngtoxpm.c)
+target_link_libraries(pngtoxpm
+ PRIVATE
+ FreeImage::FreeImage
+)
+
+if(WIN32)
+# copy dlls into the build dir for easier debugging
+ add_custom_command(
+ TARGET pngtoxpm POST_BUILD
+ COMMAND ${CMAKE_COMMAND} -E copy ${FREEIMAGE_SHAREDLIB} ${CMAKE_CURRENT_BINARY_DIR}
+ )
+ set(ENV{path} "${CMAKE_CURRENT_BINARY_DIR};$ENV{PATH}")
+endif()
diff --git a/app/tools/pngtoxpm/pngtoxpm.c b/app/tools/pngtoxpm/pngtoxpm.c
new file mode 100644
index 0000000..cebc829
--- /dev/null
+++ b/app/tools/pngtoxpm/pngtoxpm.c
@@ -0,0 +1,721 @@
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <math.h>
+#include <string.h>
+#include <fcntl.h>
+
+#include <assert.h>
+
+#include <FreeImage.h>
+
+//#define DEBUGPRINT
+
+#define CHATTY 0 /* 1 = Enable progress messages */
+#define ALPHATHRESH 96 /* If alpha >= this value the color is not transparent */
+#define BACKGROUND 208 /* The background color RGB = value */
+#define BGMASK 0xF8 /* Mask top 5 bits for partitioning */
+#define NUMPALETTE 40 /* Maximum number of palette entries */
+
+#if defined(WIN32) || defined(_WIN32)
+#include <io.h>
+#define ENDLN "\n"
+#else
+#include <unistd.h>
+// Generate DOS style line ends
+#define ENDLN "\r\n"
+#define E2BIG 1
+double min(double a, double b)
+{
+ if (a < b) { return a; }
+ return b;
+}
+#endif
+
+FIBITMAP* image;
+
+/* Note that percent does not print so omit that char from the list! */
+char palette[76] =
+ "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz~!@#$^&=+-<>/";
+
+char xpm3Buff[10000];
+
+/**********************************************************************
+C Implementation of Wu's Color Quantizer (v. 2)
+(see Graphics Gems vol. II, pp. 126-133)
+Author: Xiaolin Wu
+Dept. of Computer Science
+Univ. of Western Ontario
+London, Ontario N6A 5B7
+wu@csd.uwo.ca
+Algorithm: Greedy orthogonal bipartition of RGB space for variance
+minimization aided by inclusion-exclusion tricks.
+For speed no nearest neighbor search is done. Slightly
+better performance can be expected by more sophisticated
+but more expensive versions.
+The author thanks Tom Lane at Tom_Lane@G.GP.CS.CMU.EDU for much of
+additional documentation and a cure to a previous bug.
+
+Free to distribute, comments and suggestions are appreciated.
+
+Code from https://gist.github.com/bert/1192520
+**********************************************************************/
+
+#define MAXCOLOR 256
+#define RED 2
+#define GREEN 1
+#define BLUE 0
+
+static float m2[33][33][33];
+static long int wt[33][33][33], mr[33][33][33], mg[33][33][33], mb[33][33][33];
+unsigned char* Ir, * Ig, * Ib, * Ia;
+int size; /*image size*/
+int K; /*color look-up table size*/
+unsigned short int* Qadd;
+unsigned char lut_r[MAXCOLOR], lut_g[MAXCOLOR], lut_b[MAXCOLOR];
+
+struct box {
+ int r0; /* min value, exclusive */
+ int r1; /* max value, inclusive */
+ int g0;
+ int g1;
+ int b0;
+ int b1;
+ int vol;
+};
+
+/* Histogram is in elements 1..HISTSIZE along each axis,
+* element 0 is for base or marginal value
+* NB: these must start out 0!
+*/
+
+/* build 3-D color histogram of counts, r/g/b, c^2 */
+void Hist3d(long* vwt, long* vmr, long* vmg, long* vmb, float* m2)
+{
+ register int ind, r, g, b;
+ int inr, ing, inb, table[256];
+ register long int i;
+
+ for (i = 0; i < 256; ++i) { table[i] = i * i; }
+ Qadd = (unsigned short int*)malloc(sizeof(short int) * size);
+ if (Qadd == NULL) { fprintf(stderr, "Not enough space\n"); exit(1); }
+ for (i = 0; i < size; ++i) {
+ r = Ir[i]; g = Ig[i]; b = Ib[i];
+ inr = (r >> 3) + 1;
+ ing = (g >> 3) + 1;
+ inb = (b >> 3) + 1;
+ Qadd[i] = ind = (inr << 10) + (inr << 6) + inr + (ing << 5) + ing + inb;
+ /*[inr][ing][inb]*/
+ ++vwt[ind];
+ vmr[ind] += r;
+ vmg[ind] += g;
+ vmb[ind] += b;
+ m2[ind] += (float)(table[r] + table[g] + table[b]);
+ }
+}
+
+/* At conclusion of the histogram step, we can interpret
+* wt[r][g][b] = sum over voxel of P(c)
+* mr[r][g][b] = sum over voxel of r*P(c) , similarly for mg, mb
+* m2[r][g][b] = sum over voxel of c^2*P(c)
+* Actually each of these should be divided by 'size' to give the usual
+* interpretation of P() as ranging from 0 to 1, but we needn't do that here.
+*/
+
+/* We now convert histogram into moments so that we can rapidly calculate
+* the sums of the above quantities over any desired box.
+*/
+
+/* compute cumulative moments. */
+void M3d(long* vwt, long* vmr, long* vmg, long* vmb, float* m2)
+{
+ register unsigned short int ind1, ind2;
+ register unsigned char i, r, g, b;
+ long int line, line_r, line_g, line_b,
+ area[33], area_r[33], area_g[33], area_b[33];
+ float line2, area2[33];
+
+ for (r = 1; r <= 32; ++r) {
+ for (i = 0; i <= 32; ++i) {
+ area2[i] = area[i] = area_r[i] = area_g[i] = area_b[i] = 0.0f;
+ }
+ for (g = 1; g <= 32; ++g) {
+ line2 = line = line_r = line_g = line_b = 0;
+ for (b = 1; b <= 32; ++b) {
+ ind1 = (r << 10) + (r << 6) + r + (g << 5) + g + b; /* [r][g][b] */
+ line += vwt[ind1];
+ line_r += vmr[ind1];
+ line_g += vmg[ind1];
+ line_b += vmb[ind1];
+ line2 += m2[ind1];
+ area[b] += line;
+ area_r[b] += line_r;
+ area_g[b] += line_g;
+ area_b[b] += line_b;
+ area2[b] += line2;
+ ind2 = ind1 - 1089; /* [r-1][g][b] */
+ vwt[ind1] = vwt[ind2] + area[b];
+ vmr[ind1] = vmr[ind2] + area_r[b];
+ vmg[ind1] = vmg[ind2] + area_g[b];
+ vmb[ind1] = vmb[ind2] + area_b[b];
+ m2[ind1] = m2[ind2] + area2[b];
+ }
+ }
+ }
+}
+
+
+/* Compute sum over a box of any given statistic */
+long int Vol(struct box* cube, long int mmt[33][33][33])
+{
+ return(mmt[cube->r1][cube->g1][cube->b1]
+ - mmt[cube->r1][cube->g1][cube->b0]
+ - mmt[cube->r1][cube->g0][cube->b1]
+ + mmt[cube->r1][cube->g0][cube->b0]
+ - mmt[cube->r0][cube->g1][cube->b1]
+ + mmt[cube->r0][cube->g1][cube->b0]
+ + mmt[cube->r0][cube->g0][cube->b1]
+ - mmt[cube->r0][cube->g0][cube->b0]);
+}
+
+/* The next two routines allow a slightly more efficient calculation
+* of Vol() for a proposed subbox of a given box. The sum of Top()
+* and Bottom() is the Vol() of a subbox split in the given direction
+* and with the specified new upper bound.
+*/
+
+/* Compute part of Vol(cube, mmt) that doesn't depend on r1, g1, or b1 */
+/* (depending on dir) */
+long int Bottom(struct box* cube, int dir, long int mmt[33][33][33])
+{
+ switch (dir) {
+ case RED:
+ return(-mmt[cube->r0][cube->g1][cube->b1]
+ + mmt[cube->r0][cube->g1][cube->b0]
+ + mmt[cube->r0][cube->g0][cube->b1]
+ - mmt[cube->r0][cube->g0][cube->b0]);
+ break;
+ case GREEN:
+ return(-mmt[cube->r1][cube->g0][cube->b1]
+ + mmt[cube->r1][cube->g0][cube->b0]
+ + mmt[cube->r0][cube->g0][cube->b1]
+ - mmt[cube->r0][cube->g0][cube->b0]);
+ break;
+ case BLUE:
+ return(-mmt[cube->r1][cube->g1][cube->b0]
+ + mmt[cube->r1][cube->g0][cube->b0]
+ + mmt[cube->r0][cube->g1][cube->b0]
+ - mmt[cube->r0][cube->g0][cube->b0]);
+ break;
+ }
+ fprintf(stderr, "Bottom: Invalid dir.\n");
+ exit(1);
+}
+
+
+long int Top(struct box* cube, int dir, int pos, long int mmt[33][33][33])
+/* Compute remainder of Vol(cube, mmt), substituting pos for */
+/* r1, g1, or b1 (depending on dir) */
+{
+ switch (dir) {
+ case RED:
+ return(mmt[pos][cube->g1][cube->b1]
+ - mmt[pos][cube->g1][cube->b0]
+ - mmt[pos][cube->g0][cube->b1]
+ + mmt[pos][cube->g0][cube->b0]);
+ break;
+ case GREEN:
+ return(mmt[cube->r1][pos][cube->b1]
+ - mmt[cube->r1][pos][cube->b0]
+ - mmt[cube->r0][pos][cube->b1]
+ + mmt[cube->r0][pos][cube->b0]);
+ break;
+ case BLUE:
+ return(mmt[cube->r1][cube->g1][pos]
+ - mmt[cube->r1][cube->g0][pos]
+ - mmt[cube->r0][cube->g1][pos]
+ + mmt[cube->r0][cube->g0][pos]);
+ break;
+ }
+ fprintf(stderr, "Top: Invalid dir.\n");
+ exit(1);
+}
+
+
+/* Compute the weighted variance of a box */
+/* NB: as with the raw statistics, this is really the variance * size */
+float Var(struct box* cube)
+{
+ float dr, dg, db, xx;
+
+ dr = Vol(cube, mr);
+ dg = Vol(cube, mg);
+ db = Vol(cube, mb);
+ xx = m2[cube->r1][cube->g1][cube->b1]
+ - m2[cube->r1][cube->g1][cube->b0]
+ - m2[cube->r1][cube->g0][cube->b1]
+ + m2[cube->r1][cube->g0][cube->b0]
+ - m2[cube->r0][cube->g1][cube->b1]
+ + m2[cube->r0][cube->g1][cube->b0]
+ + m2[cube->r0][cube->g0][cube->b1]
+ - m2[cube->r0][cube->g0][cube->b0];
+
+ return(xx - (dr * dr + dg * dg + db * db) / (float)Vol(cube, wt));
+}
+
+/* We want to minimize the sum of the variances of two subboxes.
+* The sum(c^2) terms can be ignored since their sum over both subboxes
+* is the same (the sum for the whole box) no matter where we split.
+* The remaining terms have a minus sign in the variance formula,
+* so we drop the minus sign and MAXIMIZE the sum of the two terms.
+*/
+
+float Maximize(struct box* cube, int dir, int first, int last, int* cut,
+ long whole_r, long whole_g, long whole_b, long whole_w)
+{
+ register long int half_r, half_g, half_b, half_w;
+ long int base_r, base_g, base_b, base_w;
+ register int i;
+ register float temp, max;
+
+ base_r = Bottom(cube, dir, mr);
+ base_g = Bottom(cube, dir, mg);
+ base_b = Bottom(cube, dir, mb);
+ base_w = Bottom(cube, dir, wt);
+ max = 0.0;
+ *cut = -1;
+ for (i = first; i < last; ++i) {
+ half_r = base_r + Top(cube, dir, i, mr);
+ half_g = base_g + Top(cube, dir, i, mg);
+ half_b = base_b + Top(cube, dir, i, mb);
+ half_w = base_w + Top(cube, dir, i, wt);
+ /* now half_x is sum over lower half of box, if split at i */
+ if (half_w == 0) { /* subbox could be empty of pixels! */
+ continue; /* never split into an empty box */
+ } else
+ temp = ((float)half_r * half_r + (float)half_g * half_g +
+ (float)half_b * half_b) / half_w;
+
+ half_r = whole_r - half_r;
+ half_g = whole_g - half_g;
+ half_b = whole_b - half_b;
+ half_w = whole_w - half_w;
+ if (half_w == 0) { /* subbox could be empty of pixels! */
+ continue; /* never split into an empty box */
+ } else
+ temp += ((float)half_r * half_r + (float)half_g * half_g +
+ (float)half_b * half_b) / half_w;
+
+ if (temp > max) { max = temp; *cut = i; }
+ }
+ return(max);
+}
+
+int Cut(struct box* set1, struct box* set2)
+{
+ int dir;
+ int cutr, cutg, cutb;
+ float maxr, maxg, maxb;
+ long int whole_r, whole_g, whole_b, whole_w;
+
+ whole_r = Vol(set1, mr);
+ whole_g = Vol(set1, mg);
+ whole_b = Vol(set1, mb);
+ whole_w = Vol(set1, wt);
+
+ maxr = Maximize(set1, RED, set1->r0 + 1, set1->r1, &cutr,
+ whole_r, whole_g, whole_b, whole_w);
+ maxg = Maximize(set1, GREEN, set1->g0 + 1, set1->g1, &cutg,
+ whole_r, whole_g, whole_b, whole_w);
+ maxb = Maximize(set1, BLUE, set1->b0 + 1, set1->b1, &cutb,
+ whole_r, whole_g, whole_b, whole_w);
+
+ if ((maxr >= maxg) && (maxr >= maxb)) {
+ dir = RED;
+ if (cutr < 0) { return 0; } /* can't split the box */
+ } else if ((maxg >= maxr) && (maxg >= maxb)) {
+ dir = GREEN;
+ } else {
+ dir = BLUE;
+ }
+
+ set2->r1 = set1->r1;
+ set2->g1 = set1->g1;
+ set2->b1 = set1->b1;
+
+ switch (dir) {
+ case RED:
+ set2->r0 = set1->r1 = cutr;
+ set2->g0 = set1->g0;
+ set2->b0 = set1->b0;
+ break;
+ case GREEN:
+ set2->g0 = set1->g1 = cutg;
+ set2->r0 = set1->r0;
+ set2->b0 = set1->b0;
+ break;
+ case BLUE:
+ set2->b0 = set1->b1 = cutb;
+ set2->r0 = set1->r0;
+ set2->g0 = set1->g0;
+ break;
+ }
+ set1->vol = (set1->r1 - set1->r0) * (set1->g1 - set1->g0) *
+ (set1->b1 - set1->b0);
+ set2->vol = (set2->r1 - set2->r0) * (set2->g1 - set2->g0) *
+ (set2->b1 - set2->b0);
+ return 1;
+}
+
+
+void Mark(struct box* cube, int label, unsigned char* tag)
+{
+ register int r, g, b;
+
+ for (r = cube->r0 + 1; r <= cube->r1; ++r)
+ for (g = cube->g0 + 1; g <= cube->g1; ++g)
+ for (b = cube->b0 + 1; b <= cube->b1; ++b) {
+ tag[(r << 10) + (r << 6) + r + (g << 5) + g + b] = label;
+ }
+}
+
+
+void cq()
+{
+ struct box cube[MAXCOLOR];
+ unsigned char* tag;
+ int next;
+ register long int i, weight;
+ register int k;
+ float vv[MAXCOLOR], temp;
+
+ K = NUMPALETTE;
+
+ Hist3d((long*)wt, (long*)mr, (long*)mg, (long*)mb, (float*)m2);
+ if (CHATTY) { printf("Histogram done\n"); }
+
+ M3d((long*)wt, (long*)mr, (long*)mg, (long*)mb, (float*)m2);
+ if (CHATTY) { printf("Moments done\n"); }
+
+ cube[0].r0 = cube[0].g0 = cube[0].b0 = 0;
+ cube[0].r1 = cube[0].g1 = cube[0].b1 = 32;
+ next = 0;
+ for (i = 1; i < K; ++i) {
+ if (Cut(&cube[next], &cube[i])) {
+ /* volume test ensures we won't try to cut one-cell box */
+ vv[next] = (cube[next].vol > 1) ? Var(&cube[next]) : 0.0;
+ vv[i] = (cube[i].vol > 1) ? Var(&cube[i]) : 0.0;
+ } else {
+ vv[next] = 0.0; /* don't try to split this box again */
+ i--; /* didn't create box i */
+ }
+ next = 0; temp = vv[0];
+ for (k = 1; k <= i; ++k)
+ if (vv[k] > temp) {
+ temp = vv[k]; next = k;
+ }
+ if (temp <= 0.0) {
+ K = i + 1;
+ if (CHATTY) { printf("Only got %d boxes\n", K); }
+ break;
+ }
+ }
+ if (CHATTY) { printf("Partition done\n"); }
+
+ tag = (unsigned char*)malloc(33 * 33 * 33);
+ if (tag == NULL) { fprintf(stderr, "Not enough space\n"); exit(1); }
+ for (k = 0; k < K; ++k) {
+ Mark(&cube[k], k, tag);
+ weight = Vol(&cube[k], wt);
+ if (weight) {
+ lut_r[k] = Vol(&cube[k], mr) / weight;
+ lut_g[k] = Vol(&cube[k], mg) / weight;
+ lut_b[k] = Vol(&cube[k], mb) / weight;
+ } else {
+ fprintf(stderr, "bogus box %d\n", k);
+ lut_r[k] = lut_g[k] = lut_b[k] = 0;
+ }
+ }
+
+ for (i = 0; i < size; ++i) { Qadd[i] = tag[Qadd[i]]; }
+
+ free(tag);
+}
+
+char pChar(int j)
+{
+
+ char c = '.';
+ c = palette[j];
+ return c;
+}
+
+/* Safe version of strcat - will not overflow buffer */
+size_t
+strscat(char* dest, const char* src, size_t count)
+{
+ long sptr = 0;
+ long dptr = strlen(dest);
+ count -= dptr;
+
+ if (count <= 0) {
+ return -E2BIG;
+ }
+
+ while (count) {
+ char c;
+
+ c = src[sptr];
+ dest[dptr] = c;
+ if (!c) {
+ return dptr;
+ }
+ sptr++;
+ dptr++;
+ count--;
+ }
+
+ /* Hit buffer length without finding a NUL; force NUL-termination. */
+ if (dptr) {
+ dest[dptr - 1] = '\0';
+ }
+
+ return -E2BIG;
+}
+
+int genXpm(int icon, char* name, int width, int height)
+{
+ char xpmName[100]; // XPM object name
+ char tmpBuff[100]; // sprintf
+ char c[2];
+ int i, j;
+ int x, y;
+ RGBQUAD color;
+ c[1] = 0;
+
+ strcpy(xpmName, name);
+ for (i = 0; i < strlen(xpmName); i++) {
+ if (xpmName[i] == '-') {
+ xpmName[i] = '_';
+ }
+ }
+
+ strscat(xpm3Buff, "static char *", sizeof(xpm3Buff));
+ strscat(xpm3Buff, xpmName, sizeof(xpm3Buff));
+ strscat(xpm3Buff, "_x", sizeof(xpm3Buff));
+ sprintf(tmpBuff, "%d", height); strscat(xpm3Buff, tmpBuff, sizeof(xpm3Buff));
+ strscat(xpm3Buff, "[] = {"ENDLN, sizeof(xpm3Buff));
+ strscat(xpm3Buff, "\t\"", sizeof(xpm3Buff));
+ sprintf(tmpBuff, "%d %d %d %d", width, height, (K + 1), 1);
+ strscat(xpm3Buff, tmpBuff, sizeof(xpm3Buff));
+ strscat(xpm3Buff, "\","ENDLN"\t\" \tc\tNone\","ENDLN, sizeof(xpm3Buff));
+ for (i = 0; i < K; i++) {
+ strscat(xpm3Buff, "\t\"", sizeof(xpm3Buff));
+ sprintf(tmpBuff, "%c\tc\t#%02x%02x%02x", pChar(i), lut_r[i], lut_g[i],
+ lut_b[i]); strscat(xpm3Buff, tmpBuff, sizeof(xpm3Buff));
+ strscat(xpm3Buff, "\","ENDLN, sizeof(xpm3Buff));
+ }
+
+ // Write the pixels
+ i = 0;
+ for (y = height - 1; y >= 0; y--) {
+ strscat(xpm3Buff, "\t\"", sizeof(xpm3Buff));
+ for (x = 0; x < width; x++) {
+ FreeImage_GetPixelColor(image, x, y, &color);
+ if (color.rgbReserved >= ALPHATHRESH) {
+ j = Qadd[i];
+ c[0] = pChar(j);
+ strscat(xpm3Buff, c, sizeof(xpm3Buff));
+ i++;
+ } else {
+ strscat(xpm3Buff, " ", sizeof(xpm3Buff));
+ }
+ }
+
+ if (y > 0) {
+ strscat(xpm3Buff, "\","ENDLN, sizeof(xpm3Buff));
+ } else {
+ strscat(xpm3Buff, "\"};"ENDLN, sizeof(xpm3Buff));
+ }
+ }
+
+ if (icon == 32) {
+ strscat(xpm3Buff, ENDLN"static char **", sizeof(xpm3Buff));
+ strscat(xpm3Buff, xpmName, sizeof(xpm3Buff));
+ strscat(xpm3Buff, "_xpm3[3] = { ", sizeof(xpm3Buff));
+ strscat(xpm3Buff, xpmName, sizeof(xpm3Buff));
+ strscat(xpm3Buff, "_x16, ", sizeof(xpm3Buff));
+ strscat(xpm3Buff, xpmName, sizeof(xpm3Buff));
+ strscat(xpm3Buff, "_x24, ", sizeof(xpm3Buff));
+ strscat(xpm3Buff, xpmName, sizeof(xpm3Buff));
+ strscat(xpm3Buff, "_x32 };"ENDLN, sizeof(xpm3Buff));
+ }
+ return 0;
+}
+
+int process(char* path, char* name, int icon)
+{
+ int i;
+ int w, h;
+ int x, y;
+ short a;
+ float frac;
+ short bg;
+ char filename[1000];
+ RGBQUAD color;
+
+
+ memset(m2, 0, sizeof(m2));
+ memset(wt, 0, sizeof(wt));
+ memset(mr, 0, sizeof(mr));
+ memset(mg, 0, sizeof(mg));
+ memset(mb, 0, sizeof(mb));
+
+ /* printf( "FreeImage version %s\n\n",FreeImage_GetVersion( ) ); */
+
+ // Try override first
+ sprintf(filename, "%spng/%s%d.png", path, name, icon);
+ //#if defined(WIN32) || defined(_WIN32)
+ // if ( _access(filename, 04) != 0) {
+ //#else
+ // if ( access( filename, R_OK ) != 0 ) {
+ //#endif
+ // sprintf( filename,"%s/png/%s%d.png",path,name,icon );
+ // }
+#ifdef DEBUGPRINT
+ fprintf(stdout, "PNG: %s\n", filename);
+#endif
+
+ image = FreeImage_Load(FIF_PNG, filename, PNG_DEFAULT);
+ if (image == NULL) {
+ fprintf(stderr, "%s not found.\n", filename);
+ exit(1);
+ }
+
+ if (FreeImage_GetBPP(image) != 32) {
+ FIBITMAP* tempImage = image;
+ image = FreeImage_ConvertTo32Bits(tempImage);
+ }
+
+ w = FreeImage_GetWidth(image);
+ h = FreeImage_GetHeight(image);
+
+ // Count non-transparent pixels - this is the "size" of the image
+ size = 0;
+ for (y = 0; y < h; y++) {
+ for (x = 0; x < w; x++) {
+ FreeImage_GetPixelColor(image, x, y, &color);
+ a = color.rgbReserved;
+ if (a >= ALPHATHRESH) {
+ size++;
+ }
+ }
+ }
+
+ /* input R,G,B components into Ir, Ig, Ib */
+ Ir = (unsigned char*)malloc(size);
+ Ig = (unsigned char*)malloc(size);
+ Ib = (unsigned char*)malloc(size);
+ assert(Ir && Ig && Ib);
+ i = 0;
+ for (y = h - 1; y >= 0; y--) {
+ for (x = 0; x < w; x++) {
+ FreeImage_GetPixelColor(image, x, y, &color);
+ a = color.rgbReserved;
+ if (a >= ALPHATHRESH) {
+ frac = (float)a / 255;
+ bg = BACKGROUND * (1.0f - frac);
+ Ir[i] = (unsigned char)min(255, color.rgbRed * frac + bg) & BGMASK;
+ Ig[i] = (unsigned char)min(255, color.rgbGreen * frac + bg) & BGMASK;
+ Ib[i] = (unsigned char)min(255, color.rgbBlue * frac + bg) & BGMASK;
+ i++;
+ }
+ }
+ }
+
+ cq();
+
+ free(Ig); free(Ib); free(Ir); /* */
+
+ genXpm(icon, name, w, h);
+
+ // Delete
+ FreeImage_Unload(image);
+
+ return 0;
+}
+
+int main(int argc, char* argv[])
+{
+ char buffer[1000];
+ char path[1000];
+ char name[100];
+ char* temp;
+ char* ext;
+ int i = 0, j = 0;
+ int icon;
+
+#ifdef DEBUGPRINT
+ fprintf(stderr, "Begin pngtoxpm\n");
+#endif
+
+ if (argc < 2) {
+ printf("PngToXpm ver 0.2\nUsage: pngtoxpm filename\nfilename is the path to the resultant XPM3\n");
+ return 0;
+ }
+
+ // Get the file base name from path/name.ext
+ strncpy(buffer, argv[1], sizeof(buffer) - 1);
+
+ strncpy(path, argv[1], sizeof(path) - 1);
+#ifdef DEBUGPRINT
+ fprintf(stderr, "Filename: %s\n", path);
+#endif
+
+ temp = strrchr(path, '/');
+ if (temp != NULL) {
+ temp++;
+ *temp = '\0';
+ } else {
+ path[0] = '\0';
+ }
+
+#ifdef DEBUGPRINT
+ fprintf(stderr, "Path: %s\n", path);
+#endif
+
+ (temp = strrchr(buffer, '/')) ? ++temp : (temp = buffer);
+
+ ext = strrchr(temp, '.');
+ if (ext != NULL) {
+ *ext = '\0';
+ }
+ strncpy(name, temp, sizeof(name) - 1);
+
+#ifdef DEBUGPRINT
+ fprintf(stdout, "In: %s %s\n", path, name);
+#endif
+
+
+ for (icon = 16; icon <= 32; icon += 8) {
+ process(path, name, icon);
+ }
+
+ // Write the xpm file
+ strncpy(buffer, argv[1], sizeof(buffer) - 1);
+#ifdef DEBUGPRINT
+ fprintf(stdout, "XPM: %s\n", buffer);
+#endif
+
+ FILE* ptr;
+ ptr = fopen(buffer, "w");
+ if (ptr == NULL) {
+ fprintf(stderr, "XPM3 file could not be created.\n");
+ exit(1);
+ }
+ fprintf(ptr, "%s", xpm3Buff);
+ fclose(ptr);
+
+ return 0;
+}
+