REM ** EXAM_14.PRO ** REM LoadTimeGates not in SelectFile list SetFileTypes ListModeFile, "FCLM", "TEXT", "SFWF" rem SelectFile ListModeFile, "LM file (4 parameters)" rem SelectFile TmeGateFile, "3 timegate regions" OpenLMFile "", "LM file (4 parameters)" NewHgr 1, 2, "All[FS,SS]" of All NewHgr 3, 2, "Green[FL1,SS]" of Green NewGate "All[FS,SS]", "G1", Red, ( 203,124; 206,21; 570,10; 594,89; 347,173; 203,124 ) NewGate "All[FS,SS]", "G2", Green, ( 306,244; 380,171; 641,95; 801,296; 472,491; 306,244 ) Classify SetTimePar 0 rem LoadTimeGates "","3 timegate regions" LoadTimeGates "TimeGate","3 timegate regions" NewHgr 4, "Red[FL2T1]" of Red, 1 NewHgr 4, "Red[FL2T2]" of Red, 2 NewHgr 4, "Red[FL2T3]" of Red, 3 Classify ShowHgr "Red[FL2T3]", 0.7, 5.3, 32.6, 32.6, LP ShowHgr "Red[FL2T2]", 33.9, 5.3, 32.6, 32.6, LP ShowHgr "Red[FL2T1]", 67.1, 5.3, 32.6, 32.6, LP ShowHgr "All[FS,SS]", 0.7, 40.6, 32.6, 32.6, DP ShowHgr "Green[FL1,SS]", 33.9, 40.6, 32.6, 32.6, DP NewGate "Red[FL2T2]", "G1", Blue, (102,351 ) GateOff "Red[FL2T2]", "G1" NewGate "Green[FL1,SS]", "G1", Cyan, ( 372,522; 59,424; 115,59; 424,81; 471,334; 372,522 ) GateOff "Green[FL1,SS]", "G1" end
Soft Flow home page | List of Examples | Library of FCAP BASIC Applications