1 FORI=74T083:READA:POKEI,A:NEXT:OUT244,255:DATA62,43,205,40,228,62,44,205,40
2 A=RND(1)*254+1:OUT243,A/50:FORT=0TO255STEPA:OUT242,T:EXEC73:NEXT:GOTO2:DATA228