The problem,
Just above the 'About' & 'Credits' buttons is the metric/Imperial Scaling toggle
Code: Select all
(defun TB24_FLAG () ;METRIC/IMPERIAL TOGGLE
(setq sca $value) ;store metric / imperial scale
);end TB24_FLAG
This happens whichever schedule is selected.
Here is RB49, schedule 120
Code: Select all
;-----------------------------------------------------------------------;
(action_tile "rb49" ;toggle SCH120 option
(strcat
"(setq newtile $key)"
"(RB49_FLAG)(F_NAME)(READ_DIM_FILE)"
); end strcat
); END ACTION TILE
;-----------------------------------------------------------------------;
Code: Select all
(defun RB49_FLAG () ;Sch 120
(setq sch "sch_120_") ;store schedule rating
);end rb49_flag
Code: Select all
(defun F_NAME ()
(setq fname (strcat sel ftg flg fce sch clss lgth".DIM"))
) end F_NAME
is it possible that a 'toggle' has to be selected last??.
Any thoughts anyobe
SteveN