Russian Roulette 293
460 F=1:FB=INT(RND*5+1):GOTO 160
470 FOR Z = 1 TO 20: NEXT:RETURN
460 FOR Z = 1 TO 200: NEXT:RETURN
490 STOP
500 X=X*2+52:Y=Y*2+52: FOR A=1 TO 360 ST EP 5:DEG:ORIGIN X,Y:PLOT R*COS(A),R*SIN( A),3:NEXT:RETURN
510 DATA 126,119,32,146,131,6,146,107,6, 126,95,6,106,107,6,106,131,6,126,143,6,1 26,119,14,126,119,13,304,290,68
520 STOP