Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 11830 CPOS (0,0): CLS
- 11831 SCREEN (8)
- 11832 COLOR (5)
- 11833 SHAPE (95, "3F213F35213D213F00")
- 11834 SHAPE (37, "FF212B2B212F213F00")
- 11835 MUSIC (2,5,6)
- 11840 MUSIC (0,0,0)
- 11850 PRINT "INT. MUSI-CO - CONTINUOUS"
- 11860 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 11870 PRINT "% -( WHERE TO? )"
- 11880 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 11890 PRINT "| _ |"
- 11900 PRINT "|-------|"
- 11910 PRINT "| |"
- 11920 PRINT "| % |"
- 11930 PRINT "|M X|"
- 11940 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 11950 PRINT "YOU ARE IN THE MUSI-CO (M)."
- 11960 PRINT "PRESS X TO EXIT."
- 11970 IF KEY = 88 THEN GOTO 11990
- 11980 GOTO 11970
- 11990 CPOS (0,0): CLS
- 12000 MUSIC (2,5,6)
- 12010 MUSIC (0,0,0)
- 12020 PRINT "EXT. THE OUTSIDE WORLD - 9:15"
- 12030 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12040 PRINT "% -( WHAT ELSE IS AROUND HERE? )"
- 12050 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12060 PRINT "| MUSI-CO |"
- 12070 PRINT "| |''| |"
- 12080 PRINT "| % | |M |"
- 12090 PRINT "|--------------|"
- 12100 PRINT "|L-------------|"
- 12110 PRINT "|S |"
- 12120 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12130 PRINT "YOU ARE ON THE SIDEWALK (S)."
- 12140 PRINT "PRESS L TO GO BACK."
- 12150 IF KEY = 76 THEN GOTO 12170
- 12160 GOTO 12150
- 12170 CPOS (0,0): CLS
- 12180 MUSIC (2,5,6)
- 12190 MUSIC (0,0,0)
- 12200 PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
- 12210 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12220 PRINT "% -( THIS PLACE SEEMS NEAT. )"
- 12230 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12240 PRINT "| OLDIE'S |"
- 12250 PRINT "| |''| |"
- 12260 PRINT "| O|% | |"
- 12270 PRINT "|--------------|"
- 12280 PRINT "|L-------------|"
- 12290 PRINT "| <> S|"
- 12300 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12310 PRINT "YOU ARE ON THE SIDEWALK (S)."
- 12320 PRINT "PRESS L TO CHECK THE LEFT."
- 12330 IF KEY = 76 THEN GOTO 12350
- 12340 GOTO 12330
- 12350 CPOS (0,0): CLS
- 12360 MUSIC (2,5,6)
- 12370 MUSIC (0,0,0)
- 12380 PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
- 12390 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12400 PRINT "% -( WE HAVE A COMMUNITY CENTER? )"
- 12410 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12420 PRINT "| C.CENTER |"
- 12430 PRINT "| |''| |"
- 12440 PRINT "| C|% | |"
- 12450 PRINT "|--------------|"
- 12460 PRINT "|--------------|"
- 12470 PRINT "| S|"
- 12480 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12490 PRINT "YOU ARE ON THE SIDEWALK (S)."
- 12500 PRINT "PRESS C TO GO IN THE CENTER."
- 12510 IF KEY = 67 THEN GOTO 12530
- 12520 GOTO 12510
- 12530 CPOS (0,0): CLS
- 12540 SHAPE (95, "BF213F37212D213F0000")
- 12550 SHAPE (38, "BFAB2135213D213F00")
- 12560 SHAPE (61, "FFE13535212D2D3F00")
- 12570 SHAPE (35, "FF7F3535233D213F00")
- 12580 MUSIC (2,5,6)
- 12590 MUSIC (0,0,0)
- 12600 PRINT "INT. THE COMMUNITY CENTER - 9:20"
- 12610 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12620 PRINT "% -( WHOA. )"
- 12630 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12640 PRINT "| # H |"
- 12650 PRINT "| _ |"
- 12660 PRINT "| & = |"
- 12670 PRINT "| |"
- 12680 PRINT "| % |"
- 12690 PRINT "|C |"
- 12700 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12710 PRINT "YOU ARE IN THE CENTER (C)."
- 12720 PRINT "PRESS H TO TALK TO THE HOST."
- 12730 IF KEY = 72 THEN GOTO 12750
- 12740 GOTO 12730
- 12750 CPOS (0,0): CLS
- 12751 CPOS (0,0): CLS
- 12760 PRINT "INT. THE C. CENTER - CONTINUOUS"
- 12770 MUSIC (2,5,6)
- 12780 MUSIC (0,0,0)
- 12790 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12800 PRINT "( HEY, WELCOME TO MY LESSON!! )- #": WAIT (512)
- 12810 MUSIC (2,5,6)
- 12811 MUSIC (0,0,0)
- 12812 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12820 PRINT "% -( HI! WHAT...|IS| THIS LESSON? )": WAIT (512)
- 12830 MUSIC (2,5,6)
- 12840 MUSIC (0,0,0)
- 12850 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12860 PRINT "( WE'LL BE MAKING SODA TODAY. )- #": WAIT (512)
- 12870 MUSIC (2,5,6)
- 12880 MUSIC (0,0,0)
- 12890 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12900 PRINT "% -( SODA, HUH? NEAT-O. )": WAIT (512)
- 12910 MUSIC (2,5,6)
- 12920 MUSIC (0,0,0)
- 12930 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 12940 PRINT "( YEP! IT WONT BE TOO HARD. )- #": WAIT (512)
- 12950 CPOS (0,0): CLS
- 12960 MUSIC (2,5,6)
- 12970 MUSIC (0,0,0)
- 12980 PRINT "INT. THE C. CENTER DESK - 9:25"
- 12990 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 13000 PRINT "% -( WHERE TO START? )"
- 13010 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 13020 PRINT " "
- 13030 PRINT " "
- 13040 PRINT "----------------"
- 13050 PRINT "\ /"
- 13060 PRINT " \ / "
- 13070 PRINT " \ / "
- 13080 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 13090 PRINT "YOU NEED TO ADD WATER AND SUGAR."
- 13100 PRINT "PRESS A TO DO SO."
- 13110 IF KEY = 65 THEN GOTO 13130
- 13120 GOTO 13110
- 13130 CPOS (0,0): CLS
- 13140 MUSIC (2,5,6)
- 13150 MUSIC (0,0,0)
- 13160 PRINT "INT. THE C. CENTER DESK - 9:25"
- 13170 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 13180 PRINT "( 2 GALLONS AND 8 CUPS! )- #"
- 13190 PRINT "% -( 2 GALLONS AND 8 CUPS. )"
- 13200 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 13210 PRINT " "
- 13220 PRINT " "
- 13230 PRINT "----------------"
- 13240 PRINT "\ /"
- 13250 PRINT " \------------/ "
- 13260 PRINT " \ / "
- 13270 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 13280 PRINT "THE NEXT STEP IS TO BOIL THE MIX."
- 13290 PRINT "PRESS B TO BOIL."
- 13300 IF KEY = 66 THEN GOTO 13320
- 13310 GOTO 13300
- 13320 CPOS (0,0): CLS
- 13330 MUSIC (1,4,6)
- 13340 MUSIC (0,0,0)
- 13350 PRINT " "
- 13360 PRINT " "
- 13370 PRINT "----------------"
- 13380 PRINT "\ /"
- 13390 PRINT " \------------/ "
- 13400 PRINT " \ / "
- 13410 PRINT "/////////////////////"
- 13420 CPOS (0,0): CLS
- 13330 MUSIC (2,4,6)
- 13340 MUSIC (0,0,0)
- 13350 PRINT " "
- 13360 PRINT " "
- 13370 PRINT "----------------"
- 13380 PRINT "\ /"
- 13390 PRINT " \------------/ "
- 13400 PRINT " \ / "
- 13410 PRINT "\\\\\\\\\\\\\\\\\\\\\"
- 13420 CPOS (0,0): CLS
- 13430 MUSIC (3,4,6)
- 13440 MUSIC (0,0,0)
- 13450 PRINT " "
- 13460 PRINT " "
- 13470 PRINT "----------------"
- 13480 PRINT "\ /"
- 13490 PRINT " \------------/ "
- 13500 PRINT " \ / "
- 13510 PRINT "/////////////////////"
- 13520 CPOS (0,0): CLS
- 13530 MUSIC (4,4,6)
- 13540 MUSIC (0,0,0)
- 13550 PRINT " "
- 13560 PRINT " "
- 13570 PRINT "----------------"
- 13580 PRINT "\ /"
- 13590 PRINT " \------------/ "
- 13600 PRINT " \ / "
- 13610 PRINT "\\\\\\\\\\\\\\\\\\\\\"
- 13620 CPOS (0,0): CLS
- 13630 MUSIC (7,4,6)
- 13640 MUSIC (0,0,0)
- 13650 PRINT " "
- 13660 PRINT " "
- 13670 PRINT "----------------"
- 13680 PRINT "\ /"
- 13690 PRINT " \------------/ "
- 13700 PRINT " \ / "
- 13710 PRINT "/////////////////////"
- 13720 CPOS (0,0): CLS
- 13730 MUSIC (6,4,6)
- 13740 MUSIC (0,0,0)
- 13750 PRINT " "
- 13760 PRINT " "
- 13770 PRINT "----------------"
- 13780 PRINT "\ /"
- 13790 PRINT " \------------/ "
- 13800 PRINT " \ / "
- 13810 PRINT "\\\\\\\\\\\\\\\\\\\\\"
- 13820 CPOS (0,0): CLS
- 13830 MUSIC (5,4,6)
- 13840 MUSIC (0,0,0)
- 13850 PRINT " "
- 13860 PRINT " "
- 13870 PRINT "----------------"
- 13880 PRINT "\ /"
- 13890 PRINT " \------------/ "
- 13800 PRINT " \ / "
- 13910 PRINT "/////////////////////"
- 13920 CPOS (0,0): CLS
- 13930 MUSIC (1,5,6)
- 13940 MUSIC (0,0,0)
- 13950 PRINT " "
- 13960 PRINT " "
- 13970 PRINT "----------------"
- 13980 PRINT "\ /"
- 13990 PRINT " \------------/ "
- 14000 PRINT " \ / "
- 14010 PRINT "\\\\\\\\\\\\\\\\\\\\\"
- 14020 CPOS (0,0): CLS
- 14030 MUSIC (2,5,6)
- 14040 MUSIC (0,0,0)
- 14050 PRINT "INT. THE C. CENTER DESK - 10:00"
- 14060 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14070 PRINT "% -( BOILED AND COOLED. )"
- 14080 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14090 PRINT " "
- 14100 PRINT " "
- 14110 PRINT "----------------"
- 14120 PRINT "\ /"
- 14130 PRINT " \------------/ "
- 14140 PRINT " \ / "
- 14150 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14160 PRINT "YOU NEED TO TOP WITH COLD WATER."
- 14170 PRINT "PRESS A TO DO SO."
- 14180 IF KEY = 65 THEN GOTO 14200
- 14190 GOTO 14180
- 14200 CPOS (0,0): CLS
- 14210 MUSIC (2,5,6)
- 14220 MUSIC (0,0,0)
- 14230 PRINT "INT. THE C. CENTER DESK - CONT."
- 14240 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14250 PRINT "% -( COOLED AND TOPPED. )"
- 14260 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14270 PRINT " "
- 14280 PRINT " "
- 14290 PRINT "----------------"
- 14300 PRINT "\--------------/"
- 14310 PRINT " \ / "
- 14320 PRINT " \ / "
- 14330 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14340 PRINT "YOU NEED TO ADD SODA EXTRACT."
- 14350 PRINT "PRESS B TO DO SO."
- 14360 IF KEY = 66 THEN GOTO 14380
- 14370 GOTO 14360
- 14380 CPOS (0,0): CLS
- 14390 MUSIC (2,5,6)
- 14400 MUSIC (0,0,0)
- 14410 PRINT "INT. THE C. CENTER DESK - CONT."
- 14420 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14430 PRINT "% -( TOPPED AND MIXED. )"
- 14440 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14450 PRINT " "
- 14460 PRINT " "
- 14470 PRINT "----------------"
- 14480 PRINT "\--------------/"
- 14490 PRINT " \ / "
- 14500 PRINT " \ / "
- 14510 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14520 PRINT "YOU NEED TO ADD YEAST."
- 14530 PRINT "PRESS A TO DO SO."
- 14540 IF KEY = 65 THEN GOTO 14560
- 14550 GOTO 14540
- 14560 CPOS (0,0): CLS
- 14570 PRINT "INT. THE C. CENTER DESK - CONT."
- 14580 MUSIC (2,5,6)
- 14590 MUSIC (0,0,0)
- 14600 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14610 PRINT "% -( SO...WHY DO WE NEED YEAST? )": WAIT (512)
- 14620 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14621 MUSIC (2,5,6)
- 14622 MUSIC (0,0,0)
- 14630 PRINT "( BYPRODUCTS! )- #": WAIT (512)
- 14640 MUSIC (2,5,6)
- 14650 MUSIC (0,0,0)
- 14660 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14670 PRINT "( YEAST PLUS SUGAR EQUALS C02. )- #": WAIT (512)
- 14680 MUSIC (2,5,6)
- 14690 MUSIC (0,0,0)
- 14700 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14710 PRINT "( WHICH IS CARBONATION. )- #": WAIT (512)
- 14720 MUSIC (2,5,6)
- 14730 MUSIC (0,0,0)
- 14740 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14750 PRINT "% -( HUH...THE MORE YOU KNOW! )": WAIT (512)
- 14760 CPOS (0,0): CLS
- 14770 MUSIC (2,5,6)
- 14780 MUSIC (0,0,0)
- 14790 PRINT "INT. THE C. CENTER DESK - CONT."
- 14800 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14810 PRINT "% -( MIXED AND YEASTED. )"
- 14820 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14830 PRINT " "
- 14840 PRINT " "
- 14850 PRINT "----------------"
- 14860 PRINT "\--------------/"
- 14870 PRINT " \ / "
- 14880 PRINT " \ / "
- 14890 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 14900 PRINT "YOU NEED TO PUT THE MIX INTO BOTTLES."
- 14910 PRINT "PRESS A TO DO SO."
- 14920 IF KEY = 65 THEN GOTO 14940
- 14930 GOTO 14920
- 14940 CPOS (0,0): CLS
- 14950 SHAPE (59, "CC1E21211221211E00")
- 14960 SHAPE (64, "CC5E7F7F5E7F7F5E00")
- 14970 MUSIC (2,5,6)
- 14980 MUSIC (0,0,0):WAIT (32)
- 14990 MUSIC (2,4,6)
- 15000 MUSIC (0,0,0):WAIT (32)
- 15010 PRINT "PRESS SPACE TO BEGIN, AND TO FILL"
- 15020 PRINT "BOTTLES, FROM LEFT TO RIGHT"
- 15030 IF KEY = 32 THEN GOTO 15050
- 15040 GOTO 15030
- 15050 CPOS (0,0): CLS
- 15060 MUSIC (4,4,6)
- 15070 PRINT "% -"
- 15080 PRINT "; ; ; ; "
- 15090 IF KEY = 32 THEN GOTO 15510
- 15100 WAIT (32)
- 15110 CPOS (0,0): CLS
- 15120 MUSIC (6,4,6)
- 15130 PRINT "-% -"
- 15140 PRINT "; ; ; ; "
- 15150 IF KEY = 32 THEN GOTO 16890
- 15160 WAIT (32)
- 15170 CPOS (0,0): CLS
- 15180 MUSIC (7,4,6)
- 15190 PRINT "- % -"
- 15200 PRINT "; ; ; ; "
- 15210 IF KEY = 32 THEN GOTO 16890
- 15220 WAIT (32)
- 15230 CPOS (0,0): CLS
- 15240 MUSIC (5,4,6)
- 15250 PRINT "- % -"
- 15260 PRINT "; ; ; ; "
- 15270 IF KEY = 32 THEN GOTO 16890
- 15280 WAIT (32)
- 15290 CPOS (0,0): CLS
- 15300 MUSIC (4,4,6)
- 15310 PRINT "- % -"
- 15320 PRINT "; ; ; ; "
- 15330 IF KEY = 32 THEN GOTO 16890
- 15340 WAIT (32)
- 15350 CPOS (0,0): CLS
- 15360 MUSIC (6,4,6)
- 15370 PRINT "- % -"
- 15380 PRINT "; ; ; ; "
- 15390 IF KEY = 32 THEN GOTO 16890
- 15400 CPOS (0,0): CLS
- 15410 MUSIC (7,4,6)
- 15420 PRINT "- %-"
- 15430 PRINT "; ; ; ; "
- 15440 IF KEY = 32 THEN GOTO 16890
- 15450 CPOS (0,0): CLS
- 15460 MUSIC (5,4,6)
- 15470 PRINT "- %"
- 15480 PRINT "; ; ; ; "
- 15490 IF KEY = 32 THEN GOTO 16890
- 15500 GOTO 15050
- 15510 CPOS (0,0): CLS
- 15520 MUSIC (4,4,6)
- 15530 PRINT "% -"
- 15540 PRINT "@ ; ; ; "
- 15550 IF KEY = 32 THEN GOTO 16990
- 15560 WAIT (32)
- 15570 CPOS (0,0): CLS
- 15580 MUSIC (6,4,6)
- 15590 PRINT "-% -"
- 15600 PRINT "@ ; ; ; "
- 15610 IF KEY = 32 THEN GOTO 16990
- 15620 WAIT (32)
- 15630 CPOS (0,0): CLS
- 15640 MUSIC (7,4,6)
- 15650 PRINT "- % -"
- 15660 PRINT "@ ; ; ; "
- 15670 IF KEY = 32 THEN GOTO 15970
- 15680 WAIT (32)
- 15690 CPOS (0,0): CLS
- 15700 MUSIC (5,4,6)
- 15710 PRINT "- % -"
- 15720 PRINT "@ ; ; ; "
- 15730 IF KEY = 32 THEN GOTO 16990
- 15740 WAIT (32)
- 15750 CPOS (0,0): CLS
- 15760 MUSIC (4,4,6)
- 15770 PRINT "- % -"
- 15780 PRINT "@ ; ; ; "
- 15790 IF KEY = 32 THEN GOTO 16990
- 15800 WAIT (32)
- 15810 CPOS (0,0): CLS
- 15820 MUSIC (6,4,6)
- 15830 PRINT "- % -"
- 15840 PRINT "@ ; ; ; "
- 15850 IF KEY = 32 THEN GOTO 16990
- 15860 CPOS (0,0): CLS
- 15870 MUSIC (7,4,6)
- 15880 PRINT "- %-"
- 15890 PRINT "@ ; ; ; "
- 15900 IF KEY = 32 THEN GOTO 16990
- 15910 CPOS (0,0): CLS
- 15920 MUSIC (5,4,6)
- 15930 PRINT "- %"
- 15940 PRINT "@ ; ; ; "
- 15950 IF KEY = 32 THEN GOTO 16990
- 15960 GOTO 15510
- 15970 CPOS (0,0): CLS
- 15980 MUSIC (4,4,6)
- 15990 PRINT "% -"
- 16000 PRINT "@ @ ; ; "
- 16010 IF KEY = 32 THEN GOTO 17090
- 16020 WAIT (32)
- 16030 CPOS (0,0): CLS
- 16040 MUSIC (6,4,6)
- 16050 PRINT "-% -"
- 16060 PRINT "@ @ ; ; "
- 16070 IF KEY = 32 THEN GOTO 17090
- 16080 WAIT (32)
- 16090 CPOS (0,0): CLS
- 16100 MUSIC (7,4,6)
- 16110 PRINT "- % -"
- 16120 PRINT "@ @ ; ; "
- 16130 IF KEY = 32 THEN GOTO 17090
- 16140 WAIT (32)
- 16150 CPOS (0,0): CLS
- 16160 MUSIC (5,4,6)
- 16170 PRINT "- % -"
- 16180 PRINT "@ @ ; ; "
- 16190 IF KEY = 32 THEN GOTO 17090
- 16200 WAIT (32)
- 16210 CPOS (0,0): CLS
- 16220 MUSIC (4,4,6)
- 16230 PRINT "- % -"
- 16240 PRINT "@ @ ; ; "
- 16250 IF KEY = 32 THEN GOTO 16430
- 16260 WAIT (32)
- 16270 CPOS (0,0): CLS
- 16280 MUSIC (6,4,6)
- 16290 PRINT "- % -"
- 16300 PRINT "@ @ ; ; "
- 16310 IF KEY = 32 THEN GOTO 17090
- 16320 CPOS (0,0): CLS
- 16330 MUSIC (7,4,6)
- 16340 PRINT "- %-"
- 16350 PRINT "@ @ ; ; "
- 16360 IF KEY = 32 THEN GOTO 17090
- 16370 CPOS (0,0): CLS
- 16380 MUSIC (5,4,6)
- 16390 PRINT "- %"
- 16400 PRINT "@ @ ; ; "
- 16410 IF KEY = 32 THEN GOTO 17090
- 16420 GOTO 15970
- 16430 CPOS (0,0): CLS
- 16440 MUSIC (4,4,6)
- 16450 PRINT "% -"
- 16460 PRINT "@ @ @ ; "
- 16470 IF KEY = 32 THEN GOTO 17190
- 16480 WAIT (32)
- 16490 CPOS (0,0): CLS
- 16500 MUSIC (6,4,6)
- 16510 PRINT "-% -"
- 16520 PRINT "@ @ @ ; "
- 16530 IF KEY = 32 THEN GOTO 17190
- 16540 WAIT (32)
- 16550 CPOS (0,0): CLS
- 16560 MUSIC (7,4,6)
- 16570 PRINT "- % -"
- 16580 PRINT "@ @ @ ; "
- 16590 IF KEY = 32 THEN GOTO 17190
- 16600 WAIT (32)
- 16610 CPOS (0,0): CLS
- 16620 MUSIC (5,4,6)
- 16630 PRINT "- % -"
- 16640 PRINT "@ @ @ ; "
- 16650 IF KEY = 32 THEN GOTO 17190
- 16660 WAIT (32)
- 16670 CPOS (0,0): CLS
- 16680 MUSIC (4,4,6)
- 16690 PRINT "- % -"
- 16700 PRINT "@ @ @ ; "
- 16710 IF KEY = 32 THEN GOTO 17190
- 16720 WAIT (32)
- 16730 CPOS (0,0): CLS
- 16740 MUSIC (6,4,6)
- 16750 PRINT "- % -"
- 16760 PRINT "@ @ @ ; "
- 16770 IF KEY = 32 THEN GOTO 17190
- 16780 CPOS (0,0): CLS
- 16790 MUSIC (7,4,6)
- 16800 PRINT "- %-"
- 16810 PRINT "@ @ @ ; "
- 16820 IF KEY = 32 THEN GOTO 17290
- 16830 CPOS (0,0): CLS
- 16840 MUSIC (5,4,6)
- 16850 PRINT "- %"
- 16860 PRINT "@ @ @ ; "
- 16870 IF KEY = 32 THEN GOTO 17190
- 16880 GOTO 16430
- 16890 CPOS (0,0): CLS
- 16900 MUSIC (2,5,6)
- 16910 MUSIC (0,0,0)
- 16920 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 16930 PRINT "% -( HECK. )": WAIT (512)
- 16940 MUSIC (2,5,6)
- 16950 MUSIC (0,0,0)
- 16960 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 16970 PRINT "% -( LET ME TRY THAT AGAIN. )": WAIT (512)
- 16980 GOTO 15050
- 16990 CPOS (0,0): CLS
- 17000 MUSIC (2,5,6)
- 17010 MUSIC (0,0,0)
- 17020 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17030 PRINT "% -( GAH! )": WAIT (512)
- 17040 MUSIC (2,5,6)
- 17050 MUSIC (0,0,0)
- 17060 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17070 PRINT "% -( THAT'S NO GOOD. )": WAIT (512)
- 17080 GOTO 15510
- 17090 CPOS (0,0): CLS
- 17100 MUSIC (2,5,6)
- 17110 MUSIC (0,0,0)
- 17120 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17130 PRINT "% -( JEEZ. )": WAIT (512)
- 17140 MUSIC (2,5,6)
- 17150 MUSIC (0,0,0)
- 17160 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17170 PRINT "% -( I CAN'T POUR TODAY. )": WAIT (512)
- 17180 GOTO 15970
- 17190 CPOS (0,0): CLS
- 17200 MUSIC (2,5,6)
- 17210 MUSIC (0,0,0)
- 17220 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17230 PRINT "% -( OH DEAR. )": WAIT (512)
- 17240 MUSIC (2,5,6)
- 17250 MUSIC (0,0,0)
- 17260 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17270 PRINT "% -( SO CLOSE, YET SO FAR. )": WAIT (512)
- 17280 GOTO 16430
- 17290 CPOS (0,0): CLS
- 17300 MUSIC (0,0,0)
- 17310 NOISE (1, 4): WAIT (16)
- 17320 NOISE (2, 3): WAIT (16)
- 17330 NOISE (3, 2): WAIT (16)
- 17340 NOISE (4, 1): WAIT (16)
- 17350 NOISE (0, 0): WAIT (512)
- 17360 MUSIC (2,5,6)
- 17370 MUSIC (0,0,0)
- 17380 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17390 PRINT "@ @ @ @ "
- 17400 PRINT "% -( ALL DONE! )": WAIT (512)
- 17410 CPOS (0,0): CLS
- 17420 PRINT "INT. THE C. CENTER - 10:30"
- 17430 MUSIC (2,5,6)
- 17440 MUSIC (0,0,0)
- 12750 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17460 PRINT "% -( HEY, SO WHAT NOW? )": WAIT (512)
- 17470 MUSIC (2,5,6)
- 17480 MUSIC (0,0,0)
- 17490 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17500 PRINT "( WE WAIT! )- #": WAIT (512)
- 17510 MUSIC (2,5,6)
- 17520 MUSIC (0,0,0)
- 17530 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17540 PRINT "( FOR 72 HOURS. )- #": WAIT (512)
- 17550 MUSIC (2,5,6)
- 17560 MUSIC (0,0,0)
- 17570 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17580 PRINT "% -( I'LL TAKE 8 HOURS. )": WAIT (512)
- 17590 CPOS (0,0): CLS
- 17600 PRINT "INT. THE C. CENTER - CONT."
- 17610 MUSIC (2,5,6)
- 17620 MUSIC (0,0,0)
- 17630 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17640 PRINT "% -( ... )": WAIT (512)
- 17650 MUSIC (2,5,6)
- 17660 MUSIC (0,0,0)
- 17670 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17680 PRINT "& -( ... )": WAIT (512)
- 17690 MUSIC (2,5,6)
- 17700 MUSIC (0,0,0)
- 17710 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17720 PRINT "_ -( ... )": WAIT (512)
- 17730 MUSIC (2,5,6)
- 17740 MUSIC (0,0,0)
- 17750 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17760 PRINT "= -( ... )": WAIT (512)
- 17770 MUSIC (2,5,6)
- 17780 MUSIC (0,0,0)
- 17790 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17800 PRINT "# -( SO... )": WAIT (512)
- 17810 MUSIC (2,5,6)
- 17820 MUSIC (0,0,0)
- 17830 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17840 PRINT "% -( THANK HECK FOR PDAS. )": WAIT (512)
- 17850 MUSIC (2,5,6)
- 17860 MUSIC (0,0,0)
- 17870 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17880 PRINT "& -( FOR WHAT THOUGH? )": WAIT (512)
- 17890 MUSIC (2,5,6)
- 17900 MUSIC (0,0,0)
- 17910 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17920 PRINT "_ -( YEAH, CALENDARS, WOO. )": WAIT (512)
- 17930 MUSIC (2,5,6)
- 17940 MUSIC (0,0,0)
- 17950 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 17960 PRINT "= -( UNLIKE YOU THREE, I HAVE TAPES! )": WAIT (512)
- 17970 MUSIC (2,5,6)
- 17980 MUSIC (0,0,0)
- 17990 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18000 PRINT "# -( ALL THE GREATEST HITS. )": WAIT (512)
- 18010 MUSIC (2,5,6)
- 18020 MUSIC (0,0,0)
- 18030 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18040 PRINT "% -( HEY, THIS HAS A JACK! )": WAIT (512)
- 18050 MUSIC (2,5,6)
- 18060 MUSIC (0,0,0)
- 18070 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18080 PRINT "& -( BUT 2.5MM ARE HARD TO FIND. )": WAIT (512)
- 18090 MUSIC (2,5,6)
- 18100 MUSIC (0,0,0)
- 18110 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18120 PRINT "_ -( I'VE NEVER SEEN ONE. )": WAIT (512)
- 18130 MUSIC (2,5,6)
- 18140 MUSIC (0,0,0)
- 18150 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18160 PRINT "= -( BE LIKE ME WITH 3.5MM. )": WAIT (512)
- 18170 MUSIC (2,5,6)
- 18180 MUSIC (0,0,0)
- 18190 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18200 PRINT "# -( WE GET IT, YOU HAVE TAPE. )": WAIT (512)
- 18210 MUSIC (2,5,6)
- 18220 MUSIC (0,0,0)
- 18230 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18240 PRINT "% -( HEY, WHATS THE TIME? )": WAIT (512)
- 18250 MUSIC (2,5,6)
- 18260 MUSIC (0,0,0)
- 18270 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18280 PRINT "& -( DUNNO. )": WAIT (512)
- 18290 MUSIC (2,5,6)
- 18300 MUSIC (0,0,0)
- 18310 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18320 PRINT "_ -( 5:30! )": WAIT (512)
- 18330 MUSIC (2,5,6)
- 18340 MUSIC (0,0,0)
- 18350 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18360 PRINT "= -( IS THERE ANY FASTER WAY? )": WAIT (512)
- 18370 MUSIC (2,5,6)
- 18380 MUSIC (0,0,0)
- 18390 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18400 PRINT "# -( WE CAN SCREAM AT IT. )": WAIT (512)
- 18410 MUSIC (2,5,6)
- 18420 MUSIC (0,0,0)
- 18430 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18440 PRINT "# -( I HEARD THAT SPEEDS IT UP. )": WAIT (512)
- 18450 MUSIC (2,5,6)
- 18460 MUSIC (0,0,0)
- 18470 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18480 PRINT "& -( AAAAAAAHH. )": WAIT (512)
- 18490 MUSIC (2,5,6)
- 18500 MUSIC (0,0,0)
- 18510 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18520 PRINT "_ -( AAAAAHHHHH? )": WAIT (512)
- 18530 MUSIC (2,5,6)
- 18540 MUSIC (0,0,0)
- 18550 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18560 PRINT "= -( AH! )": WAIT (512)
- 18570 MUSIC (2,5,6)
- 18580 MUSIC (0,0,0)
- 18590 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18600 PRINT "# -( A, H, AH. )": WAIT (512)
- 18610 MUSIC (2,5,6)
- 18620 MUSIC (0,0,0)
- 18630 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18640 PRINT "% -( AAAAAAAHHHHHHHHH! )": WAIT (512)
- 18650 MUSIC (2,4,6)
- 18660 MUSIC (0,0,0)
- 18670 MUSIC (1,4,6)
- 18680 MUSIC (0,0,0)
- 18690 MUSIC (1,5,6)
- 18700 MUSIC (0,0,0)
- 18710 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18720 PRINT "@ @ @ @": WAIT (512)
- 18730 MUSIC (2,5,6)
- 18740 MUSIC (0,0,0)
- 18750 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18760 PRINT "# -( WOW, REALLY WORKS! )": WAIT (512)
- 18770 MUSIC (2,5,6)
- 18780 MUSIC (0,0,0)
- 18790 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18800 PRINT "% -( ALL FOR A LACK OF BREATH! )": WAIT (512)
- 18810 MUSIC (2,5,6)
- 18820 MUSIC (0,0,0)
- 18830 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18840 PRINT "% -( AAAANNNDDD.... )": WAIT (512)
- 18850 MUSIC (2,5,6)
- 18860 MUSIC (0,0,0)
- 18870 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18880 PRINT "; @ @ @": WAIT (512)
- 18890 MUSIC (2,5,6)
- 18900 MUSIC (0,0,0)
- 18910 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18920 PRINT "% -( IT TASTES GREAT! )": WAIT (512)
- 18930 MUSIC (2,5,6)
- 18940 MUSIC (0,0,0)
- 18950 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 18960 PRINT "% -( THANKS, MAN. )": WAIT (512)
- 18970 MUSIC (2,5,6)
- 18980 MUSIC (0,0,0)
- 18990 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19000 PRINT "# -( NO PROBLEM! )": WAIT (512)
- 19010 MUSIC (2,5,6)
- 19020 MUSIC (0,0,0)
- 19030 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19040 PRINT "% -( HEY, WHILE YOU'RE ALL HERE... )": WAIT (512)
- 19050 MUSIC (2,5,6)
- 19060 MUSIC (0,0,0)
- 19070 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19080 PRINT "% -( ANYONE WANNA GO TO MY... )": WAIT (512)
- 19090 MUSIC (2,5,6)
- 19100 MUSIC (0,0,0)
- 19110 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19120 PRINT "% -( |CONCERT?| )": WAIT (512)
- 19130 MUSIC (2,5,6)
- 19140 MUSIC (0,0,0)
- 19150 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19160 PRINT "% -( NOT SET UP, BUT IT'LL HAPPEN. )": WAIT (512)
- 19170 MUSIC (2,5,6)
- 19180 MUSIC (0,0,0)
- 19190 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19200 PRINT "& -( SURE. )"
- 19210 PRINT "_ -( OOH, GOTCHA! )"
- 19220 PRINT "= -( I'LL BE THERE! )"
- 19230 PRINT "# -( HEY, WHY NOT? )": WAIT (512)
- 19240 MUSIC (2,5,6)
- 19250 MUSIC (0,0,0)
- 19260 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19270 PRINT "% -( AWESOME, THANKS. )": WAIT (512)
- 19280 MUSIC (2,5,6)
- 19290 MUSIC (0,0,0)
- 19300 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19310 PRINT "% -( BE THERE AT 7! )": WAIT (512)
- 19320 CPOS (0,0): CLS
- 19330 MUSIC (2,5,6)
- 19340 MUSIC (0,0,0)
- 19350 PRINT "EXT. THE OUTSIDE WORLD - 6:00"
- 19360 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19370 PRINT "% -( NOW WITH 3 SODAS. )"
- 19380 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19390 PRINT "| C.CENTER |"
- 19400 PRINT "| |''| |"
- 19410 PRINT "| C|% | |"
- 19420 PRINT "|--------------|"
- 19430 PRINT "|-------------M|"
- 19440 PRINT "| S|"
- 19450 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19460 PRINT "YOU ARE ON THE SIDEWALK (S)."
- 19470 PRINT "PRESS M TO GO TO MUSI-CO."
- 19480 IF KEY = 77 THEN GOTO 19500
- 19490 GOTO 19480
- 19500 CPOS (0,0): CLS
- 19510 SHAPE (64, "9E8C8C8C9EBFBF9E00")
- 19520 MUSIC (2,5,6)
- 19530 MUSIC (0,0,0)
- 19540 PRINT "INT. MUSI-CO - CONTINUOUS"
- 19550 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19560 PRINT "% -( WHERE TO? )"
- 19570 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19580 PRINT "| _ @8|"
- 19590 PRINT "|-------|"
- 19600 PRINT "| |"
- 19610 PRINT "| % |"
- 19620 PRINT "|M X|"
- 19630 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19640 PRINT "YOU ARE IN THE MUSI-CO (M)."
- 19650 PRINT "PRESS W TO TALK TO THE WORKER."
- 19660 IF KEY = 87 THEN GOTO 19680
- 19670 GOTO 19660
- 19680 CPOS (0,0): CLS
- 19690 PRINT "INT. MUSI-CO - 6:05"
- 19700 MUSIC (2,5,6)
- 19710 MUSIC (0,0,0)
- 19720 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19730 PRINT "( HELLO AGAIN! )- _": WAIT (512)
- 19740 MUSIC (2,5,6)
- 19750 MUSIC (0,0,0)
- 19760 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19770 PRINT "% -( HI! CAN I GET MY STUFF? )": WAIT (512)
- 19780 MUSIC (2,5,6)
- 19790 MUSIC (0,0,0)
- 19800 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19810 PRINT "( YES, OF COURSE! )- _": WAIT (512)
- 19820 MUSIC (2,5,6)
- 19830 MUSIC (0,0,0)
- 19840 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19850 PRINT "@8"
- 19860 PRINT "% -( DOPE, THANKS. )": WAIT (512)
- 19870 MUSIC (2,5,6)
- 19880 MUSIC (0,0,0)
- 19890 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19900 PRINT "( I'LL BE THERE! )- _": WAIT (512)
- 19910 MUSIC (2,5,6)
- 19920 MUSIC (0,0,0)
- 19930 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 19940 PRINT "% -( SAME HERE. SEE YOU THEN! )": WAIT (512)
- 19950 CPOS (0,0): CLS
- 19951 SHAPE (43, "00005E3F293F293F00")
- 19960 MUSIC (2,5,6)
- 19970 MUSIC (0,0,0)
- 19980 PRINT "INT. THE LAUNDROMAT - 6:45"
- 19990 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20000 PRINT "% -( CAN'T FORGET THE CAP! )"
- 20010 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20020 PRINT "| C|+ |"
- 20030 PRINT "| |_ |"
- 20040 PRINT "| ||||"
- 20050 PRINT "| % |"
- 20060 PRINT "|E |"
- 20070 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20080 PRINT "YOU ARE IN THE ENTRANCE (E)."
- 20090 PRINT "PRESS C TO GET YOUR CAP."
- 20100 IF KEY = 67 THEN GOTO 20120
- 20110 GOTO 20100
- 20120 SHAPE (37, "7F212B2B212F213F00")
- 20130 SHAPE (43, "00003F213521293F00")
- 20140 CPOS (0,0): CLS
- 20150 WAIT (512)
- 20160 MUSIC (2,5,6)
- 20170 MUSIC (0,0,0)
- 20180 PRINT "EXT. THE PARK - 7:00"
- 20190 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20200 PRINT "% -( I'M READY. )"
- 20210 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20220 PRINT "| |"
- 20230 PRINT "| % |"
- 20240 PRINT "| ------ |"
- 20250 PRINT "| - - |"
- 20260 PRINT "|------------------|"
- 20270 PRINT "| _ # & = + |"
- 20280 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20281 PRINT "YOU ARE ON THE STAGE."
- 20282 PRINT "PRESS P TO PLAY."
- 20283 IF KEY = 80 THEN GOTO 20290
- 20284 GOTO 20283
- 20290 CPOS (0,0): CLS
- 20300 PRINT "INT. THE PARK - 7:00"
- 20310 MUSIC (2,5,6)
- 20320 MUSIC (0,0,0)
- 20330 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20340 PRINT "% -( HEY EVERYONE! )": WAIT (512)
- 20350 MUSIC (2,5,6)
- 20360 MUSIC (0,0,0)
- 20370 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20380 PRINT "% -( JUST WANNA SAY THANKS. )": WAIT (512)
- 20390 MUSIC (2,5,6)
- 20400 MUSIC (0,0,0)
- 20410 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20420 PRINT "( YES, OF COURSE! )- _": WAIT (512)
- 20430 MUSIC (2,5,6)
- 20440 MUSIC (0,0,0)
- 20450 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20460 PRINT "% -( COOL, NO PROBLEM! )": WAIT (512)
- 20470 MUSIC (2,5,6)
- 20480 MUSIC (0,0,0)
- 20490 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20500 PRINT "% -( HERE'S THE SONG, HOPE YOU ENJOY. )": WAIT (512)
- 20510 CPOS (0,0): CLS
- 20520 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20530 PRINT "| |"
- 20540 PRINT "| % |"
- 20550 PRINT "| ------ |"
- 20560 PRINT "| - - |"
- 20570 PRINT "|------------------|"
- 20580 PRINT "| _ # & = + |"
- 20590 PRINT "\/\/\/\/\/\/\/\/\/\/\"
- 20600 NOISE (8, 1): WAIT (32)
- 20610 NOISE (8, 2): WAIT (32)
- 20620 NOISE (8, 3): WAIT (32)
- 20630 NOISE (8, 4): WAIT (32)
- 20640 NOISE (8, 5): WAIT (32)
- 20650 NOISE (8, 6): WAIT (32)
- 20660 MUSIC (1,4,6): WAIT (32)
- 20670 MUSIC (3,4,6): WAIT (32)
- 20690 MUSIC (5,4,6): WAIT (32)
- 20700 MUSIC (6,4,6): WAIT (32)
- 20710 MUSIC (1,4,6): WAIT (32)
- 20720 MUSIC (3,4,6): WAIT (32)
- 20730 MUSIC (5,4,6): WAIT (32)
- 20740 MUSIC (7,4,6): WAIT (32)
- 20750 MUSIC (1,4,6): WAIT (32)
- 20760 MUSIC (3,4,6): WAIT (32)
- 20770 MUSIC (5,4,6): WAIT (32)
- 20780 MUSIC (6,4,6): WAIT (32)
- 20790 MUSIC (1,4,6): WAIT (32)
- 20800 MUSIC (3,4,6): WAIT (32)
- 20810 MUSIC (5,4,6): WAIT (32)
- 20820 MUSIC (7,4,6): WAIT (32)
- 20830 MUSIC (5,3,6): WAIT (32)
- 20840 MUSIC (3,4,6): WAIT (32)
- 20850 MUSIC (5,4,6): WAIT (32)
- 20860 MUSIC (6,4,6): WAIT (32)
- 20870 MUSIC (5,3,6): WAIT (32)
- 20880 MUSIC (3,4,6): WAIT (32)
- 20890 MUSIC (5,4,6): WAIT (32)
- 20900 MUSIC (7,4,6): WAIT (32)
- 20910 MUSIC (5,3,6): WAIT (32)
- 20920 MUSIC (3,4,6): WAIT (32)
- 20930 MUSIC (5,4,6): WAIT (32)
- 20940 MUSIC (6,4,6): WAIT (32)
- 20950 MUSIC (5,3,6): WAIT (32)
- 20960 MUSIC (3,4,6): WAIT (32)
- 20970 MUSIC (5,4,6): WAIT (32)
- 20980 MUSIC (7,4,6): WAIT (32)
- 20990 MUSIC (4,3,6): WAIT (32)
- 21000 MUSIC (3,4,6): WAIT (32)
- 21010 MUSIC (5,4,6): WAIT (32)
- 21020 MUSIC (6,4,6): WAIT (32)
- 21030 MUSIC (4,3,6): WAIT (32)
- 21040 MUSIC (3,4,6): WAIT (32)
- 21050 MUSIC (5,4,6): WAIT (32)
- 21060 MUSIC (7,4,6): WAIT (32)
- 21070 MUSIC (4,3,6): WAIT (32)
- 21080 MUSIC (3,4,6): WAIT (32)
- 21090 MUSIC (5,4,6): WAIT (32)
- 21100 MUSIC (6,4,6): WAIT (32)
- 21110 MUSIC (4,3,6): WAIT (32)
- 21120 MUSIC (3,5,6): WAIT (32)
- 21130 MUSIC (2,5,6): WAIT (32)
- 21140 MUSIC (1,5,6): WAIT (32)
- 21150 MUSIC (5,3,6): WAIT (32)
- 21160 MUSIC (3,4,6): WAIT (32)
- 21170 MUSIC (5,4,6): WAIT (32)
- 21180 MUSIC (6,4,6): WAIT (32)
- 21190 MUSIC (5,3,6): WAIT (32)
- 21200 MUSIC (3,4,6): WAIT (32)
- 21210 MUSIC (5,4,6): WAIT (32)
- 21220 MUSIC (7,4,6): WAIT (32)
- 21230 MUSIC (3,3,6): WAIT (32)
- 21240 MUSIC (5,4,6): WAIT (32)
- 21250 MUSIC (6,4,6): WAIT (32)
- 21260 MUSIC (7,4,6): WAIT (32)
- 21270 MUSIC (5,3,6): WAIT (32)
- 21280 MUSIC (2,5,6): WAIT (32)
- 21290 MUSIC (5,5,6): WAIT (32)
- 21300 MUSIC (1,5,6): WAIT (32)
- 21310 MUSIC (4,3,6): WAIT (32)
- 21320 MUSIC (1,5,6): WAIT (32)
- 21330 MUSIC (0,0,0): WAIT (32)
- 21340 MUSIC (4,3,6): WAIT (32)
- 21350 MUSIC (1,5,6): WAIT (32)
- 21360 MUSIC (0,0,0): WAIT (32)
- 21370 MUSIC (4,3,6): WAIT (32)
- 21380 MUSIC (1,5,6): WAIT (32)
- 21390 MUSIC (5,3,6): WAIT (32)
- 21400 MUSIC (7,4,6): WAIT (32)
- 21410 MUSIC (0,0,0): WAIT (32)
- 21420 MUSIC (5,3,6): WAIT (32)
- 21430 MUSIC (7,4,6): WAIT (32)
- 21440 MUSIC (0,0,0): WAIT (32)
- 21450 MUSIC (5,3,6): WAIT (32)
- 21460 MUSIC (7,4,6): WAIT (32)
- 21470 MUSIC (3,3,6): WAIT (32)
- 21480 MUSIC (1,5,6): WAIT (32)
- 21490 MUSIC (0,0,0): WAIT (32)
- 21500 MUSIC (3,3,6): WAIT (32)
- 21510 MUSIC (1,5,6): WAIT (32)
- 21520 MUSIC (0,0,0): WAIT (32)
- 21530 MUSIC (3,3,6): WAIT (32)
- 21540 MUSIC (1,5,6): WAIT (32)
- 21550 MUSIC (6,3,6): WAIT (32)
- 21560 MUSIC (7,4,6): WAIT (32)
- 21570 MUSIC (7,3,6): WAIT (32)
- 21580 MUSIC (1,4,6): WAIT (32)
- 21590 MUSIC (7,4,6): WAIT (32)
- 21600 MUSIC (6,3,6): WAIT (32)
- 21610 MUSIC (5,3,6): WAIT (32)
- 21620 MUSIC (3,5,6): WAIT (32)
- 21630 MUSIC (4,3,6): WAIT (32)
- 21640 MUSIC (1,5,6): WAIT (32)
- 21650 MUSIC (0,0,0): WAIT (32)
- 21660 MUSIC (4,3,6): WAIT (32)
- 21670 MUSIC (1,5,6): WAIT (32)
- 21680 MUSIC (0,0,0): WAIT (32)
- 21690 MUSIC (4,3,6): WAIT (32)
- 21700 MUSIC (1,5,6): WAIT (32)
- 21710 MUSIC (5,3,6): WAIT (32)
- 21720 MUSIC (7,4,6): WAIT (32)
- 21730 MUSIC (0,0,0): WAIT (32)
- 21740 MUSIC (5,3,6): WAIT (32)
- 21750 MUSIC (7,4,6): WAIT (32)
- 21760 MUSIC (0,0,0): WAIT (32)
- 21770 MUSIC (5,3,6): WAIT (32)
- 21780 MUSIC (7,4,6): WAIT (32)
- 21790 MUSIC (3,3,6): WAIT (32)
- 21800 MUSIC (1,5,6): WAIT (32)
- 21810 MUSIC (0,0,0): WAIT (32)
- 21820 MUSIC (3,3,6): WAIT (32)
- 21830 MUSIC (1,5,6): WAIT (32)
- 21840 MUSIC (0,0,0): WAIT (32)
- 21850 MUSIC (3,3,6): WAIT (32)
- 21860 MUSIC (1,5,6): WAIT (32)
- 21870 MUSIC (6,3,6): WAIT (32)
- 21880 MUSIC (7,4,6): WAIT (32)
- 21890 MUSIC (7,3,6): WAIT (32)
- 21900 MUSIC (1,4,6): WAIT (32)
- 21910 MUSIC (7,4,6): WAIT (32)
- 21920 MUSIC (6,3,6): WAIT (32)
- 21930 MUSIC (5,3,6): WAIT (32)
- 21940 MUSIC (5,5,6): WAIT (32)
- 21950 MUSIC (1,4,6): WAIT (32)
- 21960 MUSIC (3,4,6): WAIT (32)
- 21970 MUSIC (5,4,6): WAIT (32)
- 21980 MUSIC (6,4,6): WAIT (32)
- 21990 MUSIC (1,4,6): WAIT (32)
- 22000 MUSIC (3,4,6): WAIT (32)
- 22010 MUSIC (5,4,6): WAIT (32)
- 22020 MUSIC (7,4,6): WAIT (32)
- 22030 MUSIC (1,4,6): WAIT (32)
- 22040 MUSIC (3,4,6): WAIT (32)
- 22050 MUSIC (5,4,6): WAIT (32)
- 22060 MUSIC (6,4,6): WAIT (32)
- 22070 MUSIC (1,4,6): WAIT (32)
- 22080 MUSIC (3,4,6): WAIT (32)
- 22090 MUSIC (5,4,6): WAIT (32)
- 22100 MUSIC (7,4,6): WAIT (32)
- 22110 MUSIC (5,3,6): WAIT (32)
- 22120 MUSIC (3,4,6): WAIT (32)
- 22130 MUSIC (5,4,6): WAIT (32)
- 22140 MUSIC (6,4,6): WAIT (32)
- 22150 MUSIC (5,3,6): WAIT (32)
- 22160 MUSIC (3,4,6): WAIT (32)
- 22170 MUSIC (5,4,6): WAIT (32)
- 22180 MUSIC (7,4,6): WAIT (32)
- 22190 MUSIC (5,3,6): WAIT (32)
- 22200 MUSIC (3,4,6): WAIT (32)
- 22210 MUSIC (5,4,6): WAIT (32)
- 22220 MUSIC (6,4,6): WAIT (32)
- 22230 MUSIC (5,3,6): WAIT (32)
- 22240 MUSIC (3,4,6): WAIT (32)
- 22250 MUSIC (5,4,6): WAIT (32)
- 22260 MUSIC (7,4,6): WAIT (32)
- 22270 MUSIC (4,3,6): WAIT (32)
- 22280 MUSIC (3,4,6): WAIT (32)
- 22290 MUSIC (5,4,6): WAIT (32)
- 22300 MUSIC (6,4,6): WAIT (32)
- 22310 MUSIC (4,3,6): WAIT (32)
- 22320 MUSIC (3,4,6): WAIT (32)
- 22330 MUSIC (5,4,6): WAIT (32)
- 22340 MUSIC (7,4,6): WAIT (32)
- 22350 MUSIC (4,3,6): WAIT (32)
- 22360 MUSIC (3,4,6): WAIT (32)
- 22370 MUSIC (5,4,6): WAIT (32)
- 22380 MUSIC (6,4,6): WAIT (32)
- 22390 MUSIC (4,3,6): WAIT (32)
- 22400 MUSIC (3,5,6): WAIT (32)
- 22410 MUSIC (2,5,6): WAIT (32)
- 22420 MUSIC (1,5,6): WAIT (32)
- 22430 MUSIC (5,3,6): WAIT (32)
- 22440 MUSIC (3,4,6): WAIT (32)
- 22450 MUSIC (5,4,6): WAIT (32)
- 22460 MUSIC (6,4,6): WAIT (32)
- 22470 MUSIC (5,3,6): WAIT (32)
- 22480 MUSIC (3,4,6): WAIT (32)
- 22490 MUSIC (5,4,6): WAIT (32)
- 22500 MUSIC (7,4,6): WAIT (32)
- 22510 MUSIC (3,3,6): WAIT (48)
- 22520 MUSIC (5,4,6): WAIT (48)
- 22530 MUSIC (6,4,6): WAIT (48)
- 22540 MUSIC (5,3,6): WAIT (240)
- 22550 MUSIC (4,3,6): WAIT (128)
- 22560 MUSIC (3,3,6): WAIT (128)
- 22570 MUSIC (2,3,6): WAIT (128)
- 22580 MUSIC (1,3,6): WAIT (64)
- 22590 MUSIC (3,3,6): WAIT (64)
- 22600 MUSIC (5,3,6): WAIT (64)
- 22610 MUSIC (7,3,6): WAIT (64)
- 22620 MUSIC (1,3,6): WAIT (64)
- 22630 MUSIC (3,3,6): WAIT (64)
- 22640 MUSIC (4,3,6): WAIT (64)
- 22650 MUSIC (1,3,6): WAIT (1152)
- 22660 MUSIC (0,0,0)
- 22670 NOISE (8, 5): WAIT (8)
- 22680 NOISE (8, 4): WAIT (8)
- 22690 NOISE (8, 3): WAIT (8)
- 22700 NOISE (8, 2): WAIT (8)
- 22710 NOISE (8, 1): WAIT (8)
- 22720 NOISE (8, 0): WAIT (1024)
- 22730 CPOS (0,0): CLS
- 22740 SCREEN (1)
- 22750 COLOR (12)
- 22760 CPOS (1,38)
- 22770 SHAPE (64, "CEDCF8F8FCFFDECC00")
- 22780 PRINT "@"
- 22790 CPOS (22,1)
- 22800 SHAPE (35, "464878484848484400")
- 22810 SHAPE (38, "6060606C5252525200")
- 22820 SHAPE (43, "404058646478524C00")
- 22830 SHAPE (37, "4E5060647860625C00")
- 22840 SHAPE (95, "404040606C52525200")
- 22850 SHAPE (61, "4844444C5262645800")
- 22860 PRINT "#&+ %_="
- 22870 WAIT (2048)
- 22880 CPOS (0,0): CLS
- 22890 SCREEN (8)
- 22900 COLOR (5)
- 22910 PRINT "THE AMAZINGLY AVERAGE ADVENTURES OF"
- 22920 PRINT "ARNOLD THE DISEMBODIED HEAD"
- 22930 PRINT "A PIXELBRICK GAME"
- 22940 SHAPE (37, "5E727F2B21253F3300")
- 22950 PRINT "% QUIRBY64 - IDEA, CODE,"
- 22960 PRINT "MUSIC, AND BASIC GRAPHICS"
- 22970 SHAPE (95, "DEFF212B211E8C9E00")
- 22980 PRINT "_ GREEN GUY - STORY, LEAD GRAPHICS,"
- 22990 PRINT "BETA TESTING"
- 23000 SHAPE (61, "1E3F1F31215A7B7B00")
- 23010 PRINT "= XENOROCKET - STORY,"
- 23020 PRINT "ADDT'L GRAPHICS, BETA TESTING"
- 23030 PRINT "BIG LUMBY - STORY, BETA TESTING"
- 23040 PRINT "SAMWOW - STORY"
- 23050 PRINT "MAXTREAM - STORY"
- 23060 PRINT "THANKS TO RADIOACTIVE SEAN,"
- 23070 PRINT "DISK JOHSY, PROFESSOR DRANK,"
- 23080 PRINT "TOBIKOMI, TURISMOTURBO,"
- 23090 PRINT "WITTAROJR, M.V.T AND THE WHOLE TEAM"
- 23100 PRINT "FOR EITHER BETA TESTING, OR HELPING"
- 23110 PRINT "MAKE THIS GAME FUN TO DEVELOP!"
- 23120 PRINT "MADE IN NOTEPAD FOR WINDOWS 10."
- 23130 PRINT "ASCIITABLE.COM AND THE"
- 23140 PRINT "RAPIDTABLES BINARY-HEX CONVERTER."
- 23150 PRINT "SODA GUIDE BY HOMEBREWING.ORG."
- 23160 PRINT "\.O./"
- 23170 IF KEY = 32 THEN GOTO 23190
- 23180 GOTO 23170
- 23190 END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement