FCAP BASIC Pogram Example

REM ** EXAM_23.PRO **

REM New Parameter

SetFileTypes ListModeFile, "FCLM", "TEXT", "SFWF"
SelectFile ListModeFile, "LM file (4 par)"

OpenLMFile "", "LM file (4 par)"
DEF FNRatio( @x,@y ) = "@x/@y"
NewParameter "Ratio", FNratio( @x=@P3, @y=@P4 ), LIN, 1024, 0, 10
NewHgr 1, 2, "All[FS,SS]" of All
NewHgr 1, 5, "All[FS,Ratio]" of All
NewHgr 5, "Red[Ratio]" of Red
NewHgr 5, "Green[Ratio]" of Green
ShowHgr "Green[Ratio]", 0.7, 5.3, 33.3, 33.3, LP
ShowHgr "Red[Ratio]", 34.6, 5.3, 33.3, 33.3, LP
ShowHgr "All[FS,Ratio]", 0.7, 41.3, 33.3, 33.3, DP
ShowHgr "All[FS,SS]", 34.6, 41.3, 33.3, 33.3, DP
NewGate "All[FS,SS]", "G1", Red, ( 183,146; 183,29; 576,8; 614,117; 229,188; 183,146 )
NewGate "All[FS,SS]", "G2", Red, ( 271,221; 614,133; 823,296; 681,455; 434,434; 271,221 )
SetGateColor "All[FS,SS]", "G2", Green
Classify

Click here to Download FCAP BASIC Examples

Click here to Copy FCAP BASIC Examples from this CD-ROM