1 HGR:HC=3:Y=191:POKE-16302,0:X=279
2 HCOLOR=HC:HPLOTX,YTOX,191-YTO279-X,191-YTO279-X,YTOX,Y:Y=Y-5+190*(Y<2):X=X-5+275*(X<5):HC=HC-3*(HC=3ANDRND(1)>.94)+3*(HC=0ANDRND(1)>.9):GOTO2