XMODEM 3.6
FILE INFORMATION
FILENAME(S): XMODEM 3.6
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-10-19 22:48:32
APPEARS ON: 1 disk(s)
FILE HASH
d859ae83123d649c31ca40a3e5b0023eaa522d3101bc1c50940b8328b62f3558
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HAL TERMS | XMODEM 3.6 | PRG | Radd Maxx | 26 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....... ********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 31 08 14 00 8F 20 |*********.1.... | 00000020: 2A 20 58 4D 4F 44 45 4D 20 36 34 20 33 2E 36 20 |* XMODEM 64 3.6 | 00000030: 2A 00 49 08 1E 00 8F 20 2A 20 20 4B 41 52 4C 20 |*.I.... * KARL | 00000040: 53 43 48 4D 49 54 54 20 2A 00 61 08 28 00 8F 20 |SCHMITT *.a.(.. | 00000050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000060: 2A 00 67 08 32 00 3A 00 9A 08 3C 00 97 35 33 32 |*.g.2.:...<..532| 00000070: 38 31 2C 2E 3A 97 35 33 32 38 30 2C 2E 3A 99 C7 |81,.:.53280,.:..| 00000080: 28 35 29 C7 28 31 34 32 29 3A 9F 35 2C 32 2C 33 |(5).(142):.5,2,3| 00000090: 2C C7 28 36 29 AA C7 28 2E 29 00 DA 08 46 00 9F |,.(6)..(.)...F..| 000000A0: 31 35 2C 38 2C 31 35 3A 55 B2 32 31 32 3A 44 B2 |15,8,15:U.212:D.| 000000B0: 32 35 36 3A 57 B2 31 3A 45 24 B2 C7 28 31 34 37 |256:W.1:E$..(147| 000000C0: 29 3A 43 B2 32 35 30 3A 53 B2 36 34 3A 50 24 B2 |):C.250:S.64:P$.| 000000D0: C7 28 31 39 29 3A 4F B2 38 3A 00 E9 08 50 00 52 |.(19):O.8:...P.R| 000000E0: 4F 24 B2 C7 28 31 34 36 29 00 02 09 5A 00 43 55 |O$..(146)...Z.CU| 000000F0: 24 B2 C7 28 31 34 35 29 3A 43 44 24 B2 C7 28 31 |$..(145):CD$..(1| 00000100: 37 29 00 24 09 64 00 42 4C 24 B2 C7 28 31 39 29 |7).$.d.BL$..(19)| 00000110: AA 43 44 24 AA 43 44 24 AA 43 44 24 AA 43 44 24 |.CD$.CD$.CD$.CD$| 00000120: AA 43 44 24 00 68 09 6E 00 45 52 24 B2 C7 28 31 |.CD$.h.n.ER$..(1| 00000130: 39 29 AA 43 44 24 AA 43 44 24 AA 43 44 24 AA 43 |9).CD$.CD$.CD$.C| 00000140: 44 24 AA 43 44 24 AA 43 44 24 AA 43 44 24 AA 43 |D$.CD$.CD$.CD$.C| 00000150: 44 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 20 |D$." | 00000160: 20 22 AA C7 28 31 33 29 00 A3 09 78 00 41 43 4B | "..(13)...x.ACK| 00000170: B2 36 3A 4E 41 4B B2 32 31 3A 45 4F 54 B2 34 3A |.6:NAK.21:EOT.4:| 00000180: 43 41 4E B2 32 34 3A 5A B2 31 33 31 3A 56 B2 31 |CAN.24:Z.131:V.1| 00000190: 33 32 3A 46 B2 32 35 35 3A 4D B2 32 38 38 3A 50 |32:F.255:M.288:P| 000001A0: B2 31 32 00 DE 09 82 00 43 24 B2 C7 28 2E 29 3A |.12.....C$..(.):| 000001B0: 52 24 B2 C7 28 31 38 29 3A 4A 24 B2 C7 28 31 33 |R$..(18):J$..(13| 000001C0: 29 3A 4F 24 B2 C7 28 31 38 29 AA C7 28 33 32 29 |):O$..(18)..(32)| 000001D0: AA C7 28 31 35 37 29 AA C7 28 31 34 36 29 00 F5 |..(157)..(146)..| 000001E0: 09 8C 00 99 45 24 4A 24 22 58 4D 4F 44 45 4D 20 |....E$J$"XMODEM | 000001F0: 36 34 22 4A 24 00 2B 0A 96 00 99 22 44 4F 57 4E |64"J$.+...."DOWN| 00000200: 4C 4F 41 44 20 26 20 55 50 4C 4F 41 44 22 3B 3A |LOAD & UPLOAD";:| 00000210: 47 24 B2 C7 28 31 33 33 29 3A 51 24 B2 C7 28 33 |G$..(133):Q$..(3| 00000220: 34 29 3A 49 24 B2 C7 28 32 30 29 00 58 0A A0 00 |4):I$..(20).X...| 00000230: 99 22 20 54 45 52 4D 49 4E 41 4C 20 50 52 47 22 |." TERMINAL PRG"| 00000240: 4A 24 4A 24 22 44 49 53 4B 20 56 45 52 53 49 4F |J$J$"DISK VERSIO| 00000250: 4E 20 33 2E 36 22 4A 24 00 73 0A AA 00 99 22 42 |N 3.6"J$.s...."B| 00000260: 59 20 4B 41 52 4C 20 53 43 48 4D 49 54 54 22 4A |Y KARL SCHMITT"J| 00000270: 24 4A 24 00 92 0A B4 00 99 22 48 49 54 20 3C 46 |$J$......"HIT <F| 00000280: 31 3E 20 46 4F 52 20 4D 41 49 4E 20 4D 45 4E 55 |1> FOR MAIN MENU| 00000290: 2E 22 00 D6 0A BE 00 99 4A 24 22 55 53 45 20 58 |."......J$"USE X| 000002A0: 4D 4F 44 45 4D 20 50 52 4F 54 4F 43 4F 4C 20 46 |MODEM PROTOCOL F| 000002B0: 4F 52 20 41 4C 4C 20 54 52 41 4E 53 46 45 52 53 |OR ALL TRANSFERS| 000002C0: 2E 22 4A 24 4A 24 3A 4C 24 B2 C7 28 33 32 29 AA |."J$J$:L$..(32).| 000002D0: C7 28 31 35 37 29 00 08 0B C8 00 99 22 31 2E 20 |.(157)......"1. | 000002E0: 42 55 4C 4C 45 54 49 4E 20 42 4F 41 52 44 22 4A |BULLETIN BOARD"J| 000002F0: 24 4A 24 22 32 2E 20 36 34 20 54 4F 20 36 34 22 |$J$"2. 64 TO 64"| 00000300: 4A 24 4A 24 4A 24 4A 24 00 37 0B D2 00 99 22 54 |J$J$J$J$.7...."T| 00000310: 59 50 45 20 31 20 4F 52 20 32 20 54 4F 20 42 45 |YPE 1 OR 2 TO BE| 00000320: 47 49 4E 2E 22 3A 8D 31 33 33 30 3A 8B 41 24 B2 |GIN.":.1330:.A$.| 00000330: 22 31 22 A7 32 34 30 00 4C 0B DC 00 8B 41 24 B2 |"1".240.L....A$.| 00000340: 22 32 22 A7 42 B2 57 3A 89 32 34 30 00 55 0B E6 |"2".B.W:.240.U..| 00000350: 00 89 31 34 30 00 6E 0B F0 00 86 46 25 28 46 29 |..140.n....F%(F)| 00000360: 2C 54 25 28 46 29 2C 55 25 28 50 2C 56 29 00 B8 |,T%(F),U%(P,V)..| 00000370: 0B FA 00 99 45 24 22 50 4C 45 41 53 45 20 53 54 |....E$"PLEASE ST| 00000380: 41 4E 44 20 42 59 20 46 4F 52 20 39 20 53 45 43 |AND BY FOR 9 SEC| 00000390: 4F 4E 44 53 2E 22 4A 24 4A 24 22 43 52 45 41 54 |ONDS."J$J$"CREAT| 000003A0: 49 4E 47 20 54 52 41 4E 53 4C 41 54 49 4F 4E 20 |ING TRANSLATION | 000003B0: 54 41 42 4C 45 53 2E 22 00 F8 0B 04 01 81 4A B2 |TABLES."......J.| 000003C0: 33 32 A4 36 34 3A 54 25 28 4A 29 B2 4A 3A 82 3A |32.64:T%(J).J:.:| 000003D0: 54 25 28 31 33 29 B2 31 33 3A 54 25 28 32 30 29 |T%(13).13:T%(20)| 000003E0: B2 38 3A 81 4A B2 36 35 A4 39 30 3A 54 25 28 4A |.8:.J.65.90:T%(J| 000003F0: 29 B2 4A AA 33 32 3A 82 00 32 0C 0E 01 81 4A B2 |).J.32:..2....J.| 00000400: 39 31 A4 39 35 3A 54 25 28 4A 29 B2 4A 3A 82 3A |91.95:T%(J).J:.:| 00000410: 81 4A B2 31 39 33 A4 32 31 38 3A 54 25 28 4A 29 |.J.193.218:T%(J)| 00000420: B2 4A AB 31 32 38 3A 82 3A 54 25 28 31 34 36 29 |.J.128:.:T%(146)| 00000430: B2 50 00 7A 0C 18 01 54 25 28 31 33 33 29 B2 50 |.P.z...T%(133).P| 00000440: 3A 54 25 28 31 34 37 29 B2 31 39 3A 54 25 28 31 |:T%(147).19:T%(1| 00000450: 33 37 29 B2 33 3A 54 25 28 31 33 34 29 B2 31 37 |37).3:T%(134).17| 00000460: 3A 54 25 28 31 33 38 29 B2 31 39 3A 81 4A B2 2E |:T%(138).19:.J..| 00000470: A4 46 3A 4B B2 54 25 28 4A 29 00 98 0C 22 01 8B |.F:K.T%(J)..."..| 00000480: 4B B3 B1 2E A7 46 25 28 4B 29 B2 4A 3A 46 25 28 |K....F%(K).J:F%(| 00000490: 4B AA 31 32 38 29 B2 4A 00 9E 0C 2C 01 82 00 A4 |K.128).J...,....| 000004A0: 0C 36 01 3A 00 CA 0C 40 01 8F 20 2D 2D 2D 2D 2D |.6.:...@.. -----| 000004B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000004C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 F0 0C 4A 01 8F |----------...J..| 000004D0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 54 45 52 4D | ---------- TERM| 000004E0: 49 4E 41 4C 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |INAL -----------| 000004F0: 00 16 0D 54 01 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |...T.. ---------| 00000500: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000510: 2D 2D 2D 2D 2D 2D 00 1C 0D 5E 01 3A 00 28 0D 68 |------...^.:.(.h| 00000520: 01 99 C7 28 31 34 32 29 00 66 0D 72 01 99 45 24 |...(142).f.r..E$| 00000530: 22 54 45 52 4D 49 4E 41 4C 20 4D 4F 44 45 20 2E |"TERMINAL MODE .| 00000540: 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 3C 46 31 3E 20 4D |......... <F1> M| 00000550: 41 49 4E 20 4D 45 4E 55 22 43 44 24 43 44 24 3A |AIN MENU"CD$CD$:| 00000560: 99 C7 28 33 30 29 00 8C 0D 7C 01 8B 41 24 B2 C7 |..(30)...|..A$..| 00000570: 28 43 41 4E 29 A7 99 22 54 52 41 4E 53 46 45 52 |(CAN).."TRANSFER| 00000580: 20 43 41 4E 43 45 4C 4C 45 44 21 22 00 D5 0D 86 | CANCELLED!"....| 00000590: 01 8B 46 41 B2 57 A7 99 22 57 48 45 4E 20 48 4F |..FA.W.."WHEN HO| 000005A0: 53 54 20 49 53 20 52 45 41 44 59 20 54 4F 20 52 |ST IS READY TO R| 000005B0: 45 43 49 45 56 45 2C 20 48 49 54 20 46 31 22 4A |ECIEVE, HIT F1"J| 000005C0: 24 22 46 4F 52 20 4D 41 49 4E 20 4D 45 4E 55 20 |$"FOR MAIN MENU | 000005D0: 41 4E 44 22 3B 00 FC 0D 90 01 8B 46 41 B2 57 A7 |AND";......FA.W.| 000005E0: 46 41 B2 2E 3A 99 22 20 53 54 41 52 54 20 54 48 |FA..:." START TH| 000005F0: 45 20 55 50 4C 4F 41 44 2E 22 4A 24 00 12 0E 9A |E UPLOAD."J$....| 00000600: 01 A1 23 35 2C 41 24 3A 8B 41 24 B2 22 22 A7 34 |..#5,A$:.A$."".4| 00000610: 34 30 00 33 0E A4 01 99 4C 24 C7 28 46 25 28 C6 |40.3....L$.(F%(.| 00000620: 28 41 24 29 29 29 3B 3A 8B 41 24 B2 51 24 A7 97 |(A$)));:.A$.Q$..| 00000630: 55 2C 2E 00 3C 0E AE 01 89 34 31 30 00 54 0E B8 |U,..<....410.T..| 00000640: 01 99 4F 24 3B 3A A1 41 24 3A 8B 41 24 B2 22 22 |..O$;:.A$:.A$.""| 00000650: A7 34 31 30 00 8C 0E C2 01 8B 42 B2 57 A7 3A 58 |.410......B.W.:X| 00000660: B2 C6 28 41 24 29 3A 8B 58 B2 31 33 B0 58 B2 31 |..(A$):.X.13.X.1| 00000670: 34 35 B0 58 B2 31 35 37 B0 58 B2 32 39 B0 58 B2 |45.X.157.X.29.X.| 00000680: 31 37 B0 58 B2 31 39 A7 99 4C 24 3B 00 A7 0E CC |17.X.19..L$;....| 00000690: 01 8B 42 B2 57 A7 99 41 24 3B 3A 8B 41 24 B2 51 |..B.W..A$;:.A$.Q| 000006A0: 24 A7 97 55 2C 2E 3A 00 C3 0E D6 01 8B 41 24 B2 |$..U,.:......A$.| 000006B0: 47 24 A7 99 4C 24 4A 24 3A 99 C7 28 35 29 3A 89 |G$..L$J$:..(5):.| 000006C0: 38 30 30 00 DD 0E E0 01 98 35 2C C7 28 54 25 28 |800......5,.(T%(| 000006D0: C6 28 41 24 29 29 29 3B 3A 89 34 31 30 00 E3 0E |.(A$)));:.410...| 000006E0: EA 01 3A 00 09 0F F4 01 8F 20 2D 2D 2D 2D 2D 2D |..:...... ------| 000006F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000700: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 2F 0F FE 01 8F 20 |---------./.... | 00000710: 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 44 4F 57 4E 4C 4F |--------- DOWNLO| 00000720: 41 44 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |AD ------------.| 00000730: 55 0F 08 02 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |U.... ----------| 00000740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000750: 2D 2D 2D 2D 2D 00 5B 0F 12 02 3A 00 9C 0F 1C 02 |-----.[...:.....| 00000760: 99 45 24 22 49 53 20 48 4F 53 54 20 43 4F 4D 50 |.E$"IS HOST COMP| 00000770: 55 54 45 52 20 57 41 49 54 49 4E 47 20 54 4F 20 |UTER WAITING TO | 00000780: 53 45 4E 44 3F 20 59 2F 4E 22 3A 8D 31 33 33 30 |SEND? Y/N":.1330| 00000790: 3A 8B 41 24 B2 22 4E 22 A7 33 36 30 00 B1 0F 26 |:.A$."N".360...&| 000007A0: 02 99 4A 24 3A 8B 41 24 B3 B1 22 59 22 A7 35 34 |..J$:.A$.."Y".54| 000007B0: 30 00 D0 0F 30 02 47 B2 33 3A 4B 24 B2 22 57 22 |0...0.G.3:K$."W"| 000007C0: 3A 8D 38 35 30 3A 99 3A 42 4C B2 2E 3A 4E B2 2E |:.850:.:BL..:N..| 000007D0: 00 FC 0F 3A 02 99 4A 24 22 44 4F 57 4E 4C 4F 41 |...:..J$"DOWNLOA| 000007E0: 44 49 4E 47 20 20 22 46 24 45 52 24 22 43 48 52 |DING "F$ER$"CHR| 000007F0: 24 28 31 37 29 53 54 41 54 55 53 22 00 07 10 44 |$(17)STATUS"...D| 00000800: 02 81 48 B2 57 A4 50 00 35 10 4E 02 43 48 B2 2E |..H.W.P.5.N.CH..| 00000810: 3A 81 58 B2 57 A4 56 3A A1 23 35 2C 41 24 3A 45 |:.X.W.V:.#5,A$:E| 00000820: B2 53 54 3A 8B 41 24 B2 22 22 A7 8B 45 B2 4F A7 |.ST:.A$.""..E.O.| 00000830: 4C B2 4C AA 57 00 47 10 58 02 8B 45 B2 2E A7 4C |L.L.W.G.X..E...L| 00000840: B2 2E 3A 89 36 33 30 00 6D 10 62 02 8B 4C B2 4D |..:.630.m.b..L.M| 00000850: A7 4C B2 2E 3A 8D 31 33 38 30 3A 99 42 4C 24 22 |.L..:.1380:.BL$"| 00000860: 57 41 49 54 49 4E 47 22 3A 89 35 38 30 00 76 10 |WAITING":.580.v.| 00000870: 6C 02 89 35 39 30 00 95 10 76 02 8B 58 B2 57 A7 |l..590...v..X.W.| 00000880: 8B 41 24 B2 C7 28 45 4F 54 29 A7 8D 31 33 37 30 |.A$..(EOT)..1370| 00000890: 3A 89 37 34 30 00 C8 10 80 02 55 25 28 48 2C 58 |:.740.....U%(H,X| 000008A0: 29 B2 C6 28 41 24 AA 43 24 29 3A 43 48 B2 43 48 |)..(A$.C$):CH.CH| 000008B0: AA 55 25 28 48 2C 58 29 3A 82 3A 43 48 B2 43 48 |.U%(H,X):.:CH.CH| 000008C0: AB 55 25 28 48 2C 56 29 00 08 11 8A 02 8B 28 55 |.U%(H,V)......(U| 000008D0: 25 28 48 2C 57 29 AA 55 25 28 48 2C 32 29 AA 55 |%(H,W).U%(H,2).U| 000008E0: 25 28 48 2C 33 29 AF 20 46 29 B3 B1 2E A7 8D 31 |%(H,3). F).....1| 000008F0: 33 38 30 3A 99 45 52 24 22 53 4F 48 20 45 52 52 |380:.ER$"SOH ERR| 00000900: 4F 52 22 3A 89 35 39 30 00 3D 11 94 02 8B 55 25 |OR":.590.=....U%| 00000910: 28 48 2C 56 29 B3 B1 28 43 48 AF 46 29 A7 8D 31 |(H,V)..(CH.F)..1| 00000920: 33 38 30 3A 99 45 52 24 22 43 48 45 43 4B 53 55 |380:.ER$"CHECKSU| 00000930: 4D 20 45 52 52 4F 52 22 3A 89 35 39 30 00 57 11 |M ERROR":.590.W.| 00000940: 9E 02 42 4C B2 42 4C AA 57 3A 99 42 4C 24 22 42 |..BL.BL.W:.BL$"B| 00000950: 4C 4F 43 4B 22 42 4C 00 8E 11 A8 02 8B 55 25 28 |LOCK"BL......U%(| 00000960: 48 2C 32 29 B3 B1 42 4C A7 42 4C B2 42 4C AB 31 |H,2)..BL.BL.BL.1| 00000970: 3A 8D 31 33 37 30 3A 99 45 52 24 22 44 55 50 4C |:.1370:.ER$"DUPL| 00000980: 49 43 41 54 45 20 42 4C 22 3A 89 35 39 30 00 9E |ICATE BL":.590..| 00000990: 11 B2 02 8B 48 B3 B1 50 A7 8D 31 33 37 30 00 AA |....H..P..1370..| 000009A0: 11 BC 02 82 3A 48 B2 48 AB 57 00 BC 11 C6 02 8B |....:H.H.W......| 000009B0: 4E B2 57 A7 8B 48 B2 2E A7 37 34 30 00 E3 11 D0 |N.W..H...740....| 000009C0: 02 81 59 B2 31 A4 48 3A 81 58 B2 45 4F 54 A4 5A |..Y.1.H:.X.EOT.Z| 000009D0: 3A 98 33 2C C7 28 55 25 28 59 2C 58 29 29 3B 3A |:.3,.(U%(Y,X));:| 000009E0: 82 3A 82 00 F2 11 DA 02 8D 31 33 37 30 3A 89 35 |.:.......1370:.5| 000009F0: 38 30 00 22 12 E4 02 81 41 B2 57 A4 48 3A 81 52 |80."....A.W.H:.R| 00000A00: B2 45 4F 54 A4 5A 3A 98 33 2C C7 28 55 25 28 41 |.EOT.Z:.3,.(U%(A| 00000A10: 2C 52 29 29 3B 3A 82 3A 82 3A A0 33 3A 89 31 34 |,R));:.:.:.3:.14| 00000A20: 33 30 00 28 12 EE 02 3A 00 4E 12 F8 02 8F 20 2D |30.(...:.N.... -| 00000A30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000A40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 74 |--------------.t| 00000A50: 12 02 03 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 |.... ---------- | 00000A60: 4D 45 4E 55 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |MENU -----------| 00000A70: 2D 2D 2D 2D 00 9A 12 0C 03 8F 20 2D 2D 2D 2D 2D |----...... -----| 00000A80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000A90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 A0 12 16 03 3A |----------.....:| 00000AA0: 00 AE 12 20 03 99 C7 28 31 34 32 29 45 24 00 F9 |... ...(142)E$..| 00000AB0: 12 2A 03 99 45 24 43 44 24 43 44 24 22 20 31 2E |.*..E$CD$CD$" 1.| 00000AC0: 20 44 4F 57 4E 4C 4F 41 44 22 4A 24 22 20 32 2E | DOWNLOAD"J$" 2.| 00000AD0: 20 55 50 4C 4F 41 44 22 4A 24 22 20 33 2E 20 54 | UPLOAD"J$" 3. T| 00000AE0: 45 52 4D 49 4E 41 4C 22 4A 24 22 20 34 2E 20 44 |ERMINAL"J$" 4. D| 00000AF0: 49 52 45 43 54 4F 52 59 22 00 36 13 34 03 99 22 |IRECTORY".6.4.."| 00000B00: 20 35 2E 20 53 54 41 52 54 20 55 50 4C 4F 41 44 | 5. START UPLOAD| 00000B10: 22 4A 24 22 20 36 2E 20 43 48 41 4E 47 45 20 4D |"J$" 6. CHANGE M| 00000B20: 4F 44 45 53 22 4A 24 22 20 37 2E 20 45 4E 44 22 |ODES"J$" 7. END"| 00000B30: 3A 8D 31 33 33 30 00 61 13 3E 03 91 C5 28 41 24 |:.1330.a.>...(A$| 00000B40: 29 89 35 34 30 2C 39 39 30 2C 33 36 30 2C 31 32 |).540,990,360,12| 00000B50: 33 30 2C 31 35 30 30 2C 31 33 36 30 2C 31 33 35 |30,1500,1360,135| 00000B60: 30 00 6A 13 48 03 89 38 31 30 00 A6 13 52 03 99 |0.j.H..810...R..| 00000B70: 45 24 3A 99 22 46 49 4C 45 4E 41 4D 45 20 45 22 |E$:."FILENAME E"| 00000B80: 52 24 22 58 22 52 4F 24 22 49 54 2E 20 22 3B 3A |R$"X"RO$"IT. ";:| 00000B90: 46 24 B2 22 22 3A 85 20 46 24 3A 8B 46 24 B2 22 |F$."":. F$:.F$."| 00000BA0: 58 22 A7 38 30 30 00 B6 13 5C 03 8B 20 46 24 B2 |X".800...\.. F$.| 00000BB0: 22 22 A7 38 35 30 00 FD 13 66 03 99 45 24 22 46 |"".850...f..E$"F| 00000BC0: 49 4C 45 54 59 50 45 20 22 52 24 22 50 22 52 4F |ILETYPE "R$"P"RO| 00000BD0: 24 22 52 4F 47 52 41 4D 20 22 52 24 22 53 22 52 |$"ROGRAM "R$"S"R| 00000BE0: 4F 24 22 45 51 55 45 4E 54 49 41 4C 20 45 22 52 |O$"EQUENTIAL E"R| 00000BF0: 24 22 58 22 52 4F 24 22 49 54 20 22 3B 00 0E 14 |$"X"RO$"IT ";...| 00000C00: 70 03 46 54 24 B2 22 22 3A 85 20 46 54 24 00 20 |p.FT$."":. FT$. | 00000C10: 14 7A 03 8B 20 46 54 24 B2 22 58 22 A7 38 30 30 |.z.. FT$."X".800| 00000C20: 00 31 14 84 03 8B 20 46 54 24 B2 22 22 A7 38 37 |.1.... FT$."".87| 00000C30: 30 00 42 14 8E 03 46 54 24 B2 C8 28 46 54 24 2C |0.B...FT$..(FT$,| 00000C40: 57 29 00 7D 14 98 03 9F 47 2C 38 2C 47 2C 22 30 |W).}....G,8,G,"0| 00000C50: 3A 22 AA 46 24 AA 22 2C 22 AA 46 54 24 AA 22 2C |:".F$.",".FT$.",| 00000C60: 22 AA 4B 24 3A 84 31 35 2C 41 2C 42 24 3A 99 45 |".K$:.15,A,B$:.E| 00000C70: 24 3B 41 3B 42 24 3A 8B 41 B2 2E A7 8E 00 89 14 |$;A;B$:.A.......| 00000C80: A2 03 A0 47 3A 89 38 31 30 00 8F 14 AC 03 3A 00 |...G:.810.....:.| 00000C90: B5 14 B6 03 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..... ----------| 00000CA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000CB0: 2D 2D 2D 2D 2D 00 DB 14 C0 03 8F 20 2D 2D 2D 2D |-----...... ----| 00000CC0: 2D 2D 2D 2D 2D 2D 2D 20 55 50 4C 4F 41 44 20 2D |------- UPLOAD -| 00000CD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 01 15 CA 03 |-----------.....| 00000CE0: 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |. --------------| 00000CF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000D00: 2D 00 07 15 D4 03 3A 00 25 15 DE 03 47 B2 36 3A |-.....:.%...G.6:| 00000D10: 4B 24 B2 22 52 22 3A 8D 38 35 30 3A 42 4C B2 2E |K$."R":.850:BL..| 00000D20: 3A 46 41 B2 57 00 52 15 E8 03 99 45 52 24 43 55 |:FA.W.R....ER$CU| 00000D30: 24 22 20 52 45 41 44 49 4E 47 20 20 20 20 20 20 |$" READING | 00000D40: 22 3A 81 59 B2 57 A4 50 3A 55 25 28 59 2C 57 29 |":.Y.W.P:U%(Y,W)| 00000D50: B2 57 00 99 15 F2 03 42 4C B2 42 4C AA 57 3A 55 |.W.....BL.BL.W:U| 00000D60: 25 28 59 2C 32 29 B2 42 4C 3A 55 25 28 59 2C 33 |%(Y,2).BL:U%(Y,3| 00000D70: 29 B2 46 AB 42 4C 3A 43 48 B2 57 AA 55 25 28 59 |).F.BL:CH.W.U%(Y| 00000D80: 2C 32 29 AA 55 25 28 59 2C 33 29 3A 99 45 52 24 |,2).U%(Y,3):.ER$| 00000D90: 22 42 4C 4F 43 4B 22 42 4C 00 B8 15 FC 03 81 58 |"BLOCK"BL......X| 00000DA0: B2 45 4F 54 A4 5A 3A A1 23 36 2C 42 24 3A 8B 53 |.EOT.Z:.#6,B$:.S| 00000DB0: 54 B2 2E A7 31 30 34 30 00 F7 15 06 04 46 4C B2 |T...1040.....FL.| 00000DC0: 59 3A 43 48 B2 43 48 AA 55 25 28 59 2C 58 29 3A |Y:CH.CH.U%(Y,X):| 00000DD0: 81 41 B2 58 AA 57 A4 5A 3A 55 25 28 59 2C 41 29 |.A.X.W.Z:U%(Y,A)| 00000DE0: B2 2E 3A 82 3A 55 25 28 59 2C 56 29 B2 43 48 AF |..:.:U%(Y,V).CH.| 00000DF0: 46 3A 89 31 30 35 30 00 31 16 10 04 55 25 28 59 |F:.1050.1...U%(Y| 00000E00: 2C 58 29 B2 C6 28 42 24 AA 43 24 29 3A 43 48 B2 |,X)..(B$.C$):CH.| 00000E10: 43 48 AA 55 25 28 59 2C 58 29 3A 82 3A 55 25 28 |CH.U%(Y,X):.:U%(| 00000E20: 59 2C 56 29 B2 43 48 AF 46 3A 82 3A 59 B2 59 AB |Y,V).CH.F:.:Y.Y.| 00000E30: 57 00 3F 16 1A 04 8B 46 41 B2 57 A7 33 36 30 00 |W.?....FA.W.360.| 00000E40: 5B 16 24 04 A1 23 35 2C 41 24 3A 8B 41 24 B3 B1 |[.$..#5,A$:.A$..| 00000E50: C7 28 4E 41 4B 29 A7 31 30 36 30 00 6B 16 2E 04 |.(NAK).1060.k...| 00000E60: 42 4C B2 42 4C AB 59 3A 59 B2 2E 00 A0 16 38 04 |BL.BL.Y:Y.....8.| 00000E70: 99 45 52 24 43 55 24 22 20 55 50 4C 4F 41 44 20 |.ER$CU$" UPLOAD | 00000E80: 53 54 41 54 55 53 22 4A 24 22 4E 41 4B 22 42 4C |STATUS"J$"NAK"BL| 00000E90: 24 43 55 24 22 20 55 50 4C 4F 41 44 49 4E 47 22 |$CU$" UPLOADING"| 00000EA0: 00 B2 16 42 04 59 B2 59 AA 57 3A 42 4C B2 42 4C |...B.Y.Y.W:BL.BL| 00000EB0: AA 57 00 DC 16 4C 04 99 42 4C 24 22 42 4C 4F 43 |.W...L..BL$"BLOC| 00000EC0: 4B 22 42 4C 3A 81 58 B2 57 A4 56 3A 98 35 2C C7 |K"BL:.X.W.V:.5,.| 00000ED0: 28 55 25 28 59 2C 58 29 29 3B 3A 82 00 00 17 56 |(U%(Y,X));:....V| 00000EE0: 04 81 41 B2 2E A4 31 32 30 30 3A A1 23 35 2C 41 |..A...1200:.#5,A| 00000EF0: 24 3A 8B 41 24 B2 22 22 A7 82 3A 89 31 31 30 30 |$:.A$.""..:.1100| 00000F00: 00 24 17 60 04 8B 41 24 B2 C7 28 41 43 4B 29 A7 |.$.`..A$..(ACK).| 00000F10: 8B 59 B2 50 A7 99 45 52 24 22 41 43 4B 22 3A 89 |.Y.P..ER$"ACK":.| 00000F20: 31 30 30 30 00 4A 17 6A 04 8B 41 24 B2 C7 28 41 |1000.J.j..A$..(A| 00000F30: 43 4B 29 A7 8B 46 4C B3 B1 59 A7 99 45 52 24 22 |CK)..FL..Y..ER$"| 00000F40: 41 43 4B 22 3A 89 31 30 39 30 00 79 17 74 04 8B |ACK":.1090.y.t..| 00000F50: 41 24 B2 C7 28 41 43 4B 29 A7 8B 46 4C B2 59 A7 |A$..(ACK)..FL.Y.| 00000F60: 46 4C B2 2E 3A 8D 31 34 30 30 3A 8D 31 34 31 30 |FL..:.1400:.1410| 00000F70: 3A A0 36 3A 89 31 34 33 30 00 98 17 7E 04 8B 41 |:.6:.1430...~..A| 00000F80: 24 B2 C7 28 4E 41 4B 29 A7 99 45 52 24 22 4E 41 |$..(NAK)..ER$"NA| 00000F90: 4B 22 3A 89 31 31 30 30 00 B0 17 88 04 8B 41 24 |K":.1100......A$| 00000FA0: B2 C7 28 43 41 4E 29 A7 A0 36 3A 89 31 34 33 30 |..(CAN)..6:.1430| 00000FB0: 00 BA 17 92 04 89 31 31 31 30 00 C0 17 9C 04 3A |......1110.....:| 00000FC0: 00 E6 17 A6 04 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |...... ---------| 00000FD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000FE0: 2D 2D 2D 2D 2D 2D 00 0C 18 B0 04 8F 20 2D 2D 2D |------...... ---| 00000FF0: 2D 2D 2D 2D 2D 2D 20 44 49 52 45 43 54 4F 52 59 |------ DIRECTORY| 00001000: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 32 18 BA | -----------.2..| 00001010: 04 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------| 00001020: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001030: 2D 2D 00 38 18 C4 04 3A 00 56 18 CE 04 99 45 24 |--.8...:.V....E$| 00001040: 3A 9F 31 2C 38 2C 30 2C 22 24 30 22 3A A1 23 31 |:.1,8,0,"$0":.#1| 00001050: 2C 41 24 2C 41 24 00 70 18 D8 04 A1 23 31 2C 41 |,A$,A$.p....#1,A| 00001060: 24 2C 41 24 3A 8B 41 24 B2 22 22 A7 31 32 38 30 |$,A$:.A$."".1280| 00001070: 00 94 18 E2 04 A1 23 31 2C 41 24 2C 42 24 3A 99 |......#1,A$,B$:.| 00001080: C6 28 41 24 AA 43 24 29 AA C6 28 42 24 AA 43 24 |.(A$.C$)..(B$.C$| 00001090: 29 AC 44 3B 00 AE 18 EC 04 A1 23 31 2C 41 24 3A |).D;......#1,A$:| 000010A0: 8B 41 24 B2 22 22 A7 99 3A 89 31 32 34 30 00 BD |.A$.""..:.1240..| 000010B0: 18 F6 04 99 41 24 3B 3A 89 31 32 36 30 00 F3 18 |....A$;:.1260...| 000010C0: 00 05 A0 31 3A 99 43 44 24 43 44 24 C7 28 33 30 |...1:.CD$CD$.(30| 000010D0: 29 22 20 22 52 24 22 20 20 20 20 20 20 20 20 20 |)" "R$" | 000010E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000010F0: 20 20 22 00 3F 19 0A 05 99 22 20 22 52 24 22 20 | ".?...." "R$" | 00001100: 50 52 45 53 53 20 3C 46 31 3E 20 20 46 4F 52 20 |PRESS <F1> FOR | 00001110: 4D 41 49 4E 20 4D 45 4E 55 20 22 3A 99 22 20 22 |MAIN MENU ":." "| 00001120: 52 24 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |R$" | 00001130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".| 00001140: 55 19 14 05 A1 20 41 24 3A 8B 20 41 24 B2 22 22 |U.... A$:. A$.""| 00001150: A7 31 33 30 30 00 67 19 1E 05 8B 20 41 24 B3 B1 |.1300.g.... A$..| 00001160: 47 24 A7 31 33 30 30 00 76 19 28 05 99 C7 28 35 |G$.1300.v.(...(5| 00001170: 29 3A 89 38 31 30 00 8C 19 32 05 A1 20 41 24 3A |):.810...2.. A$:| 00001180: 8B 20 41 24 B2 22 22 A7 31 33 33 30 00 92 19 3C |. A$."".1330...<| 00001190: 05 8E 00 98 19 46 05 80 00 9E 19 50 05 8A 00 BD |.....F.....P....| 000011A0: 19 5A 05 98 35 2C C7 28 41 43 4B 29 3B 3A 99 45 |.Z..5,.(ACK);:.E| 000011B0: 52 24 22 41 43 4B 22 3A 51 B2 2E 3A 8E 00 E6 19 |R$"ACK":Q..:....| 000011C0: 64 05 51 B2 51 AA 57 3A 8B 51 B2 31 31 A7 A0 33 |d.Q.Q.W:.Q.11..3| 000011D0: 3A 41 24 B2 C7 28 43 41 4E 29 3A 98 35 2C 41 24 |:A$..(CAN):.5,A$| 000011E0: 3A 89 31 34 33 30 00 01 1A 6E 05 98 35 2C C7 28 |:.1430...n..5,.(| 000011F0: 4E 41 4B 29 3B 3A 99 45 52 24 22 4E 41 4B 22 3A |NAK);:.ER$"NAK":| 00001200: 8E 00 1C 1A 78 05 98 35 2C C7 28 45 4F 54 29 3B |....x..5,.(EOT);| 00001210: 3A 99 45 52 24 22 45 4F 54 22 3A 8E 00 33 1A 82 |:.ER$"EOT":..3..| 00001220: 05 A1 23 35 2C 41 24 3A 8B 41 24 B2 22 22 A7 31 |..#5,A$:.A$."".1| 00001230: 34 31 30 00 39 1A 8C 05 8E 00 5E 1A 96 05 99 22 |410.9.....^...."| 00001240: 48 49 54 20 41 4E 59 20 4B 45 59 20 46 4F 52 20 |HIT ANY KEY FOR | 00001250: 54 45 52 4D 49 4E 41 4C 20 4D 4F 44 45 22 00 6B |TERMINAL MODE".k| 00001260: 1A A0 05 53 4F B2 35 34 32 37 32 00 8D 1A AA 05 |...SO.54272.....| 00001270: 97 53 4F AA 31 2C 32 35 30 3A 97 53 4F AA 35 2C |.SO.1,250:.SO.5,| 00001280: 31 30 3A 97 53 4F AA 31 35 2C 32 30 30 00 C3 1A |10:.SO.15,200...| 00001290: B4 05 97 53 4F AA 32 34 2C 31 35 3A 81 43 4C B2 |...SO.24,15:.CL.| 000012A0: 31 A4 31 32 3A 97 53 4F AA 34 2C 32 31 3A 81 54 |1.12:.SO.4,21:.T| 000012B0: 4D B2 31 A4 31 32 35 30 3A 82 3A 97 53 4F AA 34 |M.1.1250:.:.SO.4| 000012C0: 2C 32 30 00 D7 1A BE 05 A1 42 24 3A 8B 42 24 B2 |,20......B$:.B$.| 000012D0: 22 22 A7 31 34 35 30 00 F8 1A C8 05 53 4F B2 35 |"".1450.....SO.5| 000012E0: 34 32 37 32 3A 81 43 4C B2 2E A4 32 34 3A 97 53 |4272:.CL...24:.S| 000012F0: 4F AA 43 4C 2C 2E 3A 82 00 01 1B D2 05 89 33 36 |O.CL,.:.......36| 00001300: 30 00 45 1B DC 05 99 45 24 22 49 53 20 48 4F 53 |0.E....E$"IS HOS| 00001310: 54 20 43 4F 4D 50 55 54 45 52 20 52 45 41 44 59 |T COMPUTER READY| 00001320: 20 54 4F 20 52 45 43 49 45 56 45 3F 20 59 2F 4E | TO RECIEVE? Y/N| 00001330: 22 4A 24 3A 8D 31 33 33 30 3A 8B 41 24 B2 22 4E |"J$:.1330:.A$."N| 00001340: 22 A7 33 36 30 00 57 1B E6 05 8B 41 24 B3 B1 22 |".360.W....A$.."| 00001350: 59 22 A7 31 35 30 30 00 9E 1B F0 05 99 45 24 22 |Y".1500......E$"| 00001360: 48 41 56 45 20 54 48 45 20 46 49 52 53 54 20 31 |HAVE THE FIRST 1| 00001370: 32 20 28 4F 52 20 4C 45 53 53 29 20 42 4C 4F 43 |2 (OR LESS) BLOC| 00001380: 4B 53 20 54 4F 20 20 20 55 50 4C 4F 41 44 20 42 |KS TO UPLOAD B| 00001390: 45 45 4E 20 52 45 41 44 20 59 45 54 3F 22 00 B4 |EEN READ YET?"..| 000013A0: 1B FA 05 8D 31 33 33 30 3A 8B 41 24 B2 22 4E 22 |....1330:.A$."N"| 000013B0: A7 33 36 30 00 C6 1B 04 06 8B 41 24 B3 B1 22 59 |.360......A$.."Y| 000013C0: 22 A7 31 35 32 30 00 E3 1B 0E 06 99 45 24 22 55 |".1520......E$"U| 000013D0: 50 4C 4F 41 44 49 4E 47 20 20 22 46 24 3A 89 31 |PLOADING "F$:.1| 000013E0: 30 35 30 00 00 00 |050... |
....... *****************.1.... * XMODEM
64 3.6 *.I.... * KARL SCHMITT *.A.(..
*****************.G.2.:...<..53281,.:.53
280,.:.G(5)G(142):.5,2,3,G(6).G(.).Z.F..
15,8,15:U.212:D.256:W.1:E$.G(147):C.250:
S.64:P$.G(19):O.8:...P.RO$.G(146)...Z.CU
$.G(145):CD$.G(17).$.D.BL$.G(19).CD$.CD$
.CD$.CD$.CD$.H.N.ER$.G(19).CD$.CD$.CD$.C
D$.CD$.CD$.CD$.CD$." ".G(13)
...X.ACK.6:NAK.21:EOT.4:CAN.24:Z.131:V.1
32:F.255:M.288:P.12.....C$.G(.):R$.G(18)
:J$.G(13):O$.G(18).G(32).G(157).G(146)..
....E$J$"XMODEM 64"J$.+...."DOWNLOAD & U
PLOAD";:G$.G(133):Q$.G(34):I$.G(20).X. .
." TERMINAL PRG"J$J$"DISK VERSION 3.6"J$
.S...."BY KARL SCHMITT"J$J$......"HIT <F
1> FOR MAIN MENU.".V....J$"USE XMODEM PR
OTOCOL FOR ALL TRANSFERS."J$J$:L$.G(32).
G(157)...H.."1. BULLETIN BOARD"J$J$"2. 6
4 TO 64"J$J$J$J$.7.R.."TYPE 1 OR 2 TO BE
GIN.":.1330:.A$."1".240.L....A$."2".B.W:
.240.U....140.N....F%(F),T%(F),U%(P,V)..
....E$"PLEASE STAND BY FOR 9 SECONDS."J$
J$"CREATING TRANSLATION TABLES."......J.
32.64:T%(J).J:.:T%(13).13:T%(20).8:.J.65
.90:T%(J).J.32:..2....J.91.95:T%(J).J:.:
.J.193.218:T%(J).J.128:.:T%(146).P.Z...T
%(133).P:T%(147).19:T%(137).3:T%(134).17
:T%(138).19:.J...F:K.T%(J)..."..K....F%(
K).J:F%(K.128).J...,.....6.:.J.@.. -----
--------------------------...J.. -------
--- TERMINAL -----------...T.. ---------
----------------------...^.:.(.H..G(142)
.F.R..E$"TERMINAL MODE .......... <F1> M
AIN MENU"CD$CD$:.G(30)...|..A$.G(CAN).."
TRANSFER CANCELLED!".U....FA.W.."WHEN HO
ST IS READY TO RECIEVE, HIT F1"J$"FOR MA
IN MENU AND";......FA.W.FA..:." START TH
E UPLOAD."J$......#5,A$:.A$."".440.3....
L$G(F%(F(A$)));:.A$.Q$..U,..<....410.T..
..O$;:.A$:.A$."".410...B..B.W.:X.F(A$):.
X.13.X.145.X.157.X.29.X.17.X.19..L$;...L
..B.W..A$;:.A$.Q$..U,.:.C.V..A$.G$..L$J$
:.G(5):.800......5,G(T%(F(A$)));:.410...
..:...... ------------------------------
-./.... --------- DOWNLOAD ------------.
U.... -------------------------------.[.
..:......E$"IS HOST COMPUTER WAITING TO
SEND? Y/N":.1330:.A$."N".360...&..J$:.A$
.."Y".540.P.0.G.3:K$."W":.850:.:BL..:N..
...:..J$"DOWNLOADING "F$ER$"CHR$(17)STA
TUS"...D..H.W.P.5.N.CH..:.X.W.V:.#5,A$:E
.ST:.A$.""..E.O.L.L.W.G.X..E...L..:.630.
M.B..L.M.L..:.1380:.BL$"WAITING":.580.V.
L..590...V..X.W..A$.G(EOT)..1370:.740.H.
..U%(H,X).F(A$.C$):CH.CH.U%(H,X):.:CH.CH
.U%(H,V)......(U%(H,W).U%(H,2).U%(H,3).
F).....1380:.ER$"SOH ERROR":.590.=....U%
(H,V)..(CH.F)..1380:.ER$"CHECKSUM ERROR"
:.590.W...BL.BL.W:.BL$"BLOCK"BL......U%(
H,2)..BL.BL.BL.1:.1370:.ER$"DUPLICATE BL
":.590......H..P..1370......:H.H.W...F..
N.W..H...740...P..Y.1.H:.X.EOT.Z:.3,G(U%
(Y,X));:.:....Z..1370:.580."....A.W.H:.R
.EOT.Z:.3,G(U%(A,R));:.:.: 3:.1430.(...:
.N.... -------------------------------.T
.... ---------- MENU ---------------....
.. -------------------------------. ...:
... ..G(142)E$...*..E$CD$CD$" 1. DOWNLOA
D"J$" 2. UPLOAD"J$" 3. TERMINAL"J$" 4. D
IRECTORY".6.4.." 5. START UPLOAD"J$" 6.
CHANGE MODES"J$" 7. END":.1330.A.>..E(A$
).540,990,360,1230,1500,1360,1350.J.H..8
10...R..E$:."FILENAME E"R$"X"RO$"IT. ";:
F$."":. F$:.F$."X".800...\.. F$."".850..
.F..E$"FILETYPE "R$"P"RO$"ROGRAM "R$"S"R
O$"EQUENTIAL E"R$"X"RO$"IT ";...P.FT$.""
:. FT$. .Z.. FT$."X".800.1.... FT$."".87
0.B...FT$.H(FT$,W).}....G,8,G,"0:".F$.",
".FT$.",".K$:.15,A,B$:.E$;A;B$:.A.......
.. G:.810.....:...... ------------------
-------------...... ----------- UPLOAD -
-----------...J.. ----------------------
---------...T.:.%...G.6:K$."R":.850:BL..
:FA.W.R....ER$CU$" READING ":.Y.W.P
:U%(Y,W).W.....BL.BL.W:U%(Y,2).BL:U%(Y,3
).F.BL:CH.W.U%(Y,2).U%(Y,3):.ER$"BLOCK"B
L......X.EOT.Z:.#6,B$:.ST...1040.....FL.
Y:CH.CH.U%(Y,X):.A.X.W.Z:U%(Y,A)..:.:U%(
Y,V).CH.F:.1050.1...U%(Y,X).F(B$.C$):CH.
CH.U%(Y,X):.:U%(Y,V).CH.F:.:Y.Y.W.?....F
A.W.360.[.$..#5,A$:.A$..G(NAK).1060.K...
BL.BL.Y:Y... .8..ER$CU$" UPLOAD STATUS"J
$"NAK"BL$CU$" UPLOADING"...B.Y.Y.W:BL.BL
.W...L..BL$"BLOCK"BL:.X.W.V:.5,G(U%(Y,X)
);:....V..A...1200:.#5,A$:.A$.""..:.1100
.$.`..A$.G(ACK)..Y.P..ER$"ACK":.1000.J.J
..A$.G(ACK)..FL..Y..ER$"ACK":.1090.Y.T..
A$.G(ACK)..FL.Y.FL..:.1400:.1410: 6:.143
0...~..A$.G(NAK)..ER$"NAK":.1100......A$
.G(CAN). 6:.1430......1110.....:...... -
------------------------------...... ---
------ DIRECTORY -----------.2.... -----
--------------------------.8.D.:.V.N..E$
:.1,8,0,"$0":.#1,A$,A$.P.X..#1,A$,A$:.A$
."".1280......#1,A$,B$:.F(A$.C$).F(B$.C$
).D;......#1,A$:.A$.""..:.1240......A$;:
.1260..... 1:.CD$CD$G(30)" "R$"
".?...." "R$" PRESS <F
1> FOR MAIN MENU ":." "R$"
".U.... A$:. A$."".1300.G.
... A$..G$.1300.V.(..G(5):.810...2.. A$:
. A$."".1330...<.....F.....P.....Z..5,G(
ACK);:.ER$"ACK":Q..:....D.Q.Q.W:.Q.11. 3
:A$.G(CAN):.5,A$:.1430...N..5,G(NAK);:.E
R$"NAK":....X..5,G(EOT);:.ER$"EOT":..3..
..#5,A$:.A$."".1410.9.....^...."HIT ANY
KEY FOR TERMINAL MODE".K. .SO.54272.....
.SO.1,250:.SO.5,10:.SO.15,200.C....SO.24
,15:.CL.1.12:.SO.4,21:.TM.1.1250:.:.SO.4
,20.W....B$:.B$."".1450...H.SO.54272:.CL
...24:.SO.CL,.:....R..360.E....E$"IS HOS
T COMPUTER READY TO RECIEVE? Y/N"J$:.133
0:.A$."N".360.W....A$.."Y".1500......E$"
HAVE THE FIRST 12 (OR LESS) BLOCKS TO
UPLOAD BEEN READ YET?"......1330:.A$."N"
.360.F....A$.."Y".1520......E$"UPLOADING
"F$:.1050...
> CLICK IMAGE PREVIEW FOR FULL MODAL