TAAAoAtDH (Side A)

10 CPOS (0,0): CLS
20 SCREEN (8)
30 COLOR (5)
40 SHAPE (37, "7F212B2B212F213F00")
50 SHAPE (61, "CCDEFFFFFFFFDECC00")
60 SHAPE (35, "8C9EBFBFBFBF9E8C00")
70 SHAPE (59, "0103C3C7CEDEFCF800")
80 SHAPE (64, "82865E7F7F7F7F5A00")
90 SHAPE (38, "1E1E1E7F5E5E5E5E00")
100 SHAPE (43, "88B99E1C1E1F1F0E00")
110 SHAPE (95, "000C12122121211E00")
120 CPOS (11, 11): PRINT "A PIXELBRICK GAME"
130 MUSIC (2,3,6): WAIT (2)
140 MUSIC (4,4,6): WAIT (2)
150 MUSIC (0,0,0): WAIT (4)
160 MUSIC (3,4,6): WAIT (4)
170 MUSIC (4,4,2): WAIT (4)
180 MUSIC (1,4,6): WAIT (4)
190 MUSIC (3,4,2): WAIT (4)
200 MUSIC (3,3,6): WAIT (2)
210 MUSIC (5,4,6): WAIT (2)
220 MUSIC (1,4,2): WAIT (4)
230 MUSIC (3,4,6): WAIT (4)
240 MUSIC (5,4,2): WAIT (4)
250 MUSIC (2,4,6): WAIT (4)
260 MUSIC (3,4,2): WAIT (4)
270 MUSIC (1,3,6): WAIT (2)
280 MUSIC (1,4,6): WAIT (12)
290 MUSIC (1,4,5): WAIT (4)
300 MUSIC (1,4,4): WAIT (4)
310 MUSIC (1,4,3): WAIT (4)
320 MUSIC (1,4,2): WAIT (4)
330 MUSIC (1,4,1): WAIT (4)
340 MUSIC (1,4,0): WAIT (16)
350 MUSIC (7,3,6): WAIT (2)
360 MUSIC (1,4,6): WAIT (6)
370 MUSIC (1,4,5): WAIT (8)
380 MUSIC (1,4,4): WAIT (8)
390 MUSIC (1,4,3): WAIT (8)
400 MUSIC (1,4,2): WAIT (8)
410 MUSIC (1,4,1): WAIT (8)
420 MUSIC (0,0,0): WAIT (8)
430 MUSIC (1,5,6): WAIT (16)
440 MUSIC (1,5,5): WAIT (16)
450 MUSIC (1,5,4): WAIT (16)
460 MUSIC (1,5,3): WAIT (16)
470 MUSIC (1,5,2): WAIT (16)
480 MUSIC (1,5,1): WAIT (16)
490 MUSIC (1,5,0): WAIT (192)
500 MUSIC (1,4,6): WAIT (4)
510 MUSIC (1,4,5): WAIT (4)
520 MUSIC (1,4,4): WAIT (4)
530 MUSIC (1,4,3): WAIT (4)
540 MUSIC (1,4,2): WAIT (4)
550 MUSIC (1,4,1): WAIT (4)
560 MUSIC (1,4,0): WAIT (256)
570 CPOS (0,0): CLS
580 CPOS (11, 12): PRINT "THIS IS ARNOLD."
590 CPOS (13, 18): PRINT "%"
600 MUSIC (5,4,2): WAIT (512)
610 CPOS (0,0): CLS
620 CPOS (11, 3): PRINT "HE'S A DISEMBODIED HEAD."
630 CPOS (13, 18): PRINT "%"
640 MUSIC (6,4,3): WAIT (512)
650 CPOS (0,0): CLS
660 CPOS (11, 12): PRINT "HEY, HOW ABOUT WE TAKE"
670 CPOS (12, 12): PRINT "A LOOK AT HIS LIFE?"
680 CPOS (13, 18): PRINT "%"
690 MUSIC (3,4,4): WAIT (512)
700 CPOS (0,0): CLS
710 CPOS (11, 10): PRINT "BECAUSE AFTER ALL, THIS IS..."
720 CPOS (13, 18): PRINT "%"
730 MUSIC (1,4,5): WAIT (512)
740 CPOS (0,0): CLS
750 CPOS (11, 5): PRINT "THE AMAZINGLY AVERAGE ADVENTURES OFARNOLD THE DISEMBODIED HEAD"
760 CPOS (13, 18): PRINT "%"
770 CPOS (15, 14): PRINT "PRESS SPACE"
780 MUSIC (2,4,6)
790 MUSIC (4,4,6)
800 MUSIC (6,4,6)
810 MUSIC (2,5,6)
820 MUSIC (2,4,6)
830 MUSIC (4,4,6)
840 MUSIC (6,4,6)
850 MUSIC (2,5,6)
860 MUSIC (2,4,6)
870 MUSIC (4,4,6)
880 MUSIC (6,4,6)
890 MUSIC (2,5,6)
900 MUSIC (2,4,6)
910 MUSIC (4,4,6)
920 MUSIC (6,4,6)
930 MUSIC (2,5,6)
940 MUSIC (2,4,6)
950 MUSIC (4,4,6)
960 MUSIC (6,4,6)
970 MUSIC (2,5,6)
980 MUSIC (2,4,6)
990 MUSIC (4,4,6)
1000 MUSIC (6,4,6)
1100 MUSIC (2,5,6)
1110 MUSIC (2,4,6)
1120 MUSIC (4,4,6)
1130 MUSIC (6,4,6)
1140 MUSIC (2,5,6)
1150 MUSIC (2,4,6)
1160 MUSIC (4,4,6)
1170 MUSIC (6,4,6)
1180 MUSIC (2,5,6)
1190 MUSIC (2,3,6): WAIT (16)
1200 MUSIC (2,3,5): WAIT (16)
1210 MUSIC (2,3,4): WAIT (16)
1220 MUSIC (2,3,3): WAIT (16)
1230 MUSIC (2,3,2): WAIT (16)
1240 MUSIC (2,3,1): WAIT (16)
1250 MUSIC (0,0,0)
1260 IF KEY = 32 THEN GOTO 1280
1270 GOTO 1260
1280 CPOS (0,0): CLS
1290 MUSIC (2,5,6)
1300 MUSIC (0,0,0)
1310 PRINT "INT. ARNOLD'S HOUSE - 7:30 AM"
1320 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1330 PRINT "% -( MAN, I KNOW IT'S BREAKFAST... )": WAIT (512)
1340 MUSIC (2,5,6)
1350 MUSIC (0,0,0)
1360 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1370 PRINT "% -( BUT I COULD GO FOR SOME FRUIT. )": WAIT (512)
1380 MUSIC (2,5,6)
1390 MUSIC (0,0,0)
1400 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1410 PRINT "% -( YOU KNOW, I HAVE A WHOLE LIST! )": WAIT (512)
1420 MUSIC (3,6,6): WAIT (4)
1430 MUSIC (2,6,6): WAIT (4)
1440 MUSIC (1,6,6): WAIT (4)
1450 MUSIC (5,5,6): WAIT (4)
1460 MUSIC (0,0,0)
1470 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1480 PRINT "|''''''''''''''''''|"
1490 PRINT "|LEMON             |"
1500 PRINT "|LIME              |"
1510 PRINT "|BANANA            |"
1520 PRINT "|APPLE             |"
1530 PRINT "|EGGPLANT          |"
1540 PRINT "|CHOCOLATE         |"
1550 PRINT "|EGG               |"
1560 PRINT "''''''''''''''''''''"
1570 PRINT "% -( YEAH, STILL 7 ITEMS. )": WAIT (512)
1580 MUSIC (2,5,6)
1590 MUSIC (0,0,0)
1600 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1610 PRINT "% -( TIME FOR A MORNING SHOPPING RUN! )": WAIT (512)
1620 CPOS (0,0): CLS
1630 MUSIC (2,5,6)
1640 MUSIC (0,0,0)
1650 PRINT "INT. ARNOLD'S HOUSE - CONTINUOUS"
1660 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1670 PRINT "% -( WHERE TO? )"
1680 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1690 PRINT "|    B  |"
1700 PRINT "|       |"
1710 PRINT "|       |"
1720 PRINT "G       |||||||"
1730 PRINT "|      %   K  |"
1740 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1750 PRINT "YOU ARE IN THE KITCHEN (K)."
1760 PRINT "PRESS G TO GO TO THE GARAGE."
1770 PRINT "PRESS B TO GO TO YOUR BEDROOM."
1780 IF KEY = 71 THEN GOTO 1810
1790 IF KEY = 66 THEN GOTO 2000
1800 GOTO 1780
1810 CPOS (0,0): CLS
1820 MUSIC (2,5,6)
1830 MUSIC (0,0,0)
1840 SHAPE (60, "4F5F7F7F7F7F1C1800")
1850 SHAPE (62, "70FCFE7F7F7F0E0600")
1860 PRINT "INT. ARNOLD'S GARAGE - CONTINUOUS"
1870 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1880 PRINT "% -( WAIT, I DON'T HAVE MY KEYS! )"
1890 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1900 PRINT "| G     |"
1910 PRINT "|       K"
1920 PRINT "| <> %  |"
1930 PRINT "|       |"
1940 PRINT "|       |"
1950 PRINT "\/\/\/\/\/\/\/\/\/\/\"
1960 PRINT "YOU ARE IN THE GARAGE(G)."
1970 PRINT "PRESS K TO GO TO THE KITCHEN."
1980 IF KEY = 75 THEN GOTO 1620
1990 GOTO 1980
2000 CPOS (0,0): CLS
2010 MUSIC (2,5,6)
2020 MUSIC (0,0,0)
2030 PRINT "INT. ARNOLD'S ROOM - CONTINUOUS"
2040 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2050 PRINT "% -( HEY, THERE'S MY KEYS! )"
2060 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2070 PRINT "|'''''''|"
2080 PRINT "|   ( ()|"
2090 PRINT "|    |C |"
2100 PRINT "| %     |"
2110 PRINT "| K    B|"
2120 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2130 PRINT "YOU ARE IN YOUR BEDROOM(B)."
2140 PRINT "PRESS C TO GET YOUR KEYS."
2150 PRINT "PRESS K TO GO TO THE KITCHEN."
2160 IF KEY = 67 THEN GOTO 2190
2170 IF KEY = 75 THEN GOTO 1620
2180 GOTO 2160
2190 CPOS (0,0): CLS
2200 MUSIC (2,5,6)
2210 MUSIC (0,0,0)
2220 PRINT "INT. ARNOLD'S ROOM - CONTINUOUS"
2230 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2240 PRINT "% -( ALRIGHT, THERE WE GO. )"
2250 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2260 PRINT "|'''''''|"
2270 PRINT "|   ( ()|"
2280 PRINT "|    |  |"
2290 PRINT "| %     |"
2300 PRINT "| K    B|"
2310 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2320 PRINT "YOU ARE IN YOUR BEDROOM(B)."
2330 PRINT "PRESS K TO GO TO THE KITCHEN."
2340 IF KEY = 75 THEN GOTO 2360
2350 GOTO 2340
2360 CPOS (0,0): CLS
2370 MUSIC (2,5,6)
2380 MUSIC (0,0,0)
2390 PRINT "INT. ARNOLD'S HOUSE - CONTINUOUS"
2400 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2410 PRINT "% -( ALRIGHT, I'M READY! )"
2420 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2430 PRINT "|       |"
2440 PRINT "|       |"
2450 PRINT "|       |"
2460 PRINT "G       |||||||"
2470 PRINT "|      %   K  |"
2480 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2490 PRINT "YOU ARE IN THE KITCHEN(K)."
2500 PRINT "PRESS G TO GO TO THE GARAGE."
2510 IF KEY = 71 THEN GOTO 2530
2520 GOTO 2510
2530 CPOS (0,0): CLS
2540 MUSIC (2,5,6)
2550 MUSIC (0,0,0)
2560 SHAPE (60, "4F5F7F7F7F7F1C1800")
2570 SHAPE (62, "70FCFE7F7F7F0E0600")
2580 PRINT "INT. ARNOLD'S GARAGE - CONTINUOUS"
2590 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2600 PRINT "% -( LET'S GO! )"
2610 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2620 PRINT "| G     |"
2630 PRINT "|  C    |"
2640 PRINT "| <> %  |"
2650 PRINT "|       |"
2660 PRINT "|       |"
2670 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2680 PRINT "YOU ARE IN THE GARAGE(G)."
2690 PRINT "PRESS C TO GET IN YOUR CAR."
2700 IF KEY = 67 THEN GOTO 2720
2710 GOTO 2700
2720 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
2730 MUSIC (5,4,6)
2740 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2750 PRINT "||||||||"
2760 PRINT "        "
2770 PRINT "||||||||"
2780 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2790 WAIT (64)
2800 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
2810 MUSIC (7,4,6)
2820 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2830 PRINT "||||||||"
2840 PRINT "       <"
2850 PRINT "||||||||"
2860 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2870 WAIT (64)
2880 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
2890 MUSIC (4,4,6)
2900 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2910 PRINT "||||||||"
2920 PRINT "      <>"
2930 PRINT "||||||||"
2940 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2950 WAIT (64)
2960 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
2970 MUSIC (7,4,6)
2980 PRINT "\/\/\/\/\/\/\/\/\/\/\"
2990 PRINT "||||||||"
3000 PRINT "     <>"
3010 PRINT "||||||||"
3020 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3030 WAIT (64)
3040 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
3050 MUSIC (5,4,6)
3060 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3070 PRINT "||||||||"
3080 PRINT "    <>"
3090 PRINT "||||||||"
3100 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3110 WAIT (64)
3120 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
3130 MUSIC (7,4,6)
3140 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3150 PRINT "||||||||"
3160 PRINT "   <>"
3170 PRINT "||||||||"
3180 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3190 WAIT (64)
3200 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
3210 MUSIC (4,4,6)
3220 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3230 PRINT "||||||||"
3240 PRINT "  <>"
3250 PRINT "||||||||"
3260 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3270 WAIT (64)
3280 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
3290 MUSIC (7,4,6)
3300 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3310 PRINT "||||||||"
3320 PRINT " <>"
3330 PRINT "||||||||"
3340 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3350 WAIT (64)
3360 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
3370 MUSIC (5,4,6)
3380 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3390 PRINT "||||||||"
3400 PRINT "<>"
3410 PRINT "||||||||"
3420 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3430 WAIT (64)
3440 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
3450 MUSIC (7,4,6)
3460 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3470 PRINT "||||||||"
3480 PRINT ">"
3490 PRINT "||||||||"
3500 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3510 WAIT (64)
3520 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
3530 MUSIC (6,4,6)
3540 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3550 PRINT "||||||||"
3560 PRINT " "
3570 PRINT "||||||||"
3580 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3590 WAIT (64)
3600 CPOS (0,0): CLS
3610 MUSIC (5,4,6): WAIT (128)
3620 MUSIC (5,3,6): WAIT (128)
3630 MUSIC (0,0,0)
3640 NOISE (8, 4): WAIT (32)
3650 NOISE (8, 3): WAIT (32)
3660 NOISE (8, 2): WAIT (32)
3670 NOISE (8, 1): WAIT (32)
3680 NOISE (8, 0): WAIT (512)
3690 CPOS (0,0): CLS
3700 MUSIC (2,5,6)
3710 MUSIC (0,0,0)
3720 PRINT "INT. THE GROCERY STORE - 8:00 AM"
3730 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3740 PRINT "% -( WHERE TO? )"
3750 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3760 PRINT "|      |"
3770 PRINT "|  |||||"
3780 PRINT "|      |"
3790 PRINT "|  |||||"
3800 PRINT "|R     |"
3810 PRINT "| %   A|"
3820 PRINT "|      |"
3830 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3840 PRINT "YOU ARE AT THE REGISTERS(R)."
3850 PRINT "PRESS A TO GO TO THE AISLES(A)."
3860 IF KEY = 65 THEN GOTO 3880
3870 GOTO 3860
3880 CPOS (0,0): CLS
3890 MUSIC (2,5,6)
3900 MUSIC (0,0,0)
3910 PRINT "INT. GROCERY STORE AISLES - CONTINUOUS"
3920 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3930 PRINT "% -( WHAT FIRST? )"
3940 PRINT "\/\/\/\/\/\/\/\/\/\/\"
3950 PRINT "| P    |"
3960 PRINT "|      |"
3970 PRINT "|      |"
3980 PRINT "|    C |"
3990 PRINT "|      |"
4000 PRINT "| %    |"
4010 PRINT "|A     |"
4020 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4030 PRINT "YOU ARE IN THE AISLES(A)."
4040 PRINT "PRESS P TO GO TO THE PRODUCE SECTION(P)."
4050 PRINT "PRESS C TO GO TO THE CANDY AISLE(C)."
4060 IF KEY = 80 THEN GOTO 4090
4070 IF KEY = 67 THEN GOTO 5040
4080 GOTO 4060
4090 CPOS (0,0): CLS
4100 MUSIC (2,5,6)
4110 MUSIC (0,0,0)
4120 PRINT "INT. THE PRODUCE SECTION - CONTINUOUS"
4130 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4140 PRINT "% -( MOST OF WHAT I NEED IS HERE! )"
4150 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4160 PRINT "| =    |"
4170 PRINT "| ; #  |"
4180 PRINT "|   @  |"
4190 PRINT "|  +   |"
4200 PRINT "|   _   |"
4210 PRINT "| %    |"
4220 PRINT "|     P|"
4230 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4240 PRINT "YOU ARE IN THE PRODUCE SECTION(P)."
4250 PRINT "PRESS B TO BUY THE ITEMS."
4260 IF KEY = 66 THEN GOTO 4280
4270 GOTO 4260
4280 CPOS (0,0): CLS
4290 MUSIC (2,5,6)
4300 MUSIC (0,0,0)
4310 PRINT "INT. THE PRODUCE SECTION - CONTINUOUS"
4320 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4330 PRINT "% -( ALRIGHT, THERE WE GO. )"
4340 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4350 PRINT "| =    |"
4360 PRINT "| ; #  |"
4370 PRINT "|   @  |"
4380 PRINT "|  +   |"
4390 PRINT "|   _  |"
4400 PRINT "| %    |"
4410 PRINT "|C    P|"
4420 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4430 PRINT "YOU ARE IN THE PRODUCE SECTION(P)."
4440 PRINT "PRESS C TO GO TO THE CANDY AISLE(C)."
4450 IF KEY = 67 THEN GOTO 4470
4460 GOTO 4450
4470 CPOS (0,0): CLS
4480 MUSIC (2,5,6)
4490 MUSIC (0,0,0)
4500 PRINT "INT. THE CANDY AISLE - CONTINUOUS"
4510 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4520 PRINT "% -( I THINK I'LL GET SOME CHOCOLATE TOOFOR MY EFFORT. )"
4530 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4540 PRINT "|      |"
4550 PRINT "|      |"
4560 PRINT "| &    |"
4570 PRINT "|      |"
4580 PRINT "|      |"
4590 PRINT "|      |"
4600 PRINT "|     C|"
4610 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4620 PRINT "YOU ARE IN THE CANDY AISLE(C)."
4630 PRINT "PRESS B TO BUY THE ITEM."
4640 IF KEY = 66 THEN GOTO 4660
4650 GOTO 4640
4660 CPOS (0,0): CLS
4670 MUSIC (2,5,6)
4680 MUSIC (0,0,0)
4690 PRINT "INT. THE CANDY AISLE - CONTINUOUS"
4700 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4710 PRINT "% -( COOL AND GOOD. )"
4720 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4730 PRINT "|      |"
4740 PRINT "|      |"
4750 PRINT "| &    |"
4760 PRINT "|      |"
4770 PRINT "|      |"
4780 PRINT "|      |"
4790 PRINT "|R    C|"
4800 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4810 PRINT "YOU ARE IN THE CANDY AISLE(C)."
4820 PRINT "PRESS R TO GO TO THE REGISTERS(R)."
4830 IF KEY = 82 THEN GOTO 4850
4840 GOTO 4830
4850 CPOS (0,0): CLS
4860 MUSIC (2,5,6)
4870 MUSIC (0,0,0)
4880 PRINT "INT. THE GROCERY STORE - 8:00 AM"
4890 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4900 PRINT "% -( TIME TO CHECK OUT! )"
4910 PRINT "\/\/\/\/\/\/\/\/\/\/\"
4920 PRINT "|      |"
4930 PRINT "|  |||||"
4940 PRINT "|    C |"
4950 PRINT "|  |||||"
4960 PRINT "|R     |"
4970 PRINT "| %    |"
4980 PRINT "|      |"
4990 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5000 PRINT "YOU ARE AT THE REGISTERS(R)."
5010 PRINT "PRESS C TO CHECK OUT(C)."
5020 IF KEY = 67 THEN GOTO 5820
5030 GOTO 5020
5040 CPOS (0,0): CLS
5050 MUSIC (2,5,6)
5060 MUSIC (0,0,0)
5070 PRINT "INT. THE CANDY AISLE - CONTINUOUS"
5080 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5090 PRINT "% -( I'LL START WITH SOME CHOCOLATE. )"
5100 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5120 PRINT "|      |"
5130 PRINT "|      |"
5140 PRINT "| &    |"
5150 PRINT "|      |"
5160 PRINT "|      |"
5170 PRINT "|      |"
5180 PRINT "|     C|"
5190 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5200 PRINT "YOU ARE IN THE CANDY AISLE(C)."
5210 PRINT "PRESS B TO BUY THE ITEM."
5220 IF KEY = 66 THEN GOTO 5240
5230 GOTO 5220
5240 CPOS (0,0): CLS
5250 MUSIC (2,5,6)
5260 MUSIC (0,0,0)
5270 PRINT "INT. THE CANDY AISLE - CONTINUOUS"
5280 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5290 PRINT "% -( NICE, NICE. )"
5300 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5310 PRINT "|      |"
5320 PRINT "|      |"
5330 PRINT "| &    |"
5340 PRINT "|      |"
5350 PRINT "|      |"
5360 PRINT "|      |"
5370 PRINT "|P    C|"
5380 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5390 PRINT "YOU ARE IN THE CANDY AISLE(C)."
5400 PRINT "PRESS P TO GO TO THE PRODUCE SECTION(P)."
5410 IF KEY = 80 THEN GOTO 5430
5420 GOTO 5410
5430 CPOS (0,0): CLS
5440 MUSIC (2,5,6)
5450 MUSIC (0,0,0)
5460 PRINT "INT. THE PRODUCE SECTION - CONTINUOUS"
5470 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5480 PRINT "% -( AND HERES THE REST! )"
5490 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5500 PRINT "| =    |"
5510 PRINT "| ; #  |"
5520 PRINT "|   @  |"
5530 PRINT "|  +   |"
5540 PRINT "|   _   |"
5550 PRINT "| %    |"
5560 PRINT "|     P|"
5570 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5580 PRINT "YOU ARE IN THE PRODUCE SECTION(P)."
5590 PRINT "PRESS B TO BUY THE ITEMS."
5600 IF KEY = 66 THEN GOTO 5620
5610 GOTO 5600
5620 CPOS (0,0): CLS
5630 MUSIC (2,5,6)
5650 MUSIC (0,0,0)
5660 PRINT "INT. THE PRODUCE SECTION - CONTINUOUS"
5670 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5680 PRINT "% -( ALRIGHT, THERE WE GO. )"
5690 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5700 PRINT "| =    |"
5710 PRINT "| ; #  |"
5720 PRINT "|   @  |"
5730 PRINT "|  +   |"
5740 PRINT "|   _  |"
5750 PRINT "| %    |"
5760 PRINT "|R    P|"
5770 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5780 PRINT "YOU ARE IN THE PRODUCE SECTION(P)."
5790 PRINT "PRESS R TO GO TO THE REGISTERS(R)."
5800 IF KEY = 82 THEN GOTO 4850
5810 GOTO 5800
5820 CPOS (0,0): CLS
5830 MUSIC (2,5,6)
5840 MUSIC (0,0,0)
5850 PRINT "INT. SELF CHECKOUT NO. 5 - 8:20 AM"
5860 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5870 PRINT "% -( OK, TIME TO CHECK THIS ALL OUT. )": WAIT (512)
5880 MUSIC (2,5,6)
5890 MUSIC (0,0,0)
5900 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5910 PRINT "&=;#@=_"
5920 PRINT "% -( THERE THESE ALL ARE! )": WAIT (512)
5930 MUSIC (2,5,6)
5940 MUSIC (0,0,0)
5950 PRINT "\/\/\/\/\/\/\/\/\/\/\"
5960 PRINT "% -( |ITEM NOT IN BAGGING AREA|? )": WAIT (512)
5970 MUSIC (2,5,6)
5980 MUSIC (0,0,0)
5990 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6000 PRINT "% -( MAN, THESE SURE ARE PICKY. )": WAIT (512)
6010 MUSIC (2,5,6)
6020 MUSIC (0,0,0)
6030 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6040 PRINT "% -( ALRIGHT, THAT'S EVERYTHING! )": WAIT (512)
6050 MUSIC (2,5,6)
6060 MUSIC (0,0,0)
6070 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6080 PRINT "% -( ...AND NOW IM BROKE. TO THE ATM! )": WAIT (512)
6090 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6100 MUSIC (5,4,6)
6110 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6120 PRINT "||||||||"
6130 PRINT "        "
6140 PRINT "||||||||"
6150 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6160 WAIT (32)
6170 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6180 MUSIC (7,4,6)
6190 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6200 PRINT "||||||||"
6210 PRINT "       <"
6220 PRINT "||||||||"
6230 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6240 WAIT (32)
6250 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6260 MUSIC (4,4,6)
6270 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6280 PRINT "||||||||"
6290 PRINT "      <>"
6300 PRINT "||||||||"
6310 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6320 WAIT (32)
6330 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6340 MUSIC (7,4,6)
6350 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6360 PRINT "||||||||"
6370 PRINT "     <>"
6380 PRINT "||||||||"
6390 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6400 WAIT (32)
6410 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6420 MUSIC (5,4,6)
6430 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6440 PRINT "||||||||"
6450 PRINT "    <>"
6460 PRINT "||||||||"
6470 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6480 WAIT (32)
6490 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6500 MUSIC (7,4,6)
6510 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6520 PRINT "||||||||"
6530 PRINT "   <>"
6540 PRINT "||||||||"
6550 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6560 WAIT (32)
6570 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6580 MUSIC (4,4,6)
6590 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6600 PRINT "||||||||"
6610 PRINT "  <>"
6620 PRINT "||||||||"
6630 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6640 WAIT (32)
6650 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6660 MUSIC (7,4,6)
6670 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6680 PRINT "||||||||"
6690 PRINT " <>"
6700 PRINT "||||||||"
6710 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6720 WAIT (32)
6730 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6740 MUSIC (5,4,6)
6750 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6760 PRINT "||||||||"
6770 PRINT "<>"
6780 PRINT "||||||||"
6790 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6800 WAIT (32)
6810 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6820 MUSIC (7,4,6)
6830 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6840 PRINT "||||||||"
6850 PRINT ">"
6860 PRINT "||||||||"
6870 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6880 WAIT (32)
6890 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
6900 MUSIC (6,4,6)
6910 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6920 PRINT "||||||||"
6930 PRINT " "
6940 PRINT "||||||||"
6950 PRINT "\/\/\/\/\/\/\/\/\/\/\"
6960 WAIT (32)
6970 CPOS (0,0): CLS
6980 MUSIC (5,4,6): WAIT (64)
6990 MUSIC (5,3,6): WAIT (64)
7000 MUSIC (0,0,0)
7010 NOISE (8, 4): WAIT (16)
7020 NOISE (8, 3): WAIT (16)
7030 NOISE (8, 2): WAIT (16)
7040 NOISE (8, 1): WAIT (16)
7050 NOISE (8, 0): WAIT (512)
7060 CPOS (0,0): CLS
7070 MUSIC (2,5,6)
7080 MUSIC (0,0,0)
7090 PRINT "INT. THE BANK - 8:30 AM"
7100 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7110 PRINT "% -( I ONLY NEED ABOUT 2 CENTS! )": WAIT (512)
7120 MUSIC (2,5,6)
7130 MUSIC (0,0,0)
7140 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7150 PRINT "[0]"
7160 PRINT "% -( THERE'S THE ATM. )": WAIT (512)
7170 MUSIC (2,5,6)
7180 MUSIC (0,0,0)
7190 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7200 PRINT "% -( ... )": WAIT (512)
7210 MUSIC (2,5,6)
7220 MUSIC (0,0,0)
7230 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7240 PRINT "% -( MY CARD'S STUCK. )": WAIT (512)
7250 MUSIC (2,5,6)
7260 MUSIC (0,0,0)
7270 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7280 PRINT "% -( HOW FUN. )": WAIT (512)
7290 SHAPE (95, "BF213F37212D213F0000")
7300 CPOS (0,0): CLS
7310 MUSIC (2,5,6)
7320 MUSIC (0,0,0)
7330 PRINT "INT. THE BANK LOBBY - CONTINUOUS"
7340 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7350 PRINT "% -( GLAD THE LINE IS NONEXISTANT. )"
7360 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7370 PRINT "|  _    |"
7380 PRINT "|-------|"
7390 PRINT "|C      |"
7400 PRINT "|       |"
7410 PRINT "| %    L|"
7420 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7430 PRINT "YOU ARE IN THE LOBBY (L)."
7440 PRINT "PRESS K TO GO TO THE COUNTER (C)."
7450 IF KEY = 75 THEN GOTO 7470
7460 GOTO 7450
7470 CPOS (0,0): CLS
7480 MUSIC (2,5,6)
7490 MUSIC (0,0,0)
7500 PRINT "INT. THE BANK COUNTER - 8:35 AM"
7510 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7520 PRINT "% -( HELLO! UH...MY CARD'S STUCK. )": WAIT (512)
7530 MUSIC (2,5,6)
7540 MUSIC (0,0,0)
7550 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7560 PRINT "( HI, GIVE ME A SECOND TO HELP. )- _": WAIT (512)
7570 MUSIC (2,5,6)
7580 MUSIC (0,0,0)
7590 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7600 PRINT "[0]"
7610 PRINT "( THIS THE ONE? )- _"
7620 PRINT "% -( YEP! )": WAIT (512)
7630 MUSIC (2,5,6)
7640 MUSIC (0,0,0)
7650 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7660 PRINT "( ...WHAT DID YOU DO? )- _"
7670 PRINT "% -( IT ATE MY CARD, THAT'S ALL. )": WAIT (512)
7680 CPOS (0,0): CLS
7690 MUSIC (2,5,6)
7700 MUSIC (0,0,0)
7710 PRINT "INT. THE BANK COUNTER - 8:36 AM"
7720 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7730 PRINT "( HOW ABOUT THIS? )- _": WAIT (512)
7740 MUSIC (2,5,6)
7750 MUSIC (0,0,0)
7760 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7770 PRINT "( I'LL LET YOU HIT THE ATM. )- _": WAIT (512)
7780 MUSIC (2,5,6)
7790 MUSIC (0,0,0)
7800 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7810 PRINT "( TO TRY TO GET YOUR CARD OUT. )- _": WAIT (512)
7820 MUSIC (2,5,6)
7830 MUSIC (0,0,0)
7840 PRINT "\/\/\/\/\/\/\/\/\/\/\"
7850 PRINT "% -( SOUNDS FAIR! )": WAIT (512)
7860 CPOS (0,0): CLS
7870 MUSIC (2,5,6)
7880 MUSIC (0,0,0):WAIT (32)
7890 MUSIC (2,4,6)
7900 MUSIC (0,0,0):WAIT (32)
7910 PRINT "PRESS SPACE TO BEGIN, AND TO HIT THE ATM"
7920 IF KEY = 32 THEN GOTO 7940
7930 GOTO 7920
7940 CPOS (0,0): CLS
7950 MUSIC (4,4,6)
7960 PRINT "%   X  -":WAIT (32)
7970 CPOS (0,0): CLS
7980 MUSIC (6,4,6)
7990 PRINT "-%  X  -": WAIT (32)
8000 CPOS (0,0): CLS
8010 MUSIC (7,4,6)
8020 PRINT "- % X  -":WAIT (32)
8030 CPOS (0,0): CLS
8040 MUSIC (5,4,6)
8050 PRINT "-  %X  -":WAIT (32)
8060 CPOS (0,0): CLS
8070 MUSIC (4,4,6)
8080 PRINT "-   %  -"
8090 IF KEY = 32 THEN GOTO 8210
8100 WAIT (32)
8110 CPOS (0,0): CLS
8120 MUSIC (6,4,6)
8130 PRINT "-   X% -":WAIT (32)
8140 CPOS (0,0): CLS
8150 MUSIC (7,4,6)
8160 PRINT "-   X %-":WAIT (32)
8170 CPOS (0,0): CLS
8180 MUSIC (5,4,6)
8190 PRINT "-   X  %":WAIT (32)
8200 GOTO 7940
8210 CPOS (0,0): CLS
8220 MUSIC (0,0,0)
8230 NOISE (8, 4): WAIT (16)
8240 NOISE (4, 3): WAIT (16)
8250 NOISE (8, 2): WAIT (16)
8260 NOISE (4, 1): WAIT (16)
8270 NOISE (0, 0): WAIT (512)
8280 MUSIC (2,5,6)
8290 MUSIC (0,0,0)
8300 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8310 PRINT "% -( THERE! THERE'S MY CARD. )": WAIT (512)
8320 MUSIC (2,5,6)
8330 MUSIC (0,0,0)
8340 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8350 PRINT "( NOT BAD. )- _": WAIT (512)
8360 MUSIC (2,5,6)
8370 MUSIC (0,0,0)
8380 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8390 PRINT "( WHAT DID YOU NEED? )- _": WAIT (512)
8400 MUSIC (2,5,6)
8410 MUSIC (0,0,0)
8420 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8430 PRINT "% -( ONLY 2 CENTS. )": WAIT (512)
8440 SHAPE (61, "DEFFFBFBFBFBFFDE00")
8450 MUSIC (2,5,6)
8460 MUSIC (0,0,0)
8470 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8480 PRINT "=="
8490 PRINT "( THERE YOU GO THEN, 2 CENTS. )- _": WAIT (512)
8500 MUSIC (2,5,6)
8510 MUSIC (0,0,0)
8520 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8530 PRINT "( FROM MY POCKET, HAHA. )- _"
8540 PRINT "% -( AWESOME, THANK YOU! )": WAIT (512)
8550 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
8560 MUSIC (5,4,6)
8570 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8580 PRINT "||||||||"
8590 PRINT "        "
8560 PRINT "||||||||"
8570 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8580 WAIT (16)
8590 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
8600 MUSIC (7,4,6)
8610 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8620 PRINT "||||||||"
8630 PRINT "       <"
8640 PRINT "||||||||"
8650 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8660 WAIT (16)
8670 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
8680 MUSIC (4,4,6)
8690 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8700 PRINT "||||||||"
8710 PRINT "      <>"
8720 PRINT "||||||||"
8730 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8740 WAIT (16)
8750 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
8760 MUSIC (7,4,6)
8770 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8780 PRINT "||||||||"
8790 PRINT "     <>"
8800 PRINT "||||||||"
8810 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8820 WAIT (32)
8830 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
8840 MUSIC (5,4,6)
8850 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8860 PRINT "||||||||"
8870 PRINT "    <>"
8880 PRINT "||||||||"
8890 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8900 WAIT (16)
8910 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
8920 MUSIC (7,4,6)
8930 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8940 PRINT "||||||||"
8950 PRINT "   <>"
8960 PRINT "||||||||"
8970 PRINT "\/\/\/\/\/\/\/\/\/\/\"
8980 WAIT (16)
8990 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
9000 MUSIC (4,4,6)
9010 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9020 PRINT "||||||||"
9030 PRINT "  <>"
9040 PRINT "||||||||"
9050 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9060 WAIT (32)
9070 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
9080 MUSIC (7,4,6)
9090 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9100 PRINT "||||||||"
9110 PRINT " <>"
9120 PRINT "||||||||"
9130 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9140 WAIT (16)
9150 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
9160 MUSIC (5,4,6)
9170 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9180 PRINT "||||||||"
9190 PRINT "<>"
9200 PRINT "||||||||"
9300 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9310 WAIT (16)
9320 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
9330 MUSIC (7,4,6)
9340 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9350 PRINT "||||||||"
9360 PRINT ">"
9370 PRINT "||||||||"
9380 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9390 WAIT (16)
9400 CPOS (0,0): CLS: PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
9410 MUSIC (6,4,6)
9420 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9430 PRINT "||||||||"
9440 PRINT " "
9450 PRINT "||||||||"
9460 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9470 WAIT (16)
9480 CPOS (0,0): CLS
9490 MUSIC (5,4,6): WAIT (32)
9500 MUSIC (5,3,6): WAIT (32)
9510 MUSIC (0,0,0)
9520 NOISE (8, 4): WAIT (8)
9530 NOISE (8, 3): WAIT (8)
9540 NOISE (8, 2): WAIT (8)
9550 NOISE (8, 1): WAIT (8)
9560 NOISE (8, 0): WAIT (512)
9570 SHAPE (95, "3F213F35213D213F00")
9580 SHAPE (43, "0000003F293F293F00")
9590 CPOS (0,0): CLS
9600 MUSIC (2,5,6)
9610 MUSIC (0,0,0)
9620 PRINT "INT. THE LAUNDROMAT - 8:45"
9630 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9640 PRINT "% -( I'M GONNA WASH MY CAP. )"
9650 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9660 PRINT "|    |+ |"
9670 PRINT "|   W|_ |"
9680 PRINT "|    ||||"
9690 PRINT "| %     |"
9700 PRINT "|E      |"
9710 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9720 PRINT "YOU ARE IN THE ENTRANCE (E)."
9730 PRINT "PRESS W TO TALK TO THE WORKER."
9740 IF KEY = 87 THEN GOTO 9760
9750 GOTO 9740
9760 CPOS (0,0): CLS
9770 PRINT "INT. LAUNDROMAT COUNTER - CONTINUOUS"
9780 MUSIC (2,5,6)
9790 MUSIC (0,0,0)
9800 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9810 PRINT "( WELCOME TO OLDIE'S! WHAT NEED? )- _": WAIT (512)
9820 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9821 MUSIC (2,5,6)
9822 MUSIC (0,0,0)
9830 PRINT "% -( HI, CAN I GET MY CAP WASHED? )": WAIT (512)
9840 MUSIC (2,5,6)
9850 MUSIC (0,0,0)
9860 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9870 PRINT "( YES, OF COURSE! )- _": WAIT (512)
9880 SHAPE (37, "FF212B2B212F213F00")
9890 MUSIC (2,5,6)
9900 MUSIC (0,0,0)
9910 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9920 PRINT "% -( THERE YOU GO. )": WAIT (512)
9930 MUSIC (2,5,6)
9940 MUSIC (0,0,0)
9950 PRINT "\/\/\/\/\/\/\/\/\/\/\"
9960 PRINT "( OK, THIS SHOULD BE DONE... )- _": WAIT (512)
9970 MUSIC (2,5,6)
9980 MUSIC (0,0,0)
9990 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10000 PRINT "( BY THE END OF THE DAY. )- _": WAIT (512)
10010 MUSIC (2,5,6)
10020 MUSIC (0,0,0)
10030 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10040 PRINT "% -( OH! UH, OKAY. )": WAIT (512)
10050 MUSIC (2,5,6)
10060 MUSIC (0,0,0)
10070 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10080 PRINT "( THAT'LL BE 10 MILLS. )- _": WAIT (512)
10090 MUSIC (2,5,6)
10100 MUSIC (0,0,0)
10110 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10120 PRINT "% -( UH, WHAT? )": WAIT (512)
10130 MUSIC (2,5,6)
10140 MUSIC (0,0,0)
10150 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10160 PRINT "( THAT'LL BE ONE CENT, SORRY. )- _": WAIT (512)
10170 MUSIC (2,5,6)
10180 MUSIC (0,0,0)
10190 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10200 PRINT "="
10210 PRINT "% -( THERE YOU GO! BE BACK SOON. )": WAIT (512)
10220 SHAPE (43, "00005E3F293F293F00")
10230 CPOS (0,0): CLS
10240 MUSIC (2,5,6)
10250 MUSIC (0,0,0)
10260 PRINT "INT. THE LAUNDROMAT - CONTINUOUS"
10270 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10280 PRINT "% -( I'LL WAIT OUTSIDE. )"
10290 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10300 PRINT "|    |+ |"
10310 PRINT "|    |_ |"
10320 PRINT "|    ||||"
10330 PRINT "| %     |"
10340 PRINT "|E     X|"
10350 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10360 PRINT "YOU ARE IN THE ENTRANCE (E)."
10370 PRINT "PRESS X TO EXIT."
10380 IF KEY = 88 THEN GOTO 10400
10390 GOTO 10380
10400 CPOS (0,0): CLS
10410 MUSIC (2,5,6)
10420 MUSIC (0,0,0)
10430 PRINT "EXT. THE OUTSIDE WORLD - 8:50"
10440 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10450 PRINT "% -( WHERE TO GO, WHERE TO GO? )"
10460 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10470 PRINT "| OLDIE'S      |"
10480 PRINT "|   |''|       |"
10490 PRINT "|  O|% |       |"
10500 PRINT "|--------------|"
10510 PRINT "|-------------R|"
10520 PRINT "|    <>        |"
10530 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10540 PRINT "YOU ARE OUTSIDE OLDIE'S (O)."
10550 PRINT "PRESS R TO CHECK THE RIGHT."
10560 IF KEY = 82 THEN GOTO 10580
10570 GOTO 10560
10580 CPOS (0,0): CLS
10590 MUSIC (2,5,6)
10600 MUSIC (0,0,0)
10610 PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
10620 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10630 PRINT "% -( THIS PLACE SEEMS NEAT. )"
10640 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10650 PRINT "| MUSI-CO    |"
10660 PRINT "|   |''|       |"
10670 PRINT "| % |  |M      |"
10680 PRINT "|--------------|"
10690 PRINT "|L-------------|"
10700 PRINT "|S             |"
10710 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10720 PRINT "YOU ARE ON THE SIDEWALK (S)."
10730 PRINT "PRESS L TO GO BACK."
10740 PRINT "PRESS M TO GO INSIDE MUSI-CO."
10750 IF KEY = 76 THEN GOTO 10780
10760 IF KEY = 77 THEN GOTO 10960
10770 GOTO 10750
10780 CPOS (0,0): CLS
10790 MUSIC (2,5,6)
10800 MUSIC (0,0,0)
10810 PRINT "EXT. THE OUTSIDE WORLD - CONTINUOUS"
10820 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10830 PRINT "% -( WHERE TO GO, WHERE TO GO? )"
10840 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10850 PRINT "| OLDIE'S      |"
10860 PRINT "|   |''|       |"
10870 PRINT "|  O|% |       |"
10880 PRINT "|--------------|"
10890 PRINT "|-------------R|"
10900 PRINT "|    <>        |"
10910 PRINT "\/\/\/\/\/\/\/\/\/\/\"
10920 PRINT "YOU ARE OUTSIDE OLDIE'S (O)."
10930 PRINT "PRESS R TO CHECK THE RIGHT."
10940 IF KEY = 82 THEN GOTO 10580
10950 GOTO 10940
10960 CPOS (0,0): CLS
10970 MUSIC (2,5,6)
10980 MUSIC (0,0,0)
10990 PRINT "INT. MUSI-CO - CONTINUOUS"
11000 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11010 PRINT "% -( HUMUNA. )"
11020 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11030 PRINT "|  _    |"
11040 PRINT "|-------|"
11050 PRINT "|      W|"
11060 PRINT "| %     |"
11070 PRINT "|M     X|"
11080 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11090 PRINT "YOU ARE IN THE MUSI-CO (M)."
11100 PRINT "PRESS W TO TALK TO THE WORKER."
11110 PRINT "PRESS X TO EXIT."
11120 IF KEY = 87 THEN GOTO 11150
11130 IF KEY = 88 THEN GOTO 10780
11140 GOTO 11120
11150 CPOS (0,0): CLS
11160 PRINT "INT. MUSI-CO - CONTINUOUS"
11170 MUSIC (2,5,6)
11180 MUSIC (0,0,0)
11190 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11200 PRINT "( WELCOME TO MUSI-CO! WHAT NEED? )- _": WAIT (512)
11201 MUSIC (2,5,6)
11202 MUSIC (0,0,0)
11210 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11220 PRINT "% -( ...DIDN'T I JUST SEE YOU? )": WAIT (512)
11230 MUSIC (2,5,6)
11240 MUSIC (0,0,0)
11250 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11260 PRINT "( YES, OF COURSE! )- _": WAIT (512)
11270 MUSIC (2,5,6)
11280 MUSIC (0,0,0)
11290 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11300 PRINT "% -( FAIR ENOUGH. )": WAIT (512)
11310 MUSIC (2,5,6)
11320 MUSIC (0,0,0)
11330 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11340 PRINT "( SO WHAT WOULD YOU LIKE TO GET TODAY? )- _": WAIT (512)
11350 MUSIC (2,5,6)
11360 MUSIC (0,0,0)
11370 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11380 PRINT "% -( HOW ABOUT A RENT? )": WAIT (512)
11390 MUSIC (2,5,6)
11400 MUSIC (0,0,0)
11410 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11420 PRINT "% -( I'VE ALWAYS WANTED TO PLAY A GIG AROUND HERE. )": WAIT (512)
11430 MUSIC (2,5,6)
11440 MUSIC (0,0,0)
11450 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11460 PRINT "( SURE! WHAT DO YOU PLAY? )- _": WAIT (512)
11470 MUSIC (2,5,6)
11480 MUSIC (0,0,0)
11490 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11500 PRINT "% -( I DABBLE WITH THE UKULELE. )": WAIT (512)
11510 MUSIC (2,5,6)
11520 MUSIC (0,0,0)
11530 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11540 PRINT "( I CAN GET YOU CAN AMP AND AN... )- _": WAIT (512)
11550 MUSIC (7,4,6): WAIT (64)
11560 MUSIC (5,4,6): WAIT (32)
11570 MUSIC (7,4,6): WAIT (32)
11580 MUSIC (2,5,6): WAIT (32)
11590 MUSIC (5,5,6): WAIT (32)
11600 MUSIC (0,0,0)
11610 SHAPE (64, "9E8C8C8C9EBFBF9E00")
11620 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11630 PRINT "@"
11640 PRINT "( ELECTRO-ACOUSTIC UKULELE! )- _": WAIT (512)
11650 MUSIC (2,5,6)
11660 MUSIC (0,0,0)
11670 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11680 PRINT "% -( AWESOME! HOW MUCH? )": WAIT (512)
11690 MUSIC (2,5,6)
11700 MUSIC (0,0,0)
11710 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11720 PRINT "( ONE CENT AS USUAL. )- _": WAIT (512)
11730 MUSIC (2,5,6)
11740 MUSIC (0,0,0)
11750 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11760 PRINT "="
11770 PRINT "% -( NICE! )": WAIT (512)
11780 MUSIC (2,5,6)
11790 MUSIC (0,0,0)
11800 PRINT "\/\/\/\/\/\/\/\/\/\/\"
11810 PRINT "% -( I'LL PICK THIS UP WHEN I PLAY. )": WAIT (512)
11820 CPOS (0,0): CLS: PRINT "SWITCH TO SIDE B TO CONTINUE"