XMODEM128
FILE INFORMATION
FILENAME(S): XMODEM128
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-10-19 22:48:42
APPEARS ON: 1 disk(s)
FILE HASH
bb1a043387b93fdf21fc064c2a3fe79ea77f3a30992da15259deb630c3545341
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMPUTE NOV JAN | XMODEM128 | PRG | Radd Maxx | 25 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 22 1C 64 00 8F 20 2B 2B 20 58 4D 4F 44 45 |..".d.. ++ XMODE|
00000010: 4D 20 46 49 4C 45 20 54 52 41 4E 53 46 45 52 20 |M FILE TRANSFER |
00000020: 2B 2B 00 3C 1C 69 00 97 20 35 33 32 38 30 2C 31 |++.<.i.. 53280,1|
00000030: 31 3A 97 20 35 33 32 38 31 2C 31 31 00 58 1C 6E |1:. 53281,11.X.n|
00000040: 00 9F 20 32 2C 32 2C 30 2C C7 28 36 29 AA C7 28 |.. 2,2,0,.(6)..(|
00000050: 30 29 3A 4D B2 32 35 35 00 6F 1C 73 00 47 24 B2 |0):M.255.o.s.G$.|
00000060: C7 28 32 30 29 3A 55 24 B2 C7 28 31 37 35 29 00 |.(20):U$..(175).|
00000070: 89 1C 74 00 F9 20 31 2C C7 28 31 33 33 29 3A F9 |..t.. 1,.(133):.|
00000080: 20 33 2C C7 28 31 33 34 29 00 A3 1C 75 00 F9 20 | 3,.(134)...u.. |
00000090: 35 2C C7 28 31 33 35 29 3A F9 20 37 2C C7 28 31 |5,.(135):. 7,.(1|
000000A0: 33 36 29 00 B9 1C 78 00 5A 24 B2 C7 28 30 29 3A |36)...x.Z$..(0):|
000000B0: 9F 20 31 35 2C 38 2C 31 35 00 D4 1C 7D 00 99 20 |. 15,8,15...}.. |
000000C0: C7 28 31 34 34 29 3B C7 28 31 34 37 29 3B C7 28 |.(144);.(147);.(|
000000D0: 31 34 29 3B 00 E6 1C 82 00 99 20 C7 28 31 31 29 |14);...... .(11)|
000000E0: 3B A6 31 30 29 3B 00 05 1D 87 00 99 20 22 D8 4D |;.10);...... ".M|
000000F0: 4F 44 45 4D 20 C6 49 4C 45 20 D4 52 41 4E 53 46 |ODEM .ILE .RANSF|
00000100: 45 52 22 3A 99 00 1F 1D 8C 00 8D 20 32 37 35 3A |ER":....... 275:|
00000110: 86 20 52 28 32 35 35 29 2C 53 28 32 35 35 29 00 |. R(255),S(255).|
00000120: 3F 1D 91 00 81 20 42 B2 30 20 A4 20 33 31 3A 53 |?.... B.0 . 31:S|
00000130: 28 42 29 B2 42 3A 82 3A 52 28 38 29 B2 32 30 00 |(B).B:.:R(8).20.|
00000140: 60 1D 96 00 52 28 31 33 29 B2 31 33 3A 53 28 32 |`...R(13).13:S(2|
00000150: 30 29 B2 38 3A 81 20 42 B2 33 32 20 A4 20 36 34 |0).8:. B.32 . 64|
00000160: 00 7E 1D 9B 00 52 28 42 29 B2 42 3A 53 28 42 29 |.~...R(B).B:S(B)|
00000170: B2 42 3A 82 3A 53 28 31 36 30 29 B2 33 32 00 9D |.B:.:S(160).32..|
00000180: 1D A0 00 81 20 42 B2 36 35 20 A4 20 39 30 3A 49 |.... B.65 . 90:I|
00000190: B2 42 AA 31 32 38 3A 52 28 42 29 B2 49 00 BD 1D |.B.128:R(B).I...|
000001A0: A5 00 53 28 49 29 B2 42 3A 82 3A 81 20 42 B2 39 |..S(I).B:.:. B.9|
000001B0: 31 20 A4 20 39 36 3A 52 28 42 29 B2 42 00 DE 1D |1 . 96:R(B).B...|
000001C0: AA 00 53 28 42 29 B2 42 3A 82 3A 81 20 42 B2 39 |..S(B).B:.:. B.9|
000001D0: 37 20 A4 20 31 32 32 3A 49 B2 42 AB 33 32 00 00 |7 . 122:I.B.32..|
000001E0: 1E AF 00 52 28 42 29 B2 49 3A 53 28 49 29 B2 42 |...R(B).I:S(I).B|
000001F0: 3A 82 3A 81 20 42 B2 31 32 33 20 A4 20 31 32 37 |:.:. B.123 . 127|
00000200: 00 1B 1E B4 00 49 B2 42 AA 39 36 3A 52 28 42 29 |.....I.B.96:R(B)|
00000210: B2 49 3A 53 28 49 29 B2 42 3A 82 00 2C 1E B9 00 |.I:S(I).B:..,...|
00000220: 99 20 C7 28 31 35 32 29 3B 55 24 3B 00 45 1E BE |. .(152);U$;.E..|
00000230: 00 A1 23 32 2C 42 24 3A 8B 20 42 24 B2 22 22 20 |..#2,B$:. B$."" |
00000240: A7 20 32 30 30 00 5D 1E C3 00 42 B2 C6 28 42 24 |. 200.]...B..(B$|
00000250: 29 3A 8D 20 32 34 35 3A 89 20 31 39 30 00 74 1E |):. 245:. 190.t.|
00000260: C8 00 A1 20 42 24 3A 8B 20 42 24 B2 22 22 20 A7 |... B$:. B$."" .|
00000270: 20 31 39 30 00 80 1E CD 00 42 B2 C6 28 42 24 29 | 190.....B..(B$)|
00000280: 00 9A 1E D2 00 8B 20 42 B1 31 33 32 20 AF 20 42 |...... B.132 . B|
00000290: B3 31 33 37 20 A7 20 32 33 30 00 AE 1E D7 00 42 |.137 . 230.....B|
000002A0: B2 53 28 42 29 3A 98 32 2C C7 28 42 29 3B 00 BE |.S(B):.2,.(B);..|
000002B0: 1E DC 00 8B 20 48 20 A7 20 8D 20 32 35 30 00 C8 |.... H . . 250..|
000002C0: 1E E1 00 89 20 31 39 30 00 DB 1E E6 00 99 20 47 |.... 190...... G|
000002D0: 24 3A 99 20 C7 28 31 34 34 29 3B 00 F9 1E EB 00 |$:. .(144);.....|
000002E0: 91 20 42 AB 31 33 32 20 8D 20 32 36 30 2C 34 31 |. B.132 . 260,41|
000002F0: 35 2C 32 39 30 2C 32 37 35 00 03 1F F0 00 89 20 |5,290,275...... |
00000300: 31 38 35 00 1A 1F F5 00 8F 20 2B 2B 20 50 52 49 |185...... ++ PRI|
00000310: 4E 54 20 42 59 54 45 20 2B 2B 00 31 1F FA 00 99 |NT BYTE ++.1....|
00000320: 20 47 24 3B C7 28 52 28 42 29 29 3B 55 24 3B 3A | G$;.(R(B));U$;:|
00000330: 8E 00 46 1F FF 00 8F 20 2B 2B 20 46 31 2C 20 45 |..F.... ++ F1, E|
00000340: 43 48 4F 20 2B 2B 00 67 1F 04 01 99 20 22 C5 43 |CHO ++.g.... ".C|
00000350: 48 4F 3A 20 22 3B CA 28 22 CF 4E 20 CF 46 46 22 |HO: ";.(".N .FF"|
00000360: 2C 48 AA 31 2C 33 29 00 73 1F 09 01 48 B2 33 AB |,H.1,3).s...H.3.|
00000370: 48 3A 8E 00 88 1F 0E 01 8F 20 2B 2B 20 46 37 2C |H:....... ++ F7,|
00000380: 20 48 45 4C 50 20 2B 2B 00 BF 1F 13 01 99 20 22 | HELP ++...... "|
00000390: 12 C6 31 92 3D C5 43 48 4F 20 12 C6 33 92 3D D2 |..1.=.CHO ..3.=.|
000003A0: 45 43 45 49 56 45 20 12 C6 35 92 3D D4 52 41 4E |ECEIVE ..5.=.RAN|
000003B0: 53 4D 49 54 20 12 C6 37 92 3D C8 45 4C 50 22 00 |SMIT ..7.=.ELP".|
000003C0: C5 1F 18 01 8E 00 E3 1F 1D 01 8F 20 2B 2B 20 46 |........... ++ F|
000003D0: 35 2C 20 54 52 41 4E 53 4D 49 54 20 46 49 4C 45 |5, TRANSMIT FILE|
000003E0: 20 2B 2B 00 0A 20 22 01 99 20 22 CE 41 4D 45 20 | ++.. ".. ".AME |
000003F0: 4F 46 20 46 49 4C 45 20 54 4F 20 55 50 4C 4F 41 |OF FILE TO UPLOA|
00000400: 44 3A 22 3A 42 24 B2 22 52 22 00 1C 20 27 01 8D |D:":B$."R".. '..|
00000410: 20 36 37 35 3A 8B 20 46 20 A7 20 8E 00 3A 20 2C | 675:. F . ..: ,|
00000420: 01 43 24 B2 C7 28 32 31 29 3A 8D 20 33 39 35 3A |.C$..(21):. 395:|
00000430: 43 24 B2 43 24 AA C7 28 36 29 00 52 20 31 01 81 |C$.C$..(6).R 1..|
00000440: 20 4B B2 31 20 A4 20 4D AA 31 3A 4B B2 4B 20 AF | K.1 . M.1:K.K .|
00000450: 20 4D 00 60 20 36 01 8B 20 46 20 A7 20 33 37 30 | M.` 6.. F . 370|
00000460: 00 81 20 3B 01 53 B2 30 3A 44 24 B2 22 22 3A 81 |.. ;.S.0:D$."":.|
00000470: 20 49 B2 31 20 A4 20 31 32 38 3A A1 23 38 2C 42 | I.1 . 128:.#8,B|
00000480: 24 00 A1 20 40 01 42 B2 C6 28 42 24 AA 5A 24 29 |$.. @.B..(B$.Z$)|
00000490: 3A 44 24 B2 44 24 AA C7 28 42 29 3A 53 B2 53 AA |:D$.D$..(B):S.S.|
000004A0: 42 00 BA 20 45 01 8B 20 53 54 20 A7 20 41 B2 34 |B.. E.. ST . A.4|
000004B0: 3A 46 B2 31 3A 89 20 33 33 35 00 C0 20 4A 01 82 |:F.1:. 335.. J..|
000004C0: 00 D6 20 4F 01 8B 20 C3 28 44 24 29 B2 31 32 38 |.. O.. .(D$).128|
000004D0: 20 A7 20 33 34 35 00 E9 20 54 01 44 24 B2 44 24 | . 345.. T.D$.D$|
000004E0: AA 5A 24 3A 89 20 33 33 35 00 F3 20 59 01 8D 20 |.Z$:. 335.. Y.. |
000004F0: 34 39 35 00 18 21 5E 01 98 32 2C C7 28 31 29 3B |495..!^..2,.(1);|
00000500: C7 28 4B 29 3B C7 28 4D AB 4B 29 3B 44 24 3B C7 |.(K);.(M.K);D$;.|
00000510: 28 53 20 AF 20 4D 29 3B 00 31 21 63 01 8D 20 33 |(S . M);.1!c.. 3|
00000520: 39 35 3A 99 20 CA 28 22 4F 2B 22 2C 43 2C 31 29 |95:. .("O+",C,1)|
00000530: 3B 00 41 21 68 01 8B 20 43 B2 31 20 A7 20 33 34 |;.A!h.. C.1 . 34|
00000540: 35 00 49 21 6D 01 82 20 4B 00 59 21 72 01 99 3A |5.I!m.. K.Y!r..:|
00000550: A0 20 38 3A 8D 20 37 30 30 00 6F 21 77 01 8D 20 |. 8:. 700.o!w.. |
00000560: 34 38 35 3A 8B 20 46 B1 31 20 A7 20 37 31 35 00 |485:. F.1 . 715.|
00000570: 85 21 7C 01 8D 20 33 39 35 3A 8B 20 43 B2 32 20 |.!|.. 395:. C.2 |
00000580: A7 20 37 31 35 00 8F 21 81 01 89 20 33 37 35 00 |. 715..!... 375.|
00000590: B4 21 86 01 8F 20 2B 2B 20 47 45 54 20 43 4F 4E |.!... ++ GET CON|
000005A0: 54 52 4F 4C 20 42 59 54 45 20 31 30 30 20 53 45 |TROL BYTE 100 SE|
000005B0: 43 20 2B 2B 00 C9 21 8B 01 81 20 4A B2 31 20 A4 |C ++..!... J.1 .|
000005C0: 20 31 30 3A 8D 20 35 31 30 00 DE 21 90 01 8B 20 | 10:. 510..!... |
000005D0: 45 20 A7 20 82 3A 41 B2 32 34 3A 46 B2 32 00 E4 |E . .:A.24:F.2..|
000005E0: 21 95 01 8E 00 01 22 9A 01 8F 20 2B 2B 20 46 33 |!....."... ++ F3|
000005F0: 2C 20 52 45 43 45 49 56 45 20 46 49 4C 45 20 2B |, RECEIVE FILE +|
00000600: 2B 00 33 22 9F 01 99 20 22 C6 49 4C 45 4E 41 4D |+.3"... ".ILENAM|
00000610: 45 20 46 4F 52 20 44 4F 57 4E 4C 4F 41 44 45 44 |E FOR DOWNLOADED|
00000620: 20 44 41 54 41 3A 22 3A 42 24 B2 22 57 22 3A 41 | DATA:":B$."W":A|
00000630: B2 32 31 00 45 22 A4 01 8D 20 36 37 35 3A 8B 20 |.21.E"... 675:. |
00000640: 46 20 A7 20 8E 00 56 22 A9 01 43 24 B2 C7 28 31 |F . ..V"..C$..(1|
00000650: 29 AA C7 28 34 29 00 6E 22 AE 01 81 20 4B B2 31 |)..(4).n"... K.1|
00000660: 20 A4 20 4D AA 31 3A 4B B2 4B 20 AF 20 4D 00 7C | . M.1:K.K . M.||
00000670: 22 B3 01 8B 20 46 20 A7 20 34 37 30 00 96 22 B8 |"... F . 470..".|
00000680: 01 81 20 4A B2 31 20 A4 20 31 30 3A 8D 20 34 38 |.. J.1 . 10:. 48|
00000690: 35 3A 41 B2 32 31 00 A0 22 BD 01 8D 20 35 31 30 |5:A.21.."... 510|
000006A0: 00 C3 22 C2 01 8B 20 43 B2 31 20 A7 20 8D 20 35 |.."... C.1 . . 5|
000006B0: 35 30 3A 99 20 CA 28 22 2B 4F 22 2C 45 AA 31 2C |50:. .("+O",E.1,|
000006C0: 31 29 3B 00 D7 22 C7 01 8B 20 43 B2 32 20 A7 20 |1);.."... C.2 . |
000006D0: 41 B2 36 3A 46 B2 31 00 F2 22 CC 01 8B 20 45 20 |A.6:F.1.."... E |
000006E0: AF 20 46 B2 30 20 A7 20 82 3A 41 B2 32 34 3A 46 |. F.0 . .:A.24:F|
000006F0: B2 32 00 FA 22 D1 01 82 20 4B 00 0A 23 D6 01 99 |.2.."... K..#...|
00000700: 3A A0 20 38 3A 8D 20 37 30 30 00 1A 23 DB 01 8D |:. 8:. 700..#...|
00000710: 20 34 38 35 3A 89 20 37 31 35 00 37 23 E0 01 8F | 485:. 715.7#...|
00000720: 20 2B 2B 20 53 45 4E 44 20 41 4E 53 57 45 52 20 | ++ SEND ANSWER |
00000730: 42 59 54 45 20 2B 2B 00 4C 23 E5 01 8D 20 34 39 |BYTE ++.L#... 49|
00000740: 35 3A 98 32 2C C7 28 41 29 3B 3A 8E 00 6B 23 EA |5:.2,.(A);:..k#.|
00000750: 01 8F 20 2B 2B 20 43 4C 45 41 52 20 49 4E 50 55 |.. ++ CLEAR INPU|
00000760: 54 20 42 55 46 46 45 52 20 2B 2B 00 7E 23 EF 01 |T BUFFER ++.~#..|
00000770: EB 3A A1 23 32 2C 42 24 3A 8D 20 37 33 30 00 8E |.:.#2,B$:. 730..|
00000780: 23 F4 01 EC 20 FC 20 57 20 AF 20 38 3A 8E 00 B2 |#... . W . 8:...|
00000790: 23 F9 01 8F 20 2B 2B 20 47 45 54 20 43 4F 4E 54 |#... ++ GET CONT|
000007A0: 52 4F 4C 20 42 59 54 45 20 31 30 20 53 45 43 20 |ROL BYTE 10 SEC |
000007B0: 2B 2B 00 C5 23 FE 01 45 B2 30 3A 50 B2 36 30 30 |++..#..E.0:P.600|
000007C0: 3A 54 B2 54 49 00 D3 23 03 02 43 B2 33 3A 8D 20 |:T.TI..#..C.3:. |
000007D0: 36 32 30 00 E6 23 08 02 8B 20 45 20 A7 20 99 20 |620..#... E . . |
000007E0: 22 2E 22 3B 3A 8E 00 02 24 0D 02 8B 20 42 24 B2 |".";:...$... B$.|
000007F0: C7 28 32 34 29 20 A7 20 41 B2 32 34 3A 46 B2 34 |.(24) . A.24:F.4|
00000800: 3A 8E 00 14 24 12 02 81 20 43 B2 31 20 A4 20 C3 |:...$... C.1 . .|
00000810: 28 43 24 29 00 2B 24 17 02 8B 20 42 24 B2 CA 28 |(C$).+$... B$..(|
00000820: 43 24 2C 43 2C 31 29 20 A7 20 8E 00 3D 24 1C 02 |C$,C,1) . ..=$..|
00000830: 82 3A 8D 20 36 35 30 3A 89 20 35 31 35 00 52 24 |.:. 650:. 515.R$|
00000840: 21 02 8F 20 2B 2B 20 47 45 54 20 44 41 54 41 20 |!.. ++ GET DATA |
00000850: 2B 2B 00 6E 24 26 02 50 B2 36 30 3A 54 B2 54 49 |++.n$&.P.60:T.TI|
00000860: 3A 8D 20 36 32 30 3A 8B 20 45 20 A7 20 8E 00 89 |:. 620:. E . ...|
00000870: 24 2B 02 4E B2 42 3A 54 B2 54 49 3A 8D 20 36 32 |$+.N.B:T.TI:. 62|
00000880: 30 3A 8B 20 45 20 A7 20 8E 00 A2 24 30 02 8B 20 |0:. E . ...$0.. |
00000890: 4E AA 42 B3 B1 4D 20 A7 20 45 B2 31 3A 89 20 36 |N.B..M . E.1:. 6|
000008A0: 35 30 00 BC 24 35 02 53 B2 30 3A 44 24 B2 22 22 |50..$5.S.0:D$.""|
000008B0: 3A 81 20 49 B2 31 20 A4 20 31 32 38 00 D3 24 3A |:. I.1 . 128..$:|
000008C0: 02 54 B2 54 49 3A 8D 20 36 32 30 3A 8B 20 45 20 |.T.TI:. 620:. E |
000008D0: A7 20 8E 00 EA 24 3F 02 44 24 B2 44 24 AA C7 28 |. ...$?.D$.D$..(|
000008E0: 42 29 3A 53 B2 53 AA 42 3A 82 00 01 25 44 02 54 |B):S.S.B:...%D.T|
000008F0: B2 54 49 3A 8D 20 36 32 30 3A 8B 20 45 20 A7 20 |.TI:. 620:. E . |
00000900: 8E 00 1E 25 49 02 8B 20 42 B3 B1 28 53 20 AF 20 |...%I.. B..(S . |
00000910: 4D 29 20 A7 20 45 B2 31 3A 89 20 36 35 30 00 30 |M) . E.1:. 650.0|
00000920: 25 4E 02 41 B2 36 3A 44 B2 4B AB 4E 20 AF 20 4D |%N.A.6:D.K.N . M|
00000930: 00 45 25 53 02 8B 20 44 B1 31 20 A7 20 41 B2 32 |.E%S.. D.1 . A.2|
00000940: 34 3A 46 B2 33 00 55 25 58 02 8B 20 44 20 A7 20 |4:F.3.U%X.. D . |
00000950: 45 B2 31 3A 8E 00 70 25 5D 02 98 38 2C 44 24 3B |E.1:..p%]..8,D$;|
00000960: 3A 8B 20 53 54 20 A7 20 41 B2 32 34 3A 46 B2 35 |:. ST . A.24:F.5|
00000970: 00 76 25 62 02 8E 00 8B 25 67 02 8F 20 2B 2B 20 |.v%b....%g.. ++ |
00000980: 47 45 54 20 42 59 54 45 20 2B 2B 00 A6 25 6C 02 |GET BYTE ++..%l.|
00000990: A1 23 32 2C 42 24 3A 8D 20 37 33 30 3A 8B 20 57 |.#2,B$:. 730:. W|
000009A0: 20 A7 20 36 33 30 00 B7 25 71 02 42 B2 C6 28 42 | . 630..%q.B..(B|
000009B0: 24 AA 5A 24 29 3A 8E 00 CD 25 76 02 8B 20 57 20 |$.Z$):...%v.. W |
000009C0: AF 20 32 34 37 20 A7 20 8D 20 36 35 30 00 E2 25 |. 247 . . 650..%|
000009D0: 7B 02 8B 20 54 49 B1 54 AA 50 20 A7 20 45 B2 31 |{.. TI.T.P . E.1|
000009E0: 3A 8E 00 EC 25 80 02 89 20 36 32 30 00 0B 26 85 |:...%... 620..&.|
000009F0: 02 8F 20 2B 2B 20 53 4B 49 50 20 55 4E 54 49 4C |.. ++ SKIP UNTIL|
00000A00: 20 53 49 4C 45 4E 43 45 20 2B 2B 00 14 26 8A 02 | SILENCE ++..&..|
00000A10: 55 B2 54 49 00 32 26 8F 02 A1 23 32 2C 42 24 3A |U.TI.2&...#2,B$:|
00000A20: 8D 20 37 33 30 3A 8B 20 57 B3 B1 38 20 A7 20 36 |. 730:. W..8 . 6|
00000A30: 35 30 00 44 26 94 02 8B 20 54 49 B1 55 AA 36 30 |50.D&... TI.U.60|
00000A40: 20 A7 20 8E 00 4E 26 99 02 89 20 36 35 35 00 69 | . ..N&... 655.i|
00000A50: 26 9E 02 8F 20 2B 2B 20 54 52 41 4E 53 46 45 52 |&... ++ TRANSFER|
00000A60: 20 42 45 47 49 4E 20 2B 2B 00 7F 26 A3 02 46 B2 | BEGIN ++..&..F.|
00000A70: 30 3A 4E 24 B2 22 2A 22 3A 54 24 B2 22 50 22 00 |0:N$."*":T$."P".|
00000A80: A8 26 A8 02 4E 24 B2 22 22 3A 54 24 B2 22 22 3A |.&..N$."":T$."":|
00000A90: 85 20 22 5B 20 4E 41 4D 45 2C 20 54 59 50 45 20 |. "[ NAME, TYPE |
00000AA0: 5D 22 3B 4E 24 2C 54 24 00 DA 26 AD 02 8B 20 4E |]";N$,T$..&... N|
00000AB0: 24 B2 22 22 20 B0 20 28 54 24 B3 B1 22 50 22 20 |$."" . (T$.."P" |
00000AC0: AF 20 54 24 B3 B1 22 53 22 20 AF 20 54 24 B3 B1 |. T$.."S" . T$..|
00000AD0: 22 55 22 29 20 A7 20 36 38 30 00 FC 26 B2 02 9F |"U") . 680..&...|
00000AE0: 20 38 2C 38 2C 38 2C 22 30 3A 22 AA 4E 24 AA 22 | 8,8,8,"0:".N$."|
00000AF0: 2C 22 AA 54 24 AA 22 2C 22 AA 42 24 00 1B 27 B7 |,".T$.",".B$..'.|
00000B00: 02 8F 20 2B 2B 20 52 45 41 44 20 45 52 52 4F 52 |.. ++ READ ERROR|
00000B10: 20 43 48 41 4E 4E 45 4C 20 2B 2B 00 32 27 BC 02 | CHANNEL ++.2'..|
00000B20: 84 31 35 2C 49 2C 4D 24 3A 8B 20 49 B2 30 20 A7 |.15,I,M$:. I.0 .|
00000B30: 20 8E 00 4D 27 C1 02 99 22 12 22 3B 4D 24 3A 41 | ..M'...".";M$:A|
00000B40: B2 32 34 3A 46 B2 35 3A A0 20 38 3A 8E 00 66 27 |.24:F.5:. 8:..f'|
00000B50: C6 02 8F 20 2B 2B 20 54 52 41 4E 53 46 45 52 20 |... ++ TRANSFER |
00000B60: 45 4E 44 20 2B 2B 00 8E 27 CB 02 4D 24 B2 22 C3 |END ++..'..M$.".|
00000B70: 4F 4D 50 4C 45 54 45 D4 49 4D 45 4F 55 54 20 C4 |OMPLETE.IMEOUT .|
00000B80: 49 53 4F 52 44 45 52 C3 41 4E 43 45 4C 22 00 A4 |ISORDER.ANCEL"..|
00000B90: 27 D0 02 99 20 CA 28 4D 24 2C 46 AC 38 AB 37 2C |'... .(M$,F.8.7,|
00000BA0: 38 29 3A 8E 00 C2 27 D5 02 8F 20 2A 2A 20 47 45 |8):...'... ** GE|
00000BB0: 54 20 52 53 2D 32 33 32 20 53 54 41 54 55 53 20 |T RS-232 STATUS |
00000BC0: 2A 2A 00 DB 27 DA 02 57 B2 C2 28 32 35 38 30 29 |**..'..W..(2580)|
00000BD0: 3A 97 20 32 35 38 30 2C 30 3A 8E 00 00 00 |:. 2580,0:.... |
..".D.. ++ XMODEM FILE TRANSFER ++.<.I..
53280,11:. 53281,11.X.N.. 2,2,0,G(6).G(
0):M.255.O.S.G$.G(20):U$.G(175)...T.. 1,
G(133):. 3,G(134)...U.. 5,G(135):. 7,G(1
36)...X.Z$.G(0):. 15,8,15.T.}.. G(144);G
(147);G(14);...... G(11);.10);...... "XM
ODEM FILE TRANSFER":....... 275:. R(255)
,S(255).?.... B.0 . 31:S(B).B:.:R(8).20.
`...R(13).13:S(20).8:. B.32 . 64.~...R(B
).B:S(B).B:.:S(160).32... .. B.65 . 90:I
.B.128:R(B).I.....S(I).B:.:. B.91 . 96:R
(B).B.....S(B).B:.:. B.97 . 122:I.B.32..
...R(B).I:S(I).B:.:. B.123 . 127.....I.B
.96:R(B).I:S(I).B:..,.... G(152);U$;.E..
..#2,B$:. B$."" . 200.].C.B.F(B$):. 245:
. 190.T.H.. B$:. B$."" . 190...M.B.F(B$)
...R.. B.132 . B.137 . 230...W.B.S(B):.2
,G(B);...... H . . 250.H.... 190...... G
$:. G(144);...... B.132 . 260,415,290,27
5...... 185...... ++ PRINT BYTE ++.1....
G$;G(R(B));U$;:..F.... ++ F1, ECHO ++.G
.... "ECHO: ";J("ON OFF",H.1,3).S...H.3.
H:....... ++ F7, HELP ++...... ".F1.=ECH
O .F3.=RECEIVE .F5.=TRANSMIT .F7.=HELP".
E.......... ++ F5, TRANSMIT FILE ++.. ".
. "NAME OF FILE TO UPLOAD:":B$."R".. '..
675:. F . ..: ,.C$.G(21):. 395:C$.C$.G(
6).R 1.. K.1 . M.1:K.K . M.` 6.. F . 370
.. ;.S.0:D$."":. I.1 . 128:.#8,B$.. @.B.
F(B$.Z$):D$.D$.G(B):S.S.B.. E.. ST . A.4
:F.1:. 335.. J...V O.. C(D$).128 . 345..
T.D$.D$.Z$:. 335.. Y.. 495..!^..2,G(1);
G(K);G(M.K);D$;G(S . M);.1!C.. 395:. J("
O+",C,1);.A!H.. C.1 . 345.I!M.. K.Y!R..:
8:. 700.O!W.. 485:. F.1 . 715..!|.. 39
5:. C.2 . 715..!... 375..!... ++ GET CON
TROL BYTE 100 SEC ++.I!... J.1 . 10:. 51
0..!... E . .:A.24:F.2..!....."... ++ F3
, RECEIVE FILE ++.3"... "FILENAME FOR DO
WNLOADED DATA:":B$."W":A.21.E"... 675:.
F . ..V"..C$.G(1).G(4).N"... K.1 . M.1:K
.K . M.|"... F . 470.."... J.1 . 10:. 48
5:A.21. "... 510.C"B.. C.1 . . 550:. J("
+O",E.1,1);.W"G.. C.2 . A.6:F.1.."L.. E
. F.0 . .:A.24:F.2.."Q.. K..#V..: 8:. 7
00..#... 485:. 715.7#... ++ SEND ANSWER
BYTE ++.L#... 495:.2,G(A);:..K#... ++ CL
EAR INPUT BUFFER ++.~#...:.#2,B$:. 730..
#... . W . 8:...#... ++ GET CONTROL BYTE
10 SEC ++.E#..E.0:P.600:T.TI.S#..C.3:.
620..#... E . . ".";:...$... B$.G(24) .
A.24:F.4:...$... C.1 . C(C$).+$... B$.J(
C$,C,1) . ..=$...:. 650:. 515.R$!.. ++ G
ET DATA ++.N$&.P.60:T.TI:. 620:. E . ...
$+.N.B:T.TI:. 620:. E . ...$0.. N.B..M .
E.1:. 650..$5.S.0:D$."":. I.1 . 128.S$:
.T.TI:. 620:. E . ...$?.D$.D$.G(B):S.S.B
:...%D.T.TI:. 620:. E . ...%I.. B..(S .
M) . E.1:. 650.0%N.A.6:D.K.N . M.E%S.. D
.1 . A.24:F.3.U%X.. D . E.1:..P%]..8,D$;
:. ST . A.24:F.5.V%B....%G.. ++ GET BYTE
++..%L..#2,B$:. 730:. W . 630..%Q.B.F(B
$.Z$):..M%V.. W . 247 . . 650..%{.. TI.T
.P . E.1:...%... 620..&... ++ SKIP UNTIL
SILENCE ++..&..U.TI.2&...#2,B$:. 730:.
W..8 . 650.D&... TI.U.60 . ..N&... 655.I
&... ++ TRANSFER BEGIN ++.&..F.0:N$."*"
:T$."P"..&..N$."":T$."":. "[ NAME, TYPE
]";N$,T$.Z&... N$."" . (T$.."P" . T$.."S
" . T$.."U") . 680..&... 8,8,8,"0:".N$."
,".T$.",".B$..'... ++ READ ERROR CHANNEL
++.2'...15,I,M$:. I.0 . ..M'A..".";M$:A
.24:F.5: 8:..F'F.. ++ TRANSFER END ++..
'K.M$."COMPLETETIMEOUT DISORDERCANCEL"..
'P.. J(M$,F.8.7,8):..B'U.. ** GET RS-232
STATUS **..'Z.W.B(2580):. 2580,0:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL