0s=54294:fOi=.to32:pOs+pE(41713+i)-83,pE(59686+i)+3:pOs-3,15:nE:pOs,pE(162):gO
10 PRINT CHR$(205.5+RND(1)); : GOTO 10
1?chr$(18)" {crsrl}";:printmid$("{crsrr}{crsrl}{crsru}{crsrd}",rnd(ti)*4+1,1);:poke646,rnd(.)*256:goto1
10 printchr$(147+a);:a=58.5+rnd(.):goto10
0 a=1-a*(a<41):printchr$(149+(aand7))chr$(205+(aand3));:poke199,a:goto
0 a=781:b=1024:c=59923:d=999:g=29:fori=0tod:pokea,peek(b+i):sysc:printchr$(g);:next:goto