[SAMPLE17] SAMPLE

10 REM SAMPLE17
100 SCREEN 0,0,0,1:CLS 3
110 POINT (320,100)
120 A$="C4U60R60D60L60"
130 DRAW A$
140 DRAW "BE45A2S0.5X=A$;"
150 DRAW "A0BE10P"
160 PSET (440, 40)
170 LINE -STEP(60,60),7, BF
180 PRESET (455, 55)
190 LINE -STEP(30,30),0,B
200 PAINT (456, 56),0
210 END