10  ! This program demonstrates the "label using" statement by tacking up
20  ! a number using different IMAGE formats.
30  !
40  INTEGER NUMBER @ NUMBER=1095.88376 
50  !        
60  PEN 1 @ GCLEAR @ CSIZE 11 @ LORG 5 
70  LOCATE 0,200,0,100 @ SETGU @ SCALE -100,100,-50,50 
80  !
90  MOVE 50,25 @ LABEL USING "6Z" ; NUMBER
100 MOVE -50,25 @ LABEL USING "6D.3D" ; NUMBER
110 MOVE -50,-25 @ LABEL USING "6*.4D" ; NUMBER
120 MOVE 50,-25 @ LABEL USING "DC3D.6D" ; NUMBER
130 MOVE 0,0 @ LABEL USING "S5DE" ; NUMBER
140 !
150 END