klee64

1 rem generative bars 5 print chr$(147) 10 print chr$(18); " "; 20 cl = int(8*rnd(1))+1 30 on cl goto 40,50,60,70,80,90,100,110 40 print chr$(5);: goto 10 50 print chr$(28);: goto 10 60 print chr$(30);: goto 10 70 print chr$(31);: goto 10 80 print chr$(144);: goto 10 90 print chr$(156);: goto 10 100 print chr$(158);: goto 10 110 print chr$(159);: goto 10 # rem colors 00 26 1B 0 FD FE FC E 00 51 38 4 00 E0 9C C 00 E0 9C 8 00 E0 9C 4 00 E0 9C 4 00 E0 9C C 00 E0 9C 4 00 E0 9C 4 00 E0 9C 8 42 45 40 4 70 74 6F 8 01 DA 98 8 00 26 1B 8 A4 A7 A2 C