180 X=USR(ADR(MISCLR$),PA+768,255,252):POKE 1720,0:IF PEEK(1716)<>255 THEN 230›230 TMP=PEEK(53248):IF TMP<4 OR TMP=8 THEN RETURN ›250 X=PEEK(1692)-47+2*(RND(0)>0.5)-1:Y=PEEK(1696)-158›260 POKE 89,INT(MEM7/256):POKE 88,MEM7-256*PEEK(89):POKE 87,7:COLOR 0›270 YT=Y-3:YT=YT*(YT>=0)›280 PLOT X-2,YT:DRAWTO X+2,YT+6:PLOT X,YT:DRAWTO X,YT+6:PLOT X+2,YT:DRAWTO X-2,YT+6›290 PLOT X-2,Y*(Y>=0):DRAWTO X+2,Y*(Y>=0)›300 RETURN ›