10 CLEAR ALL
20 BACKGROUND RGB(20,20,20)
30 TILESET 1 NEW "BASIC"
40 TILEMAP 1 NEW 128,32,1
50 SPRITE 1 BIND TILEMAP 1 SHOW
60 TARGET TILEMAP 1
70 TBACKGROUND RGB(20,20,20)
80 TCLS
90 SPRITE 1 ROTATE TO 360,10000 SCALE TO 3,3,5000 SCALE TO 1,1,5000
100 INK RND.COLOR
110 TPRINT CHR$(RANGE(32,127));
120 IF SPRITE.ROTATION(1)<360 THEN 100
