10  ! This program illustrates the difference between SCALE and SHOW by 
20  ! comparing the same figure, drawn using exactly the same parameters
30  ! for both commands.
40  !
50  INTEGER angle,XMIN,XMAX,YMIN,YMAX
60  XMIN=-1 @ XMAX=1 @ YMIN=-2 @ YMAX=2 
70  !
80  DEG @ PEN 1 @ GCLEAR @ CSIZE 8 @ LORG 5 @ LINE TYPE 1 
90  LOCATE 10,90,10,90 @ FRAME 
100 SCALE XMIN,XMAX,YMIN,YMAX @ GRID 1,1
110 !                                                                     
120 MOVE SIN(0),COS(0) 
130 FOR angle=0 TO 360 STEP 5 
140    DRAW SIN(angle),COS(angle) 
150 NEXT angle 
160 SETGU @ MOVE 50,5 @ LABEL USING "K" ; "Scale" @ SETUU 
170 !
180 LOCATE 110,190,10,90 @ FRAME 
190 SHOW XMIN,XMAX,YMIN,YMAX @ GRID 1,1
200 !                                                                     
210 MOVE SIN(0),COS(0) 
220 FOR angle=0 TO 360 STEP 5 
230    DRAW SIN(angle),COS(angle) 
240 NEXT angle 
250 SETGU @ MOVE 150,5 @ LABEL USING "K" ; "Show" @ SETUU 
260 !        
270 END