10 *= $5000 20 INIT 30 ; 40 LDA #0 50 STA 710 60 STA 712 70 STA $10 80 STA $D20E 90 STA 559 0100 ; 0110 JSR DISPLAY 0120 JSR PMGRAPH 0130 ; 0140 LDA #0 0150 LDX #0 0160 CLR1 0170 STA EMP1,X 0180 STA EMP2,X 0190 STA EMP3,X 0200 STA EMP4,X 0210 STA EMP5,X 0220 STA EMP6,X 0230 STA EMP7,X 0240 DEX 0250 BNE CLR1 0260 ; 0270 JSR STARTVBL 0280 JMP LINEWAIT 0290 ; 0300 DISPLAY 0310 DLIST = $0230 0320 ; 0330 PHA 0340 ; 0350 LDA #DLDATA&255 0360 STA DLIST 0370 LDA #DLDATA/256 0380 STA DLIST+1 0390 ; 0400 LDA #EMP1&255 0410 STA DLDATA+1 0420 STA DLDATA+4 0430 LDA #EMP1/256 0440 STA DLDATA+2 0450 STA DLDATA+5 0460 ; 0470 LDA #MESS1&255 0480 STA MESS+1 0490 LDA #MESS1/256 0500 STA MESS+2 0510 ; 0520 LDA #POKEY&255 0530 STA SCRV1+1 0540 STA SCRV1+4 0550 STA SCRV1+7 0560 STA SCRV1+10 0570 STA SCRV1+13 0580 STA SCRV1+16 0590 STA SCRV1+19 0600 STA SCRV1+22 0610 LDA #POKEY/256 0620 STA SCRV1+2 0630 STA SCRV1+5 0640 STA SCRV1+8 0650 STA SCRV1+11 0660 STA SCRV1+14 0670 STA SCRV1+17 0680 STA SCRV1+20 0690 STA SCRV1+23 0700 ; 0710 LDA #EMP2&255 0720 STA SCRH1+1 0730 LDA #EMP3&255 0740 STA SCRH1+5 0750 LDA #EMP4&255 0760 STA SCRH1+9 0770 LDA #EMP5&255 0780 STA SCRH1+13 0790 LDA #EMP6&255 0800 STA SCRH1+17 0810 LDA #EMP7&255 0820 STA SCRH1+21 0830 ; 0840 LDA #EMP2/256 0850 STA SCRH1+2 0860 LDA #EMP3/256 0870 STA SCRH1+6 0880 LDA #EMP4/256 0890 STA SCRH1+10 0900 LDA #EMP5/256 0910 STA SCRH1+14 0920 LDA #EMP6/256 0930 STA SCRH1+18 0940 LDA #EMP7/256 0950 STA SCRH1+22 0960 ; 0970 LDA #PICY&255 0980 STA PICT+1 0990 LDA #PICY/256 1000 STA PICT+2 1010 ; 1020 LDA #DLDATA&255 1030 STA JMPDL+1 1040 LDA #DLDATA/256 1050 STA JMPDL+2 1060 ; 1070 PLA 1080 RTS 1090 ; 1100 DLDATA .BYTE 87,0,0 1110 .BYTE 87,0,0 1120 .BYTE 0,0 1130 PICT .BYTE 82,0,0 1140 .BYTE 18,18,18,18 1150 .BYTE 18,18 1160 MESS .BYTE 66,0,0 1170 .BYTE 2,2 1180 .BYTE 0,0 1190 SCRH1 .BYTE 86,0,0,32 1200 .BYTE 86,0,0,32 1210 .BYTE 86,0,0,32 1220 .BYTE 86,0,0,32 1230 .BYTE 86,0,0,32 1240 .BYTE 86,0,0,32 1250 SCRV1 .BYTE 102,0,0 1260 .BYTE 102,0,0 1270 .BYTE 102,0,0 1280 .BYTE 102,0,0 1290 .BYTE 102,0,0 1300 .BYTE 102,0,0 1310 .BYTE 102,0,0 1320 .BYTE 70,0,0 1330 JMPDL .BYTE 65,0,0 1340 ; 1350 LINEWAIT 1360 LDX #0 1370 WA1 1380 DEX 1390 BNE WA1 1400 ; 1410 LDA #$98 1420 STA 756 1430 ; 1440 LDA #47 1450 STA 559 1460 ; 1470 ; TURN ON MUSIC 1480 ; 1490 JSR $7000 1500 ; 1510 LDX #0 1520 LDY #0 1530 VCWAIT 1540 CPX $D40B 1550 BNE VCWAIT 1560 ; 1570 CPX #70 1580 BPL M70 1590 ; 1600 CPX #90 1610 BMI U90 1620 JMP SLUTT 1630 U90 1640 ; 1650 CPX #12 1660 BNE NOUP 1670 LDA #4 1680 STA $D401 1690 JMP SLUTT 1700 NOUP 1710 ; 1720 CPX #20 1730 BNE SKP0 1740 LDA #0 1750 STA $D401 1760 LDA PSCRL 1770 STA DOSCRL 1780 JMP SCRLIT 1790 SKP0 1800 ; 1810 CPX #61 1820 BNE SKC0 1830 LDA HPOS+1 1840 STA DOSCRL 1850 CLC 1860 BCC SCRLIT 1870 SKC0 1880 CPX #66 1890 BNE SKC1 1900 LDA HPOS+2 1910 STA DOSCRL 1920 CLC 1930 BCC SCRLIT 1940 SKC1 1950 BNE SLUTT 1960 M70 1970 CPX #72 1980 BNE SKC2 1990 LDA HPOS+3 2000 STA DOSCRL 2010 CLC 2020 BCC SCRLIT 2030 SKC2 2040 CPX #78 2050 BNE SKC3 2060 LDA HPOS+4 2070 STA DOSCRL 2080 CLC 2090 BCC SCRLIT 2100 SKC3 2110 CPX #82 2120 BNE SKC4 2130 LDA HPOS+5 2140 STA DOSCRL 2150 CLC 2160 BCC SCRLIT 2170 SKC4 2180 CPX #88 2190 BNE SKC5 2200 LDA HPOS+6 2210 STA DOSCRL 2220 CLC 2230 BCC SCRLIT 2240 SKC5 2250 ; 2260 CLC 2270 BCC SLUTT 2280 SCRLIT 2290 LDY DOSCRL 2300 LDA COLTAB,X 2310 STX $D40A 2320 STY $D404 2330 STA $D017 2340 INX 2350 SLUTT 2360 LDA COLTAB,X 2370 STX $D40A 2380 STA $D017 2390 ; 2400 INX 2410 CPX #124 2420 BMI NORESET 2430 LDX #0 2440 ; 2450 CONSOL 2460 LDA $D01F 2470 CMP #6 2480 BNE NORESET 2490 JMP $E477 2500 NORESET 2510 JMP VCWAIT 2520 HP .BYTE 0,0,0,0,0 2530 DOSCRL .BYTE 0 2540 ; 2550 STARTVBL 2560 LDA #6 2570 LDY #VBI&255 2580 LDX #VBI/256 2590 JMP $E45C 2600 ; 2610 VBI 2620 PHA 2630 TYA 2640 PHA 2650 TXA 2660 PHA 2670 ; 2680 LDA #0 ; ATTRACT OFF 2690 STA 77 2700 ; 2710 DEC HPOS 2720 BNE SDL0 2730 LDA #8 2740 STA HPOS 2750 STA $D404 2760 LDA DLDATA+1 2770 STA $CD 2780 LDA DLDATA+2 2790 STA $CE 2800 LDY #25 2810 LDA ($CD),Y 2820 CMP #255 2830 BNE CSCR1 2840 LDA #SC1B&255 2850 STA DLDATA+1 2860 STA DLDATA+4 2870 LDA #SC1B/256 2880 STA DLDATA+2 2890 STA DLDATA+5 2900 CSCR1 2910 INC DLDATA+1 2920 INC DLDATA+4 2930 BNE SDL1 2940 INC DLDATA+2 2950 INC DLDATA+5 2960 BNE SDL1 2970 SDL0 2980 LDA HPOS 2990 STA $D404 3000 SDL1 3010 ; 3020 LDA HPOS+1 3030 SEC 3040 SBC #2 3050 STA HPOS+1 3060 BNE SDL2 3070 LDA #8 3080 STA HPOS+1 3090 ; 3100 LDA SCRH1+1 3110 STA $CD 3120 LDA SCRH1+2 3130 STA $CE 3140 LDY #25 3150 LDA ($CD),Y 3160 CMP #255 3170 BNE CSCR2 3180 LDA #SC2B&255 3190 STA SCRH1+1 3200 LDA #SC2B/256 3210 STA SCRH1+2 3220 CSCR2 3230 ; 3240 INC SCRH1+1 3250 BNE SDL2 3260 INC SCRH1+2 3270 SDL2 3280 ; 3290 LDA HPOS+2 3300 SEC 3310 SBC #3 3320 STA HPOS+2 3330 BCS SDL3 3340 AND #7 3350 STA HPOS+2 3360 ; 3370 LDA SCRH1+5 3380 STA $CD 3390 LDA SCRH1+6 3400 STA $CE 3410 LDY #25 3420 LDA ($CD),Y 3430 CMP #255 3440 BNE CSCR3 3450 LDA #SC3B&255 3460 STA SCRH1+5 3470 LDA #SC3B/256 3480 STA SCRH1+6 3490 CSCR3 3500 ; 3510 INC SCRH1+5 3520 BNE SDL3 3530 INC SCRH1+6 3540 SDL3 3550 ; 3560 LDA HPOS+3 3570 SEC 3580 SBC #4 3590 STA HPOS+3 3600 BNE SDL4 3610 LDA #8 3620 STA HPOS+3 3630 ; 3640 LDA SCRH1+9 3650 STA $CD 3660 LDA SCRH1+10 3670 STA $CE 3680 LDY #25 3690 LDA ($CD),Y 3700 CMP #255 3710 BNE CSCR4 3720 LDA #SC4B&255 3730 STA SCRH1+9 3740 LDA #SC4B/256 3750 STA SCRH1+10 3760 CSCR4 3770 ; 3780 INC SCRH1+9 3790 BNE SDL4 3800 INC SCRH1+10 3810 SDL4 3820 ; 3830 LDA HPOS+4 3840 SEC 3850 SBC #5 3860 STA HPOS+4 3870 BCS SDL5 3880 AND #7 3890 STA HPOS+4 3900 ; 3910 LDA SCRH1+13 3920 STA $CD 3930 LDA SCRH1+14 3940 STA $CE 3950 LDY #25 3960 LDA ($CD),Y 3970 CMP #255 3980 BNE CSCR5 3990 LDA #SC5B&255 4000 STA SCRH1+13 4010 LDA #SC5B/256 4020 STA SCRH1+14 4030 CSCR5 4040 ; 4050 INC SCRH1+13 4060 BNE SDL5 4070 INC SCRH1+14 4080 SDL5 4090 ; 4100 LDA HPOS+5 4110 SEC 4120 SBC #6 4130 STA HPOS+5 4140 BCS SDL6 4150 AND #7 4160 STA HPOS+5 4170 ; 4180 LDA SCRH1+17 4190 STA $CD 4200 LDA SCRH1+18 4210 STA $CE 4220 LDY #25 4230 LDA ($CD),Y 4240 CMP #255 4250 BNE CSCR6 4260 LDA #SC6B&255 4270 STA SCRH1+17 4280 LDA #SC6B/256 4290 STA SCRH1+18 4300 CSCR6 4310 ; 4320 INC SCRH1+17 4330 BNE SDL6 4340 INC SCRH1+18 4350 SDL6 4360 LDA HPOS+6 4370 SEC 4380 SBC #7 4390 STA HPOS+6 4400 BCS SDL7 4410 AND #7 4420 STA HPOS+6 4430 ; 4440 LDA SCRH1+21 4450 STA $CD 4460 LDA SCRH1+22 4470 STA $CE 4480 LDY #25 4490 LDA ($CD),Y 4500 CMP #255 4510 BNE CSCR7 4520 LDA #SC7B&255 4530 STA SCRH1+21 4540 LDA #SC7B/256 4550 STA SCRH1+22 4560 CSCR7 4570 ; 4580 INC SCRH1+21 4590 BNE SDL7 4600 INC SCRH1+22 4610 SDL7 4620 ; 4630 INC PSCRL 4640 LDA PSCRL 4650 CMP #4 4660 BNE SDL8 4670 LDA #0 4680 STA PSCRL 4690 SDL8 4700 ; 4710 INC VSCROL 4720 LDA VSCROL 4730 CMP #8 4740 BNE SKVSC 4750 LDA #0 4760 STA VSCROL 4770 SKVSC 4780 STA $D405 4790 ; 4800 LDA XSPR 4810 CLC 4820 ADC #6 4830 TAY 4840 CPY #180 4850 BNE BB1 4860 LDY #0 4870 BB1 4880 STY XSPR 4890 LDA WAVE,Y 4900 SBC #40 4910 STA $D001 4920 CLC 4930 ADC #32 4940 STA $D002 4950 CLC 4960 ADC #32 4970 STA $D003 4980 CLC 4990 ADC #32 5000 STA $D007 5010 CLC 5020 ADC #8 5030 STA $D006 5040 CLC 5050 ADC #8 5060 STA $D005 5070 CLC 5080 ADC #8 5090 STA $D004 5100 ; 5110 DEC SPRCOL+1 5120 BNE COLNO 5130 ; 5140 LDA SPRCOL 5150 CLC 5160 ADC #16 5170 STA SPRCOL 5180 ; 5190 STA $02C1 5200 STA $02C2 5210 STA $02C3 5220 STA $02C7 5230 ; 5240 LDA #20 5250 STA SPRCOL+1 5260 COLNO 5270 ; 5280 LDA POSI 5290 CLC 5300 ADC #3 5310 CMP #180 5320 BNE NWA2 5330 LDA #0 5340 NWA2 5350 STA POSI 5360 TAY 5370 LDA WAVE,Y 5380 CLC 5390 ADC #15 5400 STA $D000 5410 ; 5420 ; 5430 LDA POSI+1 5440 CLC 5450 ADC #2 5460 CMP #180 5470 BNE NWA1 5480 LDA #0 5490 NWA1 5500 ; 5510 STA POSI+1 5520 TAY 5530 ; 5540 STY $02C0 5550 ; 5560 LDA WAVE,Y 5570 SEC 5580 SBC #60 5590 TAY 5600 LDX #0 5610 DOAPM 5620 LDA PMDAT,X 5630 STA $8200,Y 5640 INY 5650 INX 5660 CPX #55 5670 BNE DOAPM 5680 ; 5690 PLA 5700 TAX 5710 PLA 5720 TAY 5730 PLA 5740 JMP $E45F 5750 VSCROL .BYTE 0 5760 HPOS .BYTE 8,8,8,8,8,8,8,8,8 5770 PSCRL .BYTE 0 5780 XSPR .BYTE 0,0 5790 SPRCOL .BYTE 6,1 5800 PMDAT 5810 .BYTE 0,0,0,0,42,42,42,42,73 5820 .BYTE 0,0 5830 .BYTE 0,124,130,130,254,130,130,130 5840 .BYTE 0,254,16,16,16,16,16,16 5850 .BYTE 0,124,130,130,254,130,130,130 5860 .BYTE 0,252,130,130,252,136,132,130 5870 .BYTE 0,16,16,16,16,16,16,16 5880 .BYTE 0,0,0,0 5890 POSI .BYTE 0,0 5900 COUNT .BYTE 0 5910 ; 5920 PICY 5930 .BYTE 87,87,87,87,87,87,87,87,87 5940 .BYTE 87 5950 .BYTE 87,87,87,87,87,87,87,87,87 5960 .BYTE 87 5970 .BYTE 87,87,87,87,87,87,87,87,87 5980 .BYTE 87 5990 .BYTE 87,87,87,87,87,87,87,87,87 6000 .BYTE 87 6010 .BYTE 87,87,87,87,87,87,87,87 6020 PICEND 6030 .BYTE 83,83,83,83,83,83,83,83,83 6040 .BYTE 83 6050 .BYTE 83,83,83,83,83,83,83,83,83 6060 .BYTE 83 6070 .BYTE 83,83,83,83,83,83,83,83,83 6080 .BYTE 83 6090 .BYTE 83,83,83,83,83,83,83,83,83 6100 .BYTE 83 6110 .BYTE 83,83,83,83,83,83,83,83,83 6120 .BYTE 83 6130 .BYTE 83,83,83,83,83,83,83,83,83 6140 .BYTE 83 6150 .BYTE 83,83,83,83,83,83,83,83,83 6160 .BYTE 83 6170 .BYTE 83,83,83,83,83,83,83,83,83 6180 .BYTE 83 6190 .BYTE 83,83,83,83,83,83,83,83,83 6200 .BYTE 83 6210 .BYTE 83,83,83,83,83,83,83,83,83 6220 .BYTE 83 6230 .BYTE 83,83,83,83,83,83,83,83,83 6240 .BYTE 83 6250 .BYTE 83,83,83,83,83,83,83,83,83 6260 .BYTE 83 6270 .BYTE 83,83,83,83,83,83,83,83,83 6280 .BYTE 83 6290 .BYTE 83,83,83,83,83,83,83,83,83 6300 .BYTE 83 6310 .BYTE 83,83,83,83,83,83,83,83,83 6320 .BYTE 83 6330 .BYTE 83,83,83,83,83,83,83,83,83 6340 .BYTE 83 6350 .BYTE 83,83,83,83,83,83,83,83,83 6360 .BYTE 83 6370 .BYTE 83,83,83,83,83,83,83,83,83 6380 .BYTE 83 6390 .BYTE 83,83,83,83,83,83,83,83,83 6400 .BYTE 83 6410 .BYTE 83,83,83,83,83,83,83,83,83 6420 .BYTE 83 6430 .BYTE 83,83,83,83,83,83,83,83,83 6440 .BYTE 83 6450 .BYTE 83,83,83,83,83,83,83,83,83 6460 .BYTE 83 6470 .BYTE 83,83,83,83,83,83,83,83,83 6480 .BYTE 83 6490 .BYTE 83,83,83,83,83,83,83,83,83 6500 .BYTE 88,88,88,88,88,88,88,88,88 6510 .BYTE 88 6520 .BYTE 88,88,88,88,88,88,88,88,88 6530 .BYTE 88 6540 .BYTE 88,88,88,88,88,88,88,88,88 6550 .BYTE 88 6560 .BYTE 88,88,88,88,88,88,88,88,88 6570 .BYTE 88 6580 .BYTE 88,88,88,88,88,88,88,88 6590 ; 6600 WAVE 6610 .BYTE 110,110,111,112,113,114,115 6620 .BYTE 116,116,117,118,119,120,120 6630 .BYTE 121,122,123,123,124,125,126 6640 .BYTE 126,127,127,128,129,129,130 6650 .BYTE 130,131,131,132,132,132,133 6660 .BYTE 133,133,134,134,134,134,134 6670 .BYTE 134,134,134,135,134,134,134 6680 .BYTE 134,134,134,134,134,133,133 6690 .BYTE 133,132,132,132,131,131,130 6700 .BYTE 130,129,129,128,127,127,126 6710 .BYTE 126,125,124,123,123,122,121 6720 .BYTE 120,120,119,118,117,116,116 6730 .BYTE 115,114,113,112,111,110,110 6740 .BYTE 109,108,107,106,105,104,103 6750 .BYTE 103,102,101,100,99,99,98 6760 .BYTE 97,96,96,95,94,93,93 6770 .BYTE 92,92,91,90,90,89,89 6780 .BYTE 88,88,87,87,87,86,86 6790 .BYTE 86,85,85,85,85,85,85 6800 .BYTE 85,85,85,85,85,85,85 6810 .BYTE 85,85,85,85,86,86,86 6820 .BYTE 87,87,87,88,88,89,89 6830 .BYTE 90,90,91,92,92,93,93 6840 .BYTE 94,95,96,96,97,98,99 6850 .BYTE 99,100,101,102,103,103,104 6860 .BYTE 105,106,107,108,109,110,110 6870 .BYTE 111,112,113,114,115,116,116 6880 .BYTE 117,118,119,120,120,121,122 6890 .BYTE 123,123,124,125,126,126,127 6900 .BYTE 127,128,129,129,130,130,131 6910 .BYTE 131,132,132,132,133,133,133 6920 .BYTE 134,134,134,134,134,134,134 6930 .BYTE 134,135,134,134,134,134,134 6940 .BYTE 134,134,134,133,133,133,132 6950 .BYTE 132,132,131,131,130,130,129 6960 .BYTE 129,128,127,127,126,126,125 6970 .BYTE 124,123,123,122,121 6980 COLTAB 6990 .BYTE 0,0,0,0,16,18,20,22,24,26 7000 .BYTE 28,30,28,26,24,22,20,18,16,0 7010 .BYTE 0,0,2,2,2,2,2,4,4,4 7020 .BYTE 4,6,6,6,8,6,6,6,4,4 7030 .BYTE 4,4,2,2,2,2,2,0 7040 .BYTE 2,4,6,8,2,4,6,8 7050 .BYTE 2,4,6,8,8 7060 .BYTE 144,146,148,150,152,154 7070 .BYTE 254,252,250,248,246,244 7080 .BYTE 162,164,166,168,170,172 7090 .BYTE 34,36,38,40 7100 .BYTE 2,34,114,162,18,0 7110 .BYTE 10,42,170,250,26,0 7120 .BYTE 112,113,114 7130 .BYTE 115,116,117,118,119,120,121 7140 .BYTE 122,123,124,125,126,126,125 7150 .BYTE 124,123,122,121,120,119,118 7160 .BYTE 117,116,115,114,113,112 7170 ; 7180 PMGRAPH 7190 ; 7200 PMAREA = $CD 7210 PCOUNT = $CF 7220 TEMP = $CC 7230 ; 7240 PHA 7250 TXA 7260 PHA 7270 TYA 7280 PHA 7290 LDX #0 7300 LDA #0 7310 CLRIT STA $8000,X 7320 STA $8100,X 7330 STA $8200,X 7340 STA $8300,X 7350 INX 7360 BNE CLRIT 7370 ; 7380 LDA #$80 7390 STA $D407 7400 LDA #3 7410 STA $D01D 7420 ; 7430 LDA #14 7440 STA $02C0 7450 STA $02C1 7460 STA $02C2 7470 STA $02C3 7480 STA $02C7 7490 ; 7500 LDA #0 7510 STA $D008 7520 LDA #3 7530 STA $D009 7540 STA $D00A 7550 STA $D00B 7560 LDA #255 7570 STA $D00C 7580 ; 7590 LDA #49 7600 STA $026F 7610 ; 7620 LDX #0 7630 DOPM 7640 LDA PM1,X 7650 STA $8299,X 7660 LDA PM2,X 7670 STA $8319,X 7680 LDA PM3,X 7690 STA $8399,X 7700 LDA PM4,X 7710 STA $8199,X 7720 INX 7730 CPX #20 7740 BNE DOPM 7750 ; 7760 PLA 7770 TAX 7780 PLA 7790 TAY 7800 PLA 7810 RTS 7820 PM1 .BYTE 125,69,69,69,125,65,65 7830 .BYTE 65,65,0,0,15,8,8,8 7840 .BYTE 15,0,0,0,15 7850 PM2 .BYTE 244,20,20,21,23,21,20 7860 .BYTE 20,244,0,0,190,34 7870 .BYTE 34,34,162,162,162,162,190 7880 PM3 .BYTE 190,160,160,160,56,160,160 7890 .BYTE 160,190,0,0,251,128,128 7900 .BYTE 128,224,128,128,128,128 7910 PM4 .BYTE 136,136,136,248,32,32,32 7920 .BYTE 32,32,0,0,224,128,128 7930 .BYTE 128,128,128,128,128,128 7940 ; 7950 *= $3000 7960 MESS1 7970 .BYTE 0,0,0 7980 .BYTE 0,0,0,0,0,0,0,0,0,0 7990 .BYTE 52,"his",0,"demo",0 8000 .BYTE "was",0,"written",0,"by" 8010 .BYTE 0,0,0,0,0,0,0,0,0,0 8020 .BYTE 0,0,0,0,0,0,0,0,0,0 8030 .BYTE 0,0,0,0,0,0,0,0,0 8040 .BYTE 40,"awk",0,"and",0,48,"ink" 8050 .BYTE 1,0,0,0,0,0,0,0,0,0,0 8060 .BYTE 0,0,0,0,0,0,0,0,0,0,0,0,0 8070 .BYTE 0,0,0,46,"o ",0,35,"opyrights" 8080 .BYTE 0,17,25,25,17,0,48,"o key" 8090 .BYTE 0,51,"o ft",1,0,0,0,0,0,0,0 8100 POKEY 8110 .BYTE 0,0,0,"p ",0,"o",0,"k",0 8120 .BYTE "e",0,"y",0,0,"s",0,"o" 8130 .BYTE 0,"f",0,"t",0,0,0 8140 EMP1 8150 *= *+255 8160 SC1B 8170 .BYTE 0,"the",0,"greetings",0 8180 .BYTE "goes",0,"to",0,"detail" 8190 .BYTE 0,"of",0,"the",0,"turkish" 8200 .BYTE 0,"atari",0,"cracking" 8210 .BYTE 0,"force",0,0,0,"code",0 8220 .BYTE "on",0,"pal",0,0,0,0 8230 .BYTE "frankenstein",0,"of",0 8240 .BYTE "the",0,"high",0,"tech",0 8250 .BYTE "team",0,0,0,"good",0,"luck" 8260 .BYTE 0,"with",0,"the",0 8270 .BYTE "platinum",0,"demo",0,0,0,0 8280 .BYTE "michael",0,"hutton",0,0,0 8290 .BYTE "keep",0,"the",0,"software" 8300 .BYTE 0,"rolling",0,"in",0,0,0,0 8310 .BYTE "jaap",0,"morssink",0,0,0 8320 .BYTE "how",0,"is",0,"the",0 8330 .BYTE "conversion",0 8340 .BYTE "of",0,"smartworks",0 8350 .BYTE "getting",0,"along",0,0,0,0 8360 .BYTE "tommy",0,"hermansen",0,0,0 8370 .BYTE "keep",0,"coding",0,0,0,0 8380 .BYTE "rene",0,"van",0,"mierlo" 8390 .BYTE 0,0,0,"w here",0,"are",0 8400 .BYTE "you",0,0,0,0,"and",0,"all" 8410 .BYTE 0,"real",0,"atarians",0 8420 .BYTE "out",0,"there",0,0,0,0,0,0 8430 .BYTE 0,"well",0,"i",0,"guess",0 8440 .BYTE "it",0,"is",0,"time",0,"to" 8450 .BYTE 0,"wrap",0,0,0,0,0 8460 .BYTE 0,0,0,0,0,"byyyyeeeee" 8470 .BYTE 0,0,0,0,0,0,0 8480 .BYTE "the",0,"greetings",0 8490 .BYTE "goes",0,"to",0,"de" 8500 .BYTE 255 8510 ; 8520 EMP2 8530 *= *+255 8540 SC2B 8550 .BYTE 0,"well",0,"hello",0,"there" 8560 .BYTE 0,"i",0,"am",0,"scrolline" 8570 .BYTE 0,"two",0,"in",0,"the",0 8580 .BYTE "pokey",0,"soft",0,"demo",0 8590 .BYTE 52,40,37,0,51,37,35,47,46,36 8600 .BYTE 0,51,35,50,47,44,44,0,0,0 8610 .BYTE 0,0,0,0,"a tari",0,"compute" 8620 .BYTE "rs",0,"can",0,"really" 8630 .BYTE 0,"scroll" 8640 .BYTE 0,"or",0,"what",0,0,0,0,0,0 8650 .BYTE 0,0,0,0,"i f",0 8660 .BYTE "you",0,"like",0,"this",0 8670 .BYTE "demo",0,"please",0,"write" 8680 .BYTE 0,"to",0,"the",0,"address",0 8690 .BYTE "in",0,"scrolline",0,"seven" 8700 .BYTE 0,0,0,"t hat",0,"is",0,"the" 8710 .BYTE 0,"one",0,"you",0,"get",0 8720 .BYTE "a",0,"headache",0,"from",0 8730 .BYTE "reading",0,0,0,"just",0 8740 .BYTE "tell",0,"us",0,"what",0 8750 .BYTE "you",0,"think",0,0,0,0 8760 .BYTE 0,"well",0,"i",0,"guess" 8770 .BYTE 0,"i",0,"will",0,"wrap",0 8780 .BYTE "now",0,0,0,0,0,0 8790 .BYTE "well",0,"hello",0,"there" 8800 .BYTE 0,"i",0,"am",0,"sc" 8810 .BYTE 255 8820 ; 8830 EMP3 8840 *= *+255 8850 SC3B 8860 .BYTE 0,"want",0,"some",0,"really" 8870 .BYTE 0,"great",0,"metal",0,0,0,0 8880 .BYTE 0,"try",0 8890 .BYTE "listening",0,"to",0 8900 .BYTE "arcth",0,0,0,0,0,0,"both",0 8910 .BYTE "the",0,"debut",0,"album",0 8920 .BYTE "called",0,0,0,"another",0 8930 .BYTE "return",0,"to",0,"church",0 8940 .BYTE "hill",0,0,0,"and",0,"the",0 8950 .BYTE "new",0,"album",0,0,0,"for" 8960 .BYTE 0,"the",0,"sake",0,"of",0 8970 .BYTE "mankind",0,0,0,"it",0,"is" 8980 .BYTE 0,"really",0,"excellent",0 8990 .BYTE "and",0,"heavy",0,"music" 9000 .BYTE 0,0,0,0,0,0,0,0 9010 .BYTE "want",0,"some",0,"really" 9020 .BYTE 0,"great",0,"m" 9030 .BYTE 255 9040 ; 9050 EMP4 9060 *= *+255 9070 SC4B 9080 .BYTE 0,"welcome",0,"to",0 9090 .BYTE "scrolline",0,"four",0 9100 .BYTE "atarian",0,0,0,0 9110 .BYTE 0,"this",0,"will",0,"be",0 9120 .BYTE "pretty",0,"short",0,"so",0 9130 .BYTE "i",0,"just",0,"throw",0 9140 .BYTE "some",0,"shit",0,"about" 9150 .BYTE 0,"those" 9160 .BYTE 0,"lousy",0,"computers" 9170 .BYTE 0,"called",0,"commodore" 9180 .BYTE 0,0,0,0,"n ot",0,"really" 9190 .BYTE 0,"suitable",0,"as",0,"a",0 9200 .BYTE "doormat",0,0,0,0,0 9210 .BYTE "where",0,"is",0,"the",0 9220 .BYTE "colors",0,"located",0,0,0 9230 .BYTE 0,0,0,0,"o n",0,"the",0 9240 .BYTE "wires",0,"inside",0,"or" 9250 .BYTE 0,"what",0,0,0,"wont",0 9260 .BYTE "do",0,"much",0,"good",0 9270 .BYTE "there",0,0,0,0,0,0,"atari" 9280 .BYTE 0,"rules",0,"forever",0,0,0 9290 .BYTE 0,0,0,0,0,0,0,0,0,0,0 9300 .BYTE "welcome",0,"to",0 9310 .BYTE "scrolline",0,"fou" 9320 .BYTE 255 9330 ; 9340 EMP5 9350 *= *+255 9360 SC5B 9370 .BYTE 0,"thislineistotallywithout" 9380 .BYTE "spacesandidonotthink" 9390 .BYTE "itsmuchsenseinprolonging" 9400 .BYTE "theagonyofthepersonstrying" 9410 .BYTE "toreadthisscrollinesoi" 9420 .BYTE "guessiquitthisfuckingshit" 9430 .BYTE 0,0,0,0,0,0,0,0,0,0,0,0,0,0 9440 .BYTE "w",0,0,0,0,0,0,0,0,0,0 9450 .BYTE "o",0,0,0,0,0,0,0,0,0,0 9460 .BYTE "w",0,0,0,0,0,0,0,0,0,0 9470 .BYTE 0,0,0,0,0,0,0,0,0,0,0 9480 .BYTE "thislineistotallywithout" 9490 .BYTE 255 9500 ; 9510 EMP6 9520 *= *+255 9530 SC6B 9540 .BYTE 0,"welcome",0 9550 .BYTE "to",0,"scrolline" 9560 .BYTE 0,"six",0,"and",0,0,0,0 9570 .BYTE "this",0,"one",0,"is",0 9580 .BYTE "just" 9590 .BYTE 0,"another",0,"scroll",0 9600 .BYTE "filler",0,"and",0,"the" 9610 .BYTE 0,"time",0,"to",0,"finish" 9620 .BYTE 0,"this",0,"demo",0,"is" 9630 .BYTE 0,"very",0,"short",0 9640 .BYTE "so",0,"i",0 9650 .BYTE "guess",0,"i",0,"wrap",0 9660 .BYTE "this",0,"shit",0,"now" 9670 .BYTE 0,0,0,0,0,0,0,0,0,0,0,0,0,0 9680 .BYTE "welcome",0,"to",0,"scroll" 9690 .BYTE "ine",0,"six" 9700 .BYTE 255 9710 ; 9720 EMP7 9730 *= *+255 9740 SC7B 9750 .BYTE 0,"please",0,"contact",0 9760 .BYTE "us",0,"on",0,"the",0 9770 .BYTE "following",0,"address" 9780 .BYTE 0,0,0,0,0,0,0,0 9790 .BYTE 0,0,0,0,0,0,0,0 9800 .BYTE "vidar",0,0,0,0,"olavesen" 9810 .BYTE 0,0,0,0,0,0,0,0,0,0 9820 .BYTE "stevneveien",0,0,0,0,23 9830 .BYTE 0,0,0,0,0,0,0,0,0,0 9840 .BYTE 17,23,18,16,0,0,0,0 9850 .BYTE "greaker" 9860 .BYTE 0,0,0,0,0,0,0,0,0,0 9870 .BYTE "norway",0,0,0,0,0,0 9880 .BYTE 0,0,0,0,0,0,0,0,0,0 9890 .BYTE "please",0,"contact",0,"us" 9900 .BYTE 0,"on",0,"the" 9910 .BYTE 255 9920 .END