/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Software / SONG-TITLES / c64.bas

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 35 20 50 4f 4b 45 35 33 | 32 38 30 2c 36 3a 50 4f |5 POKE53|280,6:PO|
|00000010| 4b 45 35 33 32 38 31 2c | 30 3a 50 52 49 4e 54 22 |KE53281,|0:PRINT"|
|00000020| 93 0e 08 22 0a 31 30 20 | 50 52 49 4e 54 22 93 11 |...".10 |PRINT"..|
|00000030| 1d 05 d4 c8 c5 a0 d7 cf | d2 cc c4 27 d3 a0 d7 cf |........|...'....|
|00000040| d2 d3 d4 a0 c3 cf d5 ce | d4 d2 d9 a0 d3 cf ce c7 |........|........|
|00000050| a0 d4 c9 d4 cc c5 d3 22 | 0a 31 35 20 44 49 4d 54 |......."|.15 DIMT|
|00000060| 24 28 31 30 29 2c 53 24 | 28 35 30 29 2c 42 24 28 |$(10),S$|(50),B$(|
|00000070| 35 30 29 0a 32 30 20 46 | 4f 52 59 3d 31 54 4f 31 |50).20 F|ORY=1TO1|
|00000080| 30 3a 52 45 41 44 54 24 | 3a 54 24 28 59 29 3d 54 |0:READT$|:T$(Y)=T|
|00000090| 24 3a 4e 45 58 54 0a 32 | 35 20 46 4f 52 59 3d 31 |$:NEXT.2|5 FORY=1|
|000000a0| 54 4f 35 30 3a 52 45 41 | 44 54 24 3a 53 24 28 59 |TO50:REA|DT$:S$(Y|
|000000b0| 29 3d 54 24 3a 4e 45 58 | 54 0a 34 35 20 46 4f 52 |)=T$:NEX|T.45 FOR|
|000000c0| 59 3d 31 54 4f 35 30 3a | 52 45 41 44 42 24 3a 42 |Y=1TO50:|READB$:B|
|000000d0| 24 28 59 29 3d 42 24 3a | 4e 45 58 54 0a 35 30 20 |$(Y)=B$:|NEXT.50 |
|000000e0| 47 4f 54 4f 20 35 30 30 | 0a 35 31 20 52 45 4d 20 |GOTO 500|.51 REM |
|000000f0| 48 45 52 45 20 49 53 20 | 54 48 45 20 44 41 54 41 |HERE IS |THE DATA|
|00000100| 21 0a 35 32 20 3a 0a 35 | 33 20 52 45 4d 20 47 52 |!.52 :.5|3 REM GR|
|00000110| 4f 55 50 20 31 20 2d 20 | 4e 4f 55 4e 0a 35 34 20 |OUP 1 - |NOUN.54 |
|00000120| 3a 0a 35 35 20 44 41 54 | 41 22 c9 54 27 53 20 42 |:.55 DAT|A".T'S B|
|00000130| 45 45 4e 22 2c 22 c8 45 | 27 53 20 42 45 45 4e 22 |EEN",".E|'S BEEN"|
|00000140| 2c 22 d4 48 45 20 57 45 | 41 54 48 45 52 27 53 20 |,".HE WE|ATHER'S |
|00000150| 42 45 45 4e 22 2c 22 cd | 59 20 44 4f 47 27 53 20 |BEEN",".|Y DOG'S |
|00000160| 42 45 45 4e 22 0a 35 36 | 20 44 41 54 41 22 d3 48 |BEEN".56| DATA".H|
|00000170| 45 27 53 20 42 45 45 4e | 22 2c 22 c9 27 56 45 20 |E'S BEEN|",".'VE |
|00000180| 42 45 45 4e 22 2c 22 d7 | 45 27 56 45 20 42 45 45 |BEEN",".|E'VE BEE|
|00000190| 4e 22 2c 22 c5 41 54 49 | 4e 47 20 48 41 53 20 42 |N",".ATI|NG HAS B|
|000001a0| 45 45 4e 22 0a 35 38 20 | 44 41 54 41 22 d4 48 45 |EEN".58 |DATA".HE|
|000001b0| 59 27 56 45 20 42 45 45 | 4e 22 2c 22 c9 20 48 41 |Y'VE BEE|N",". HA|
|000001c0| 56 45 4e 27 54 20 42 45 | 45 4e 22 0a 35 39 20 3a |VEN'T BE|EN".59 :|
|000001d0| 0a 36 30 20 52 45 4d 20 | 47 52 4f 55 50 20 32 20 |.60 REM |GROUP 2 |
|000001e0| 2d 20 41 44 4a 45 43 54 | 49 56 45 53 0a 36 31 20 |- ADJECT|IVES.61 |
|000001f0| 3a 0a 36 32 20 44 41 54 | 41 22 53 41 44 22 2c 22 |:.62 DAT|A"SAD","|
|00000200| 4c 4f 4e 45 4c 59 22 2c | 22 42 4f 52 49 4e 47 22 |LONELY",|"BORING"|
|00000210| 2c 22 45 58 43 49 54 49 | 4e 47 22 2c 22 46 55 4e |,"EXCITI|NG","FUN|
|00000220| 22 2c 22 44 45 50 52 45 | 53 53 49 4e 47 22 2c 22 |","DEPRE|SSING","|
|00000230| 54 45 52 52 49 42 4c 45 | 22 0a 36 33 20 44 41 54 |TERRIBLE|".63 DAT|
|00000240| 41 22 53 55 50 45 52 22 | 2c 22 47 52 45 41 54 22 |A"SUPER"|,"GREAT"|
|00000250| 2c 22 44 49 53 47 55 53 | 54 49 4e 47 22 2c 22 48 |,"DISGUS|TING","H|
|00000260| 4f 52 52 49 46 59 49 4e | 47 22 0a 36 34 20 44 41 |ORRIFYIN|G".64 DA|
|00000270| 54 41 22 53 4f 2d 53 4f | 22 2c 22 4e 4f 52 4d 41 |TA"SO-SO|","NORMA|
|00000280| 4c 22 2c 22 41 42 4e 4f | 52 4d 41 4c 22 2c 22 55 |L","ABNO|RMAL","U|
|00000290| 53 55 41 4c 22 2c 22 46 | 52 49 47 48 54 45 4e 49 |SUAL","F|RIGHTENI|
|000002a0| 4e 47 22 2c 22 49 4e 43 | 52 45 44 49 42 4c 45 22 |NG","INC|REDIBLE"|
|000002b0| 0a 36 35 20 44 41 54 41 | 22 55 4e 42 45 4c 49 45 |.65 DATA|"UNBELIE|
|000002c0| 56 45 41 42 4c 45 22 2c | 22 57 4f 52 54 48 57 48 |VEABLE",|"WORTHWH|
|000002d0| 49 4c 45 22 2c 22 48 4f | 2d 48 55 4d 22 2c 22 54 |ILE","HO|-HUM","T|
|000002e0| 4f 4c 45 52 41 42 4c 45 | 22 0a 36 36 20 44 41 54 |OLERABLE|".66 DAT|
|000002f0| 41 22 46 41 49 52 22 2c | 22 42 41 44 22 2c 22 4c |A"FAIR",|"BAD","L|
|00000300| 4f 4e 45 53 4f 4d 45 22 | 2c 22 4e 41 55 47 48 54 |ONESOME"|,"NAUGHT|
|00000310| 59 22 2c 22 4e 41 53 54 | 59 22 2c 22 4c 41 43 4b |Y","NAST|Y","LACK|
|00000320| 4c 55 53 54 45 52 22 2c | 22 53 54 55 50 49 44 22 |LUSTER",|"STUPID"|
|00000330| 0a 36 37 20 44 41 54 41 | 22 44 55 4d 42 22 2c 22 |.67 DATA|"DUMB","|
|00000340| 49 44 49 4f 54 49 43 22 | 2c 22 45 58 43 45 4c 4c |IDIOTIC"|,"EXCELL|
|00000350| 45 4e 54 22 2c 22 45 4e | 54 45 52 54 41 49 4e 49 |ENT","EN|TERTAINI|
|00000360| 4e 47 22 2c 22 49 4e 46 | 4f 52 4d 41 54 49 56 45 |NG","INF|ORMATIVE|
|00000370| 22 0a 36 38 20 44 41 54 | 41 22 57 49 4c 44 22 2c |".68 DAT|A"WILD",|
|00000380| 22 43 52 41 5a 59 22 2c | 22 49 4e 53 41 4e 45 22 |"CRAZY",|"INSANE"|
|00000390| 2c 22 53 48 41 4b 59 22 | 2c 22 57 45 49 52 44 22 |,"SHAKY"|,"WEIRD"|
|000003a0| 2c 22 53 54 52 41 4e 47 | 45 22 2c 22 44 41 59 2d |,"STRANG|E","DAY-|
|000003b0| 54 4f 2d 44 41 59 22 0a | 36 39 20 44 41 54 41 22 |TO-DAY".|69 DATA"|
|000003c0| 44 45 43 45 4e 54 22 2c | 22 48 41 4c 46 57 41 59 |DECENT",|"HALFWAY|
|000003d0| 20 44 45 43 45 4e 54 22 | 2c 22 4e 49 43 45 22 2c | DECENT"|,"NICE",|
|000003e0| 22 50 4c 45 41 53 41 4e | 54 22 2c 22 51 55 49 45 |"PLEASAN|T","QUIE|
|000003f0| 54 22 2c 22 53 49 4c 45 | 4e 54 22 0a 37 30 20 44 |T","SILE|NT".70 D|
|00000400| 41 54 41 22 42 4f 58 45 | 44 2d 49 4e 22 2c 22 4c |ATA"BOXE|D-IN","L|
|00000410| 41 55 47 48 41 42 4c 45 | 22 2c 22 53 4f 4d 45 57 |AUGHABLE|","SOMEW|
|00000420| 48 41 54 20 4e 4f 52 4d | 41 4c 22 2c 22 49 4d 50 |HAT NORM|AL","IMP|
|00000430| 52 4f 56 49 4e 47 22 0a | 37 31 20 3a 0a 37 32 20 |ROVING".|71 :.72 |
|00000440| 52 45 4d 20 47 52 4f 55 | 50 20 33 20 2d 20 57 48 |REM GROU|P 3 - WH|
|00000450| 41 54 20 48 41 50 50 45 | 4e 45 44 0a 37 33 20 3a |AT HAPPE|NED.73 :|
|00000460| 0a 37 34 20 44 41 54 41 | 22 4d 59 20 48 4f 52 53 |.74 DATA|"MY HORS|
|00000470| 45 20 44 49 45 44 2e 22 | 2c 22 4d 59 20 4d 4f 54 |E DIED."|,"MY MOT|
|00000480| 48 45 52 2d 49 4e 2d 4c | 41 57 20 4d 4f 56 45 44 |HER-IN-L|AW MOVED|
|00000490| 20 49 4e 2e 22 2c 22 4d | 59 20 4d 4f 54 48 45 52 | IN.","M|Y MOTHER|
|000004a0| 2d 49 4e 2d 4c 41 57 20 | 44 49 45 44 2e 22 0a 37 |-IN-LAW |DIED.".7|
|000004b0| 35 20 44 41 54 41 22 4d | 59 20 57 49 09 00 20 44 |5 DATA"M|Y WI.. D|
|000004c0| 49 45 44 2e 22 2c 22 4d | 59 20 43 41 52 20 44 49 |IED.","M|Y CAR DI|
|000004d0| 45 44 2e 22 2c 22 c9 20 | 4c 4f 53 54 20 4d 59 20 |ED.",". |LOST MY |
|000004e0| 42 55 53 20 50 41 53 53 | 2e 22 2c 22 c9 20 57 41 |BUS PASS|.",". WA|
|000004f0| 53 20 49 4c 4c 2e 22 0a | 37 36 20 44 41 54 41 22 |S ILL.".|76 DATA"|
|00000500| 54 48 49 53 20 53 4f 4e | 47 20 53 54 41 52 54 45 |THIS SON|G STARTE|
|00000510| 44 2e 22 2c 22 c9 20 57 | 52 4f 54 45 20 54 48 49 |D.",". W|ROTE THI|
|00000520| 53 20 50 52 4f 47 52 41 | 4d 2e 22 2c 22 c9 20 52 |S PROGRA|M.",". R|
|00000530| 41 4e 20 55 50 20 4d 59 | 20 c7 c5 4e 49 45 20 42 |AN UP MY| ..NIE B|
|00000540| 49 4c 4c 2e 22 0a 37 37 | 20 44 41 54 41 22 c9 20 |ILL.".77| DATA". |
|00000550| 4d 4f 56 45 44 2e 22 2c | 22 c9 20 4c 4f 53 54 20 |MOVED.",|". LOST |
|00000560| 4d 59 20 43 52 45 44 49 | 54 20 43 41 52 44 2e 22 |MY CREDI|T CARD."|
|00000570| 2c 22 c9 20 44 4f 4e 41 | 54 45 44 20 54 4f 20 43 |,". DONA|TED TO C|
|00000580| 48 41 52 49 54 59 2e 22 | 0a 37 38 20 44 41 54 41 |HARITY."|.78 DATA|
|00000590| 22 c9 20 57 45 4e 54 20 | 54 4f 20 43 4f 4c 4c 45 |". WENT |TO COLLE|
|000005a0| 47 45 2e 22 2c 22 c9 20 | 52 41 4e 20 41 57 41 59 |GE.",". |RAN AWAY|
|000005b0| 20 46 52 4f 4d 20 48 4f | 4d 45 2e 22 2c 22 c9 20 | FROM HO|ME.",". |
|000005c0| 4a 4f 49 4e 45 44 20 c1 | c1 2e 22 0a 37 39 20 44 |JOINED .|..".79 D|
|000005d0| 41 54 41 22 c9 20 41 54 | 45 20 54 48 41 54 20 50 |ATA". AT|E THAT P|
|000005e0| 49 5a 5a 41 2e 22 2c 22 | 48 45 20 41 54 45 20 41 |IZZA.","|HE ATE A|
|000005f0| 20 50 49 5a 5a 41 2e 22 | 2c 22 48 45 20 57 45 4e | PIZZA."|,"HE WEN|
|00000600| 54 20 4f 4e 20 41 20 44 | 49 45 54 2e 22 0a 38 30 |T ON A D|IET.".80|
|00000610| 20 44 41 54 41 22 c9 20 | 57 45 4e 54 20 4f 4e 20 | DATA". |WENT ON |
|00000620| 41 20 44 49 45 54 2e 22 | 2c 22 c9 20 57 45 4e 54 |A DIET."|,". WENT|
|00000630| 20 43 4f 4c 44 20 54 55 | 52 4b 45 59 2e 22 2c 22 | COLD TU|RKEY.","|
|00000640| c9 20 57 45 4e 54 20 54 | 4f 20 57 4f 52 4b 2e 22 |. WENT T|O WORK."|
|00000650| 0a 38 31 20 44 41 54 41 | 22 4d 59 20 44 4f 47 20 |.81 DATA|"MY DOG |
|00000660| 44 49 45 44 2e 22 2c 22 | 4d 59 20 43 41 54 20 44 |DIED.","|MY CAT D|
|00000670| 49 45 44 2e 22 2c 22 4d | 59 20 42 49 52 44 20 44 |IED.","M|Y BIRD D|
|00000680| 49 45 44 2e 22 2c 22 4d | 59 20 46 52 49 45 4e 44 |IED.","M|Y FRIEND|
|00000690| 20 4d 4f 56 45 44 2e 22 | 0a 38 32 20 44 41 54 41 | MOVED."|.82 DATA|
|000006a0| 22 4d 59 20 46 41 4d 49 | 4c 59 20 4d 4f 56 45 44 |"MY FAMI|LY MOVED|
|000006b0| 2e 22 2c 22 d3 41 4e 54 | 41 20 47 4f 54 20 53 54 |.",".ANT|A GOT ST|
|000006c0| 55 43 4b 20 49 4e 20 54 | 48 45 09 00 48 49 4d 4e |UCK IN T|HE..HIMN|
|000006d0| 45 59 2e 22 0a 38 33 20 | 44 41 54 41 22 4d 59 20 |EY.".83 |DATA"MY |
|000006e0| 46 55 52 4e 41 43 45 20 | 45 58 50 4c 4f 44 45 44 |FURNACE |EXPLODED|
|000006f0| 2e 22 2c 22 4d 59 20 52 | 45 46 52 49 47 45 52 41 |.","MY R|EFRIGERA|
|00000700| 54 4f 52 20 44 49 45 44 | 2e 22 0a 38 34 20 44 41 |TOR DIED|.".84 DA|
|00000710| 54 41 22 c9 20 55 50 47 | 52 41 44 45 44 20 54 4f |TA". UPG|RADED TO|
|00000720| 20 41 4e 20 c1 4d 49 47 | 41 2e 22 2c 22 c9 20 55 | AN .MIG|A.",". U|
|00000730| 50 47 52 41 44 45 44 20 | 54 4f 20 41 20 c3 31 32 |PGRADED |TO A .12|
|00000740| 38 2e 22 0a 38 35 20 44 | 41 54 41 22 c9 20 57 45 |8.".85 D|ATA". WE|
|00000750| 4e 54 20 c9 c2 cd 2e 22 | 2c 22 53 48 45 20 54 4f |NT ...."|,"SHE TO|
|00000760| 4f 4b 20 54 48 41 54 20 | 4d 45 44 49 43 49 4e 45 |OK THAT |MEDICINE|
|00000770| 2e 22 2c 22 53 48 45 20 | 55 50 47 52 41 44 45 44 |.","SHE |UPGRADED|
|00000780| 20 54 4f 20 41 4e 20 c1 | 4d 49 47 41 2e 22 0a 38 | TO AN .|MIGA.".8|
|00000790| 36 20 44 41 54 41 22 48 | 45 52 20 d3 48 49 46 54 |6 DATA"H|ER .HIFT|
|000007a0| 20 4b 45 59 20 47 4f 54 | 20 53 54 55 43 4b 2e 22 | KEY GOT| STUCK."|
|000007b0| 2c 22 48 45 52 20 d2 45 | 53 54 4f 52 45 20 4b 45 |,"HER .E|STORE KE|
|000007c0| 59 20 47 4f 54 20 53 54 | 55 43 4b 2e 22 0a 38 37 |Y GOT ST|UCK.".87|
|000007d0| 20 44 41 54 41 22 48 49 | 53 20 42 52 41 49 4e 20 | DATA"HI|S BRAIN |
|000007e0| 4c 4f 53 54 20 49 54 53 | 20 42 4c 4f 4f 44 2e 22 |LOST ITS| BLOOD."|
|000007f0| 2c 22 48 45 52 20 42 52 | 41 49 4e 20 4c 4f 53 54 |,"HER BR|AIN LOST|
|00000800| 20 49 54 53 20 42 4c 4f | 4f 44 2e 22 2c 22 31 39 | ITS BLO|OD.","19|
|00000810| 38 30 2e 22 0a 38 38 20 | 44 41 54 41 22 c9 20 41 |80.".88 |DATA". A|
|00000820| 54 45 20 46 52 55 49 54 | 43 41 4b 45 20 46 4f 52 |TE FRUIT|CAKE FOR|
|00000830| 20 c3 48 52 49 53 54 4d | 41 53 2e 22 2c 22 c9 20 | .HRISTM|AS.",". |
|00000840| 57 45 4e 54 20 53 48 4f | 50 50 49 4e 47 2e 22 2c |WENT SHO|PPING.",|
|00000850| 22 48 45 20 57 45 4e 54 | 20 53 48 4f 50 50 49 4e |"HE WENT| SHOPPIN|
|00000860| 47 2e 22 0a 38 39 20 44 | 41 54 41 22 57 45 20 57 |G.".89 D|ATA"WE W|
|00000870| 45 4e 54 20 53 48 4f 50 | 50 49 4e 47 2e 22 2c 22 |ENT SHOP|PING.","|
|00000880| 53 48 45 20 57 45 4e 54 | 20 53 48 4f 50 50 49 4e |SHE WENT| SHOPPIN|
|00000890| 47 2e 22 2c 22 53 48 45 | 20 4c 45 46 54 20 46 4f |G.","SHE| LEFT FO|
|000008a0| 52 20 57 4f 52 4b 2e 22 | 0a 39 30 20 44 41 54 41 |R WORK."|.90 DATA|
|000008b0| 22 48 45 20 4c 45 46 54 | 20 46 4f 52 20 57 4f 52 |"HE LEFT| FOR WOR|
|000008c0| 4b 2e 22 2c 22 c9 20 47 | 4f 54 20 53 54 55 43 4b |K.",". G|OT STUCK|
|000008d0| 20 4f 4e 20 54 48 45 20 | 54 52 09 00 4e 2e 22 2c | ON THE |TR..N.",|
|000008e0| 22 c9 20 50 4c 41 59 45 | 44 20 54 48 45 20 50 49 |". PLAYE|D THE PI|
|000008f0| 41 4e 4f 2e 22 0a 39 32 | 20 44 41 54 41 22 c9 20 |ANO.".92| DATA". |
|00000900| 45 4e 44 45 44 20 45 4e | 54 45 52 49 4e 47 20 44 |ENDED EN|TERING D|
|00000910| 41 54 41 20 53 54 41 54 | 45 4d 45 4e 54 53 2e 22 |ATA STAT|EMENTS."|
|00000920| 0a 35 30 30 20 50 52 49 | 4e 54 22 11 1d 99 22 53 |.500 PRI|NT"..."S|
|00000930| 50 43 28 31 31 29 22 42 | 59 20 d0 41 55 4c 20 cd |PC(11)"B|Y .AUL .|
|00000940| 43 c1 4c 45 45 52 22 0a | 35 30 32 20 49 4e 50 55 |C.LEER".|502 INPU|
|00000950| 54 22 11 1d 9b c5 4e 54 | 45 52 20 23 20 4f 46 20 |T"....NT|ER # OF |
|00000960| 54 49 54 4c 45 53 20 54 | 4f 20 56 49 45 57 3a 22 |TITLES T|O VIEW:"|
|00000970| 3b 4c 4c 24 0a 35 30 33 | 20 49 46 56 41 4c 28 4c |;LL$.503| IFVAL(L|
|00000980| 4c 24 29 3d 30 54 48 45 | 4e 35 30 36 0a 35 30 34 |L$)=0THE|N506.504|
|00000990| 20 47 4f 54 4f 20 35 31 | 30 0a 35 30 36 20 50 52 | GOTO 51|0.506 PR|
|000009a0| 49 4e 54 22 11 9e d0 41 | 52 44 4f 4e 20 4d 45 3f |INT"...A|RDON ME?|
|000009b0| 91 91 91 91 22 3a 47 4f | 54 4f 35 30 32 0a 35 31 |....":GO|TO502.51|
|000009c0| 30 20 46 4f 52 20 54 3d | 31 20 54 4f 20 56 41 4c |0 FOR T=|1 TO VAL|
|000009d0| 28 4c 4c 24 29 0a 35 31 | 32 20 58 3d 49 4e 54 28 |(LL$).51|2 X=INT(|
|000009e0| 52 4e 44 28 31 29 2a 31 | 30 29 2b 31 0a 35 31 34 |RND(1)*1|0)+1.514|
|000009f0| 20 58 31 3d 49 4e 54 28 | 52 4e 44 28 31 29 2a 35 | X1=INT(|RND(1)*5|
|00000a00| 30 29 2b 31 3a 58 32 3d | 49 4e 54 28 52 4e 44 28 |0)+1:X2=|INT(RND(|
|00000a10| 31 29 2a 35 30 29 2b 31 | 0a 35 31 36 20 58 33 3d |1)*50)+1|.516 X3=|
|00000a20| 49 4e 54 28 52 4e 44 28 | 31 29 2a 35 30 29 2b 31 |INT(RND(|1)*50)+1|
|00000a30| 0a 35 31 38 20 50 52 49 | 4e 54 22 93 22 0a 35 32 |.518 PRI|NT".".52|
|00000a40| 30 20 47 4f 53 55 42 20 | 31 30 30 30 0a 35 32 32 |0 GOSUB |1000.522|
|00000a50| 20 50 52 49 4e 54 22 11 | 11 11 9b 1d 22 54 24 28 | PRINT".|...."T$(|
|00000a60| 58 29 3b 22 20 22 53 24 | 28 58 31 29 22 20 41 4e |X);" "S$|(X1)" AN|
|00000a70| 44 22 0a 35 32 34 20 50 | 52 49 4e 54 22 20 22 53 |D".524 P|RINT" "S|
|00000a80| 24 28 58 32 29 22 20 53 | 49 4e 43 45 20 22 3a 50 |$(X2)" S|INCE ":P|
|00000a90| 52 49 4e 54 22 1d 22 42 | 24 28 58 33 29 0a 35 32 |RINT"."B|$(X3).52|
|00000aa0| 36 20 50 4f 4b 45 32 31 | 34 2c 32 31 3a 53 59 53 |6 POKE21|4,21:SYS|
|00000ab0| 35 38 37 33 32 3a 50 52 | 49 4e 54 22 1d 1c 12 20 |58732:PR|INT"... |
|00000ac0| d3 d0 c1 c3 c5 20 2d 20 | ce 45 58 54 20 20 20 20 |..... - |.EXT    |
|00000ad0| 20 20 20 20 20 20 20 a0 | 20 20 d1 20 2d 20 c1 44 |       .|  . - .D|
|00000ae0| 49 4f 53 21 20 22 0a 35 | 32 38 20 47 45 54 41 41 |IOS! ".5|28 GETAA|
|00000af0| 24 3a 49 46 41 41 24 3d | 22 22 54 48 45 4e 35 32 |$:IFAA$=|""THEN52|
|00000b00| 38 0a 35 33 30 20 49 46 | 41 41 24 3d 22 51 22 4f |8.530 IF|AA$="Q"O|
|00000b10| 52 41 41 24 3d 22 d1 22 | 54 48 45 4e 35 35 30 0a |RAA$="."|THEN550.|
|00000b20| 35 33 32 20 49 46 41 41 | 24 3d 22 20 22 4f 52 41 |532 IFAA|$=" "ORA|
|00000b30| 41 24 3d 22 a0 22 09 0a | 35 33 33 20 49 46 54 3d |A$="."..|533 IFT=|
|00000b40| 56 41 4c 28 4c 4c 24 29 | 2b 31 54 48 45 4e 35 35 |VAL(LL$)|+1THEN55|
|00000b50| 30 0a 35 33 34 20 47 4f | 54 4f 20 35 32 38 0a 35 |0.534 GO|TO 528.5|
|00000b60| 35 30 20 50 4f 4b 45 35 | 33 32 38 30 2c 31 34 3a |50 POKE5|3280,14:|
|00000b70| 50 4f 4b 45 35 33 32 38 | 31 2c 36 3a 50 52 49 4e |POKE5328|1,6:PRIN|
|00000b80| 54 22 93 22 43 48 52 24 | 28 39 29 43 48 52 24 28 |T"."CHR$|(9)CHR$(|
|00000b90| 31 34 32 29 22 93 9a 22 | 3a 45 4e 44 0a 31 30 30 |142)".."|:END.100|
|00000ba0| 30 20 50 52 49 4e 54 22 | 93 1d 9f a2 a2 a2 a2 a2 |0 PRINT"|........|
|00000bb0| a2 a2 a2 a2 a2 a2 a2 a2 | a2 a2 a2 a2 a2 a2 a2 a2 |........|........|
|00000bc0| a2 a2 a2 a2 a2 a2 a2 a2 | a2 a2 a2 a2 a2 a2 a2 a2 |........|........|
|00000bd0| a2 22 0a 31 30 30 32 20 | 50 52 49 4e 54 22 1d 9a |.".1002 |PRINT"..|
|00000be0| 12 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000bf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000c00| 20 20 20 20 20 20 20 22 | 0a 31 30 30 34 20 50 52 |       "|.1004 PR|
|00000c10| 49 4e 54 22 1d 9a 12 20 | 20 20 d7 cf d2 cc c4 27 |INT"... |  .....'|
|00000c20| d3 a0 d7 cf d2 d3 d4 a0 | c3 cf d5 ce d4 d2 d9 a0 |........|........|
|00000c30| d3 cf ce c7 20 23 20 20 | 20 20 20 20 20 22 0a 31 |.... #  |     ".1|
|00000c40| 30 30 36 20 50 52 49 4e | 54 22 91 22 53 50 43 28 |006 PRIN|T"."SPC(|
|00000c50| 33 32 29 22 12 22 54 0a | 31 30 30 38 20 50 52 49 |32)"."T.|1008 PRI|
|00000c60| 4e 54 22 1d 9a 12 20 20 | 20 20 20 20 20 20 20 20 |NT"...  |        |
|00000c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000c80| 20 20 20 20 20 20 20 20 | 20 20 20 20 22 0a 31 30 |        |    ".10|
|00000c90| 31 30 20 50 52 49 4e 54 | 22 1d 1f 12 a2 a2 a2 a2 |10 PRINT|".......|
|00000ca0| a2 a2 a2 a2 a2 a2 a2 a2 | a2 a2 a2 a2 a2 a2 a2 a2 |........|........|
|00000cb0| a2 a2 a2 a2 a2 a2 a2 a2 | a2 a2 a2 a2 a2 a2 a2 a2 |........|........|
|00000cc0| a2 a2 22 3a 50 52 49 4e | 54 3a 50 52 49 4e 54 3a |..":PRIN|T:PRINT:|
|00000cd0| 52 45 54 55 52 4e 0a    |                         |RETURN. |        |
+--------+-------------------------+-------------------------+--------+--------+