Software Demoscene Demostración Badabooom Badabooom

Badabooom: BADABOOOM!.B

Es parte de la publicación: Badabooom
Tamaño del archivo: 189
md5: 05f30f24bb6ca29342abe949f85bacae 
  10 BORDER NOT PI: PAPER NOT PI: INK VAL "7": CLEAR VAL "24575"
  20 POKE VAL "23739",CODE "o"
  30 LOAD ""CODE : RANDOMIZE USR VAL "4e4"
  60 READ s
  70 POKE VAL "23388",s: OUT VAL "32765",s
  80 LOAD ""CODE 
  90 IF s=VAL "16" THEN  RANDOMIZE USR VAL "25e3"
  100 RANDOMIZE USR VAL "49152": GO TO VAL "60"
  110 DATA VAL "17",VAL "19",VAL "20",VAL "22",VAL "16"