GRAPIHCS Example
10 ! CRT Register: 7
20 ! Gets the graphics mode status.
30 CLEAR SCREEN
40 GRAPHICS OFF
50 PRINT "Graphics Mode flag is";STATUS(CRT,7)
60 WAIT 1.5
70 SEPARATE ALPHA FROM GRAPHICS
80 GRAPHICS OFF
90 IF STATUS(CRT,7)=0 THEN
100 GRAPHICS ON
110 END IF
120 MOVE 50,50
130 POLYGON 10,FILL
140 END
