STORY READER
FILE INFORMATION
FILENAME(S): STORY READER
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-30 18:05:26
APPEARS ON: 1 disk(s)
FILE HASH
ca95d1dcd8e33893ef91402ea46b694fe7c34b927c36ef943501309bf756ea2a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| OAD TAR 61 S 4 | STORY READER | PRG | Xii | 32 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 41 08 0A 00 41 24 B2 22 22 3A 86 41 24 28 |..A...A$."":.A$(| 00000010: 36 36 36 29 3A 8D 31 30 30 3A 48 44 24 B2 22 13 |666):.100:HD$.".| 00000020: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000030: 11 11 11 11 11 11 11 11 22 3A 99 22 93 0E 08 9F |........":."....| 00000040: 22 00 81 08 14 00 52 56 B2 30 3A 42 58 B2 30 3A |".....RV.0:BX.0:| 00000050: 45 58 B2 34 30 3A 42 59 B2 30 3A 42 44 B2 31 39 |EX.40:BY.0:BD.19| 00000060: 3A 42 43 B2 37 3A 8D 31 33 30 3A 8D 34 35 30 3A |:BC.7:.130:.450:| 00000070: 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 2C |.53281,0:.53280,| 00000080: 30 00 A5 08 1E 00 42 58 B2 31 3A 45 58 B2 33 39 |0.....BX.1:EX.39| 00000090: 3A 42 59 B2 32 31 3A 42 44 B2 31 3A 42 43 B2 33 |:BY.21:BD.1:BC.3| 000000A0: 3A 8D 31 33 30 00 E4 08 28 00 4C 4E 24 B2 22 20 |:.130...(.LN$." | 000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000D0: 20 20 20 20 20 22 3A 58 24 B2 C7 28 31 33 29 3A | ":X$..(13):| 000000E0: 43 55 B2 33 00 07 09 32 00 4D 53 24 B2 22 4C 4F |CU.3...2.MS$."LO| 000000F0: 41 44 49 4E 47 20 52 4F 55 54 49 4E 45 53 2E 2E |ADING ROUTINES..| 00000100: 2E 22 3A 8D 31 39 30 00 40 09 3C 00 9E 35 37 38 |.":.190.@.<..578| 00000110: 31 32 22 49 4E 50 55 54 20 41 4E 59 2E 4F 22 2C |12"INPUT ANY.O",| 00000120: 38 2C 30 3A 97 37 38 30 2C 30 3A 97 37 38 31 2C |8,0:.780,0:.781,| 00000130: 36 30 3A 97 37 38 32 2C 33 3A 9E 36 35 34 39 33 |60:.782,3:.65493| 00000140: 00 58 09 46 00 46 49 24 B2 22 54 2E 4D 45 4C 45 |.X.F.FI$."T.MELE| 00000150: 45 20 53 54 4F 52 59 22 00 61 09 50 00 89 32 31 |E STORY".a.P..21| 00000160: 30 00 8A 09 5A 00 8F 2A 2A 2A 2A 2A 2A 2A 47 45 |0...Z..*******GE| 00000170: 4E 45 52 41 54 45 20 56 41 52 49 41 42 4C 45 53 |NERATE VARIABLES| 00000180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 BB 09 64 00 42 |**********...d.B| 00000190: 41 24 B2 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |A$."............| 000001A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000001B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 F0 09 6E 00 |.........."...n.| 000001C0: 41 24 B2 22 DD 9D 11 DD 9D 11 DD 9D 11 DD 9D 11 |A$."............| 000001D0: DD 9D 11 DD 9D 11 DD 9D 11 22 3A 81 49 B2 31 A4 |.........":.I.1.| 000001E0: 36 3A 42 44 24 B2 42 44 24 AA 41 24 3A 82 3A 8E |6:BD$.BD$.A$:.:.| 000001F0: 00 15 0A 78 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 50 |...x..*********P| 00000200: 52 49 4E 54 20 42 4F 58 2A 2A 2A 2A 2A 2A 2A 2A |RINT BOX********| 00000210: 2A 2A 2A 2A 2A 00 3E 0A 82 00 4F 43 B2 C2 28 36 |*****.>...OC..(6| 00000220: 34 36 29 3A 97 36 34 36 2C 42 43 3A 52 56 24 B2 |46):.646,BC:RV$.| 00000230: 22 22 3A 8B 52 56 A7 52 56 24 B2 22 12 22 00 75 |"":.RV.RV$.".".u| 00000240: 0A 8C 00 97 32 31 31 2C 42 58 3A 97 32 31 34 2C |....211,BX:.214,| 00000250: 42 59 3A 9E 35 38 37 33 32 3A 99 52 56 24 22 B0 |BY:.58732:.RV$".| 00000260: 22 C8 28 42 41 24 2C 45 58 AB 42 58 AB 32 29 22 |".(BA$,EX.BX.2)"| 00000270: AE 9D 11 22 3B 00 A7 0A 96 00 99 52 56 24 C8 28 |...";......RV$.(| 00000280: 42 44 24 2C 42 44 AC 33 29 3A 99 52 56 24 A6 42 |BD$,BD.3):.RV$.B| 00000290: 58 29 22 91 AD 22 C8 28 42 41 24 2C 45 58 AB 42 |X)"..".(BA$,EX.B| 000002A0: 58 AB 32 29 22 BD 22 00 DF 0A A0 00 97 32 31 31 |X.2)"."......211| 000002B0: 2C 42 58 3A 97 32 31 34 2C 42 59 AA 31 3A 9E 35 |,BX:.214,BY.1:.5| 000002C0: 38 37 33 32 3A 99 52 56 24 C8 28 42 44 24 2C 42 |8732:.RV$.(BD$,B| 000002D0: 44 AC 33 29 22 13 22 3A 97 36 34 36 2C 4F 43 00 |D.3)".":.646,OC.| 000002E0: EA 0A AA 00 52 56 B2 30 3A 8E 00 05 0B B4 00 8F |....RV.0:.......| 000002F0: 2A 2A 2A 2A 50 52 49 4E 54 20 4D 45 53 53 41 47 |****PRINT MESSAG| 00000300: 45 2A 2A 2A 2A 00 31 0B BE 00 8D 32 30 30 3A 99 |E****.1....200:.| 00000310: 22 9E 22 C8 28 48 44 24 2C 32 33 29 A6 32 30 AB |".".(HD$,23).20.| 00000320: C3 28 4D 53 24 29 AD 32 29 4D 53 24 22 9F 22 3A |.(MS$).2)MS$".":| 00000330: 8E 00 4F 0B C8 00 99 C8 28 48 44 24 2C 32 33 29 |..O.....(HD$,23)| 00000340: 22 1D 1D 22 C8 28 4C 4E 24 2C 33 36 29 3A 8E 00 |"..".(LN$,36):..| 00000350: 8E 0B D2 00 4D 53 24 B2 22 CC CF C1 C4 C9 CE C7 |....MS$.".......| 00000360: 20 D4 C5 D8 D4 2E 2E 2E 22 3A 8D 31 39 30 3A 4C | .......":.190:L| 00000370: B2 31 3A 9F 32 2C 38 2C 32 2C 46 49 24 AA 22 2C |.1:.2,8,2,FI$.",| 00000380: 50 2C 52 22 3A A1 23 32 2C 41 24 2C 41 24 00 B8 |P,R":.#2,A$,A$..| 00000390: 0B DC 00 8B 4C A7 9E 38 32 38 2C 32 2C 34 30 3A |....L..828,2,40:| 000003A0: 48 B2 48 AA 31 3A 49 B2 53 54 3A 8B 41 24 B2 22 |H.H.1:I.ST:.A$."| 000003B0: 22 A7 41 24 B2 22 20 22 00 D0 0B E6 00 41 24 28 |".A$." ".....A$(| 000003C0: 48 29 B2 41 24 3A 8B 48 B2 31 39 A7 8D 33 36 30 |H).A$:.H.19..360| 000003D0: 00 10 0C F0 00 41 24 28 48 29 B2 41 24 3A 8B 48 |.....A$(H).A$:.H| 000003E0: B2 33 39 A7 4D 53 24 B2 22 D9 4F 55 20 43 41 4E |.39.MS$.".OU CAN| 000003F0: 20 50 41 47 45 20 4E 4F 57 2E 20 28 53 54 49 4C | PAGE NOW. (STIL| 00000400: 4C 20 4C 4F 41 44 49 4E 47 29 22 3A 8D 31 39 30 |L LOADING)":.190| 00000410: 00 28 0C FA 00 8B C2 28 31 39 37 29 B2 36 34 AF |.(.....(197).64.| 00000420: 53 54 B2 30 A7 32 32 30 00 45 0C 04 01 8B C2 28 |ST.0.220.E.....(| 00000430: 31 39 37 29 B2 37 A7 8B C2 28 36 35 33 29 B2 30 |197).7...(653).0| 00000440: A7 8D 34 37 30 00 5E 0C 0E 01 8B C2 28 31 39 37 |..470.^.....(197| 00000450: 29 B2 34 31 A7 8B 4C B2 30 A7 8D 35 33 30 00 77 |).41..L.0..530.w| 00000460: 0C 18 01 8B C2 28 31 39 37 29 B2 32 30 A7 8D 37 |.....(197).20..7| 00000470: 39 30 3A 8D 33 38 30 00 8B 0C 22 01 8B C2 28 31 |90:.380..."...(1| 00000480: 39 37 29 B2 36 32 A7 8D 36 35 30 00 A4 0C 2C 01 |97).62..650...,.| 00000490: 8B C2 28 31 39 37 29 B2 35 31 A7 50 41 B2 30 3A |..(197).51.PA.0:| 000004A0: 8D 33 37 30 00 D0 0C 36 01 8B C2 28 31 39 37 29 |.370...6...(197)| 000004B0: B2 31 32 A7 8B C2 28 36 35 33 29 B2 34 A7 50 41 |.12...(653).4.PA| 000004C0: B2 31 39 AC B5 28 48 AD 31 39 29 3A 8D 35 30 30 |.19..(H.19):.500| 000004D0: 00 ED 0C 40 01 8B C2 28 31 39 37 29 B2 37 A7 8B |...@...(197).7..| 000004E0: C2 28 36 35 33 29 B2 31 A7 8D 35 30 30 00 FF 0C |.(653).1..500...| 000004F0: 4A 01 8B 4C A7 8B 53 54 B2 30 A7 89 32 32 30 00 |J..L..ST.0..220.| 00000500: 17 0D 54 01 8B 4C A7 A0 32 3A 8D 37 32 30 3A 8D |..T..L..2:.720:.| 00000510: 37 30 30 3A 4C B2 30 00 20 0D 5E 01 89 32 36 30 |700:L.0. .^..260| 00000520: 00 37 0D 68 01 8F 2A 2A 44 49 53 50 4C 41 59 20 |.7.h..**DISPLAY | 00000530: 54 45 58 54 2A 2A 2A 00 6A 0D 72 01 81 44 B2 30 |TEXT***.j.r..D.0| 00000540: A4 31 30 3A 97 32 31 34 2C 44 3A 99 3A 99 22 1D |.10:.214,D:.:.".| 00000550: 22 4C 4E 24 3A 97 32 31 34 2C 31 38 AB 44 3A 99 |"LN$:.214,18.D:.| 00000560: 3A 99 22 1D 22 4C 4E 24 3A 82 00 9F 0D 7C 01 97 |:."."LN$:....|..| 00000570: 36 34 36 2C 43 55 3A 97 32 31 34 2C 39 3A 99 3A |646,CU:.214,9:.:| 00000580: 99 22 1D 22 41 24 28 31 30 AA 50 41 29 3A 81 44 |."."A$(10.PA):.D| 00000590: B2 31 A4 39 3A 97 32 31 34 2C 39 AB 44 3A 99 00 |.1.9:.214,9.D:..| 000005A0: D0 0D 86 01 99 22 1D 22 41 24 28 31 30 AB 44 AA |....."."A$(10.D.| 000005B0: 50 41 29 3A 97 32 31 34 2C 39 AA 44 3A 99 3A 99 |PA):.214,9.D:.:.| 000005C0: 22 1D 22 41 24 28 31 30 AA 44 AA 50 41 29 3A 82 |"."A$(10.D.PA):.| 000005D0: 00 FA 0D 90 01 99 48 44 24 4C 4E 24 48 44 24 A6 |......HD$LN$HD$.| 000005E0: 31 34 AA 4C AC 33 29 22 9B D0 41 47 45 9E 22 B5 |14.L.3)"..AGE.".| 000005F0: 28 31 AA 50 41 AD 31 39 29 3B 00 11 0E 9A 01 8B |(1.PA.19);......| 00000600: 4C B2 30 A7 99 22 9B 4F 46 9E 22 4C 50 22 9F 13 |L.0..".OF."LP"..| 00000610: 22 00 1E 0E A4 01 8B 4C A7 99 22 13 9F 22 00 24 |"......L.."..".$| 00000620: 0E AE 01 8E 00 3A 0E B8 01 8F 43 4C 45 41 52 20 |.....:....CLEAR | 00000630: 4C 49 4E 45 20 4C 49 4E 4B 53 00 59 0E C2 01 81 |LINE LINKS.Y....| 00000640: 49 B2 32 31 37 A4 32 34 32 3A 97 49 2C C2 28 49 |I.217.242:.I,.(I| 00000650: 29 B0 31 32 38 3A 82 3A 8E 00 64 0E CC 01 8F 20 |).128:.:..d.... | 00000660: 50 41 47 45 00 76 0E D6 01 8B 48 B3 50 41 AA 33 |PAGE.v....H.PA.3| 00000670: 38 A7 8B 4C A7 8E 00 8B 0E DB 01 8B B5 28 31 AA |8..L.........(1.| 00000680: 50 41 AD 31 39 29 B2 4C 50 A7 8E 00 9A 0E E0 01 |PA.19).LP.......| 00000690: 8B 48 B3 50 41 AA 31 39 A7 8E 00 AE 0E EA 01 50 |.H.PA.19.......P| 000006A0: 41 B2 50 41 AA 31 39 3A 8D 33 36 30 3A 8E 00 BD |A.PA.19:.360:...| 000006B0: 0E F4 01 8B 50 41 AB 31 39 B3 30 A7 8E 00 D1 0E |....PA.19.0.....| 000006C0: FE 01 50 41 B2 50 41 AB 31 39 3A 8D 33 36 30 3A |..PA.PA.19:.360:| 000006D0: 8E 00 E2 0E 08 02 8F 2A 2A 2A 50 52 49 4E 54 2A |.......***PRINT*| 000006E0: 2A 2A 00 11 0F 12 02 A0 31 35 3A A0 34 3A 9F 31 |**......15:.4:.1| 000006F0: 35 2C 34 2C 38 3A A0 31 35 3A 8B 53 54 A7 97 35 |5,4,8:.15:.ST..5| 00000700: 33 32 38 31 2C 31 3A 97 35 33 32 38 31 2C 30 3A |3281,1:.53281,0:| 00000710: 8E 00 41 0F 1C 02 4D 53 24 B2 22 D3 49 4E 47 4C |..A...MS$.".INGL| 00000720: 45 20 53 48 45 45 54 20 4F 52 20 D4 52 41 43 54 |E SHEET OR .RACT| 00000730: 4F 52 3F 20 28 D3 2F D4 2F 5E 29 22 3A 8D 31 39 |OR? (././^)":.19| 00000740: 30 00 66 0F 26 02 A1 41 24 3A 8B 41 24 B3 B1 22 |0.f.&..A$:.A$.."| 00000750: 53 22 AF 41 24 B3 B1 22 54 22 AF 41 24 B3 B1 22 |S".A$.."T".A$.."| 00000760: 5E 22 A7 35 35 30 00 79 0F 30 02 8B 41 24 B2 22 |^".550.y.0..A$."| 00000770: 5E 22 A7 8D 37 30 30 3A 8E 00 8D 0F 3A 02 54 B2 |^"..700:....:.T.| 00000780: 31 3A 8B 41 24 B2 22 53 22 A7 54 B2 30 00 C9 0F |1:.A$."S".T.0...| 00000790: 44 02 4D 53 24 B2 22 D3 45 54 20 54 4F 50 20 4F |D.MS$.".ET TOP O| 000007A0: 46 20 46 4F 52 4D 2F 9F D2 45 54 55 52 4E 2F 9E |F FORM/..ETURN/.| 000007B0: 5E 22 3A 8D 31 39 30 3A 97 31 39 38 2C 30 3A 92 |^":.190:.198,0:.| 000007C0: 31 39 38 2C 31 3A A1 41 24 00 D9 0F 48 02 8B 41 |198,1:.A$...H..A| 000007D0: 24 B2 22 5E 22 A7 35 36 30 00 E2 0F 49 02 8D 36 |$."^".560...I..6| 000007E0: 34 30 00 05 10 4E 02 9F 34 2C 34 2C 37 3A 49 49 |40...N..4,4,7:II| 000007F0: B2 34 3A 98 34 2C 58 24 58 24 58 24 58 24 3A 81 |.4:.4,X$X$X$X$:.| 00000800: 49 B2 31 A4 48 00 3A 10 58 02 98 34 2C 41 24 28 |I.1.H.:.X..4,A$(| 00000810: 49 29 A6 34 30 AB C3 28 41 24 28 49 29 29 29 41 |I).40..(A$(I)))A| 00000820: 24 28 49 AA 35 35 29 3A 49 49 B2 49 49 AA 31 3A |$(I.55):II.II.1:| 00000830: 8B 49 49 B3 35 35 A7 36 33 30 00 69 10 62 02 49 |.II.55.630.i.b.I| 00000840: 49 B2 30 3A 98 34 2C 58 24 58 24 58 24 58 24 58 |I.0:.4,X$X$X$X$X| 00000850: 24 58 24 58 24 58 24 58 24 58 24 3A 49 B2 49 AA |$X$X$X$X$X$:I.I.| 00000860: 35 35 3A 8B 54 A7 36 33 30 00 A0 10 6C 02 4D 53 |55:.T.630...l.MS| 00000870: 24 B2 22 CE 45 58 54 20 53 48 45 45 54 2F 9F D2 |$.".EXT SHEET/..| 00000880: C5 D4 D5 D2 CE 2F 9E 5E 22 3A 8D 31 39 30 3A 97 |...../.^":.190:.| 00000890: 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 41 24 |198,0:.198,1:.A$| 000008A0: 00 BD 10 71 02 8B 41 24 B2 22 5E 22 A7 49 B2 31 |...q..A$."^".I.1| 000008B0: 30 30 30 3A 82 3A A0 34 3A 89 35 36 30 00 CF 10 |000:.:.4:.560...| 000008C0: 76 02 8D 36 34 30 3A 82 3A 8D 37 30 30 3A 8E 00 |v..640:.:.700:..| 000008D0: EC 10 80 02 4D 53 24 B2 22 D0 52 49 4E 54 49 4E |....MS$.".RINTIN| 000008E0: 47 2E 2E 2E 22 3A 8D 31 39 30 3A 8E 00 1E 11 8A |G...":.190:.....| 000008F0: 02 4D 53 24 B2 22 D1 55 49 54 3F 20 20 C1 52 45 |.MS$.".UIT? .RE| 00000900: 20 59 4F 55 20 53 55 52 45 3F 20 20 28 D9 2F CE | YOU SURE? (./.| 00000910: 29 22 3A 8D 31 39 30 3A 97 31 39 38 2C 30 00 3B |)":.190:.198,0.;| 00000920: 11 94 02 A1 41 24 3A 8B 41 24 B3 B1 22 59 22 AF |....A$:.A$.."Y".| 00000930: 41 24 B3 B1 22 4E 22 A7 36 36 30 00 54 11 9E 02 |A$.."N".660.T...| 00000940: 8B 41 24 B3 B1 22 59 22 A7 8D 32 30 30 3A 8D 37 |.A$.."Y"..200:.7| 00000950: 30 30 3A 8E 00 5D 11 A8 02 89 37 34 30 00 70 11 |00:..]....740.p.| 00000960: B2 02 8F 2A 2A 2A 20 4D 45 4E 55 20 2A 2A 2A 2A |...*** MENU ****| 00000970: 00 8F 11 BC 02 99 C8 28 48 44 24 2C 32 33 29 22 |.......(HD$,23)"| 00000980: 1D 1D 22 C8 28 4C 4E 24 2C 33 36 29 22 91 22 00 |..".(LN$,36)".".| 00000990: CB 11 C6 02 99 22 1D 1D 1D 1D 12 9E C3 D2 D3 D2 |....."..........| 000009A0: 2D D5 D0 2F C4 CE 92 9F 20 54 4F 20 50 41 47 45 |-../.... TO PAGE| 000009B0: 20 20 12 9E D1 92 9F 20 D1 55 49 54 20 12 9E D0 | ..... .UIT ...| 000009C0: 92 9F 20 D0 52 49 4E 54 22 3A 8E 00 EE 11 D0 02 |.. .RINT":......| 000009D0: 4C 50 B2 48 AD 31 39 3A 8B 4C 50 B1 B5 28 4C 50 |LP.H.19:.LP..(LP| 000009E0: 29 A7 4C 50 B2 B5 28 4C 50 29 AA 31 3A 8E 00 F4 |).LP..(LP).1:...| 000009F0: 11 DA 02 8E 00 27 12 E4 02 9F 31 35 2C 38 2C 31 |.....'....15,8,1| 00000A00: 35 2C 22 52 30 3A 4D 45 4C 45 45 20 42 4F 4F 54 |5,"R0:MELEE BOOT| 00000A10: 3D 4D 45 4C 45 45 20 42 4F 4F 54 22 3A 84 31 35 |=MELEE BOOT":.15| 00000A20: 2C 45 52 3A A0 31 35 00 3D 12 EE 02 8B 20 45 52 |,ER:.15.=.... ER| 00000A30: B3 B1 36 33 20 A7 20 99 22 93 22 3A 80 00 71 12 |..63 . .".":..q.| 00000A40: F8 02 41 24 B2 22 4D 45 4C 45 45 20 42 4F 4F 54 |..A$."MELEE BOOT| 00000A50: 22 3A 51 24 B2 C7 28 33 34 29 3A 97 35 33 32 38 |":Q$..(34):.5328| 00000A60: 31 2C 37 3A 97 35 33 32 38 30 2C 37 3A 99 22 93 |1,7:.53280,7:.".| 00000A70: 22 00 8C 12 02 03 99 22 9E 13 11 11 11 4C 4F 41 |"......".....LOA| 00000A80: 44 22 51 24 41 24 51 24 22 2C 38 22 00 B5 12 0C |D"Q$A$Q$",8"....| 00000A90: 03 99 22 11 11 11 11 52 55 4E 13 22 3A 97 36 33 |.."....RUN.":.63| 00000AA0: 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A 97 31 39 |1,13:.632,13:.19| 00000AB0: 38 2C 32 3A 80 00 CD 12 16 03 43 55 B2 43 55 AA |8,2:......CU.CU.| 00000AC0: 31 3A 8B 43 55 B2 31 36 A7 43 55 B2 31 00 DB 12 |1:.CU.16.CU.1...| 00000AD0: 20 03 97 36 34 36 2C 43 55 3A 8E 00 00 00 | ..646,CU:.... |
..A...A$."":.A$(666):.100:HD$.".........
................":."....".....RV.0:BX.0:
EX.40:BY.0:BD.19:BC.7:.130:.450:.53281,0
:.53280,0.....BX.1:EX.39:BY.21:BD.1:BC.3
:.130...(.LN$."
":X$.G(13):CU.3...2.MS$."LO
ADING ROUTINES...":.190.@.<..57812"INPUT
ANY.O",8,0:.780,0:.781,60:.782,3:.65493
.X.F.FI$."T.MELEE STORY".A.P..210...Z..*
******GENERATE VARIABLES**********...D.B
A$."....................................
.."...N.A$.".....................":.I.1.
6:BD$.BD$.A$:.:....X..*********PRINT BOX
*************.>...OC.B(646):.646,BC:RV$.
"":.RV.RV$.".".U....211,BX:.214,BY:.5873
2:.RV$"."H(BA$,EX.BX.2)"...";......RV$H(
BD$,BD.3):.RV$.BX)".."H(BA$,EX.BX.2)".".
.. ..211,BX:.214,BY.1:.58732:.RV$H(BD$,B
D.3)".":.646,OC.....RV.0:.......****PRIN
T MESSAGE****.1....200:."."H(HD$,23).20.
C(MS$).2)MS$".":..O.H..H(HD$,23)".."H(LN
$,36):....R.MS$."LOADING TEXT...":.190:L
.1:.2,8,2,FI$.",P,R":.#2,A$,A$......L..8
28,2,40:H.H.1:I.ST:.A$."".A$." ".P...A$(
H).A$:.H.19..360.....A$(H).A$:.H.39.MS$.
"YOU CAN PAGE NOW. (STILL LOADING)":.190
.(....B(197).64.ST.0.220.E....B(197).7..
B(653).0..470.^....B(197).41..L.0..530.W
....B(197).20..790:.380..."..B(197).62..
650...,..B(197).51.PA.0:.370.P.6..B(197)
.12..B(653).4.PA.19..(H.19):.500...@..B(
197).7..B(653).1..500...J..L..ST.0..220.
..T..L. 2:.720:.700:L.0. .^..260.7.H..**
DISPLAY TEXT***.J.R..D.0.10:.214,D:.:.".
"LN$:.214,18.D:.:."."LN$:....|..646,CU:.
214,9:.:."."A$(10.PA):.D.1.9:.214,9.D:..
P...."."A$(10.D.PA):.214,9.D:.:."."A$(10
.D.PA):.......HD$LN$HD$.14.L.3)".PAGE.".
(1.PA.19);......L.0..".OF."LP".."......L
.."..".$.....:....CLEAR LINE LINKS.Y.B..
I.217.242:.I,B(I).128:.:..D.L.. PAGE.V.V
..H.PA.38..L.........(1.PA.19).LP.......
.H.PA.19.......PA.PA.19:.360:.......PA.1
9.0...Q...PA.PA.19:.360:.......***PRINT*
**..... 15: 4:.15,4,8: 15:.ST..53281,1:.
53281,0:..A...MS$."SINGLE SHEET OR TRACT
OR? (S/T/^)":.190.F.&..A$:.A$.."S".A$.."
T".A$.."^".550.Y.0..A$."^"..700:....:.T.
1:.A$."S".T.0.I.D.MS$."SET TOP OF FORM/.
RETURN/.^":.190:.198,0:.198,1:.A$.Y.H..A
$."^".560...I..640...N..4,4,7:II.4:.4,X$
X$X$X$:.I.1.H.:.X..4,A$(I).40.C(A$(I)))A
$(I.55):II.II.1:.II.55.630.I.B.II.0:.4,X
$X$X$X$X$X$X$X$X$X$:I.I.55:.T.630. .L.MS
$."NEXT SHEET/.RETURN/.^":.190:.198,0:.1
98,1:.A$...Q..A$."^".I.1000:.: 4:.560.O.
V..640:.:.700:......MS$."PRINTING...":.1
90:......MS$."QUIT? ARE YOU SURE? (Y/N
)":.190:.198,0.;....A$:.A$.."Y".A$.."N".
660.T....A$.."Y"..200:.700:..]....740.P.
...*** MENU ****......H(HD$,23)".."H(LN$
,36)".".K.F.."......CRSR-UP/DN.. TO PAGE
..Q.. QUIT ..P.. PRINT":....P.LP.H.19:
.LP..(LP).LP..(LP).1:....Z...'....15,8,1
5,"R0:MELEE BOOT=MELEE BOOT":.15,ER: 15.
=.... ER..63 . .".":..Q...A$."MELEE BOOT
":Q$.G(34):.53281,7:.53280,7:."."......"
.....LOAD"Q$A$Q$",8"......"....RUN.":.63
1,13:.632,13:.198,2:..M...CU.CU.1:.CU.16
.CU.1... ..646,CU:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL