Remarks: One-Liners

From Maze

Jump to: navigation, search

These one-liners make good use of the print and poke commands. We know that PRINT was inherited from the earliest Dartmouth BASIC implementation. Did Bill Gates invent the POKE command?


  • Out-of-Phase Sine

10 print chr$(205.5+abs(sin(ti))); : goto 10

  • Icicle Storm

10 poke 1024+rnd(0)*1000,78: goto 10

  • Snowcrash

10 poke 53248+24,timeand255: goto 10

  • Crashes I Have Known and Loved.

10 poke 53248+17,(time/10)and255: goto 10

  • Windy Day in Chicago

10 poke 53248+22,(time/10)and255: goto 10

  • Random SID Tones

10 poke 54272 + rnd(1)*25,rnd(1)*256:goto 10

  • Alphabet on screen

10 poke 1024 + rnd(1)*1000,64+rnd(1)*26: goto 10

  • Crazy VIC-II

10 poke 53248+rnd(0)*46,rnd(0)*256: goto 10

  • Nutty VIC-II

10 poke 53248+24,rnd(0)*256: goto 10

  • Everything Random

10 poke 1024+rnd(0)*1000,78

20 poke 53248+24,timeand255

30 poke 53248+17,(time/10)and255

40 poke 53248+22,(time/9)and255

50 poke 54272 + rnd(0)*25,rnd(0)*256

60 poke 1024 + rnd(0)*1000,rnd(0)*256

70 goto 10

Personal tools