RENUMBER
FILE INFORMATION
FILENAME(S): RENUMBER
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-10-19 22:35:48
APPEARS ON: 1 disk(s)
FILE HASH
d36121d83ce109bea02a95b258bab248798a56e95e43077dc69e784f37cc22bd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| METROCROSS USP | RENUMBER | PRG | Radd Maxx | 20 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3A 08 64 00 4D 58 B2 33 30 30 3A 86 4C 4E |..:.d.MX.300:.LN|
00000010: 28 4D 58 29 3A 99 22 93 12 42 41 53 49 43 20 46 |(MX):."..BASIC F|
00000020: 49 4C 45 20 52 45 4E 55 4D 42 45 52 22 3A 8D 34 |ILE RENUMBER":.4|
00000030: 30 30 3A 5A 24 B2 C7 28 30 29 00 62 08 69 00 A0 |00:Z$..(0).b.i..|
00000040: 32 3A A0 33 3A A0 31 35 3A 99 3A 85 22 4F 4C 44 |2:.3:.15:.:."OLD|
00000050: 20 50 52 4F 47 52 41 4D 20 4E 41 4D 45 22 3B 46 | PROGRAM NAME";F|
00000060: 31 24 00 89 08 6E 00 85 22 4E 45 57 20 50 52 4F |1$...n.."NEW PRO|
00000070: 47 52 41 4D 20 4E 41 4D 45 22 3B 46 32 24 3A 8B |GRAM NAME";F2$:.|
00000080: 49 43 B3 B1 30 A7 31 34 35 00 A8 08 73 00 85 22 |IC..0.145...s.."|
00000090: 53 54 41 52 54 49 4E 47 20 4C 49 4E 45 20 4E 55 |STARTING LINE NU|
000000A0: 4D 42 45 52 22 3B 53 4E 00 BF 08 78 00 53 4E B2 |MBER";SN...x.SN.|
000000B0: B5 28 53 4E 29 3A 8B 53 4E B3 30 A7 31 31 35 00 |.(SN):.SN.0.115.|
000000C0: D3 08 7D 00 85 22 49 4E 43 52 45 4D 45 4E 54 22 |..}.."INCREMENT"|
000000D0: 3B 49 43 00 EA 08 82 00 49 43 B2 B5 28 49 43 29 |;IC.....IC..(IC)|
000000E0: 3A 8B 49 43 B3 31 A7 31 32 35 00 21 09 87 00 85 |:.IC.1.125.!....|
000000F0: 22 43 52 4F 53 53 20 52 45 46 45 52 45 4E 43 45 |"CROSS REFERENCE|
00000100: 28 59 2F 4E 29 22 3B 52 46 24 3A 8B 52 46 24 B3 |(Y/N)";RF$:.RF$.|
00000110: B1 22 59 22 AF 52 46 24 B3 B1 22 4E 22 A7 31 33 |."Y".RF$.."N".13|
00000120: 35 00 37 09 8C 00 8B 52 46 24 B2 22 59 22 A7 86 |5.7....RF$."Y"..|
00000130: 43 52 24 28 4D 58 29 00 55 09 91 00 99 22 4F 50 |CR$(MX).U...."OP|
00000140: 45 4E 49 4E 47 20 46 49 4C 45 53 22 3A 9F 31 35 |ENING FILES":.15|
00000150: 2C 38 2C 31 35 00 84 09 96 00 99 46 31 24 3A 9F |,8,15......F1$:.|
00000160: 32 2C 38 2C 32 2C 22 30 3A 22 AA 46 31 24 AA 22 |2,8,2,"0:".F1$."|
00000170: 2C 50 2C 52 22 3A 8D 33 38 30 3A 8B 45 52 B1 30 |,P,R":.380:.ER.0|
00000180: A7 31 30 35 00 B3 09 9B 00 99 46 32 24 3A 9F 33 |.105......F2$:.3|
00000190: 2C 38 2C 33 2C 22 30 3A 22 AA 46 32 24 AA 22 2C |,8,3,"0:".F2$.",|
000001A0: 50 2C 57 22 3A 8D 33 38 30 3A 8B 45 52 B1 30 A7 |P,W":.380:.ER.0.|
000001B0: 31 30 35 00 C4 09 A0 00 99 22 12 50 41 53 53 20 |105......".PASS |
000001C0: 31 22 3A 99 00 F4 09 A5 00 A1 23 32 2C 41 24 3A |1":.......#2,A$:|
000001D0: A1 23 32 2C 42 24 3A 4E 4C B2 30 3A 4C 31 B2 C6 |.#2,B$:NL.0:L1..|
000001E0: 28 41 24 AA 5A 24 29 AA 32 35 36 AC C6 28 42 24 |(A$.Z$).256..(B$|
000001F0: AA 5A 24 29 00 29 0A AA 00 A1 23 32 2C 41 24 3A |.Z$).)....#2,A$:|
00000200: A1 23 32 2C 42 24 3A 4C 32 B2 C6 28 41 24 AA 5A |.#2,B$:L2..(A$.Z|
00000210: 24 29 AA 32 35 36 AC C6 28 42 24 AA 5A 24 29 3A |$).256..(B$.Z$):|
00000220: 8B 4C 32 B2 30 A7 31 39 35 00 58 0A AF 00 A1 23 |.L2.0.195.X....#|
00000230: 32 2C 41 24 3A A1 23 32 2C 42 24 3A 4C 4E 28 4E |2,A$:.#2,B$:LN(N|
00000240: 4C 29 B2 C6 28 41 24 AA 5A 24 29 AA 32 35 36 AC |L)..(A$.Z$).256.|
00000250: C6 28 42 24 AA 5A 24 29 00 74 0A B4 00 99 22 91 |.(B$.Z$).t....".|
00000260: 4C 49 4E 45 22 3B 4C 4E 28 4E 4C 29 3A 4E 4C B2 |LINE";LN(NL):NL.|
00000270: 4E 4C AA 31 00 9C 0A B9 00 8B 4E 4C B1 B2 4D 58 |NL.1......NL..MX|
00000280: A7 99 22 4C 49 4E 45 20 54 41 42 4C 45 20 4F 56 |.."LINE TABLE OV|
00000290: 45 52 46 4C 4F 57 22 3A 8D 33 37 30 00 BD 0A BE |ERFLOW":.370....|
000002A0: 00 97 38 32 38 2C 4C 32 AB 4C 31 AB 34 3A 9E 38 |..828,L2.L1.4:.8|
000002B0: 32 39 3A 4C 31 B2 4C 32 3A 89 31 37 30 00 DB 0A |29:L1.L2:.170...|
000002C0: C3 00 A0 32 3A 9F 32 2C 38 2C 32 2C 22 30 3A 22 |...2:.2,8,2,"0:"|
000002D0: AA 46 31 24 AA 22 2C 50 2C 52 22 00 0D 0B C8 00 |.F1$.",P,R".....|
000002E0: 99 22 12 50 41 53 53 20 32 22 3A 99 3A 47 54 B2 |.".PASS 2":.:GT.|
000002F0: 31 33 37 3A 47 53 B2 31 34 31 3A 54 48 B2 31 36 |137:GS.141:TH.16|
00000300: 37 3A 51 55 B2 33 34 3A 4C 4B B2 AB 31 00 3E 0B |7:QU.34:LK..1.>.|
00000310: CD 00 8B 53 4E AA 4E 4C AC 49 43 B1 36 33 39 39 |...SN.NL.IC.6399|
00000320: 39 A7 99 22 12 4C 49 4E 45 20 4E 55 4D 42 45 52 |9..".LINE NUMBER|
00000330: 20 54 4F 4F 20 42 49 47 22 3A 89 33 37 30 00 74 | TOO BIG":.370.t|
00000340: 0B D2 00 A1 23 32 2C 41 24 3A A1 23 32 2C 42 24 |....#2,A$:.#2,B$|
00000350: 3A 4C 4C B2 30 3A 4C 31 B2 C6 28 41 24 AA 5A 24 |:LL.0:L1..(A$.Z$|
00000360: 29 AA 32 35 36 AC C6 28 42 24 AA 5A 24 29 3A 4E |).256..(B$.Z$):N|
00000370: 31 B2 4C 31 00 82 0B D7 00 56 B2 4C 31 3A 8D 33 |1.L1.....V.L1:.3|
00000380: 39 35 00 B7 0B DC 00 A1 23 32 2C 41 24 3A A1 23 |95......#2,A$:.#|
00000390: 32 2C 42 24 3A 4C 32 B2 C6 28 41 24 AA 5A 24 29 |2,B$:L2..(A$.Z$)|
000003A0: AA 32 35 36 AC C6 28 42 24 AA 5A 24 29 3A 8B 4C |.256..(B$.Z$):.L|
000003B0: 32 B2 30 A7 33 34 30 00 E2 0B E1 00 A1 23 32 2C |2.0.340......#2,|
000003C0: 41 24 3A A1 23 32 2C 42 24 3A 43 4C B2 C6 28 41 |A$:.#2,B$:CL..(A|
000003D0: 24 AA 5A 24 29 AA 32 35 36 AC C6 28 42 24 AA 5A |$.Z$).256..(B$.Z|
000003E0: 24 29 00 FA 0B E6 00 4C 4B B2 4C 4B AA 31 3A 99 |$).....LK.LK.1:.|
000003F0: 22 91 4C 49 4E 45 22 3B 43 4C 00 14 0C EB 00 4C |".LINE";CL.....L|
00000400: B2 4C 32 AB 4C 31 AB 34 3A 97 38 32 38 2C 4C 3A |.L2.L1.4:.828,L:|
00000410: 9E 38 32 39 00 32 0C F0 00 54 32 24 B2 22 22 3A |.829.2...T2$."":|
00000420: 49 B2 38 35 31 3A 4C B2 4C AA 49 AB 31 3A 51 51 |I.851:L.L.I.1:QQ|
00000430: B2 30 00 4A 0C F5 00 43 B2 C2 28 49 29 3A 8B 43 |.0.J...C..(I):.C|
00000440: B2 51 55 A7 51 51 B2 A8 51 51 00 5B 0C FA 00 8B |.QU.QQ..QQ.[....|
00000450: 47 54 B1 43 B0 51 51 A7 33 32 35 00 76 0C FF 00 |GT.C.QQ.325.v...|
00000460: 8B 47 54 B3 B1 43 AF 47 53 B3 B1 43 AF 54 48 B3 |.GT..C.GS..C.TH.|
00000470: B1 43 A7 33 32 35 00 91 0C 04 01 54 59 24 B2 22 |.C.325.....TY$."|
00000480: 20 22 3A 8B 43 B2 47 53 A7 54 59 24 B2 22 20 2A | ":.C.GS.TY$." *|
00000490: 22 00 B5 0C 09 01 54 32 24 B2 54 32 24 AA C7 28 |".....T2$.T2$..(|
000004A0: 43 29 3A 54 33 24 B2 22 22 3A 49 B2 49 AA 31 3A |C):T3$."":I.I.1:|
000004B0: 4E 46 B2 AB 31 00 C0 0C 0E 01 43 B2 C2 28 49 29 |NF..1.....C..(I)|
000004C0: 00 D4 0C 13 01 8B 43 B1 34 37 AF 43 B3 35 38 A7 |......C.47.C.58.|
000004D0: 4E 46 B2 30 00 02 0D 18 01 8B 28 43 B1 34 37 AF |NF.0......(C.47.|
000004E0: 43 B3 35 38 29 B0 43 B2 33 32 A7 54 33 24 B2 54 |C.58).C.32.T3$.T|
000004F0: 33 24 AA C7 28 43 29 3A 49 B2 49 AA 31 3A 89 32 |3$..(C):I.I.1:.2|
00000500: 37 30 00 0E 0D 1D 01 8B 4E 46 A7 32 35 35 00 2A |70......NF.255.*|
00000510: 0D 22 01 4A B2 30 3A 54 4E B2 C5 28 54 33 24 29 |.".J.0:TN..(T3$)|
00000520: 3A 4C 4E 28 4E 4C 29 B2 54 4E 00 44 0D 27 01 8B |:LN(NL).TN.D.'..|
00000530: 4C 4E 28 4A 29 B3 B1 54 4E A7 4A B2 4A AA 31 3A |LN(J)..TN.J.J.1:|
00000540: 89 32 39 35 00 6E 0D 2C 01 8B 4A B1 B2 4E 4C A7 |.295.n.,..J..NL.|
00000550: 99 22 12 4E 4F 4E 45 58 49 53 54 45 4E 54 3A 22 |.".NONEXISTENT:"|
00000560: 54 4E 3A 99 3A 54 4E B2 30 3A 89 33 31 30 00 7D |TN:.:TN.0:.310.}|
00000570: 0D 31 01 54 4E B2 53 4E AA 49 43 AC 4A 00 9C 0D |.1.TN.SN.IC.J...|
00000580: 36 01 54 33 24 B2 C4 28 54 4E 29 3A 54 32 24 B2 |6.T3$..(TN):T2$.|
00000590: 54 32 24 AA CA 28 54 33 24 2C 32 29 00 CC 0D 3B |T2$..(T3$,2)...;|
000005A0: 01 8B 52 46 24 B2 22 59 22 A7 43 52 24 28 4A 29 |..RF$."Y".CR$(J)|
000005B0: B2 43 52 24 28 4A 29 AA 54 59 24 AA CA 28 C4 28 |.CR$(J).TY$..(.(|
000005C0: 53 4E AA 49 43 AC 4C 4B 29 2C 32 29 00 DA 0D 40 |SN.IC.LK),2)...@|
000005D0: 01 8B 43 B2 34 34 A7 32 36 35 00 FB 0D 45 01 54 |..C.44.265...E.T|
000005E0: 32 24 B2 54 32 24 AA C7 28 43 29 3A 49 B2 49 AA |2$.T2$..(C):I.I.|
000005F0: 31 3A 8B 49 B3 B2 4C A7 32 34 35 00 28 0E 4A 01 |1:.I..L.245.(.J.|
00000600: 4E 31 B2 4E 31 AA C3 28 54 32 24 29 AA 34 3A 56 |N1.N1..(T2$).4:V|
00000610: B2 4E 31 3A 8D 33 39 35 3A 56 B2 53 4E AA 49 43 |.N1:.395:V.SN.IC|
00000620: AC 4C 4C 3A 8D 33 39 35 00 47 0E 4F 01 98 33 2C |.LL:.395.G.O..3,|
00000630: 54 32 24 3B 3A 4C 4C B2 4C 4C AA 31 3A 4C 31 B2 |T2$;:LL.LL.1:L1.|
00000640: 4C 32 3A 89 32 32 30 00 55 0E 54 01 98 33 2C 5A |L2:.220.U.T..3,Z|
00000650: 24 AA 5A 24 3B 00 71 0E 59 01 A0 32 3A A0 33 3A |$.Z$;.q.Y..2:.3:|
00000660: A0 31 35 3A 8B 52 46 24 B3 B1 22 59 22 A7 33 37 |.15:.RF$.."Y".37|
00000670: 30 00 9E 0E 5E 01 85 22 43 52 4F 53 53 20 52 45 |0...^.."CROSS RE|
00000680: 46 45 52 45 4E 43 45 28 53 2F 50 2F 51 29 22 3B |FERENCE(S/P/Q)";|
00000690: 51 24 3A 8B 51 24 B2 22 51 22 A7 33 37 30 00 C2 |Q$:.Q$."Q".370..|
000006A0: 0E 63 01 8B 51 24 B2 22 53 22 A7 57 49 B2 34 30 |.c..Q$."S".WI.40|
000006B0: 3A 9F 34 2C 33 3A 8D 34 32 35 3A A0 34 3A 89 33 |:.4,3:.425:.4:.3|
000006C0: 35 30 00 E6 0E 68 01 8B 51 24 B2 22 50 22 A7 57 |50...h..Q$."P".W|
000006D0: 49 B2 38 30 3A 9F 34 2C 34 3A 8D 34 32 35 3A A0 |I.80:.4,4:.425:.|
000006E0: 34 3A 89 33 35 30 00 EF 0E 6D 01 89 33 35 30 00 |4:.350...m..350.|
000006F0: 07 0F 72 01 A0 32 3A A0 33 3A A0 31 35 3A 99 3A |..r..2:.3:.15:.:|
00000700: 99 22 44 4F 4E 45 22 00 0D 0F 77 01 80 00 2A 0F |."DONE"...w...*.|
00000710: 7C 01 84 31 35 2C 45 52 2C 45 31 24 2C 45 32 2C ||..15,ER,E1$,E2,|
00000720: 45 33 3A 8B 45 52 B2 30 A7 8E 00 3C 0F 81 01 99 |E3:.ER.0...<....|
00000730: 45 52 3B 45 31 24 3B 45 32 3B 45 33 00 42 0F 86 |ER;E1$;E2;E3.B..|
00000740: 01 8E 00 6A 0F 8B 01 98 33 2C C7 28 56 AB B5 28 |...j....3,.(V..(|
00000750: 56 AD 32 35 36 29 AC 32 35 36 29 3B C7 28 B5 28 |V.256).256);.(.(|
00000760: 56 AD 32 35 36 29 29 3B 3A 8E 00 8E 0F 90 01 53 |V.256));:......S|
00000770: B2 30 3A 81 49 B2 38 32 39 A4 38 35 30 3A 87 56 |.0:.I.829.850:.V|
00000780: 3A 97 49 2C 56 3A 53 B2 53 AA 56 3A 82 49 00 9C |:.I,V:S.S.V:.I..|
00000790: 0F 95 01 8B 53 B2 33 30 33 36 A7 8E 00 BE 0F 9A |....S.3036......|
000007A0: 01 99 22 45 52 52 4F 52 20 49 4E 20 44 41 54 41 |.."ERROR IN DATA|
000007B0: 20 53 54 41 54 45 4D 45 4E 54 53 22 3A 80 00 E9 | STATEMENTS":...|
000007C0: 0F 9F 01 83 31 36 32 2C 32 2C 33 32 2C 31 39 38 |....162,2,32,198|
000007D0: 2C 32 35 35 2C 31 36 32 2C 30 2C 33 32 2C 32 30 |,255,162,0,32,20|
000007E0: 37 2C 32 35 35 2C 31 35 37 00 13 10 A4 01 83 38 |7,255,157......8|
000007F0: 33 2C 33 2C 32 33 32 2C 32 30 36 2C 36 30 2C 33 |3,3,232,206,60,3|
00000800: 2C 32 30 38 2C 32 34 34 2C 37 36 2C 32 30 34 2C |,208,244,76,204,|
00000810: 32 35 35 00 36 10 A9 01 98 34 2C 22 43 52 4F 53 |255.6....4,"CROS|
00000820: 53 20 2D 20 52 45 46 45 52 45 4E 43 45 20 46 4F |S - REFERENCE FO|
00000830: 52 20 22 46 32 24 00 60 10 AE 01 98 34 2C 22 20 |R "F2$.`....4," |
00000840: 4C 49 4E 45 20 20 52 45 46 45 52 45 4E 43 45 53 |LINE REFERENCES|
00000850: 22 3A 42 4C 24 B2 22 20 20 20 20 20 20 20 20 22 |":BL$." "|
00000860: 00 7B 10 B3 01 81 49 B2 30 A4 4E 4C 3A 8B 43 52 |.{....I.0.NL:.CR|
00000870: 24 28 49 29 B2 22 22 A7 34 37 35 00 B0 10 B8 01 |$(I)."".475.....|
00000880: 4A B2 32 3A 8B 49 B3 B1 4E 4C A7 4E 24 B2 C4 28 |J.2:.I..NL.N$..(|
00000890: 53 4E AA 49 43 AC 49 29 AA 42 4C 24 3A 98 34 2C |SN.IC.I).BL$:.4,|
000008A0: C8 28 4E 24 2C 37 29 22 2D 22 3B 3A 89 34 35 30 |.(N$,7)"-";:.450|
000008B0: 00 C3 10 BD 01 98 34 2C 22 20 45 52 52 4F 52 53 |......4," ERRORS|
000008C0: 20 22 3B 00 CB 10 C2 01 4B B2 31 00 06 11 C7 01 | ";.....K.1.....|
000008D0: 43 48 24 B2 CA 28 43 52 24 28 49 29 2C 4A 2C 31 |CH$..(CR$(I),J,1|
000008E0: 29 3A 98 34 2C 43 48 24 3B 3A 4A B2 4A AA 31 3A |):.4,CH$;:J.J.1:|
000008F0: 4B B2 4B AA 31 3A 8B 4A B1 C3 28 43 52 24 28 49 |K.K.1:.J..(CR$(I|
00000900: 29 29 A7 34 37 30 00 2B 11 CC 01 8B 4B B1 57 49 |)).470.+....K.WI|
00000910: AB 31 34 AF 43 48 24 B2 22 20 22 A7 98 34 3A 98 |.14.CH$." "..4:.|
00000920: 34 2C 42 4C 24 3B 3A 89 34 35 30 00 34 11 D1 01 |4,BL$;:.450.4...|
00000930: 89 34 35 35 00 3B 11 D6 01 98 34 00 44 11 DB 01 |.455.;....4.D...|
00000940: 82 49 3A 8E 00 00 00 |.I:.... |
..:.D.MX.300:.LN(MX):."..BASIC FILE RENU
MBER":.400:Z$.G(0).B.I. 2: 3: 15:.:."OLD
PROGRAM NAME";F1$...N.."NEW PROGRAM NAM
E";F2$:.IC..0.145...S.."STARTING LINE NU
MBER";SN...X.SN..(SN):.SN.0.115.S.}.."IN
CREMENT";IC.....IC..(IC):.IC.1.125.!....
"CROSS REFERENCE(Y/N)";RF$:.RF$.."Y".RF$
.."N".135.7....RF$."Y"..CR$(MX).U...."OP
ENING FILES":.15,8,15......F1$:.2,8,2,"0
:".F1$.",P,R":.380:.ER.0.105......F2$:.3
,8,3,"0:".F2$.",P,W":.380:.ER.0.105.D. .
.".PASS 1":.......#2,A$:.#2,B$:NL.0:L1.F
(A$.Z$).256.F(B$.Z$).)....#2,A$:.#2,B$:L
2.F(A$.Z$).256.F(B$.Z$):.L2.0.195.X....#
2,A$:.#2,B$:LN(NL).F(A$.Z$).256.F(B$.Z$)
.T....".LINE";LN(NL):NL.NL.1......NL..MX
.."LINE TABLE OVERFLOW":.370......828,L2
.L1.4:.829:L1.L2:.170...C. 2:.2,8,2,"0:"
.F1$.",P,R"...H..".PASS 2":.:GT.137:GS.1
41:TH.167:QU.34:LK..1.>.M..SN.NL.IC.6399
9..".LINE NUMBER TOO BIG":.370.T.R..#2,A
$:.#2,B$:LL.0:L1.F(A$.Z$).256.F(B$.Z$):N
1.L1...W.V.L1:.395......#2,A$:.#2,B$:L2.
F(A$.Z$).256.F(B$.Z$):.L2.0.340......#2,
A$:.#2,B$:CL.F(A$.Z$).256.F(B$.Z$).....L
K.LK.1:.".LINE";CL.....L.L2.L1.4:.828,L:
.829.2...T2$."":I.851:L.L.I.1:QQ.0.J...C
.B(I):.C.QU.QQ..QQ.[....GT.C.QQ.325.V...
.GT..C.GS..C.TH..C.325.....TY$." ":.C.GS
.TY$." *".....T2$.T2$.G(C):T3$."":I.I.1:
NF..1.....C.B(I).T....C.47.C.58.NF.0....
..(C.47.C.58).C.32.T3$.T3$.G(C):I.I.1:.2
70......NF.255.*.".J.0:TN.E(T3$):LN(NL).
TN.D.'..LN(J)..TN.J.J.1:.295.N.,..J..NL.
.".NONEXISTENT:"TN:.:TN.0:.310.}.1.TN.SN
.IC.J...6.T3$.D(TN):T2$.T2$.J(T3$,2).L.;
..RF$."Y".CR$(J).CR$(J).TY$.J(D(SN.IC.LK
),2).Z.@..C.44.265...E.T2$.T2$.G(C):I.I.
1:.I..L.245.(.J.N1.N1.C(T2$).4:V.N1:.395
:V.SN.IC.LL:.395.G.O..3,T2$;:LL.LL.1:L1.
L2:.220.U.T..3,Z$.Z$;.Q.Y. 2: 3: 15:.RF$
.."Y".370...^.."CROSS REFERENCE(S/P/Q)";
Q$:.Q$."Q".370.B.C..Q$."S".WI.40:.4,3:.4
25: 4:.350...H..Q$."P".WI.80:.4,4:.425:
4:.350...M..350...R. 2: 3: 15:.:."DONE".
..W...*.|..15,ER,E1$,E2,E3:.ER.0...<....
ER;E1$;E2;E3.B.....J....3,G(V..(V.256).2
56);G(.(V.256));:......S.0:.I.829.850:.V
:.I,V:S.S.V:.I......S.3036........"ERROR
IN DATA STATEMENTS":.......162,2,32,198
,255,162,0,32,207,255,157......83,3,232,
206,60,3,208,244,76,204,255.6....4,"CROS
S - REFERENCE FOR "F2$.`....4," LINE RE
FERENCES":BL$." ".{....I.0.NL:.CR
$(I)."".475.....J.2:.I..NL.N$.D(SN.IC.I)
.BL$:.4,H(N$,7)"-";:.450.C....4," ERRORS
";.K.B.K.1...G.CH$.J(CR$(I),J,1):.4,CH$
;:J.J.1:K.K.1:.J.C(CR$(I)).470.+.L..K.WI
.14.CH$." "..4:.4,BL$;:.450.4.Q..455.;.V
..4.D....I:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL