home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1990-05-10 | 16.1 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| IBM AntiVirus virus signatures (other/ibmAntiVirusVirusSignatures)
| ext
| Unsupported |
| 1%
| dexvert
| Kaspersky Lab black list file (other/kasperskyLabBlackListFile)
| ext
| Unsupported |
| 1%
| dexvert
| Network Instruments Observer capture file (other/networkInstrumentsObserverCaptureFile)
| ext
| Unsupported |
| 1%
| dexvert
| The Software Toolworks resources archive (other/theSoftwareToolworksResourcesArchive)
| ext
| Unsupported |
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 10 4d 61 69 6e 20 53 79 | 73 74 65 6d 20 4d 65 6e |.Main Sy|stem Men|
|00000010| 75 70 75 74 28 69 69 2c | 34 29 3b 0d 0a 20 20 20 |uput(ii,|4);.. |
|00000020| 20 20 20 20 20 20 20 20 | 20 69 66 20 69 69 3c 3e | | if ii<>|
|00000030| 27 27 20 74 68 65 6e 20 | 62 65 67 69 6e 01 40 04 |'' then |begin.@.|
|00000040| 01 01 0a 4d 41 49 4e 4d | 45 4e 55 3a 20 62 79 74 |...MAINM|ENU: byt|
|00000050| 3a 3d 76 61 6c 75 65 00 | 69 69 29 3b 0d 0a 20 20 |:=value.|ii);.. |
|00000060| 20 20 20 20 20 20 20 00 | 00 20 20 20 73 61 76 65 | .|. save|
|00000070| 01 00 74 72 3a 28 41 29 | 75 74 6f 20 6d 65 73 73 |..tr:(A)|uto mess|
|00000080| 61 67 65 20 6d 65 6e 75 | 20 2d 20 54 68 65 20 6d |age menu| - The m|
|00000090| 65 73 73 61 67 65 20 64 | 69 73 70 6c 61 79 65 64 |essage d|isplayed|
|000000a0| 20 77 68 65 6e 20 79 6f | 75 20 6c 6f 67 6f 6e 5f | when yo|u logon_|
|000000b0| 6e 0a 40 00 00 5e 01 32 | 76 6e 5d 3d 69 31 20 74 |n.@..^.2|vn]=i1 t|
|000000c0| 68 65 6e 20 62 65 67 69 | 6e 0d 0a 0e 28 41 29 75 |hen begi|n...(A)u|
|000000d0| 74 6f 20 4d 65 73 73 61 | 67 65 74 01 41 58 58 74 |to Messa|get.AXXt|
|000000e0| 2c 27 20 20 20 20 20 20 | 2b 28 42 29 75 6c 6c 65 |,' |+(B)ulle|
|000000f0| 74 69 6e 20 6c 69 73 74 | 20 2d 20 47 65 6e 65 72 |tin list| - Gener|
|00000100| 61 6c 20 66 69 6c 65 73 | 20 6f 66 20 69 6e 74 65 |al files| of inte|
|00000110| 72 65 73 74 65 72 6f 6d | 70 74 28 27 45 6e 74 65 |resterom|pt('Ente|
|00000120| 72 20 6e 65 77 0a 40 00 | 00 42 00 27 29 3b 0d 0a |r new.@.|.B.');..|
|00000130| 20 20 20 20 20 20 20 20 | 20 20 20 20 69 6e 70 0b | | inp.|
|00000140| 28 42 29 75 6c 6c 65 74 | 69 6e 73 20 20 20 20 01 |(B)ullet|ins .|
|00000150| 42 58 58 20 20 20 69 66 | 20 69 69 3c 15 28 43 29 |BXX if| ii<.(C)|
|00000160| 68 61 74 20 77 69 74 68 | 20 74 68 65 20 53 59 53 |hat with| the SYS|
|00000170| 4f 50 2e 2d 28 69 69 29 | 3b 0d 0a 20 20 20 20 20 |OP.-(ii)|;.. |
|00000180| 20 20 20 20 20 20 20 73 | 61 76 65 3a 3d 74 72 75 | s|ave:=tru|
|00000190| 65 3b 0d 0a 20 20 20 20 | 20 0a 40 00 00 40 01 31 |e;.. | .@..@.1|
|000001a0| 64 3b 0d 0a 20 20 20 20 | 20 20 27 55 27 3a 62 65 |d;.. | 'U':be|
|000001b0| 67 69 6e 0e 28 43 29 68 | 61 74 20 77 5c 53 59 53 |gin.(C)h|at w\SYS|
|000001c0| 4f 50 72 01 43 58 58 28 | 27 45 6e 74 65 72 20 75 |OPr.CXX(|'Enter u|
|000001d0| 2f 28 45 29 78 74 65 72 | 6e 61 6c 20 70 72 6f 67 |/(E)xter|nal prog|
|000001e0| 72 61 6d 73 20 6f 75 74 | 73 69 64 65 20 74 68 65 |rams out|side the|
|000001f0| 20 54 41 47 20 65 6e 76 | 69 72 6f 6e 6d 65 6e 74 | TAG env|ironment|
|00000200| 74 6f 66 20 62 61 73 65 | 29 20 20 20 20 32 40 00 |tof base|) 2@.|
|00000210| 00 5e 01 35 70 72 6f 6d | 70 74 28 27 57 68 69 63 |.^.5prom|pt('Whic|
|00000220| 68 20 62 6f 61 72 64 0f | 28 45 29 78 74 65 72 6e |h board.|(E)xtern|
|00000230| 61 6c 20 50 72 67 73 01 | 45 58 58 20 20 20 20 20 |al Prgs.|EXX |
|00000240| 69 6e 70 75 28 28 46 29 | 69 6c 65 20 54 72 61 6e |inpu((F)|ile Tran|
|00000250| 73 66 65 72 20 73 79 73 | 74 65 6d 20 2d 20 55 70 |sfer sys|tem - Up|
|00000260| 6c 6f 61 64 2f 44 6f 77 | 6e 6c 6f 61 64 20 6e 75 |load/Dow|nload nu|
|00000270| 6d 62 65 72 20 6f 66 20 | 62 61 73 65 29 20 20 20 |mber of |base) |
|00000280| 20 0a 40 00 00 5e 01 36 | 70 72 6f 6d 70 74 28 27 | .@..^.6|prompt('|
|00000290| 57 68 69 63 68 20 62 6f | 61 72 64 0d 28 46 29 69 |Which bo|ard.(F)i|
|000002a0| 6c 65 20 73 79 73 74 65 | 6d 6e 72 01 46 58 58 20 |le syste|mnr.FXX |
|000002b0| 20 20 20 20 69 6e 70 75 | 35 28 47 29 6f 6f 64 62 | inpu|5(G)oodb|
|000002c0| 79 65 20 2d 20 53 79 73 | 6f 70 20 63 6f 6d 6d 65 |ye - Sys|op comme|
|000002d0| 6e 74 20 2d 20 4c 6f 67 | 73 20 79 6f 75 20 6f 66 |nt - Log|s you of|
|000002e0| 66 20 61 6e 64 20 68 61 | 6e 67 73 20 75 70 93 01 |f and ha|ngs up..|
|000002f0| e6 07 46 f2 78 01 40 00 | 00 2a 01 31 99 04 35 04 |..F.x.@.|.*.1..5.|
|00000300| 14 04 00 00 14 04 00 00 | 00 00 36 15 03 0a 00 09 |........|..6.....|
|00000310| 28 47 29 6f 6f 64 62 79 | 65 4d 44 61 03 0a 28 01 |(G)oodby|eMDa..(.|
|00000320| 47 58 58 fa 82 08 e3 0b | 9c 0a 50 2d 37 28 2f 47 |GXX.....|..P-7(/G|
|00000330| 29 49 6e 73 74 61 6e 74 | 20 68 61 6e 67 75 70 20 |)Instant| hangup |
|00000340| 2d 20 4e 6f 74 68 69 6e | 67 20 69 73 20 70 72 69 |- Nothin|g is pri|
|00000350| 6e 74 65 64 20 61 66 74 | 65 72 20 65 78 65 63 75 |nted aft|er execu|
|00000360| 74 69 6f 6e 64 6f 20 62 | 65 01 40 00 00 2a 01 49 |tiondo b|e.@..*.I|
|00000370| 20 20 20 20 20 20 77 72 | 69 74 65 6c 6e 28 74 2c | wr|iteln(t,|
|00000380| 27 20 20 0a 28 2f 47 29 | 48 61 6e 67 75 70 64 20 |' .(/G)|Hangupd |
|00000390| 68 61 6e 02 2f 47 58 0d | 0a 20 20 20 20 20 20 20 |han./GX.|. |
|000003a0| 1f 28 49 29 6e 66 6f 72 | 6d 61 74 69 6f 6e 20 61 |.(I)nfor|mation a|
|000003b0| 62 6f 75 74 20 74 68 69 | 73 20 73 79 73 74 65 6d |bout thi|s system|
|000003c0| 6e 0d 0a 20 20 61 73 73 | 69 67 6e 28 74 2c 62 62 |n.. ass|ign(t,bb|
|000003d0| 73 64 69 72 2b 27 67 66 | 69 6c 65 73 5c 0a 40 00 |sdir+'gf|iles\.@.|
|000003e0| 00 21 06 53 59 53 54 45 | 4d 2e 4d 53 47 72 65 77 |.!.SYSTE|M.MSGrew|
|000003f0| 72 69 74 65 28 74 29 0d | 28 49 29 6e 66 6f 72 6d |rite(t).|(I)nform|
|00000400| 61 74 69 6f 6e 74 65 01 | 49 58 58 77 72 69 74 65 |ationte.|IXXwrite|
|00000410| 6c 6e 28 74 31 28 4b 29 | 53 65 6e 64 20 61 20 70 |ln(t1(K)|Send a p|
|00000420| 72 69 76 61 74 65 20 6d | 65 73 73 61 67 65 20 74 |rivate m|essage t|
|00000430| 6f 20 74 68 65 20 53 79 | 73 4f 70 20 28 46 65 65 |o the Sy|sOp (Fee|
|00000440| 64 62 61 63 6b 29 6e 6e | 69 6e 67 20 6f 75 74 70 |dback)nn|ing outp|
|00000450| 75 0a 40 00 00 46 01 31 | 41 4c 4c 45 52 53 2e 4c |u.@..F.1|ALLERS.L|
|00000460| 4f 47 54 58 54 22 27 29 | 3b 0d 0a 0f 28 4b 29 6f |OGTXT"')|;...(K)o|
|00000470| 6d 6d 65 6e 74 20 53 79 | 73 4f 70 01 4b 58 58 31 |mment Sy|sOp.KXX1|
|00000480| 3c 66 69 6c 65 73 69 7a | 18 28 4c 29 6f 67 20 6f |<filesiz|.(L)og o|
|00000490| 66 20 74 6f 64 61 79 27 | 73 20 63 61 6c 6c 65 72 |f today'|s caller|
|000004a0| 73 72 65 73 65 74 28 75 | 66 29 3b 0d 0a 20 20 70 |sreset(u|f);.. p|
|000004b0| 72 69 6e 74 28 27 42 65 | 67 69 6e 6e 69 6e 67 20 |rint('Be|ginning |
|000004c0| 6f 75 74 70 75 0a 40 00 | 00 21 0b 43 41 4c 4c 45 |outpu.@.|.!.CALLE|
|000004d0| 52 53 2e 4c 4f 47 54 58 | 54 22 27 29 3b 0d 0a 0d |RS.LOGTX|T"');...|
|000004e0| 28 4c 29 6f 67 20 63 61 | 6c 6c 65 72 73 65 72 01 |(L)og ca|llerser.|
|000004f0| 4c 58 58 31 3c 66 69 6c | 65 73 69 7a 2b 28 4d 29 |LXX1<fil|esiz+(M)|
|00000500| 65 73 73 61 67 65 20 73 | 79 73 74 65 6d 20 6d 65 |essage s|ystem me|
|00000510| 6e 75 20 28 70 72 69 76 | 61 74 65 2f 70 75 62 6c |nu (priv|ate/publ|
|00000520| 69 63 20 6d 61 69 6c 29 | 69 5b 63 70 5d 3d 63 68 |ic mail)|i[cp]=ch|
|00000530| 72 28 38 29 29 3b 0d 0a | 20 0a 40 00 00 5e 01 33 |r(8));..| .@..^.3|
|00000540| 3a 69 66 20 28 6e 6f 74 | 20 28 72 62 61 63 6b 73 |:if (not| (rbacks|
|00000550| 70 61 63 0e 28 4d 29 65 | 73 73 61 67 65 20 62 61 |pac.(M)e|ssage ba|
|00000560| 73 65 65 01 4d 58 58 6e | 64 20 28 72 70 3e 31 29 |see.MXXn|d (rp>1)|
|00000570| 36 28 4f 29 74 68 65 72 | 20 42 42 53 20 6c 69 73 |6(O)ther| BBS lis|
|00000580| 74 20 2d 20 56 61 6c 69 | 64 61 74 65 64 20 75 73 |t - Vali|dated us|
|00000590| 65 72 73 20 63 61 6e 20 | 61 64 64 20 74 6f 20 74 |ers can |add to t|
|000005a0| 68 65 20 6c 69 73 74 20 | 20 20 20 20 20 0a 40 00 |he list | .@.|
|000005b0| 00 4f 00 65 3a 3d 74 72 | 75 65 3b 0d 0a 20 20 20 |.O.e:=tr|ue;.. |
|000005c0| 20 20 20 20 20 20 20 0b | 28 4f 29 74 68 65 72 20 | .|(O)ther |
|000005d0| 42 42 53 20 20 20 20 01 | 4f 58 58 20 20 65 6e 64 |BBS .|OXX end|
|000005e0| 3b 0d 0a 20 34 28 50 29 | 65 72 73 6f 6e 20 64 61 |;.. 4(P)|erson da|
|000005f0| 74 61 20 6d 65 6e 75 20 | 2d 20 43 68 61 6e 67 65 |ta menu |- Change|
|00000600| 20 79 6f 75 72 20 61 63 | 63 6f 75 6e 74 20 69 6e | your ac|count in|
|00000610| 66 6f 72 6d 61 74 69 6f | 6e 74 3b 0d 0a 76 61 72 |formatio|nt;..var|
|00000620| 20 0a 40 00 00 5e 01 34 | 2c 6c 61 73 2c 62 34 3a | .@..^.4|,las,b4:|
|00000630| 73 74 72 70 74 72 3b 0d | 0a 20 20 0f 28 50 29 65 |strptr;.|. .(P)e|
|00000640| 72 73 6f 6e 61 6c 20 64 | 61 74 61 01 50 58 58 72 |rsonal d|ata.PXXr|
|00000650| 70 74 72 3b 0d 0a 20 20 | 20 28 52 29 65 2d 72 65 |ptr;.. | (R)e-re|
|00000660| 61 64 20 74 68 65 20 6d | 61 69 6e 20 6c 6f 67 6f |ad the m|ain logo|
|00000670| 6e 20 6d 65 73 73 61 67 | 65 6e 65 72 68 6f 75 74 |n messag|enerhout|
|00000680| 20 70 61 67 69 6e 67 20 | 20 20 74 3a 74 65 78 74 | paging | t:text|
|00000690| 3b 0d 0a 20 20 0a 40 00 | 00 21 05 4c 4f 47 4f 4e |;.. .@.|.!.LOGON|
|000006a0| 3b 0d 0a 20 20 20 20 78 | 3a 61 72 72 61 79 5b 0f |;.. x|:array[.|
|000006b0| 28 52 29 65 2d 72 65 61 | 64 20 6c 6f 67 6f 6e 01 |(R)e-rea|d logon.|
|000006c0| 52 58 58 79 5b 31 2e 2e | 39 5d 20 6f 2e 28 53 29 |RXXy[1..|9] o.(S)|
|000006d0| 79 73 6f 70 20 63 68 61 | 74 20 66 6c 61 67 20 73 |ysop cha|t flag s|
|000006e0| 74 61 74 75 73 20 2d 20 | 4c 6f 6f 6b 20 77 69 74 |tatus - |Look wit|
|000006f0| 68 6f 75 74 20 70 61 67 | 69 6e 67 20 20 20 74 3a |hout pag|ing t:|
|00000700| 74 65 78 74 3b 0d 0a 20 | 20 0a 40 00 00 26 00 65 |text;.. | .@..&.e|
|00000710| 72 72 65 63 3b 0d 0a 20 | 20 20 20 78 3a 61 72 72 |rrec;.. | x:arr|
|00000720| 61 79 5b 0e 28 53 29 79 | 73 6f 70 20 73 74 61 74 |ay[.(S)y|sop stat|
|00000730| 75 73 74 01 53 58 58 79 | 5b 31 2e 2e 39 5d 20 6f |ust.SXXy|[1..9] o|
|00000740| 3b 28 54 29 69 6d 65 20 | 62 61 6e 6b 20 2d 20 44 |;(T)ime |bank - D|
|00000750| 65 70 6f 73 69 74 20 6f | 72 20 57 69 74 68 64 72 |eposit o|r Withdr|
|00000760| 61 77 20 74 69 6d 65 20 | 66 72 6f 6d 20 79 6f 75 |aw time |from you|
|00000770| 72 20 74 69 6d 65 20 62 | 61 6e 6b 2e 20 32 40 00 |r time b|ank. 2@.|
|00000780| 00 3e 00 20 20 20 20 75 | 73 65 72 2e 64 73 6c 3a |.>. u|ser.dsl:|
|00000790| 3d 33 30 3b 0d 0a 20 0b | 28 54 29 69 6d 65 20 62 |=30;.. .|(T)ime b|
|000007a0| 61 6e 6b 65 72 64 3a 01 | 54 58 58 65 3b 0d 0a 20 |ankerd:.|TXXe;.. |
|000007b0| 20 20 20 20 38 28 55 29 | 73 65 72 20 73 65 61 72 | 8(U)|ser sear|
|000007c0| 63 68 2f 6c 69 73 74 69 | 6e 67 20 73 79 73 74 65 |ch/listi|ng syste|
|000007d0| 6d 20 28 6c 69 73 74 73 | 20 75 73 65 72 73 20 6f |m (lists| users o|
|000007e0| 6e 20 74 68 65 20 73 79 | 73 74 65 6d 29 0d 0a 20 |n the sy|stem).. |
|000007f0| 20 0a 40 00 00 4c 00 20 | 20 20 20 75 73 65 72 2e | .@..L. | user.|
|00000800| 64 73 6c 3a 3d 33 30 3b | 0d 0a 20 0d 28 55 29 73 |dsl:=30;|.. .(U)s|
|00000810| 65 72 20 6c 69 73 74 65 | 72 64 3a 01 55 58 58 65 |er liste|rd:.UXXe|
|00000820| 3b 0d 0a 20 20 20 20 20 | 31 28 56 29 6f 74 69 6e |;.. |1(V)otin|
|00000830| 67 20 62 6f 61 72 64 20 | 2d 20 53 63 61 6e 2f 56 |g board |- Scan/V|
|00000840| 6f 74 65 20 6f 6e 20 61 | 20 6c 69 73 74 20 6f 66 |ote on a| list of|
|00000850| 20 71 75 65 73 74 69 6f | 6e 73 73 6c 3a 3d 35 30 | questio|nssl:=50|
|00000860| 3b 0d 0a 20 20 0a 40 00 | 00 56 00 20 20 20 20 75 |;.. .@.|.V. u|
|00000870| 73 65 72 2e 64 73 6c 3a | 3d 33 30 3b 0d 0a 20 0e |ser.dsl:|=30;.. .|
|00000880| 28 56 29 6f 74 69 6e 67 | 20 42 6f 61 72 64 3a 01 |(V)oting| Board:.|
|00000890| 56 58 58 65 3b 0d 0a 20 | 20 20 20 20 37 28 59 29 |VXXe;.. | 7(Y)|
|000008a0| 6f 75 72 20 69 6e 66 6f | 72 6d 61 74 69 6f 6e 20 |our info|rmation |
|000008b0| 2d 20 43 6f 6d 70 6c 65 | 74 65 20 6c 69 73 74 20 |- Comple|te list |
|000008c0| 6f 66 20 79 6f 75 72 20 | 75 73 65 72 20 61 63 63 |of your |user acc|
|000008d0| 6f 75 6e 74 2e 20 79 6f | 75 01 40 00 00 59 00 6e |ount. yo|u.@..Y.n|
|000008e0| 64 3b 0d 0a 0d 0a 70 72 | 6f 63 65 64 75 72 65 20 |d;....pr|ocedure |
|000008f0| 76 6f 74 0b 28 59 29 6f | 75 72 20 69 6e 66 6f 20 |vot.(Y)o|ur info |
|00000900| 76 64 61 01 59 58 58 69 | 6c 65 20 6f 66 20 76 64 |vda.YXXi|le of vd|
|00000910| 32 28 3b 29 53 79 73 4f | 70 20 68 65 6c 70 20 6f |2(;)SysO|p help o|
|00000920| 6e 20 63 68 61 72 61 63 | 74 65 72 73 20 75 73 65 |n charac|ters use|
|00000930| 64 20 66 6f 72 20 73 70 | 65 63 69 61 6c 20 66 6c |d for sp|ecial fl|
|00000940| 61 67 73 63 74 69 6f 6e | 67 2e 64 61 74 c8 40 00 |agsction|g.dat.@.|
|00000950| 00 21 08 53 59 53 4f 50 | 4d 4e 55 2e 4d 53 47 29 |.!.SYSOP|MNU.MSG)|
|00000960| 3b 0d 0a 20 20 66 6f 0d | 28 3b 29 53 79 73 4f 70 |;.. fo.|(;)SysOp|
|00000970| 20 68 65 6c 70 6f 20 01 | 3b 58 58 6e 0d 0a 20 20 | helpo .|;XXn.. |
|00000980| 20 20 73 65 19 28 41 43 | 43 45 53 53 29 56 61 6c | se.(AC|CESS)Val|
|00000990| 69 64 61 74 69 6f 6e 20 | 65 64 69 74 6f 72 6f 72 |idation |editoror|
|000009a0| 20 6c 20 65 64 69 74 6f | 72 2e 6e 67 65 20 62 6f | l edito|r.nge bo|
|000009b0| 61 72 64 20 69 6e 66 6f | 72 6d 61 74 69 6f 6e 20 |ard info|rmation |
|000009c0| 20 fa 40 00 00 31 01 41 | 4d 6d 70 74 28 63 2b 27 | .@..1.A|Mmpt(c+'|
|000009d0| 20 27 2b 63 29 3b 20 72 | 70 3a 3d 0e 28 41 43 43 | '+c); r|p:=.(ACC|
|000009e0| 45 53 53 29 45 64 69 74 | 6f 72 20 06 41 43 43 45 |ESS)Edit|or .ACCE|
|000009f0| 53 53 44 49 54 0a 20 20 | 24 28 42 41 54 43 48 29 |SSDIT. |$(BATCH)|
|00000a00| 46 69 6c 65 20 74 72 61 | 6e 73 66 65 72 20 70 72 |File tra|nsfer pr|
|00000a10| 6f 74 6f 63 6f 6c 20 65 | 64 69 74 6f 72 2e 6e 67 |otocol e|ditor.ng|
|00000a20| 65 20 62 6f 61 72 64 20 | 69 6e 66 6f 72 6d 61 74 |e board |informat|
|00000a30| 69 6f 6e 20 20 dc 40 00 | 00 31 01 4c 4d 6d 70 74 |ion .@.|.1.LMmpt|
|00000a40| 28 63 2b 27 20 27 2b 63 | 29 3b 20 72 70 3a 3d 0d |(c+' '+c|); rp:=.|
|00000a50| 28 42 41 54 43 48 29 45 | 64 69 74 6f 72 20 20 05 |(BATCH)E|ditor .|
|00000a60| 42 41 54 43 48 45 44 49 | 54 0a 20 20 1f 28 42 4f |BATCHEDI|T. .(BO|
|00000a70| 41 52 44 45 44 49 54 29 | 4d 65 73 73 61 67 65 20 |ARDEDIT)|Message |
|00000a80| 62 61 73 65 20 6d 61 6e | 61 67 65 72 20 2d 20 43 |base man|ager - C|
|00000a90| 68 61 6e 67 65 20 62 6f | 61 72 64 20 69 6e 66 6f |hange bo|ard info|
|00000aa0| 72 6d 61 74 69 6f 6e 20 | 20 dc 40 00 00 31 01 42 |rmation | .@..1.B|
|00000ab0| 4d 6d 70 74 28 63 2b 27 | 20 27 2b 63 29 3b 20 72 |Mmpt(c+'| '+c); r|
|00000ac0| 70 3a 3d 0b 28 42 4f 41 | 52 44 45 44 49 54 29 20 |p:=.(BOA|RDEDIT) |
|00000ad0| 20 20 20 09 42 4f 41 52 | 44 45 44 49 54 0a 20 20 | .BOAR|DEDIT. |
|00000ae0| 29 28 44 4c 42 4f 41 52 | 44 45 44 49 54 29 46 69 |)(DLBOAR|DEDIT)Fi|
|00000af0| 6c 65 20 74 72 61 6e 73 | 66 65 72 20 73 79 73 74 |le trans|fer syst|
|00000b00| 65 6d 20 6d 61 6e 61 67 | 65 72 20 20 20 20 20 32 |em manag|er 2|
|00000b10| 34 3a 62 65 67 69 6e 0d | 0a 20 20 20 20 ff 40 00 |4:begin.|. .@.|
|00000b20| 00 31 01 46 4d 70 3a 3d | 31 3b 20 66 6f 72 20 63 |.1.FMp:=|1; for c|
|00000b30| 76 3a 3d 31 20 74 6f 0d | 28 44 4c 42 4f 41 52 44 |v:=1 to.|(DLBOARD|
|00000b40| 45 44 49 54 29 74 28 0b | 44 4c 42 4f 41 52 44 45 |EDIT)t(.|DLBOARDE|
|00000b50| 44 49 54 68 2b 28 44 4f | 53 29 44 72 6f 70 20 74 |DITh+(DO|S)Drop t|
|00000b60| 6f 20 61 20 4d 69 6e 69 | 2d 44 4f 53 20 66 6f 72 |o a Mini|-DOS for|
|00000b70| 20 66 69 6c 65 20 6d 61 | 6e 61 67 65 6d 65 6e 74 | file ma|nagement|
|00000b80| 2e 65 20 76 6f 74 69 6e | 67 20 62 6f 61 72 64 3b |.e votin|g board;|
|00000b90| 0d dc 40 00 00 31 01 44 | 4d 0d 0a 20 20 20 20 72 |..@..1.D|M.. r|
|00000ba0| 70 3a 3d 31 3b 20 63 70 | 3a 3d 31 0d 28 44 4f 53 |p:=1; cp|:=1.(DOS|
|00000bb0| 29 4d 69 6e 69 2d 44 4f | 53 65 20 03 44 4f 53 54 |)Mini-DO|Se .DOST|
|00000bc0| 45 53 6c 3c 3e 27 27 20 | 1f 28 45 56 45 4e 54 45 |ESl<>'' |.(EVENTE|
|00000bd0| 44 49 54 29 53 79 73 74 | 65 6d 20 65 76 65 6e 74 |DIT)Syst|em event|
|00000be0| 20 6d 61 6e 61 67 65 72 | 75 65 73 74 69 6f 6e 20 | manager|uestion |
|00000bf0| 6f 6e 20 74 68 65 20 76 | 6f 74 69 6e 67 20 62 6f |on the v|oting bo|
|00000c00| 61 72 64 3b 0d dc 40 00 | 00 31 01 56 4d 0d 0a 20 |ard;..@.|.1.VM.. |
|00000c10| 20 20 20 72 70 3a 3d 31 | 3b 20 63 70 3a 3d 31 0d | rp:=1|; cp:=1.|
|00000c20| 28 45 56 45 4e 54 45 44 | 49 54 29 6f 72 65 20 09 |(EVENTED|IT)ore .|
|00000c30| 45 56 45 4e 54 45 44 49 | 54 27 27 20 3a 28 49 56 |EVENTEDI|T'' :(IV|
|00000c40| 4f 54 45 53 29 43 68 61 | 6e 67 65 2f 44 65 6c 65 |OTES)Cha|nge/Dele|
|00000c50| 74 65 20 74 68 65 20 61 | 6e 79 20 71 75 65 73 74 |te the a|ny quest|
|00000c60| 69 6f 6e 20 6f 6e 20 74 | 68 65 20 76 6f 74 69 6e |ion on t|he votin|
|00000c70| 67 20 62 6f 61 72 64 3b | 0d c8 40 00 00 32 00 69 |g board;|..@..2.i|
|00000c80| 6e 0d 0a 20 20 20 20 72 | 70 3a 3d 31 3b 20 63 70 |n.. r|p:=1; cp|
|00000c90| 3a 3d 31 0e 28 49 56 4f | 54 45 53 29 43 68 61 6e |:=1.(IVO|TES)Chan|
|00000ca0| 67 65 20 06 49 56 4f 54 | 45 53 6c 3c 3e 27 27 20 |ge .IVOT|ESl<>'' |
|00000cb0| 16 28 4c 4f 47 29 53 79 | 73 74 65 6d 20 74 72 61 |.(LOG)Sy|stem tra|
|00000cc0| 63 65 20 6c 6f 67 73 66 | 6f 72 20 69 6c 65 69 3a |ce logsf|or ilei:|
|00000cd0| 3d 6c 6c 3b 20 6c 6c 3a | 3d 27 27 3b 20 63 70 3a |=ll; ll:|=''; cp:|
|00000ce0| 3d 6c 65 6e 67 74 68 28 | 69 29 2b 31 3b c8 40 00 |=length(|i)+1;.@.|
|00000cf0| 00 34 00 53 59 53 4f 50 | 2e 4c 4f 47 6e 64 3b 0d |.4.SYSOP|.LOGnd;.|
|00000d00| 0a 20 20 20 20 72 65 0b | 28 4c 4f 47 29 53 79 73 |. re.|(LOG)Sys|
|00000d10| 74 65 6d 73 65 74 6b 03 | 4c 4f 47 29 3b 0d 0a 20 |temsetk.|LOG);.. |
|00000d20| 20 20 20 20 2f 28 4d 45 | 4e 55 45 44 49 54 29 4d | /(ME|NUEDIT)M|
|00000d30| 65 6e 75 20 6d 61 6e 61 | 67 65 72 20 2d 20 42 61 |enu mana|ger - Ba|
|00000d40| 73 69 63 20 73 79 73 74 | 65 6d 20 73 74 72 75 63 |sic syst|em struc|
|00000d50| 74 75 72 65 68 65 6e 20 | 72 65 70 65 61 74 0d 0a |turehen |repeat..|
|00000d60| 20 ff 40 00 00 31 01 4d | 4d 20 20 70 72 6f 6d 70 | .@..1.M|M promp|
|00000d70| 74 28 63 68 72 28 38 29 | 2b 27 20 0a 28 4d 45 4e |t(chr(8)|+' .(MEN|
|00000d80| 55 45 44 49 54 29 44 70 | 3a 3d 72 08 4d 45 4e 55 |UEDIT)Dp|:=r.MENU|
|00000d90| 45 44 49 54 63 70 2d 31 | 25 28 53 49 4e 47 4c 45 |EDITcp-1|%(SINGLE|
|00000da0| 29 46 69 6c 65 20 74 72 | 61 6e 73 66 65 72 20 70 |)File tr|ansfer p|
|00000db0| 72 6f 74 6f 63 6f 6c 20 | 65 64 69 74 6f 72 2e 69 |rotocol |editor.i|
|00000dc0| 73 6b 20 53 70 61 63 65 | 2f 55 73 65 72 73 72 74 |sk Space|/Usersrt|
|00000dd0| 2c 6e 65 78 74 dc 40 00 | 00 31 01 50 6c 6c 72 65 |,next.@.|.1.Pllre|
|00000de0| 61 64 3a 62 6f 6f 6c 65 | 61 6e 3b 0d 0a 20 20 0e |ad:boole|an;.. .|
|00000df0| 28 53 49 4e 47 4c 45 29 | 45 64 69 74 6f 72 0a 06 |(SINGLE)|Editor..|
|00000e00| 53 49 4e 47 4c 45 64 75 | 72 65 20 69 35 28 53 54 |SINGLEdu|re i5(ST|
|00000e10| 41 54 55 53 29 53 79 73 | 74 65 6d 20 73 74 61 74 |ATUS)Sys|tem stat|
|00000e20| 75 73 20 72 65 70 6f 72 | 74 20 2d 20 43 61 6c 6c |us repor|t - Call|
|00000e30| 73 2f 44 69 73 6b 20 53 | 70 61 63 65 2f 55 73 65 |s/Disk S|pace/Use|
|00000e40| 72 73 72 74 2c 6e 65 78 | 74 c8 40 00 00 2d 00 61 |rsrt,nex|t.@..-.a|
|00000e50| 6c 6c 72 65 61 64 3a 62 | 6f 6f 6c 65 61 6e 3b 0d |llread:b|oolean;.|
|00000e60| 0a 20 20 0e 28 53 54 41 | 54 55 53 29 52 65 70 6f |. .(STA|TUS)Repo|
|00000e70| 72 74 0a 06 53 54 41 54 | 55 53 64 75 72 65 20 69 |rt..STAT|USdure i|
|00000e80| 29 28 53 59 53 54 45 4d | 43 4f 4e 46 49 47 29 43 |)(SYSTEM|CONFIG)C|
|00000e90| 68 61 6e 67 65 20 73 79 | 73 74 65 6d 20 63 6f 6e |hange sy|stem con|
|00000ea0| 66 69 67 75 72 61 74 69 | 6f 6e 2c 20 61 6e 64 20 |figurati|on, and |
|00000eb0| 6d 65 73 73 61 67 65 20 | 66 69 6c 65 73 ff 40 00 |message |files.@.|
|00000ec0| 00 31 01 53 4d 0d 0a 20 | 20 20 20 20 20 20 20 20 |.1.SM.. | |
|00000ed0| 20 20 20 20 20 20 20 0e | 28 53 59 53 54 45 4d 43 | .|(SYSTEMC|
|00000ee0| 4f 4e 46 49 47 29 74 0c | 53 59 53 54 45 4d 43 4f |ONFIG)t.|SYSTEMCO|
|00000ef0| 4e 46 49 47 22 28 54 49 | 4d 45 44 41 54 45 29 53 |NFIG"(TI|MEDATE)S|
|00000f00| 65 74 20 73 79 73 74 65 | 6d 20 74 69 6d 65 20 61 |et syste|m time a|
|00000f10| 6e 64 20 64 61 74 65 6f | 20 44 4f 53 20 69 66 20 |nd dateo| DOS if |
|00000f20| 69 5b 63 70 2d 31 5d 3d | 63 68 72 28 38 29 20 74 |i[cp-1]=|chr(8) t|
|00000f30| 68 dc 40 00 00 36 00 48 | 30 0d 0a 20 20 20 20 20 |h.@..6.H|0.. |
|00000f40| 20 20 20 20 20 20 20 20 | 20 20 20 0d 28 54 49 4d | | .(TIM|
|00000f50| 45 44 41 54 45 29 53 65 | 74 70 3a 08 54 49 4d 45 |EDATE)Se|tp:.TIME|
|00000f60| 44 41 54 45 5c 20 20 20 | 27 28 51 55 49 54 29 43 |DATE\ |'(QUIT)C|
|00000f70| 6c 6f 73 65 20 73 79 73 | 74 65 6d 20 64 6f 77 6e |lose sys|tem down|
|00000f80| 20 61 6e 64 20 64 72 6f | 70 20 74 6f 20 44 4f 53 | and dro|p to DOS|
|00000f90| 20 69 66 20 69 5b 63 70 | 2d 31 5d 3d 63 68 72 28 | if i[cp|-1]=chr(|
|00000fa0| 38 29 20 74 68 ff 40 00 | 00 7e 02 48 30 0d 0a 20 |8) th.@.|.~.H0.. |
|00000fb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 0b | | .|
|00000fc0| 28 51 55 49 54 29 43 6c | 6f 73 65 20 72 70 3a 04 |(QUIT)Cl|ose rp:.|
|00000fd0| 51 55 49 54 3b 0d 0a 20 | 20 20 20 20 36 28 55 45 |QUIT;.. | 6(UE|
|00000fe0| 44 49 54 29 55 73 65 72 | 20 6c 6f 67 20 65 64 69 |DIT)User| log edi|
|00000ff0| 74 6f 72 2e 20 53 65 61 | 72 63 68 20 6f 70 74 69 |tor. Sea|rch opti|
|00001000| 6f 6e 73 20 61 6c 73 6f | 20 61 76 61 69 6c 61 62 |ons also| availab|
|00001010| 6c 65 2e 69 32 3a 3d 31 | 20 dc 40 00 00 31 01 55 |le.i2:=1| .@..1.U|
|00001020| 4d 59 53 4f 50 2e 4c 4f | 47 5b 69 31 5d 5b 69 32 |MYSOP.LO|G[i1][i2|
|00001030| 5d 3a 3d 0f 28 55 45 44 | 49 54 29 55 73 65 72 65 |]:=.(UED|IT)Usere|
|00001040| 64 69 74 05 55 45 44 49 | 54 31 2b 31 3b 0d 0a 20 |dit.UEDI|T1+1;.. |
|00001050| 29 28 55 4c 4f 47 29 55 | 73 61 67 65 20 6c 6f 67 |)(ULOG)U|sage log|
|00001060| 20 2d 20 53 75 6d 6d 61 | 72 79 20 6f 66 20 73 79 | - Summa|ry of sy|
|00001070| 73 74 65 6d 20 75 73 61 | 67 65 20 66 6f 72 20 74 |stem usa|ge for t|
|00001080| 68 65 20 6c 61 73 74 20 | 39 36 65 2b 63 c8 40 00 |he last |96e+c.@.|
|00001090| 00 21 09 55 53 41 47 45 | 2e 4c 4f 47 20 20 20 65 |.!.USAGE|.LOG e|
|000010a0| 6e 64 3b 0d 0a 20 20 0f | 28 55 4c 4f 47 29 55 73 |nd;.. .|(ULOG)Us|
|000010b0| 61 67 65 20 4c 6f 67 04 | 55 4c 4f 47 6e 20 62 65 |age Log.|ULOGn be|
|000010c0| 67 69 6e 0d 11 41 75 74 | 6f 20 4d 65 73 73 61 67 |gin..Aut|o Messag|
|000010d0| 65 20 4d 65 6e 75 6e 75 | 28 69 69 2c 34 29 3b 0d |e Menunu|(ii,4);.|
|000010e0| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 69 66 20 |. | if |
|000010f0| 69 69 3c 3e 27 27 20 74 | 68 65 6e 20 62 65 67 69 |ii<>'' t|hen begi|
|00001100| 6e 0a 40 04 01 02 0d 41 | 55 54 4f 4d 45 53 53 41 |n.@....A|UTOMESSA|
|00001110| 47 45 3a 20 3a 3d 76 61 | 6c 75 65 00 69 69 29 3b |GE: :=va|lue.ii);|
|00001120| 0d 0a 20 20 20 20 20 20 | 20 20 20 01 00 4d 45 4e |.. | ..MEN|
|00001130| 55 61 76 65 01 00 74 72 | 1e 28 44 29 69 73 70 6c |Uave..tr|.(D)ispl|
|00001140| 61 79 20 63 75 72 72 65 | 6e 74 20 61 75 74 6f 2d |ay curre|nt auto-|
|00001150| 6d 65 73 73 61 67 65 5e | bd e8 3f f8 b9 08 00 e8 |message^|..?.....|
|00001160| 55 bd e8 28 ef e9 00 00 | 8b e5 5d c3 55 8b ec 55 |U..(....|..].U..U|
|00001170| e9 00 00 a0 15 0a 40 00 | 00 57 00 03 e9 12 00 b9 |......@.|.W......|
|00001180| 07 00 e8 32 bd 4c e8 ad | db 34 01 88 46 04 e9 0d |...2.L..|.4..F...|
|00001190| 28 44 29 69 73 70 6c 61 | 79 20 4d 73 67 6f 4d 01 |(D)ispla|y MsgoM.|
|000011a0| 44 58 58 46 04 a0 14 53 | 32 e4 0b c0 37 28 50 29 |DXXF...S|2...7(P)|
|000011b0| 6f 73 74 20 61 20 6e 65 | 77 20 61 75 74 6f 2d 6d |ost a ne|w auto-m|
|000011c0| 65 73 73 61 67 65 20 66 | 6f 72 20 61 6c 6c 20 75 |essage f|or all u|
|000011d0| 73 65 72 73 20 77 68 65 | 6e 20 74 68 65 79 20 6c |sers whe|n they l|
|000011e0| 6f 67 6f 6e e9 00 00 a0 | 15 1e 40 00 00 43 00 03 |ogon....|..@..C..|
|000011f0| e9 12 00 b9 07 00 e8 32 | bd 4c e8 ad db 34 01 88 |.......2|.L...4..|
|00001200| 46 04 e9 0f 28 50 29 6f | 73 74 20 41 75 74 6f 20 |F...(P)o|st Auto |
|00001210| 4d 73 67 01 50 58 58 46 | 04 a0 14 53 32 e4 0b c0 |Msg.PXXF|...S2...|
|00001220| 1e 28 51 29 75 69 74 20 | 74 6f 20 74 68 65 20 6d |.(Q)uit |to the m|
|00001230| 61 69 6e 20 73 79 73 74 | 65 6d 20 6d 65 6e 75 5e |ain syst|em menu^|
|00001240| bd e8 3f f8 b9 08 00 e8 | 55 bd e8 28 ef e9 00 00 |..?.....|U..(....|
|00001250| 8b e5 5d c3 55 8b ec 55 | e9 00 00 a0 15 01 40 00 |..].U..U|......@.|
|00001260| 00 5e 01 31 e9 12 00 b9 | 07 00 e8 32 bd 4c e8 ad |.^.1....|...2.L..|
|00001270| db 34 01 88 46 04 e9 0e | 28 51 29 75 69 74 20 74 |.4..F...|(Q)uit t|
|00001280| 6f 20 6d 61 69 6e 00 01 | 51 58 58 46 04 a0 14 53 |o main..|QXXF...S|
|00001290| 32 e4 0b c0 3c 28 52 29 | 65 70 6c 79 20 74 6f 20 |2...<(R)|eply to |
|000012a0| 74 68 65 20 61 75 74 68 | 6f 72 20 6f 66 20 74 68 |the auth|or of th|
|000012b0| 65 20 61 75 74 6f 2d 6d | 65 73 73 61 67 65 20 77 |e auto-m|essage w|
|000012c0| 69 74 68 20 61 20 70 72 | 69 76 61 74 65 20 6d 73 |ith a pr|ivate ms|
|000012d0| 67 0a 40 00 00 48 00 03 | e9 12 00 b9 07 00 e8 32 |g.@..H..|.......2|
|000012e0| bd 4c e8 ad db 34 01 88 | 46 04 e9 0f 28 52 29 65 |.L...4..|F...(R)e|
|000012f0| 70 6c 79 20 41 75 74 6f | 4d 73 67 01 52 58 58 46 |ply Auto|Msg.RXXF|
|00001300| 04 a0 14 53 32 e4 0b c0 | 13 4d 65 73 73 61 67 65 |...S2...|.Message|
|00001310| 20 53 79 73 74 65 6d 20 | 4d 65 6e 75 28 69 69 2c | System |Menu(ii,|
|00001320| 34 29 3b 0d 0a 20 20 20 | 20 20 20 20 20 20 20 20 |4);.. | |
|00001330| 20 69 66 20 69 69 3c 3e | 27 27 20 74 68 65 6e 20 | if ii<>|'' then |
|00001340| 62 65 67 69 6e 0a 40 04 | 01 03 0d 4d 45 53 53 41 |begin.@.|...MESSA|
|00001350| 47 45 4d 45 4e 55 3a 20 | 3a 3d 76 61 6c 75 65 00 |GEMENU: |:=value.|
|00001360| 69 69 29 3b 0d 0a 20 20 | 20 20 20 20 20 20 20 01 |ii);.. | .|
|00001370| 00 20 20 20 73 61 76 65 | 01 00 74 72 35 28 23 29 |. save|..tr5(#)|
|00001380| 43 68 61 6e 67 65 20 74 | 6f 20 61 6e 6f 74 68 65 |Change t|o anothe|
|00001390| 72 20 6d 65 73 73 61 67 | 65 20 62 61 73 65 20 2d |r messag|e base -|
|000013a0| 20 45 6e 74 65 72 20 62 | 61 73 65 20 6e 75 6d 62 | Enter b|ase numb|
|000013b0| 65 72 65 20 6e 75 6d 62 | 65 0a 40 00 00 23 00 4d |ere numb|e.@..#.M|
|000013c0| 69 6e 0d 0a 20 20 72 3a | 3d 74 69 6d 65 72 3b 0d |in.. r:|=timer;.|
|000013d0| 0a 20 20 0e 28 23 29 43 | 68 61 6e 67 65 20 62 61 |. .(#)C|hange ba|
|000013e0| 73 65 74 01 23 58 58 20 | 20 67 65 74 6b 65 79 28 |set.#XX | getkey(|
|000013f0| 2d 28 41 29 72 65 61 20 | 6c 69 73 74 20 2d 20 4d |-(A)rea |list - M|
|00001400| 65 73 73 61 67 65 20 62 | 6f 61 72 64 73 20 61 76 |essage b|oards av|
|00001410| 61 69 6c 61 62 6c 65 20 | 74 6f 20 79 6f 75 75 6f |ailable |to youuo|
|00001420| 6f 6c 65 61 6e 3b 0d 0a | 76 61 72 20 63 0a 40 00 |olean;..|var c.@.|
|00001430| 00 41 00 0d 0a 62 65 67 | 69 6e 0d 0a 20 20 69 66 |.A...beg|in.. if|
|00001440| 20 6e 6f 74 20 68 61 0b | 28 41 29 72 65 61 20 6c | not ha.|(A)rea l|
|00001450| 69 73 74 67 69 6e 0d 01 | 41 58 58 20 61 6e 73 69 |istgin..|AXX ansi|
|00001460| 63 28 33 29 15 28 43 29 | 68 61 74 20 77 69 74 68 |c(3).(C)|hat with|
|00001470| 20 74 68 65 20 53 59 53 | 4f 50 73 61 67 65 20 74 | the SYS|OPsage t|
|00001480| 6f 20 6f 6e 65 20 75 73 | 65 72 74 69 6f 6e 20 79 |o one us|ertion y|
|00001490| 6e 3a 62 6f 6f 6c 65 61 | 6e 3b 0d 0a 76 61 72 20 |n:boolea|n;..var |
|000014a0| 63 0a 40 00 00 40 01 31 | 0a 62 65 67 69 6e 0d 0a |c.@..@.1|.begin..|
|000014b0| 20 20 69 66 20 6e 6f 74 | 20 68 61 0e 28 43 29 68 | if not| ha.(C)h|
|000014c0| 61 74 20 77 2f 53 59 53 | 4f 50 65 01 43 58 58 20 |at w/SYS|OPe.CXX |
|000014d0| 61 6e 73 69 63 28 33 29 | 25 28 45 29 6e 74 65 72 |ansic(3)|%(E)nter|
|000014e0| 20 61 20 70 72 69 76 61 | 74 65 20 6d 65 73 73 61 | a priva|te messa|
|000014f0| 67 65 20 74 6f 20 6f 6e | 65 20 75 73 65 72 74 69 |ge to on|e userti|
|00001500| 6f 6e 20 79 6e 3a 62 6f | 6f 6c 65 61 6e 3b 0d 0a |on yn:bo|olean;..|
|00001510| 76 61 72 20 63 0a 40 00 | 00 45 00 0d 0a 62 65 67 |var c.@.|.E...beg|
|00001520| 69 6e 0d 0a 20 20 69 66 | 20 6e 6f 74 20 68 61 0f |in.. if| not ha.|
|00001530| 28 45 29 6e 74 65 72 20 | 70 72 69 76 61 74 65 01 |(E)nter |private.|
|00001540| 45 58 58 20 61 6e 73 69 | 63 28 33 29 36 28 2f 45 |EXX ansi|c(3)6(/E|
|00001550| 29 6e 74 65 72 20 61 20 | 6d 61 73 73 20 6d 61 69 |)nter a |mass mai|
|00001560| 6c 20 6d 65 73 73 61 67 | 65 20 74 6f 20 75 70 20 |l messag|e to up |
|00001570| 74 6f 20 32 30 20 75 73 | 65 72 73 20 61 74 20 6f |to 20 us|ers at o|
|00001580| 6e 63 65 0a 76 61 72 20 | 63 14 40 00 00 45 01 4d |nce.var |c.@..E.M|
|00001590| 0a 62 65 67 69 6e 0d 0a | 20 20 69 66 20 6e 6f 74 |.begin..| if not|
|000015a0| 20 68 61 0d 28 2f 45 29 | 6e 74 65 72 20 6d 61 73 | ha.(/E)|nter mas|
|000015b0| 73 20 6d 02 2f 45 58 20 | 61 6e 73 69 63 28 33 29 |s m./EX |ansic(3)|
|000015c0| 2a 28 46 29 69 6c 65 20 | 74 72 61 6e 73 66 65 72 |*(F)ile |transfer|
|000015d0| 20 73 79 73 74 65 6d 20 | 2d 20 55 70 6c 6f 61 64 | system |- Upload|
|000015e0| 73 2f 44 6f 77 6e 6c 6f | 61 64 73 69 73 20 62 61 |s/Downlo|adsis ba|
|000015f0| 73 65 20 28 69 6e 64 69 | 76 2e 29 29 61 0a 40 00 |se (indi|v.))a.@.|
|00001600| 00 5e 01 36 3b 20 6d 6c | 3a 69 6e 74 65 67 65 72 |.^.6; ml|:integer|
|00001610| 3b 20 74 66 3a 62 6f 0f | 28 46 29 69 6c 65 20 74 |; tf:bo.|(F)ile t|
|00001620| 72 61 6e 73 66 65 72 01 | 46 58 58 67 65 72 3b 0d |ransfer.|FXXger;.|
|00001630| 0a 20 20 20 2d 28 47 29 | 6f 6f 64 62 79 65 20 2d |. -(G)|oodbye -|
|00001640| 20 53 79 73 6f 70 20 63 | 6f 6d 6d 65 6e 74 20 2d | Sysop c|omment -|
|00001650| 20 4c 6f 67 6f 66 66 20 | 61 6e 64 20 68 61 6e 67 | Logoff |and hang|
|00001660| 75 70 62 61 73 65 20 28 | 69 6e 64 69 76 2e 29 29 |upbase (|indiv.))|
|00001670| 61 01 40 00 00 2a 01 31 | 3b 20 6d 6c 3a 69 6e 74 |a.@..*.1|; ml:int|
|00001680| 65 67 65 72 3b 20 74 66 | 3a 62 6f 09 28 47 29 6f |eger; tf|:bo.(G)o|
|00001690| 6f 64 62 79 65 4d 44 6d | 65 6e 75 01 47 58 58 67 |odbyeMDm|enu.GXXg|
|000016a0| 65 72 3b 0d 0a 20 20 20 | 36 28 2f 47 29 49 6e 73 |er;.. |6(/G)Ins|
|000016b0| 74 61 6e 74 20 68 61 6e | 67 75 70 20 2d 20 4e 6f |tant han|gup - No|
|000016c0| 74 68 69 6e 67 20 69 73 | 20 70 72 69 6e 74 65 72 |thing is| printer|
|000016d0| 20 61 66 74 65 72 20 65 | 78 65 63 75 74 65 64 69 | after e|xecutedi|
|000016e0| 76 2e 29 29 61 01 40 00 | 00 2a 01 49 3b 20 6d 6c |v.))a.@.|.*.I; ml|
|000016f0| 3a 69 6e 74 65 67 65 72 | 3b 20 74 66 3a 62 6f 0a |:integer|; tf:bo.|
|00001700| 28 2f 47 29 48 61 6e 67 | 75 70 44 73 65 69 63 02 |(/G)Hang|upDseic.|
|00001710| 2f 47 58 67 65 72 3b 0d | 0a 20 20 20 39 28 4b 29 |/GXger;.|. 9(K)|
|00001720| 69 6c 6c 20 70 72 69 76 | 61 74 65 20 6d 61 69 6c |ill priv|ate mail|
|00001730| 20 79 6f 75 20 68 61 76 | 65 20 73 65 6e 74 20 74 | you hav|e sent t|
|00001740| 6f 20 6f 74 68 65 72 20 | 75 73 65 72 73 20 28 69 |o other |users (i|
|00001750| 6e 64 69 76 2e 29 75 61 | 6c 0a 40 00 00 4b 00 3b |ndiv.)ua|l.@..K.;|
|00001760| 0d 0a 20 20 20 20 20 20 | 74 68 69 73 6c 69 6e 65 |.. |thisline|
|00001770| 3a 3d 74 0d 28 4b 29 69 | 6c 6c 20 45 2d 4d 61 69 |:=t.(K)i|ll E-Mai|
|00001780| 6c 20 20 01 4b 58 58 65 | 6c 73 65 20 65 6c 73 65 |l .KXXe|lse else|
|00001790| 2f 28 4d 29 61 69 6c 20 | 2d 20 52 65 61 64 20 61 |/(M)ail |- Read a|
|000017a0| 6e 79 20 70 72 69 76 61 | 74 65 20 6d 61 69 6c 20 |ny priva|te mail |
|000017b0| 79 6f 75 20 68 61 76 65 | 20 77 61 69 74 69 6e 67 |you have| waiting|
|000017c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 63 0a 40 00 | | c.@.|
|000017d0| 00 4d 00 38 29 3b 0d 0a | 20 20 20 20 20 20 20 20 |.M.8);..| |
|000017e0| 20 20 20 20 20 20 20 0e | 28 4d 29 61 69 6c 20 70 | .|(M)ail p|
|000017f0| 72 69 76 61 74 65 20 01 | 4d 58 58 20 20 20 20 20 |rivate .|MXX |
|00001800| 20 20 6f 75 27 28 4e 29 | 65 77 20 73 63 61 6e 20 | ou'(N)|ew scan |
|00001810| 61 6c 6c 20 66 6c 61 67 | 67 65 64 20 6d 65 73 73 |all flag|ged mess|
|00001820| 61 67 65 20 73 65 63 74 | 69 6f 6e 73 6e 65 77 20 |age sect|ionsnew |
|00001830| 6d 61 69 6c 20 20 20 20 | 20 20 63 70 3a 3d 63 70 |mail | cp:=cp|
|00001840| 2d 0a 40 00 00 4e 01 47 | 20 20 20 20 20 20 20 20 |-.@..N.G| |
|00001850| 20 20 20 20 69 66 20 6c | 65 6e 67 0e 28 4e 29 65 | if l|eng.(N)e|
|00001860| 77 20 73 63 61 6e 20 61 | 6c 6c 63 01 4e 58 58 74 |w scan a|llc.NXXt|
|00001870| 68 69 73 6c 69 6e 65 3a | 2b 28 50 29 6f 73 74 20 |hisline:|+(P)ost |
|00001880| 61 20 70 75 62 6c 69 63 | 20 6d 65 73 73 61 67 65 |a public| message|
|00001890| 20 6f 6e 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 | on the |current |
|000018a0| 62 61 73 65 20 20 20 20 | 20 20 20 20 65 6e 64 3b |base | end;|
|000018b0| 0d 0a 20 20 20 0a 40 00 | 00 50 00 32 34 3a 77 68 |.. .@.|.P.24:wh|
|000018c0| 69 6c 65 20 63 70 3c 3e | 31 20 64 6f 20 62 65 0d |ile cp<>|1 do be.|
|000018d0| 28 50 29 6f 73 74 20 70 | 75 62 6c 69 63 20 20 01 |(P)ost p|ublic .|
|000018e0| 50 58 58 63 70 3a 3d 63 | 70 2d 31 3b 1e 28 51 29 |PXXcp:=c|p-1;.(Q)|
|000018f0| 75 69 74 20 74 6f 20 74 | 68 65 20 6d 61 69 6e 20 |uit to t|he main |
|00001900| 73 79 73 74 65 6d 20 6d | 65 6e 75 6d 61 69 6c 20 |system m|enumail |
|00001910| 66 72 6f 6d 20 74 68 69 | 73 20 62 61 73 65 20 28 |from thi|s base (|
|00001920| 69 6e 64 69 76 2e 29 29 | 61 01 40 00 00 5e 01 31 |indiv.))|a.@..^.1|
|00001930| 3b 20 6d 6c 3a 69 6e 74 | 65 67 65 72 3b 20 74 66 |; ml:int|eger; tf|
|00001940| 3a 62 6f 0e 28 51 29 75 | 69 74 20 74 6f 20 6d 61 |:bo.(Q)u|it to ma|
|00001950| 69 6e 75 01 51 58 58 67 | 65 72 3b 0d 0a 20 20 20 |inu.QXXg|er;.. |
|00001960| 38 28 52 29 65 6d 6f 76 | 65 20 6f 6e 65 20 70 75 |8(R)emov|e one pu|
|00001970| 62 6c 69 63 20 6d 65 73 | 73 61 67 65 20 79 6f 75 |blic mes|sage you|
|00001980| 20 68 61 76 65 20 70 6f | 73 74 65 64 20 6f 6e 20 | have po|sted on |
|00001990| 74 68 69 73 20 62 61 73 | 65 29 3b 0d 0a 0a 40 00 |this bas|e);...@.|
|000019a0| 00 52 00 20 20 20 20 20 | 20 20 65 6e 64 3b 0d 0a |.R. | end;..|
|000019b0| 20 20 20 20 65 6e 64 0c | 28 52 29 65 6d 6f 76 65 | end.|(R)emove|
|000019c0| 20 6d 73 67 73 61 67 01 | 52 58 58 33 30 30 2e 30 | msgsag.|RXX300.0|
|000019d0| 20 74 68 65 33 28 53 29 | 63 61 6e 20 6d 65 73 73 | the3(S)|can mess|
|000019e0| 61 67 65 73 20 6f 6e 20 | 74 68 69 73 20 62 61 73 |ages on |this bas|
|000019f0| 65 20 73 74 61 72 74 69 | 6e 67 20 61 74 20 61 6e |e starti|ng at an|
|00001a00| 79 20 6e 75 6d 62 65 72 | 70 3b 0d 0a 20 20 69 5b |y number|p;.. i[|
|00001a10| 30 0a 40 00 00 53 00 28 | 63 70 2d 31 29 3b 0d 0a |0.@..S.(|cp-1);..|
|00001a20| 20 20 6e 6c 3b 0d 0a 20 | 65 6e 64 0f 28 53 29 63 | nl;.. |end.(S)c|
|00001a30| 61 6e 20 6d 65 73 73 61 | 67 65 73 01 53 58 58 20 |an messa|ges.SXX |
|00001a40| 69 6e 70 75 74 28 76 61 | 35 28 55 29 73 65 72 73 |input(va|5(U)sers|
|00001a50| 20 2d 20 4c 69 73 74 20 | 75 73 65 72 73 20 77 69 | - List |users wi|
|00001a60| 74 68 20 61 63 63 65 73 | 73 20 74 6f 20 74 68 69 |th acces|s to thi|
|00001a70| 73 20 6d 65 73 73 61 67 | 65 20 62 61 73 65 6e 64 |s messag|e basend|
|00001a80| 3b 0d 0a 0d 0a 0a 40 00 | 00 55 00 65 64 75 72 65 |;.....@.|.U.edure|
|00001a90| 20 69 6e 70 75 74 00 00 | 00 00 36 15 03 0a 00 0f | input..|..6.....|
|00001aa0| 28 55 29 73 65 72 73 20 | 77 2f 61 63 63 73 73 01 |(U)sers |w/accss.|
|00001ab0| 55 58 58 fa 82 08 e3 0b | 9c 0a 50 2d 25 28 56 29 |UXX.....|..P-%(V)|
|00001ac0| 69 65 77 20 6e 65 77 20 | 6d 65 73 73 61 67 65 73 |iew new |messages|
|00001ad0| 20 6f 6e 20 74 68 69 73 | 20 62 61 73 65 20 6f 6e | on this| base on|
|00001ae0| 6c 79 73 65 20 6f 6e 6c | 79 6e 6c 79 6b 65 79 28 |lyse onl|ynlykey(|
|00001af0| 27 20 27 29 3b 0d 0a 20 | 20 0a 40 00 00 4e 00 20 |' ');.. | .@..N. |
|00001b00| 20 20 20 20 20 20 6f 75 | 74 6b 65 79 28 23 38 29 | ou|tkey(#8)|
|00001b10| 3b 0d 0a 0f 28 56 29 69 | 65 77 20 6e 65 77 20 6d |;...(V)i|ew new m|
|00001b20| 73 67 73 01 56 58 58 6e | 67 74 68 28 74 68 69 73 |sgs.VXXn|gth(this|
|00001b30| 27 28 5b 29 47 6f 74 6f | 20 74 68 65 20 70 72 65 |'([)Goto| the pre|
|00001b40| 76 69 6f 75 73 20 61 63 | 63 65 73 73 69 62 6c 65 |vious ac|cessible|
|00001b50| 20 73 65 63 74 69 6f 6e | 6f 20 4f 6c 64 65 73 74 | section|o Oldest|
|00001b60| 73 74 73 74 72 29 3a 62 | 6f 6f 6c 65 61 0a 40 00 |ststr):b|oolea.@.|
|00001b70| 00 5b 00 72 20 69 3a 69 | 6e 74 65 67 65 72 3b 0d |.[.r i:i|nteger;.|
|00001b80| 0a 20 20 20 20 74 66 0f | 28 5b 29 50 72 65 76 20 |. tf.|([)Prev |
|00001b90| 73 65 63 74 69 6f 6e 01 | 5b 58 58 4c 52 3d 75 70 |section.|[XXLR=up|
|00001ba0| 63 61 73 65 23 28 5d 29 | 47 6f 74 6f 20 74 68 65 |case#(])|Goto the|
|00001bb0| 20 6e 65 78 74 20 61 63 | 63 65 73 73 69 62 6c 65 | next ac|cessible|
|00001bc0| 20 73 65 63 74 69 6f 6e | 6f 6e 73 20 61 6c 73 6f | section|ons also|
|00001bd0| 20 61 76 61 69 6c 61 62 | 6c 65 2e 6f 61 72 64 3b | availab|le.oard;|
|00001be0| 0d 0a 40 00 00 5d 00 55 | 4d 0d 0a 20 20 20 20 72 |..@..].U|M.. r|
|00001bf0| 70 3a 3d 31 3b 20 63 70 | 3a 3d 31 0f 28 5d 29 4e |p:=1; cp|:=1.(])N|
|00001c00| 65 78 74 20 73 65 63 74 | 69 6f 6e 01 5d 58 58 49 |ext sect|ion.]XXI|
|00001c10| 54 53 6c 3c 3e 27 27 20 | 2f 28 4d 41 49 4c 52 29 |TSl<>'' |/(MAILR)|
|00001c20| 52 65 61 64 20 61 6c 6c | 20 70 72 69 76 61 74 65 |Read all| private|
|00001c30| 20 6d 61 69 6c 20 2d 20 | 4e 65 77 65 73 74 20 74 | mail - |Newest t|
|00001c40| 6f 20 4f 6c 64 65 73 74 | 73 74 73 74 72 29 3a 62 |o Oldest|ststr):b|
|00001c50| 6f 6f 6c 65 61 dc 40 00 | 00 33 00 72 20 69 3a 69 |oolea.@.|.3.r i:i|
|00001c60| 6e 74 65 67 65 72 3b 0d | 0a 20 20 20 20 74 66 0f |nteger;.|. tf.|
|00001c70| 28 4d 41 49 4c 52 29 65 | 61 64 20 70 72 76 74 05 |(MAILR)e|ad prvt.|
|00001c80| 4d 41 49 4c 52 3d 75 70 | 63 61 73 65 36 28 55 45 |MAILR=up|case6(UE|
|00001c90| 44 49 54 29 55 73 65 72 | 20 6c 6f 67 20 65 64 69 |DIT)User| log edi|
|00001ca0| 74 6f 72 2e 20 53 65 61 | 72 63 68 20 6f 70 74 69 |tor. Sea|rch opti|
|00001cb0| 6f 6e 73 20 61 6c 73 6f | 20 61 76 61 69 6c 61 62 |ons also| availab|
|00001cc0| 6c 65 2e 6f 61 72 64 3b | 0d dc 40 00 00 31 01 55 |le.oard;|..@..1.U|
|00001cd0| 4d 0d 0a 20 20 20 20 72 | 70 3a 3d 31 3b 20 63 70 |M.. r|p:=1; cp|
|00001ce0| 3a 3d 31 0f 28 55 45 44 | 49 54 29 55 73 65 72 65 |:=1.(UED|IT)Usere|
|00001cf0| 64 69 74 05 55 45 44 49 | 54 53 6c 3c 3e 27 27 20 |dit.UEDI|TSl<>'' |
|00001d00| 12 50 65 72 73 6f 6e 61 | 6c 20 44 61 74 61 20 4d |.Persona|l Data M|
|00001d10| 65 6e 75 65 20 75 73 65 | 34 29 3b 0d 0a 20 20 20 |enue use|4);.. |
|00001d20| 20 20 20 20 20 20 20 20 | 20 69 66 20 69 69 3c 3e | | if ii<>|
|00001d30| 27 27 20 74 68 65 6e 20 | 62 65 67 69 6e 0a 40 04 |'' then |begin.@.|
|00001d40| 01 04 0e 50 45 52 53 4f | 4e 41 4c 44 41 54 41 3a |...PERSO|NALDATA:|
|00001d50| 20 20 20 20 20 20 20 00 | 69 69 29 3b 0d 0a 20 20 | .|ii);.. |
|00001d60| 20 20 20 20 20 20 20 01 | 00 20 20 20 73 61 76 65 | .|. save|
|00001d70| 01 00 74 72 27 28 41 29 | 64 64 72 65 73 73 20 2d |..tr'(A)|ddress -|
|00001d80| 20 43 68 61 6e 67 65 20 | 79 6f 75 72 20 6d 61 69 | Change |your mai|
|00001d90| 6c 69 6e 67 20 61 64 64 | 72 65 73 73 20 61 75 74 |ling add|ress aut|
|00001da0| 68 6f 72 20 6f 66 20 61 | 75 74 6f 20 6d 73 67 73 |hor of a|uto msgs|
|00001db0| 61 0a 40 00 00 44 01 32 | e9 12 00 b9 07 00 e8 32 |a.@..D.2|.......2|
|00001dc0| bd 4c e8 ad db 34 01 88 | 46 04 e9 09 28 41 29 64 |.L...4..|F...(A)d|
|00001dd0| 64 72 65 73 73 4d 44 61 | 69 6e 00 01 41 58 58 46 |dressMDa|in..AXXF|
|00001de0| 04 a0 14 53 32 e4 0b c0 | 3b 28 42 29 61 75 64 20 |...S2...|;(B)aud |
|00001df0| 72 61 74 65 20 2d 20 43 | 68 61 6e 67 65 20 68 69 |rate - C|hange hi|
|00001e00| 67 68 65 73 74 20 62 61 | 75 64 20 72 61 74 65 20 |ghest ba|ud rate |
|00001e10| 79 6f 75 72 20 73 79 73 | 74 65 6d 20 73 75 70 70 |your sys|tem supp|
|00001e20| 6f 72 74 73 61 0a 40 00 | 00 44 01 39 e9 12 00 b9 |ortsa.@.|.D.9....|
|00001e30| 07 00 e8 32 bd 4c e8 ad | db 34 01 88 46 04 e9 0f |...2.L..|.4..F...|
|00001e40| 28 42 29 48 69 67 68 65 | 73 74 20 62 61 75 64 01 |(B)Highe|st baud.|
|00001e50| 42 58 58 46 04 a0 14 53 | 32 e4 0b c0 27 28 43 29 |BXXF...S|2...'(C)|
|00001e60| 69 74 79 2f 73 74 61 74 | 65 20 2d 20 43 68 61 6e |ity/stat|e - Chan|
|00001e70| 67 65 20 79 6f 75 72 20 | 43 69 74 79 20 26 20 53 |ge your |City & S|
|00001e80| 74 61 74 65 20 26 20 53 | 74 61 74 65 6f 66 20 61 |tate & S|tateof a|
|00001e90| 75 74 6f 20 6d 73 67 73 | 61 0a 40 00 00 44 01 33 |uto msgs|a.@..D.3|
|00001ea0| e9 12 00 b9 07 00 e8 32 | bd 4c e8 ad db 34 01 88 |.......2|.L...4..|
|00001eb0| 46 04 e9 0c 28 43 29 69 | 74 79 2f 73 74 61 74 65 |F...(C)i|ty/state|
|00001ec0| 69 6e 00 01 43 58 58 46 | 04 a0 14 53 32 e4 0b c0 |in..CXXF|...S2...|
|00001ed0| 30 28 45 29 64 69 74 20 | 6d 61 63 72 6f 73 20 28 |0(E)dit |macros (|
|00001ee0| 43 6f 6d 62 69 6e 65 20 | 6d 61 6e 79 20 6b 65 79 |Combine |many key|
|00001ef0| 73 74 72 6f 6b 65 73 20 | 69 6e 74 6f 20 6f 6e 65 |strokes |into one|
|00001f00| 29 66 20 61 75 74 6f 20 | 6d 73 67 73 61 32 40 00 |)f auto |msgsa2@.|
|00001f10| 00 5a 00 32 30 12 00 b9 | 07 00 e8 32 bd 4c e8 ad |.Z.20...|...2.L..|
|00001f20| db 34 01 88 46 04 e9 0d | 28 45 29 64 69 74 20 6d |.4..F...|(E)dit m|
|00001f30| 61 63 72 6f 73 73 65 01 | 45 58 58 46 04 a0 14 53 |acrosse.|EXXF...S|
|00001f40| 32 e4 0b c0 27 28 46 29 | 6c 61 67 20 6d 65 73 73 |2...'(F)|lag mess|
|00001f50| 61 67 65 20 62 61 73 65 | 73 20 69 6e 2f 6f 75 74 |age base|s in/out|
|00001f60| 20 6f 66 20 6e 65 77 20 | 73 63 61 6e 72 73 20 75 | of new |scanrs u|
|00001f70| 73 65 64 20 6f 66 20 61 | 75 74 6f 20 6d 73 67 73 |sed of a|uto msgs|
|00001f80| 61 0a 40 00 00 44 02 32 | 30 12 00 b9 07 00 e8 32 |a.@..D.2|0......2|
|00001f90| bd 4c e8 ad db 34 01 88 | 46 04 e9 0f 28 46 29 6c |.L...4..|F...(F)l|
|00001fa0| 61 67 20 6d 73 67 20 62 | 61 73 65 01 46 58 58 46 |ag msg b|ase.FXXF|
|00001fb0| 04 a0 14 53 32 e4 0b c0 | 2e 28 47 29 72 61 70 68 |...S2...|.(G)raph|
|00001fc0| 69 63 20 63 6f 6c 6f 72 | 73 20 2d 20 43 68 61 6e |ic color|s - Chan|
|00001fd0| 67 65 20 74 68 65 20 41 | 4e 53 49 20 63 6f 6c 6f |ge the A|NSI colo|
|00001fe0| 72 73 20 75 73 65 64 20 | 6f 66 20 61 75 74 6f 20 |rs used |of auto |
|00001ff0| 6d 73 67 73 61 0a 40 00 | 00 44 01 37 e9 12 00 b9 |msgsa.@.|.D.7....|
|00002000| 07 00 e8 32 bd 4c e8 ad | db 34 01 88 46 04 e9 0e |...2.L..|.4..F...|
|00002010| 28 47 29 41 4e 53 49 20 | 63 6f 6c 6f 72 73 63 01 |(G)ANSI |colorsc.|
|00002020| 47 58 58 46 04 a0 14 53 | 32 e4 0b c0 27 28 48 29 |GXXF...S|2...'(H)|
|00002030| 65 6c 70 20 6c 65 76 65 | 6c 20 2d 20 43 68 61 6e |elp leve|l - Chan|
|00002040| 67 65 20 64 65 66 61 75 | 6c 74 20 6d 65 6e 75 20 |ge defau|lt menu |
|00002050| 66 6f 72 6d 20 28 73 79 | 73 74 65 6d 20 20 28 63 |form (sy|stem (c|
|00002060| 70 3c 73 74 72 6c 65 6e | 29 0a 40 00 00 44 02 32 |p<strlen|).@..D.2|
|00002070| 32 3c 74 68 69 73 75 73 | 65 72 2e 6c 69 6e 65 6c |2<thisus|er.linel|
|00002080| 65 6e 29 0c 28 48 29 65 | 6c 70 20 6c 65 76 65 6c |en).(H)e|lp level|
|00002090| 67 65 72 01 48 48 29 49 | 4e 53 20 20 20 20 20 20 |ger.HH)I|NS |
|000020a0| 22 28 4c 29 69 73 74 20 | 63 75 72 72 65 6e 74 20 |"(L)ist |current |
|000020b0| 61 63 63 6f 75 6e 74 20 | 69 6e 66 6f 72 6d 61 74 |account |informat|
|000020c0| 69 6f 6e 61 72 64 20 66 | 75 6e 63 74 69 6f 6e 73 |ionard f|unctions|
|000020d0| 63 74 69 6f 6e 73 61 74 | 69 6f 6e 20 20 0a 40 00 |ctionsat|ion .@.|
|000020e0| 00 44 01 31 39 6d 70 74 | 28 63 2b 27 20 27 2b 63 |.D.19mpt|(c+' '+c|
|000020f0| 29 3b 20 72 70 3a 3d 0b | 28 4c 29 69 73 74 20 69 |); rp:=.|(L)ist i|
|00002100| 6e 66 6f 6d 61 74 69 01 | 4c 58 58 52 44 45 44 49 |nfomati.|LXXRDEDI|
|00002110| 54 0a 20 20 2f 28 4d 29 | 61 69 6c 62 6f 78 20 73 |T. /(M)|ailbox s|
|00002120| 74 61 74 75 73 20 2d 20 | 4f 70 65 6e 2f 63 6c 6f |tatus - |Open/clo|
|00002130| 73 65 2f 66 6f 72 77 61 | 72 64 20 66 75 6e 63 74 |se/forwa|rd funct|
|00002140| 69 6f 6e 73 63 74 69 6f | 6e 73 61 74 69 6f 6e 20 |ionsctio|nsation |
|00002150| 20 0a 40 00 00 44 02 31 | 39 6d 70 74 28 63 2b 27 | .@..D.1|9mpt(c+'|
|00002160| 20 27 2b 63 29 3b 20 72 | 70 3a 3d 0e 28 4d 29 61 | '+c); r|p:=.(M)a|
|00002170| 69 6c 62 6f 78 20 73 74 | 61 74 75 01 4d 58 58 52 |ilbox st|atu.MXXR|
|00002180| 44 45 44 49 54 0a 20 20 | 29 28 50 29 68 6f 6e 65 |DEDIT. |)(P)hone|
|00002190| 20 6e 75 6d 62 65 72 20 | 2d 20 43 68 61 6e 67 65 | number |- Change|
|000021a0| 20 79 6f 75 72 20 70 68 | 6f 6e 65 20 6e 75 6d 62 | your ph|one numb|
|000021b0| 65 72 20 74 68 6f 72 20 | 6f 66 20 61 75 74 6f 20 |er thor |of auto |
|000021c0| 6d 73 67 73 61 0a 40 00 | 00 44 01 35 e9 12 00 b9 |msgsa.@.|.D.5....|
|000021d0| 07 00 e8 32 bd 4c e8 ad | db 34 01 88 46 04 e9 0e |...2.L..|.4..F...|
|000021e0| 28 50 29 68 6f 6e 65 20 | 6e 75 6d 62 65 72 00 01 |(P)hone |number..|
|000021f0| 50 58 58 46 04 a0 14 53 | 32 e4 0b c0 1a 28 51 29 |PXXF...S|2....(Q)|
|00002200| 75 69 74 20 74 6f 20 6d | 61 69 6e 20 73 79 73 74 |uit to m|ain syst|
|00002210| 65 6d 20 6d 65 6e 75 74 | 65 20 6d 65 73 73 61 67 |em menut|e messag|
|00002220| 65 20 74 6f 20 61 75 74 | 68 6f 72 20 6f 66 20 61 |e to aut|hor of a|
|00002230| 75 74 6f 20 6d 73 67 73 | 61 01 40 00 00 5e 01 31 |uto msgs|a.@..^.1|
|00002240| e9 12 00 b9 07 00 e8 32 | bd 4c e8 ad db 34 01 88 |.......2|.L...4..|
|00002250| 46 04 e9 0e 28 51 29 75 | 69 74 20 74 6f 20 6d 61 |F...(Q)u|it to ma|
|00002260| 69 6e 00 01 51 58 58 46 | 04 a0 14 53 32 e4 0b c0 |in..QXXF|...S2...|
|00002270| 37 28 53 29 63 72 65 65 | 6e 20 73 69 7a 65 20 2d |7(S)cree|n size -|
|00002280| 20 43 68 61 6e 65 20 6e | 75 6d 62 65 72 20 6f 66 | Chane n|umber of|
|00002290| 20 63 6f 6c 75 6d 6e 73 | 2f 6c 69 6e 65 73 20 6f | columns|/lines o|
|000022a0| 6e 20 73 63 72 65 65 6e | 6e 20 20 20 20 0a 40 00 |n screen|n .@.|
|000022b0| 00 44 02 31 30 3d 74 72 | 75 65 3b 0d 0a 20 20 20 |.D.10=tr|ue;.. |
|000022c0| 20 20 20 20 20 20 20 0d | 28 53 29 63 72 65 65 6e | .|(S)creen|
|000022d0| 20 73 69 7a 65 20 20 01 | 53 58 58 20 20 65 6e 64 | size .|SXX end|
|000022e0| 3b 0d 0a 20 2e 28 54 29 | 79 70 65 20 6f 66 20 63 |;.. .(T)|ype of c|
|000022f0| 6f 6d 70 75 74 65 72 20 | 2d 20 43 68 61 6e 67 65 |omputer |- Change|
|00002300| 20 79 6f 75 72 20 63 6f | 6d 70 75 74 65 72 20 74 | your co|mputer t|
|00002310| 79 70 65 20 6f 66 20 61 | 75 74 6f 20 6d 73 67 73 |ype of a|uto msgs|
|00002320| 61 0a 40 00 00 44 01 36 | e9 12 00 b9 07 00 e8 32 |a.@..D.6|.......2|
|00002330| bd 4c e8 ad db 34 01 88 | 46 04 e9 0b 28 54 29 43 |.L...4..|F...(T)C|
|00002340| 6f 6d 70 75 74 65 72 20 | 54 79 70 01 54 58 58 46 |omputer |Typ.TXXF|
|00002350| 04 a0 14 53 32 e4 0b c0 | 28 28 5a 29 69 70 20 63 |...S2...|((Z)ip c|
|00002360| 6f 64 65 20 2d 20 43 68 | 61 6e 67 65 20 79 6f 75 |ode - Ch|ange you|
|00002370| 72 20 70 6f 73 74 61 6c | 20 7a 69 70 20 63 6f 64 |r postal| zip cod|
|00002380| 65 61 75 74 68 6f 72 20 | 6f 66 20 61 75 74 6f 20 |eauthor |of auto |
|00002390| 6d 73 67 73 61 0a 40 00 | 00 44 01 34 e9 12 00 b9 |msgsa.@.|.D.4....|
|000023a0| 07 00 e8 32 bd 4c e8 ad | db 34 01 88 46 04 e9 0a |...2.L..|.4..F...|
|000023b0| 28 5a 29 69 70 20 63 6f | 64 65 44 61 69 6e 00 01 |(Z)ip co|deDain..|
|000023c0| 5a 58 58 46 04 a0 14 53 | 32 e4 0b c0 34 28 24 29 |ZXXF...S|2...4($)|
|000023d0| 43 68 61 6e 67 65 20 79 | 6f 75 72 20 70 61 73 73 |Change y|our pass|
|000023e0| 77 6f 72 64 20 75 73 65 | 64 20 74 6f 20 67 65 74 |word use|d to get|
|000023f0| 20 6f 6e 74 6f 20 74 68 | 69 73 20 73 79 73 74 65 | onto th|is syste|
|00002400| 6d 69 6f 6e 67 2e 64 61 | 74 0a 40 00 00 44 02 31 |miong.da|t.@..D.1|
|00002410| 33 53 4f 50 4d 4e 55 2e | 4d 53 47 29 3b 0d 0a 20 |3SOPMNU.|MSG);.. |
|00002420| 20 66 6f 0b 28 24 29 50 | 61 73 73 77 6f 72 64 20 | fo.($)P|assword |
|00002430| 63 68 61 01 24 58 58 6e | 0d 0a 20 20 20 20 73 65 |cha.$XXn|.. se|
|00002440| 15 28 31 29 54 6f 67 67 | 6c 65 20 41 4e 53 49 20 |.(1)Togg|le ANSI |
|00002450| 4f 4e 2f 4f 46 46 69 73 | 69 74 65 65 20 79 6f 75 |ON/OFFis|itee you|
|00002460| 72 20 61 63 63 6f 75 6e | 74 20 69 6e 66 6f 72 6d |r accoun|t inform|
|00002470| 61 74 69 6f 6e 74 3b 0d | 0a 76 61 72 20 0a 40 00 |ationt;.|.var .@.|
|00002480| 00 44 02 31 31 6c 61 73 | 2c 62 34 3a 73 74 72 70 |.D.11las|,b4:strp|
|00002490| 74 72 3b 0d 0a 20 20 0e | 28 31 29 54 6f 67 67 6c |tr;.. .|(1)Toggl|
|000024a0| 65 20 41 4e 53 49 61 01 | 31 58 58 72 70 74 72 3b |e ANSIa.|1XXrptr;|
|000024b0| 0d 0a 20 20 16 28 32 29 | 54 6f 67 67 6c 65 20 63 |.. .(2)|Toggle c|
|000024c0| 6f 6c 6f 72 20 4f 4e 2f | 4f 46 46 75 73 20 2d 20 |olor ON/|OFFus - |
|000024d0| 4c 6f 6f 6b 20 77 69 74 | 68 6f 75 74 20 70 61 67 |Look wit|hout pag|
|000024e0| 69 6e 67 20 20 20 74 3a | 74 65 78 74 3b 0d 0a 20 |ing t:|text;.. |
|000024f0| 20 0a 40 00 00 44 02 31 | 32 72 65 63 3b 0d 0a 20 | .@..D.1|2rec;.. |
|00002500| 20 20 20 78 3a 61 72 72 | 61 79 5b 0f 28 32 29 54 | x:arr|ay[.(2)T|
|00002510| 6f 67 67 6c 65 20 63 6f | 6c 6f 72 01 32 58 58 79 |oggle co|lor.2XXy|
|00002520| 5b 31 2e 2e 39 5d 20 6f | 18 28 33 29 54 6f 67 67 |[1..9] o|.(3)Togg|
|00002530| 6c 65 20 5b 50 41 55 53 | 45 5d 20 4f 4e 2f 4f 46 |le [PAUS|E] ON/OF|
|00002540| 46 74 65 20 6f 6e 20 61 | 20 6c 69 73 74 20 6f 66 |Fte on a| list of|
|00002550| 20 71 75 65 73 74 69 6f | 6e 73 73 6c 3a 3d 35 30 | questio|nssl:=50|
|00002560| 3b 0d 0a 20 20 0a 40 00 | 00 44 02 31 35 20 20 75 |;.. .@.|.D.15 u|
|00002570| 73 65 72 2e 64 73 6c 3a | 3d 33 30 3b 0d 0a 20 0f |ser.dsl:|=30;.. .|
|00002580| 28 33 29 54 6f 67 67 6c | 65 20 50 41 55 53 45 01 |(3)Toggl|e PAUSE.|
|00002590| 33 58 58 65 3b 0d 0a 20 | 20 20 20 20 22 28 34 29 |3XXe;.. | "(4)|
|000025a0| 54 6f 67 67 6c 65 20 6f | 6e 65 6b 65 79 20 6f 72 |Toggle o|nekey or|
|000025b0| 20 6c 69 6e 65 69 6e 70 | 75 74 20 6d 6f 64 65 65 | lineinp|ut modee|
|000025c0| 74 20 6f 66 20 71 75 65 | 73 74 69 6f 6e 73 73 6c |t of que|stionssl|
|000025d0| 3a 3d 35 30 3b 0d 0a 20 | 20 0a 40 00 00 44 02 31 |:=50;.. | .@..D.1|
|000025e0| 36 20 20 75 73 65 72 2e | 64 73 6c 3a 3d 33 30 3b |6 user.|dsl:=30;|
|000025f0| 0d 0a 20 0f 28 34 29 54 | 6f 67 67 6c 65 20 69 6e |.. .(4)T|oggle in|
|00002600| 70 75 74 01 34 58 58 65 | 3b 0d 0a 20 20 20 20 20 |put.4XXe|;.. |
|00002610| 37 28 35 29 54 6f 67 67 | 6c 65 20 75 73 65 20 6f |7(5)Togg|le use o|
|00002620| 66 20 74 68 65 20 65 78 | 74 65 72 6e 61 6c 20 66 |f the ex|ternal f|
|00002630| 75 6c 6c 20 73 63 72 65 | 65 6e 20 65 64 69 74 6f |ull scre|en edito|
|00002640| 72 20 4f 4e 2f 4f 46 46 | 20 42 42 53 72 0a 40 00 |r ON/OFF| BBSr.@.|
|00002650| 00 44 02 31 34 6e 64 3b | 0d 0a 20 20 20 20 20 20 |.D.14nd;|.. |
|00002660| 65 6e 64 3b 0d 0a 20 0f | 28 35 29 54 6f 67 67 6c |end;.. .|(5)Toggl|
|00002670| 65 45 64 69 74 6f 72 01 | 35 58 58 6c 6f 73 65 28 |eEditor.|5XXlose(|
|00002680| 74 29 3b 0d 2e 28 36 29 | 54 6f 67 67 6c 65 20 74 |t);..(6)|Toggle t|
|00002690| 68 65 20 75 73 65 20 6f | 66 20 63 6c 65 61 72 20 |he use o|f clear |
|000026a0| 73 63 72 65 65 6e 20 63 | 6f 64 65 73 20 4f 4e 2f |screen c|odes ON/|
|000026b0| 4f 46 46 20 66 72 6f 6d | 20 74 68 65 20 42 42 53 |OFF from| the BBS|
|000026c0| 72 0a 40 00 00 44 02 31 | 38 6e 64 3b 0d 0a 20 20 |r.@..D.1|8nd;.. |
|000026d0| 20 20 20 20 65 6e 64 3b | 0d 0a 20 0d 28 36 29 54 | end;|.. .(6)T|
|000026e0| 6f 67 67 6c 65 20 43 4c | 53 57 70 01 36 58 58 6c |oggle CL|SWp.6XXl|
|000026f0| 6f 73 65 28 74 29 3b 0d | 26 28 37 29 54 6f 67 67 |ose(t);.|&(7)Togg|
|00002700| 6c 65 20 56 54 2d 31 30 | 30 20 74 79 70 65 20 74 |le VT-10|0 type t|
|00002710| 61 62 20 63 6f 64 65 73 | 20 4f 4e 2f 4f 46 46 46 |ab codes| ON/OFFF|
|00002720| 46 6f 66 72 61 6d 73 20 | 66 72 6f 6d 20 74 68 65 |Foframs |from the|
|00002730| 20 42 42 53 72 0a 40 00 | 00 44 02 31 37 6e 64 3b | BBSr.@.|.D.17nd;|
|00002740| 0d 0a 20 20 20 20 20 20 | 65 6e 64 3b 0d 0a 20 0e |.. |end;.. .|
|00002750| 28 37 29 54 6f 67 67 6c | 65 20 54 41 42 53 70 01 |(7)Toggl|e TABSp.|
|00002760| 37 58 58 6c 6f 73 65 28 | 74 29 3b 0d 18 45 78 74 |7XXlose(|t);..Ext|
|00002770| 65 72 6e 61 6c 20 43 68 | 61 69 6e 20 46 69 6c 65 |ernal Ch|ain File|
|00002780| 20 4d 65 6e 75 29 3b 0d | 0a 20 20 20 20 20 20 20 | Menu);.|. |
|00002790| 20 20 20 20 20 69 66 20 | 69 69 3c 3e 27 27 20 74 | if |ii<>'' t|
|000027a0| 68 65 6e 20 62 65 67 69 | 6e ff 40 04 01 05 13 45 |hen begi|n.@....E|
|000027b0| 58 54 45 52 4e 41 4c 20 | 50 52 4f 47 52 41 4d 53 |XTERNAL |PROGRAMS|
|000027c0| 3a 20 65 00 69 69 29 3b | 0d 0a 20 20 20 20 20 20 |: e.ii);|.. |
|000027d0| 20 20 20 01 00 20 20 20 | 73 61 76 65 01 00 74 72 | .. |save..tr|
|000027e0| 15 28 43 29 68 61 74 20 | 77 69 74 68 20 74 68 65 |.(C)hat |with the|
|000027f0| 20 53 79 73 4f 70 20 6d | 65 6e 75 74 65 20 6d 65 | SysOp m|enute me|
|00002800| 73 73 61 67 65 20 74 6f | 20 61 75 74 68 6f 72 20 |ssage to| author |
|00002810| 6f 66 20 61 75 74 6f 20 | 6d 73 67 73 61 0a 40 00 |of auto |msgsa.@.|
|00002820| 00 40 01 31 e9 12 00 b9 | 07 00 e8 32 bd 4c e8 ad |.@.1....|...2.L..|
|00002830| db 34 01 88 46 04 e9 0e | 28 43 29 68 61 74 20 77 |.4..F...|(C)hat w|
|00002840| 2f 53 79 73 4f 70 00 01 | 43 58 58 46 04 a0 14 53 |/SysOp..|CXXF...S|
|00002850| 32 e4 0b c0 28 28 46 29 | 69 6c 65 20 74 72 61 6e |2...((F)|ile tran|
|00002860| 73 66 65 72 20 73 79 73 | 74 65 6d 20 2d 20 55 70 |sfer sys|tem - Up|
|00002870| 6c 6f 61 64 2f 44 6f 77 | 6e 6c 6f 61 64 61 75 74 |load/Dow|nloadaut|
|00002880| 68 6f 72 20 6f 66 20 61 | 75 74 6f 20 6d 73 67 73 |hor of a|uto msgs|
|00002890| 61 0a 40 00 00 5e 01 36 | e9 12 00 b9 07 00 e8 32 |a.@..^.6|.......2|
|000028a0| bd 4c e8 ad db 34 01 88 | 46 04 e9 0d 28 46 29 69 |.L...4..|F...(F)i|
|000028b0| 6c 65 20 73 79 73 74 65 | 6d 6e 00 01 46 58 58 46 |le syste|mn..FXXF|
|000028c0| 04 a0 14 53 32 e4 0b c0 | 35 28 47 29 6f 6f 64 62 |...S2...|5(G)oodb|
|000028d0| 79 65 20 2d 20 53 79 73 | 4f 70 20 63 6f 6d 6d 65 |ye - Sys|Op comme|
|000028e0| 6e 74 20 2d 20 4c 6f 67 | 73 20 79 6f 75 20 6f 66 |nt - Log|s you of|
|000028f0| 66 20 61 6e 64 20 68 61 | 6e 67 73 20 75 70 6f 20 |f and ha|ngs upo |
|00002900| 6d 73 67 73 61 01 40 00 | 00 2a 01 31 e9 12 00 b9 |msgsa.@.|.*.1....|
|00002910| 07 00 e8 32 bd 4c e8 ad | db 34 01 88 46 04 e9 09 |...2.L..|.4..F...|
|00002920| 28 47 29 6f 6f 64 62 79 | 65 4d 44 61 69 6e 00 01 |(G)oodby|eMDain..|
|00002930| 47 58 58 46 04 a0 14 53 | 32 e4 0b c0 37 28 2f 47 |GXXF...S|2...7(/G|
|00002940| 29 49 6e 73 74 61 6e 74 | 20 68 61 6e 67 75 70 20 |)Instant| hangup |
|00002950| 2d 20 4e 6f 74 68 69 6e | 67 20 69 73 20 70 72 69 |- Nothin|g is pri|
|00002960| 6e 74 65 64 20 61 66 74 | 65 72 20 65 78 65 63 75 |nted aft|er execu|
|00002970| 74 69 6f 6e 6d 73 67 73 | 61 01 40 00 00 2a 01 49 |tionmsgs|a.@..*.I|
|00002980| e9 12 00 b9 07 00 e8 32 | bd 4c e8 ad db 34 01 88 |.......2|.L...4..|
|00002990| 46 04 e9 0a 28 2f 47 29 | 48 61 6e 67 75 70 44 61 |F...(/G)|HangupDa|
|000029a0| 69 6e 00 02 2f 47 58 46 | 04 a0 14 53 32 e4 0b c0 |in../GXF|...S2...|
|000029b0| 2b 28 4d 29 65 73 73 61 | 67 65 20 73 79 73 74 65 |+(M)essa|ge syste|
|000029c0| 6d 20 6d 65 6e 75 20 28 | 70 72 69 76 61 74 65 2f |m menu (|private/|
|000029d0| 70 75 62 6c 69 63 20 6d | 61 69 6c 29 68 6f 72 20 |public m|ail)hor |
|000029e0| 6f 66 20 61 75 74 6f 20 | 6d 73 67 73 61 0a 40 00 |of auto |msgsa.@.|
|000029f0| 00 5e 01 33 e9 12 00 b9 | 07 00 e8 32 bd 4c e8 ad |.^.3....|...2.L..|
|00002a00| db 34 01 88 46 04 e9 0f | 28 4d 29 65 73 73 61 67 |.4..F...|(M)essag|
|00002a10| 65 20 62 61 73 65 73 01 | 4d 58 58 46 04 a0 14 53 |e bases.|MXXF...S|
|00002a20| 32 e4 0b c0 1a 28 51 29 | 75 69 74 20 74 6f 20 6d |2....(Q)|uit to m|
|00002a30| 61 69 6e 20 73 79 73 74 | 65 6d 20 6d 65 6e 75 74 |ain syst|em menut|
|00002a40| 65 20 6d 65 73 73 61 67 | 65 20 74 6f 20 61 75 74 |e messag|e to aut|
|00002a50| 68 6f 72 20 6f 66 20 61 | 75 74 6f 20 6d 73 67 73 |hor of a|uto msgs|
|00002a60| 61 01 40 00 00 5e 01 31 | e9 12 00 b9 07 00 e8 32 |a.@..^.1|.......2|
|00002a70| bd 4c e8 ad db 34 01 88 | 46 04 e9 0e 28 51 29 75 |.L...4..|F...(Q)u|
|00002a80| 69 74 20 74 6f 20 6d 61 | 69 6e 00 01 51 58 58 46 |it to ma|in..QXXF|
|00002a90| 04 a0 14 53 32 e4 0b c0 | 12 46 69 6c 65 20 54 72 |...S2...|.File Tr|
|00002aa0| 61 6e 73 66 65 72 20 4d | 65 6e 75 74 28 69 69 2c |ansfer M|enut(ii,|
|00002ab0| 34 29 3b 0d 0a 20 20 20 | 20 20 20 20 20 20 20 20 |4);.. | |
|00002ac0| 20 69 66 20 69 69 3c 3e | 27 27 20 74 68 65 6e 20 | if ii<>|'' then |
|00002ad0| 62 65 67 69 6e 01 40 05 | 01 06 0a 46 49 4c 45 4d |begin.@.|...FILEM|
|00002ae0| 45 4e 55 3a 20 62 79 74 | 3a 3d 76 61 6c 75 65 00 |ENU: byt|:=value.|
|00002af0| 69 69 29 3b 0d 0a 20 20 | 20 20 20 20 20 20 20 01 |ii);.. | .|
|00002b00| 00 20 20 20 73 61 76 65 | 01 01 74 72 38 28 23 29 |. save|..tr8(#)|
|00002b10| 43 68 61 6e 67 65 20 74 | 6f 20 61 6e 6f 74 68 65 |Change t|o anothe|
|00002b20| 72 20 66 69 6c 65 20 73 | 65 63 74 69 6f 6e 20 2d |r file s|ection -|
|00002b30| 20 45 6e 74 65 72 20 73 | 65 63 74 69 6f 6e 20 6e | Enter s|ection n|
|00002b40| 75 6d 62 65 72 6f 6e 2e | 6e 0a 40 01 00 23 00 44 |umberon.|n.@..#.D|
|00002b50| 76 6e 5d 3d 69 31 20 74 | 68 65 6e 20 62 65 67 69 |vn]=i1 t|hen begi|
|00002b60| 6e 0d 0a 0e 28 23 29 43 | 68 61 6e 67 65 20 62 61 |n...(#)C|hange ba|
|00002b70| 73 65 69 01 23 58 58 74 | 2c 27 20 20 20 20 20 20 |sei.#XXt|,' |
|00002b80| 34 28 41 29 72 65 61 20 | 6c 69 73 74 20 2d 20 4c |4(A)rea |list - L|
|00002b90| 69 73 74 20 6f 66 20 66 | 69 6c 65 20 73 65 63 74 |ist of f|ile sect|
|00002ba0| 69 6f 6e 73 20 61 76 61 | 69 6c 61 62 6c 65 20 74 |ions ava|ilable t|
|00002bb0| 6f 20 79 6f 75 6c 6f 67 | 2d 6f 6e 2e 6e 0a 40 01 |o youlog|-on.n.@.|
|00002bc0| 00 41 00 33 76 6e 5d 3d | 69 31 20 74 68 65 6e 20 |.A.3vn]=|i1 then |
|00002bd0| 62 65 67 69 6e 0d 0a 0b | 28 41 29 72 65 61 20 6c |begin...|(A)rea l|
|00002be0| 69 73 74 61 67 65 74 01 | 41 58 58 74 2c 27 20 20 |istaget.|AXXt,' |
|00002bf0| 20 20 20 20 34 28 42 29 | 72 6f 77 73 65 20 74 68 | 4(B)|rowse th|
|00002c00| 65 20 66 69 6c 65 73 20 | 69 6e 20 74 68 69 73 20 |e files |in this |
|00002c10| 73 65 63 74 69 6f 6e 20 | 28 6e 6f 20 64 65 73 63 |section |(no desc|
|00002c20| 72 69 70 74 69 6f 6e 73 | 29 6c 6f 67 2d 6f 6e 2e |riptions|)log-on.|
|00002c30| 6e 0a 40 01 00 42 00 33 | 76 6e 5d 3d 69 31 20 74 |n.@..B.3|vn]=i1 t|
|00002c40| 68 65 6e 20 62 65 67 69 | 6e 0d 0a 0e 28 42 29 72 |hen begi|n...(B)r|
|00002c50| 6f 77 73 65 20 66 69 6c | 65 73 74 01 42 58 58 74 |owse fil|est.BXXt|
|00002c60| 2c 27 20 20 20 20 20 20 | 15 28 43 29 68 61 74 20 |,' |.(C)hat |
|00002c70| 77 69 74 68 20 74 68 65 | 20 53 59 53 4f 50 20 4d |with the| SYSOP M|
|00002c80| 65 73 73 61 67 65 20 69 | 73 20 64 69 73 70 6c 61 |essage i|s displa|
|00002c90| 79 65 64 20 77 68 65 6e | 20 79 6f 75 20 6c 6f 67 |yed when| you log|
|00002ca0| 2d 6f 6e 2e 6e 0a 40 01 | 00 40 00 33 76 6e 5d 3d |-on.n.@.|.@.3vn]=|
|00002cb0| 69 31 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 0a 0e |i1 then |begin...|
|00002cc0| 28 43 29 68 61 74 20 77 | 2f 53 59 53 4f 50 74 01 |(C)hat w|/SYSOPt.|
|00002cd0| 43 58 58 74 2c 27 20 20 | 20 20 20 20 23 28 44 29 |CXXt,' | #(D)|
|00002ce0| 6f 77 6e 6c 6f 61 64 20 | 61 20 66 69 6c 65 20 66 |ownload |a file f|
|00002cf0| 72 6f 6d 20 74 68 69 73 | 20 73 65 63 74 69 6f 6e |rom this| section|
|00002d00| 73 70 6c 61 79 65 64 20 | 77 68 65 6e 20 79 6f 75 |splayed |when you|
|00002d10| 20 6c 6f 67 2d 6f 6e 2e | 6e 0a 40 01 00 44 00 33 | log-on.|n.@..D.3|
|00002d20| 76 6e 5d 3d 69 31 20 74 | 68 65 6e 20 62 65 67 69 |vn]=i1 t|hen begi|
|00002d30| 6e 0d 0a 0a 28 44 29 6f | 77 6e 6c 6f 61 64 44 61 |n...(D)o|wnloadDa|
|00002d40| 67 65 74 01 44 58 58 74 | 2c 27 20 20 20 20 20 20 |get.DXXt|,' |
|00002d50| 37 28 46 29 69 6e 64 20 | 61 6c 6c 20 66 69 6c 65 |7(F)ind |all file|
|00002d60| 73 20 77 69 74 68 20 65 | 6e 74 65 72 65 64 20 74 |s with e|ntered t|
|00002d70| 65 78 74 20 69 6e 20 74 | 68 65 69 72 20 64 65 73 |ext in t|heir des|
|00002d80| 63 72 69 70 74 69 6f 6e | 74 6f 6e 2e 6e 0a 40 01 |cription|ton.n.@.|
|00002d90| 00 46 00 33 76 6e 5d 3d | 69 31 20 74 68 65 6e 20 |.F.3vn]=|i1 then |
|00002da0| 62 65 67 69 6e 0d 0a 0f | 28 46 29 69 6e 64 20 64 |begin...|(F)ind d|
|00002db0| 65 73 63 72 69 70 74 01 | 46 58 58 74 2c 27 20 20 |escript.|FXXt,' |
|00002dc0| 20 20 20 20 30 28 47 29 | 6f 6f 64 62 79 65 20 2d | 0(G)|oodbye -|
|00002dd0| 20 4c 6f 67 6f 66 66 20 | 61 6e 64 20 68 61 6e 67 | Logoff |and hang|
|00002de0| 75 70 20 2d 20 4e 6f 20 | 73 79 73 6f 70 20 63 6f |up - No |sysop co|
|00002df0| 6d 6d 65 6e 74 79 6f 75 | 20 6c 6f 67 2d 6f 6e 2e |mmentyou| log-on.|
|00002e00| 6e 01 40 01 00 2a 01 31 | 76 6e 5d 3d 69 31 20 74 |n.@..*.1|vn]=i1 t|
|00002e10| 68 65 6e 20 62 65 67 69 | 6e 0d 0a 09 28 47 29 6f |hen begi|n...(G)o|
|00002e20| 6f 64 62 79 65 20 6e 2f | 6d 73 67 01 47 58 58 74 |odbye n/|msg.GXXt|
|00002e30| 2c 27 20 20 20 20 20 20 | 36 28 2f 47 29 49 6e 73 |,' |6(/G)Ins|
|00002e40| 74 61 6e 74 20 68 61 6e | 67 75 70 20 2d 20 4e 6f |tant han|gup - No|
|00002e50| 74 68 69 6e 67 20 69 73 | 20 70 72 69 6e 74 65 64 |thing is| printed|
|00002e60| 20 61 66 74 65 72 20 65 | 78 65 63 75 74 65 64 20 | after e|xecuted |
|00002e70| 20 6f 6e 2e 6e 01 40 01 | 00 2a 01 49 76 6e 5d 3d | on.n.@.|.*.Ivn]=|
|00002e80| 69 31 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 0a 0a |i1 then |begin...|
|00002e90| 28 2f 47 29 48 61 6e 67 | 75 70 44 6c 69 73 74 02 |(/G)Hang|upDlist.|
|00002ea0| 2f 47 58 74 2c 27 20 20 | 20 20 20 20 34 28 49 29 |/GXt,' | 4(I)|
|00002eb0| 6e 74 65 72 69 6f 72 20 | 6c 69 73 74 20 2d 20 4c |nterior |list - L|
|00002ec0| 69 73 74 20 66 69 6c 65 | 73 20 69 6e 73 69 64 65 |ist file|s inside|
|00002ed0| 20 41 52 43 20 6f 72 20 | 4c 52 42 20 66 69 6c 65 | ARC or |LRB file|
|00002ee0| 73 6c 6f 67 2d 6f 6e 2e | 6e 0a 40 01 00 49 00 33 |slog-on.|n.@..I.3|
|00002ef0| 76 6e 5d 3d 69 31 20 74 | 68 65 6e 20 62 65 67 69 |vn]=i1 t|hen begi|
|00002f00| 6e 0d 0a 0f 28 49 29 6e | 74 65 72 69 6f 72 20 6c |n...(I)n|terior l|
|00002f10| 69 73 74 01 49 58 58 74 | 2c 27 20 20 20 20 20 20 |ist.IXXt|,' |
|00002f20| 2e 28 4c 29 69 73 74 20 | 66 69 6c 65 73 20 69 6e |.(L)ist |files in|
|00002f30| 20 74 68 69 73 20 73 65 | 63 74 69 6f 6e 20 77 69 | this se|ction wi|
|00002f40| 74 68 20 64 65 73 63 72 | 69 70 74 69 6f 6e 73 6e |th descr|iptionsn|
|00002f50| 20 79 6f 75 20 6c 6f 67 | 2d 6f 6e 2e 6e 0a 40 01 | you log|-on.n.@.|
|00002f60| 00 4c 00 33 76 6e 5d 3d | 69 31 20 74 68 65 6e 20 |.L.3vn]=|i1 then |
|00002f70| 62 65 67 69 6e 0d 0a 0c | 28 4c 29 69 73 74 20 66 |begin...|(L)ist f|
|00002f80| 69 6c 65 73 67 65 74 01 | 4c 58 58 74 2c 27 20 20 |ilesget.|LXXt,' |
|00002f90| 20 20 20 20 2d 28 4d 29 | 65 73 73 61 67 65 20 73 | -(M)|essage s|
|00002fa0| 79 73 74 65 6d 20 2d 20 | 52 65 74 75 72 6e 20 74 |ystem - |Return t|
|00002fb0| 6f 20 74 68 65 20 6d 65 | 73 73 61 67 65 20 62 61 |o the me|ssage ba|
|00002fc0| 73 65 65 6e 20 79 6f 75 | 20 6c 6f 67 2d 6f 6e 2e |seen you| log-on.|
|00002fd0| 6e 01 40 01 00 5e 01 33 | 76 6e 5d 3d 69 31 20 74 |n.@..^.3|vn]=i1 t|
|00002fe0| 68 65 6e 20 62 65 67 69 | 6e 0d 0a 0e 28 4d 29 65 |hen begi|n...(M)e|
|00002ff0| 73 73 61 67 65 20 62 61 | 73 65 74 01 4d 58 58 74 |ssage ba|set.MXXt|
|00003000| 2c 27 20 20 20 20 20 20 | 2f 28 4e 29 65 77 20 66 |,' |/(N)ew f|
|00003010| 69 6c 65 20 73 65 61 72 | 63 68 20 2d 20 73 65 61 |ile sear|ch - sea|
|00003020| 72 63 68 65 73 20 6f 6e | 6c 79 20 6d 61 72 6b 20 |rches on|ly mark |
|00003030| 73 65 63 74 69 6f 6e 73 | 6e 73 6f 75 20 6c 6f 67 |sections|nsou log|
|00003040| 2d 6f 6e 2e 6e 0a 40 01 | 00 4e 00 33 76 6e 5d 3d |-on.n.@.|.N.3vn]=|
|00003050| 69 31 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 0a 0f |i1 then |begin...|
|00003060| 28 4e 29 65 77 20 66 69 | 6c 65 20 73 72 63 68 01 |(N)ew fi|le srch.|
|00003070| 4e 58 58 74 2c 27 20 20 | 20 20 20 20 3c 28 50 29 |NXXt,' | <(P)|
|00003080| 43 68 61 6e 67 65 20 6e | 65 77 20 66 69 6c 65 20 |Change n|ew file |
|00003090| 70 6f 69 6e 74 65 72 20 | 64 61 74 65 20 2d 20 44 |pointer |date - D|
|000030a0| 61 74 65 20 74 68 61 74 | 20 6d 61 6b 65 73 20 61 |ate that| makes a|
|000030b0| 20 66 69 6c 65 20 6e 65 | 77 0a 40 01 00 50 00 33 | file ne|w.@..P.3|
|000030c0| 76 6e 5d 3d 69 31 20 74 | 68 65 6e 20 62 65 67 69 |vn]=i1 t|hen begi|
|000030d0| 6e 0d 0a 0f 28 50 29 4e | 65 77 66 69 6c 65 20 64 |n...(P)N|ewfile d|
|000030e0| 61 74 65 01 50 58 58 74 | 2c 27 20 20 20 20 20 20 |ate.PXXt|,' |
|000030f0| 1a 28 51 29 75 69 74 20 | 74 6f 20 6d 61 69 6e 20 |.(Q)uit |to main |
|00003100| 73 79 73 74 65 6d 20 6d | 65 6e 75 61 67 65 20 69 |system m|enuage i|
|00003110| 73 20 64 69 73 70 6c 61 | 79 65 64 20 77 68 65 6e |s displa|yed when|
|00003120| 20 79 6f 75 20 6c 6f 67 | 2d 6f 6e 2e 6e 01 40 01 | you log|-on.n.@.|
|00003130| 00 5e 01 31 76 6e 5d 3d | 69 31 20 74 68 65 6e 20 |.^.1vn]=|i1 then |
|00003140| 62 65 67 69 6e 0d 0a 0e | 28 51 29 75 69 74 20 74 |begin...|(Q)uit t|
|00003150| 6f 20 6d 61 69 6e 74 01 | 51 58 58 74 2c 27 20 20 |o maint.|QXXt,' |
|00003160| 20 20 20 20 39 28 52 29 | 65 6d 6f 76 65 20 61 20 | 9(R)|emove a |
|00003170| 66 69 6c 65 20 66 72 6f | 6d 20 63 75 72 72 65 6e |file fro|m curren|
|00003180| 74 20 73 65 63 74 69 6f | 6e 20 28 69 66 20 6f 77 |t sectio|n (if ow|
|00003190| 6e 65 72 20 6f 72 20 72 | 65 6d 6f 74 65 29 6e 2e |ner or r|emote)n.|
|000031a0| 6e 0a 40 01 00 52 00 33 | 76 6e 5d 3d 69 31 20 74 |n.@..R.3|vn]=i1 t|
|000031b0| 68 65 6e 20 62 65 67 69 | 6e 0d 0a 0d 28 52 29 65 |hen begi|n...(R)e|
|000031c0| 6d 6f 76 65 20 66 69 6c | 65 65 74 01 52 58 58 74 |move fil|eet.RXXt|
|000031d0| 2c 27 20 20 20 20 20 20 | 2f 28 53 29 63 61 6e 20 |,' |/(S)can |
|000031e0| 61 6c 6c 20 64 69 72 65 | 63 74 6f 72 69 65 73 20 |all dire|ctories |
|000031f0| 77 69 74 68 20 61 20 63 | 65 72 74 61 69 6e 20 66 |with a c|ertain f|
|00003200| 69 6c 65 20 6d 61 73 6b | 20 79 6f 75 20 6c 6f 67 |ile mask| you log|
|00003210| 2d 6f 6e 2e 6e 0a 40 01 | 00 53 00 33 76 6e 5d 3d |-on.n.@.|.S.3vn]=|
|00003220| 69 31 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 0a 0f |i1 then |begin...|
|00003230| 28 53 29 63 61 6e 20 61 | 6c 6c 20 64 69 72 73 01 |(S)can a|ll dirs.|
|00003240| 53 58 58 74 2c 27 20 20 | 20 20 20 20 39 28 54 29 |SXXt,' | 9(T)|
|00003250| 79 70 65 20 61 20 66 69 | 6c 65 20 2d 20 4e 6f 74 |ype a fi|le - Not|
|00003260| 65 3a 20 44 6f 65 73 20 | 4e 4f 54 20 63 68 65 63 |e: Does |NOT chec|
|00003270| 6b 20 69 66 20 69 74 20 | 69 73 20 61 20 74 65 78 |k if it |is a tex|
|00003280| 74 20 66 69 6c 65 69 6c | 65 0a 40 01 00 54 00 33 |t fileil|e.@..T.3|
|00003290| 76 6e 5d 3d 69 31 20 74 | 68 65 6e 20 62 65 67 69 |vn]=i1 t|hen begi|
|000032a0| 6e 0d 0a 0b 28 54 29 79 | 70 65 20 66 69 6c 65 64 |n...(T)y|pe filed|
|000032b0| 69 72 73 01 54 58 58 74 | 2c 27 20 20 20 20 20 20 |irs.TXXt|,' |
|000032c0| 26 28 55 29 70 6c 6f 61 | 64 20 61 20 66 69 6c 65 |&(U)ploa|d a file|
|000032d0| 20 74 6f 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 | to the |current |
|000032e0| 73 65 63 74 69 6f 6e 61 | 73 65 73 20 28 69 6e 64 |sectiona|ses (ind|
|000032f0| 69 76 2e 29 75 61 6c 6c | 79 29 61 73 65 0a 40 01 |iv.)uall|y)ase.@.|
|00003300| 00 55 00 47 20 20 20 69 | 66 20 28 63 3e 3d 27 20 |.U.G i|f (c>=' |
|00003310| 27 29 20 61 6e 64 20 0d | 28 55 29 70 6c 6f 61 64 |') and .|(U)pload|
|00003320| 20 66 69 6c 65 61 6c 01 | 55 58 58 20 20 20 20 20 | fileal.|UXX |
|00003330| 69 66 20 63 33 28 56 29 | 61 6c 69 64 61 74 65 20 |if c3(V)|alidate |
|00003340| 6f 6e 65 20 6f 72 20 6d | 6f 72 65 20 66 69 6c 65 |one or m|ore file|
|00003350| 73 20 69 6e 20 74 68 65 | 20 63 75 72 72 65 6e 74 |s in the| current|
|00003360| 20 73 65 63 74 69 6f 6e | 72 29 3a 62 6f 6f 6c 65 | section|r):boole|
|00003370| 61 c8 40 01 00 56 00 72 | 20 69 3a 69 6e 74 65 67 |a.@..V.r| i:integ|
|00003380| 65 72 3b 0d 0a 20 20 20 | 20 74 66 0a 28 56 29 61 |er;.. | tf.(V)a|
|00003390| 6c 69 64 61 74 65 20 66 | 69 6c 65 01 56 58 58 4c |lidate f|ile.VXXL|
|000033a0| 52 3d 75 70 63 61 73 65 | 37 28 57 29 42 61 74 63 |R=upcase|7(W)Batc|
|000033b0| 68 20 75 70 6c 6f 61 64 | 20 6d 65 6e 75 20 28 61 |h upload| menu (a|
|000033c0| 64 64 20 66 69 6c 65 73 | 20 75 73 69 6e 67 20 28 |dd files| using (|
|000033d0| 42 29 61 74 63 68 20 70 | 72 6f 74 6f 63 6f 6c 29 |B)atch p|rotocol)|
|000033e0| 42 22 29 6e 29 0a 40 00 | 00 5e 01 38 70 3c 74 68 |B")n).@.|.^.8p<th|
|000033f0| 69 73 75 73 65 72 2e 6c | 69 6e 65 6c 65 6e 29 0b |isuser.l|inelen).|
|00003400| 28 57 29 42 61 74 63 68 | 20 55 4c 61 6e 73 66 01 |(W)Batch| ULansf.|
|00003410| 57 58 58 49 4e 53 20 20 | 20 20 20 20 39 28 58 29 |WXXINS | 9(X)|
|00003420| 42 61 74 63 68 20 64 6f | 77 6e 6c 6f 61 64 20 6d |Batch do|wnload m|
|00003430| 65 6e 75 20 28 61 64 64 | 20 66 69 6c 65 73 20 75 |enu (add| files u|
|00003440| 73 69 6e 67 20 28 42 29 | 61 74 63 68 20 70 72 6f |sing (B)|atch pro|
|00003450| 74 6f 63 6f 6c 29 29 6e | 29 0a 40 01 00 5e 01 37 |tocol))n|).@..^.7|
|00003460| 70 3c 74 68 69 73 75 73 | 65 72 2e 6c 69 6e 65 6c |p<thisus|er.linel|
|00003470| 65 6e 29 0b 28 58 29 42 | 61 74 63 68 20 44 4c 61 |en).(X)B|atch DLa|
|00003480| 6e 73 66 01 58 58 58 49 | 4e 53 20 20 20 20 20 20 |nsf.XXXI|NS |
|00003490| 38 28 59 29 6f 75 72 20 | 69 6e 66 6f 72 6d 61 74 |8(Y)our |informat|
|000034a0| 69 6f 6e 20 2d 20 41 63 | 63 65 73 73 2f 75 70 6c |ion - Ac|cess/upl|
|000034b0| 6f 61 64 20 26 20 64 6f | 77 6e 6c 6f 61 64 20 73 |oad & do|wnload s|
|000034c0| 74 61 74 69 73 74 69 63 | 73 6c 65 6e 29 0a 40 01 |tatistic|slen).@.|
|000034d0| 00 59 00 72 70 3c 74 68 | 69 73 75 73 65 72 2e 6c |.Y.rp<th|isuser.l|
|000034e0| 69 6e 65 6c 65 6e 29 0b | 28 59 29 6f 75 72 20 69 |inelen).|(Y)our i|
|000034f0| 6e 66 6f 61 67 65 72 01 | 59 58 58 49 4e 53 20 20 |nfoager.|YXXINS |
|00003500| 20 20 20 20 37 28 5a 29 | 53 65 74 20 64 6f 77 6e | 7(Z)|Set down|
|00003510| 6c 6f 61 64 20 73 65 63 | 74 69 6f 6e 73 20 74 6f |load sec|tions to|
|00003520| 20 73 63 61 6e 20 77 68 | 65 6e 20 6c 6f 6f 6b 69 | scan wh|en looki|
|00003530| 6e 67 20 66 6f 72 20 66 | 69 6c 65 73 20 28 6e 65 |ng for f|iles (ne|
|00003540| 77 0a 40 01 00 5a 00 20 | 63 70 3a 3d 31 3b 20 66 |w.@..Z. |cp:=1; f|
|00003550| 6f 72 20 63 76 3a 3d 31 | 20 74 6f 0b 28 5a 29 53 |or cv:=1| to.(Z)S|
|00003560| 65 74 20 73 63 61 6e 20 | 73 65 63 01 5a 58 58 4f |et scan |sec.ZXXO|
|00003570| 41 52 44 45 44 49 54 68 | 27 28 5b 29 47 6f 74 6f |ARDEDITh|'([)Goto|
|00003580| 20 74 68 65 20 70 72 65 | 76 69 6f 75 73 20 61 63 | the pre|vious ac|
|00003590| 63 65 73 73 69 62 6c 65 | 20 73 65 63 74 69 6f 6e |cessible| section|
|000035a0| 6e 20 28 66 69 6c 65 73 | 2f 70 61 74 68 73 29 74 |n (files|/paths)t|
|000035b0| 2c 6e 65 78 74 0a 40 00 | 00 5b 00 61 6c 6c 72 65 |,next.@.|.[.allre|
|000035c0| 61 64 3a 62 6f 6f 6c 65 | 61 6e 3b 0d 0a 20 20 0f |ad:boole|an;.. .|
|000035d0| 28 5b 29 50 72 65 76 20 | 73 65 63 74 69 6f 6e 01 |([)Prev |section.|
|000035e0| 5b 58 58 54 55 53 64 75 | 72 65 20 69 23 28 5d 29 |[XXTUSdu|re i#(])|
|000035f0| 47 6f 74 6f 20 74 68 65 | 20 6e 65 78 74 20 61 63 |Goto the| next ac|
|00003600| 63 65 73 73 69 62 6c 65 | 20 73 65 63 74 69 6f 6e |cessible| section|
|00003610| 73 6f 70 20 6f 76 65 72 | 72 69 64 65 2d 31 5d 3d |sop over|ride-1]=|
|00003620| 63 68 72 28 38 29 20 74 | 68 0a 40 00 00 5d 00 69 |chr(8) t|h.@..].i|
|00003630| 6e 0d 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |n.. | |
|00003640| 20 20 20 0f 28 5d 29 4e | 65 78 74 20 73 65 63 74 | .(])N|ext sect|
|00003650| 69 6f 6e 01 5d 58 58 54 | 3b 0d 0a 20 20 20 20 20 |ion.]XXT|;.. |
|00003660| 36 28 21 29 49 6e 66 6f | 72 6d 61 74 69 6f 6e 20 |6(!)Info|rmation |
|00003670| 61 62 6f 75 74 20 74 68 | 65 20 63 75 72 72 65 6e |about th|e curren|
|00003680| 74 20 73 65 63 74 69 6f | 6e 20 28 66 69 6c 65 73 |t sectio|n (files|
|00003690| 2f 70 61 74 68 73 29 74 | 2c 6e 65 78 74 c8 40 01 |/paths)t|,next.@.|
|000036a0| 00 35 00 61 6c 6c 72 65 | 61 64 3a 62 6f 6f 6c 65 |.5.allre|ad:boole|
|000036b0| 61 6e 3b 0d 0a 20 20 0e | 28 21 29 49 6e 66 6f 72 |an;.. .|(!)Infor|
|000036c0| 6d 61 74 69 6f 6e 0a 01 | 21 58 58 54 55 53 64 75 |mation..|!XXTUSdu|
|000036d0| 72 65 20 69 2f 28 40 29 | 43 68 61 6e 67 65 20 74 |re i/(@)|Change t|
|000036e0| 6f 20 61 6e 6f 74 68 65 | 72 20 64 69 72 65 63 74 |o anothe|r direct|
|000036f0| 6f 72 79 20 2d 20 53 79 | 73 6f 70 20 6f 76 65 72 |ory - Sy|sop over|
|00003700| 72 69 64 65 2d 31 5d 3d | 63 68 72 28 38 29 20 74 |ride-1]=|chr(8) t|
|00003710| 68 dc 40 01 00 36 00 69 | 6e 0d 0a 20 20 20 20 20 |h.@..6.i|n.. |
|00003720| 20 20 20 20 20 20 20 20 | 20 20 20 0d 28 40 29 43 | | .(@)C|
|00003730| 68 61 6e 67 65 20 64 69 | 72 70 3a 01 40 58 58 54 |hange di|rp:.@XXT|
|00003740| 3b 0d 0a 20 20 20 20 20 | 3b 28 24 29 52 61 77 20 |;.. |;($)Raw |
|00003750| 64 69 72 65 63 74 6f 72 | 79 20 2d 20 4c 69 73 74 |director|y - List|
|00003760| 20 66 69 6c 65 73 20 61 | 63 74 75 61 6c 6c 79 20 | files a|ctually |
|00003770| 69 6e 20 63 75 72 72 65 | 6e 74 20 64 69 72 65 63 |in curre|nt direc|
|00003780| 74 6f 72 79 65 c8 40 00 | 00 57 00 44 44 20 20 70 |torye.@.|.W.DD p|
|00003790| 72 6f 6d 70 74 28 63 68 | 72 28 38 29 2b 27 20 0a |rompt(ch|r(8)+' .|
|000037a0| 28 24 29 52 61 77 20 64 | 69 72 65 63 74 6f 72 01 |($)Raw d|irector.|
|000037b0| 24 58 58 45 45 44 49 54 | 63 70 2d 31 28 28 25 29 |$XXEEDIT|cp-1((%)|
|000037c0| 44 6f 77 6e 6c 6f 61 64 | 20 75 6e 6c 69 73 74 65 |Download| unliste|
|000037d0| 64 20 66 69 6c 65 20 66 | 72 6f 6d 20 74 68 65 20 |d file f|rom the |
|000037e0| 64 72 69 76 65 65 6e 74 | 74 75 72 65 68 65 6e 20 |driveent|turehen |
|000037f0| 72 65 70 65 61 74 0d 0a | 20 c8 40 00 00 4f 00 44 |repeat..| .@..O.D|
|00003800| 44 20 20 70 72 6f 6d 70 | 74 28 63 68 72 28 38 29 |D promp|t(chr(8)|
|00003810| 2b 27 20 0f 28 25 29 55 | 6e 6c 69 73 74 65 64 20 |+' .(%)U|nlisted |
|00003820| 44 2f 4c 01 25 58 58 45 | 45 44 49 54 63 70 2d 31 |D/L.%XXE|EDITcp-1|
|00003830| 2b 28 44 4f 53 29 44 72 | 6f 70 20 74 6f 20 61 20 |+(DOS)Dr|op to a |
|00003840| 4d 69 6e 69 2d 44 4f 53 | 20 66 6f 72 20 66 69 6c |Mini-DOS| for fil|
|00003850| 65 20 6d 61 6e 61 67 65 | 6d 65 6e 74 74 75 72 65 |e manage|mentture|
|00003860| 68 65 6e 20 72 65 70 65 | 61 74 0d 0a 20 dc 40 01 |hen repe|at.. .@.|
|00003870| 00 31 01 44 44 20 20 70 | 72 6f 6d 70 74 28 63 68 |.1.DD p|rompt(ch|
|00003880| 72 28 38 29 2b 27 20 0d | 28 44 4f 53 29 4d 69 6e |r(8)+' .|(DOS)Min|
|00003890| 69 2d 44 4f 53 20 20 03 | 44 4f 53 45 45 44 49 54 |i-DOS .|DOSEEDIT|
|000038a0| 63 70 2d 31 24 28 45 44 | 49 54 29 6f 6e 65 20 6f |cp-1$(ED|IT)one o|
|000038b0| 72 20 6d 6f 72 65 20 66 | 69 6c 65 73 27 20 69 6e |r more f|iles' in|
|000038c0| 66 6f 72 6d 61 74 69 6f | 6e 74 69 6f 6e 63 72 69 |formatio|ntioncri|
|000038d0| 70 74 69 6f 6e 6e 2e 6e | 67 74 68 28 69 29 2b 31 |ptionn.n|gth(i)+1|
|000038e0| 3b c8 40 01 00 33 00 70 | 3b 0d 0a 20 20 20 20 65 |;.@..3.p|;.. e|
|000038f0| 6e 64 3b 0d 0a 20 20 20 | 20 72 65 0d 28 45 44 49 |nd;.. | re.(EDI|
|00003900| 54 29 66 69 6c 65 28 73 | 29 2f 64 04 45 44 49 54 |T)file(s|)/d.EDIT|
|00003910| 3b 0d 0a 20 20 20 20 20 | 39 28 47 4c 4f 42 41 4c |;.. |9(GLOBAL|
|00003920| 56 41 4c 29 47 6c 6f 62 | 61 6c 20 76 61 6c 69 64 |VAL)Glob|al valid|
|00003930| 61 74 69 6f 6e 20 6f 66 | 20 61 6c 6c 20 66 69 6c |ation of| all fil|
|00003940| 65 73 20 69 6e 20 61 6c | 6c 20 73 65 63 74 69 6f |es in al|l sectio|
|00003950| 6e 73 0d 0a 20 c8 40 00 | 00 56 01 47 20 20 20 70 |ns.. .@.|.V.G p|
|00003960| 72 6f 6d 70 74 28 63 68 | 72 28 38 29 2b 27 20 0f |rompt(ch|r(8)+' .|
|00003970| 28 47 4c 4f 42 41 4c 56 | 41 4c 29 69 64 61 74 09 |(GLOBALV|AL)idat.|
|00003980| 47 4c 4f 42 41 4c 56 41 | 4c 70 2d 31 2a 28 4d 4f |GLOBALVA|Lp-1*(MO|
|00003990| 56 45 29 6f 6e 65 20 6f | 72 20 6d 6f 72 65 20 66 |VE)one o|r more f|
|000039a0| 69 6c 65 73 20 74 6f 20 | 61 6e 6f 74 68 65 72 20 |iles to |another |
|000039b0| 73 65 63 74 69 6f 6e 63 | 74 75 72 65 68 65 6e 20 |sectionc|turehen |
|000039c0| 72 65 70 65 61 74 0d 0a | 20 c8 40 01 00 34 00 20 |repeat..| .@..4. |
|000039d0| 20 20 20 70 72 6f 6d 70 | 74 28 63 68 72 28 38 29 | promp|t(chr(8)|
|000039e0| 2b 27 20 0d 28 4d 4f 56 | 45 29 66 69 6c 65 28 73 |+' .(MOV|E)file(s|
|000039f0| 29 3d 72 04 4d 4f 56 45 | 45 44 49 54 63 70 2d 31 |)=r.MOVE|EDITcp-1|
|00003a00| 31 28 53 4f 52 54 29 53 | 6f 72 74 20 6f 6e 65 20 |1(SORT)S|ort one |
|00003a10| 6f 72 20 61 6c 6c 20 64 | 69 72 65 63 74 6f 72 69 |or all d|irectori|
|00003a20| 65 73 20 62 79 20 64 61 | 74 65 20 6f 72 20 6e 61 |es by da|te or na|
|00003a30| 6d 65 69 6e 67 20 62 6f | 61 72 64 3b 0d dc 40 01 |meing bo|ard;..@.|
|00003a40| 00 32 00 69 6e 0d 0a 20 | 20 20 20 72 70 3a 3d 31 |.2.in.. | rp:=1|
|00003a50| 3b 20 63 70 3a 3d 31 0b | 28 53 4f 52 54 29 66 69 |; cp:=1.|(SORT)fi|
|00003a60| 6c 65 73 6e 67 65 20 04 | 53 4f 52 54 45 53 6c 3c |lesnge .|SORTESl<|
|00003a70| 3e 27 27 20 36 28 55 45 | 44 49 54 29 55 73 65 72 |>'' 6(UE|DIT)User|
|00003a80| 20 6c 6f 67 20 65 64 69 | 74 6f 72 2e 20 53 65 61 | log edi|tor. Sea|
|00003a90| 72 63 68 20 6f 70 74 69 | 6f 6e 73 20 61 6c 73 6f |rch opti|ons also|
|00003aa0| 20 61 76 61 69 6c 61 62 | 6c 65 2e 2e 2e 2e 2e 2e | availab|le......|
|00003ab0| 2e dc 40 00 00 31 01 55 | 44 49 6e 73 75 66 66 69 |..@..1.U|DInsuffi|
|00003ac0| 63 69 65 6e 74 20 6d 65 | 6d 6f 72 0f 28 55 45 44 |cient me|mor.(UED|
|00003ad0| 49 54 29 55 73 65 72 65 | 64 69 74 05 55 45 44 49 |IT)Usere|dit.UEDI|
|00003ae0| 54 54 79 70 65 20 22 45 | 13 42 61 74 63 68 20 44 |TType "E|.Batch D|
|00003af0| 6f 77 6e 6c 6f 61 64 20 | 4d 65 6e 75 28 69 69 2c |ownload |Menu(ii,|
|00003b00| 34 29 3b 0d 0a 20 20 20 | 20 20 20 20 20 20 20 20 |4);.. | |
|00003b10| 20 69 66 20 69 69 3c 3e | 27 27 20 74 68 65 6e 20 | if ii<>|'' then |
|00003b20| 62 65 67 69 6e 0a 40 05 | 01 07 0a 42 61 74 63 68 |begin.@.|...Batch|
|00003b30| 20 44 4c 3a 20 48 79 74 | 3a 3d 76 61 6c 75 65 00 | DL: Hyt|:=value.|
|00003b40| 69 69 29 3b 0d 0a 20 20 | 20 20 20 20 20 20 20 01 |ii);.. | .|
|00003b50| 00 20 20 20 73 61 76 65 | 01 01 74 72 20 28 43 29 |. save|..tr (C)|
|00003b60| 6c 65 61 72 20 74 68 65 | 20 62 61 74 63 68 20 64 |lear the| batch d|
|00003b70| 6f 77 6e 6c 6f 61 64 20 | 71 75 65 75 65 20 6f 66 |ownload |queue of|
|00003b80| 20 66 69 6c 65 73 20 74 | 6f 20 64 6f 77 6e 6c 6f | files t|o downlo|
|00003b90| 61 64 62 65 72 6f 6e 2e | 6e 0a 40 01 00 43 00 44 |adberon.|n.@..C.D|
|00003ba0| 76 6e 5d 3d 69 31 20 74 | 68 65 6e 20 62 65 67 69 |vn]=i1 t|hen begi|
|00003bb0| 6e 0d 0a 0f 28 43 29 6c | 65 61 72 20 44 4c 20 6c |n...(C)l|ear DL l|
|00003bc0| 69 73 74 01 43 58 58 74 | 2c 27 20 20 20 20 20 20 |ist.CXXt|,' |
|00003bd0| 39 28 44 29 6f 77 6e 6c | 6f 61 64 20 62 61 74 63 |9(D)ownl|oad batc|
|00003be0| 68 20 64 6f 77 6e 6c 6f | 61 64 20 71 75 65 75 65 |h downlo|ad queue|
|00003bf0| 20 28 61 64 64 20 66 69 | 6c 65 73 20 75 73 69 6e | (add fi|les usin|
|00003c00| 67 20 28 42 29 61 74 63 | 68 29 70 72 6f 0a 40 01 |g (B)atc|h)pro.@.|
|00003c10| 00 47 00 44 76 6e 5d 3d | 69 31 20 74 68 65 6e 20 |.G.Dvn]=|i1 then |
|00003c20| 62 65 67 69 6e 0d 0a 0f | 28 44 29 6f 77 6e 6c 6f |begin...|(D)ownlo|
|00003c30| 61 64 42 61 74 63 68 01 | 44 58 58 74 2c 27 20 20 |adBatch.|DXXt,' |
|00003c40| 20 20 20 20 32 28 4c 29 | 69 73 74 20 66 69 6c 65 | 2(L)|ist file|
|00003c50| 73 20 63 75 72 72 65 6e | 74 6c 79 20 69 6e 20 74 |s curren|tly in t|
|00003c60| 68 65 20 62 61 74 63 68 | 20 64 6f 77 6e 6c 6f 61 |he batch| downloa|
|00003c70| 64 20 71 75 65 75 65 6e | 75 6d 62 65 72 6f 6e 2e |d queuen|umberon.|
|00003c80| 6e 0a 40 01 00 51 00 44 | 76 6e 5d 3d 69 31 20 74 |n.@..Q.D|vn]=i1 t|
|00003c90| 68 65 6e 20 62 65 67 69 | 6e 0d 0a 0f 28 4c 29 69 |hen begi|n...(L)i|
|00003ca0| 73 74 20 44 4c 20 71 75 | 65 75 65 01 4c 58 58 74 |st DL qu|eue.LXXt|
|00003cb0| 2c 27 20 20 20 20 20 20 | 1c 28 51 29 75 69 74 20 |,' |.(Q)uit |
|00003cc0| 74 6f 20 66 69 6c 65 20 | 74 72 61 6e 73 66 65 72 |to file |transfer|
|00003cd0| 20 6d 65 6e 75 73 65 63 | 74 69 6f 6e 73 70 6c 61 | menusec|tionspla|
|00003ce0| 79 65 64 20 77 68 65 6e | 20 79 6f 75 20 6c 6f 67 |yed when| you log|
|00003cf0| 2d 6f 6e 2e 6e 01 40 01 | 00 5e 01 36 76 6e 5d 3d |-on.n.@.|.^.6vn]=|
|00003d00| 69 31 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 0a 0e |i1 then |begin...|
|00003d10| 28 51 29 75 69 74 20 74 | 6f 20 66 69 6c 65 74 01 |(Q)uit t|o filet.|
|00003d20| 51 58 58 74 2c 27 20 20 | 20 20 20 20 2d 28 52 29 |QXXt,' | -(R)|
|00003d30| 65 6d 6f 76 65 20 61 20 | 66 69 6c 65 20 66 72 6f |emove a |file fro|
|00003d40| 6d 20 74 68 65 20 62 61 | 74 63 68 20 64 6f 77 6e |m the ba|tch down|
|00003d50| 6c 6f 61 64 20 71 75 65 | 75 65 74 69 6f 6e 20 6e |load que|uetion n|
|00003d60| 75 6d 62 65 72 6f 6e 2e | 6e 0a 40 01 00 4b 00 44 |umberon.|n.@..K.D|
|00003d70| 76 6e 5d 3d 69 31 20 74 | 68 65 6e 20 62 65 67 69 |vn]=i1 t|hen begi|
|00003d80| 6e 0d 0a 0d 28 52 29 65 | 6d 6f 76 65 20 66 69 6c |n...(R)e|move fil|
|00003d90| 65 65 69 01 52 58 58 74 | 2c 27 20 20 20 20 20 20 |eei.RXXt|,' |
|00003da0| 11 42 61 74 63 68 20 55 | 70 6c 6f 61 64 20 4d 65 |.Batch U|pload Me|
|00003db0| 6e 75 6e 75 28 69 69 2c | 34 29 3b 0d 0a 20 20 20 |nunu(ii,|4);.. |
|00003dc0| 20 20 20 20 20 20 20 20 | 20 69 66 20 69 69 3c 3e | | if ii<>|
|00003dd0| 27 27 20 74 68 65 6e 20 | 62 65 67 69 6e 0a 40 05 |'' then |begin.@.|
|00003de0| 01 08 0a 42 61 74 63 68 | 20 55 4c 3a 20 48 79 74 |...Batch| UL: Hyt|
|00003df0| 3a 3d 76 61 6c 75 65 00 | 69 69 29 3b 0d 0a 20 20 |:=value.|ii);.. |
|00003e00| 20 20 20 20 20 20 20 06 | 00 20 20 20 73 61 76 65 | .|. save|
|00003e10| 01 01 74 72 1e 28 43 29 | 6c 65 61 72 20 74 68 65 |..tr.(C)|lear the|
|00003e20| 20 62 61 74 63 68 20 75 | 70 6c 6f 61 64 20 71 75 | batch u|pload qu|
|00003e30| 65 75 65 73 74 20 6f 66 | 20 66 69 6c 65 73 20 74 |euest of| files t|
|00003e40| 6f 20 64 6f 77 6e 6c 6f | 61 64 62 65 72 6f 6e 2e |o downlo|adberon.|
|00003e50| 6e 0a 40 01 00 43 01 55 | 76 6e 5d 3d 69 31 20 74 |n.@..C.U|vn]=i1 t|
|00003e60| 68 65 6e 20 62 65 67 69 | 6e 0d 0a 0f 28 43 29 6c |hen begi|n...(C)l|
|00003e70| 65 61 72 20 55 4c 20 6c | 69 73 74 01 43 58 58 74 |ear UL l|ist.CXXt|
|00003e80| 2c 27 20 20 20 20 20 20 | 2e 28 4c 29 69 73 74 20 |,' |.(L)ist |
|00003e90| 66 69 6c 65 73 20 63 75 | 72 72 65 6e 74 20 69 6e |files cu|rrent in|
|00003ea0| 20 74 68 65 20 62 61 74 | 63 68 20 75 70 6c 6f 61 | the bat|ch uploa|
|00003eb0| 64 20 71 75 65 75 65 22 | 42 22 20 70 72 6f 74 6f |d queue"|B" proto|
|00003ec0| 63 6f 6c 29 6e 0a 40 01 | 00 51 01 55 76 6e 5d 3d |col)n.@.|.Q.Uvn]=|
|00003ed0| 69 31 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 0a 0f |i1 then |begin...|
|00003ee0| 28 4c 29 69 73 74 20 55 | 4c 20 71 75 65 75 65 01 |(L)ist U|L queue.|
|00003ef0| 4c 58 58 74 2c 27 20 20 | 20 20 20 20 20 28 51 29 |LXXt,' | (Q)|
|00003f00| 75 69 74 20 74 6f 20 74 | 68 65 20 66 69 6c 65 20 |uit to t|he file |
|00003f10| 74 72 61 6e 73 66 65 72 | 20 6d 65 6e 75 6e 20 2d |transfer| menun -|
|00003f20| 20 45 6e 74 65 72 20 73 | 65 63 74 69 6f 6e 20 6e | Enter s|ection n|
|00003f30| 75 6d 62 65 72 6f 6e 2e | 6e 01 40 01 00 5e 01 36 |umberon.|n.@..^.6|
|00003f40| 76 6e 5d 3d 69 31 20 74 | 68 65 6e 20 62 65 67 69 |vn]=i1 t|hen begi|
|00003f50| 6e 0d 0a 0e 28 51 29 75 | 69 74 20 74 6f 20 66 69 |n...(Q)u|it to fi|
|00003f60| 6c 65 69 01 51 58 58 74 | 2c 27 20 20 20 20 20 20 |lei.QXXt|,' |
|00003f70| 2b 28 52 29 65 6d 6f 76 | 65 20 61 20 66 69 6c 65 |+(R)emov|e a file|
|00003f80| 20 66 72 6f 6d 20 74 68 | 65 20 62 61 74 63 68 20 | from th|e batch |
|00003f90| 75 70 6c 6f 61 64 20 71 | 75 65 75 65 2e 63 74 69 |upload q|ueue.cti|
|00003fa0| 6f 6e 20 6e 75 6d 62 65 | 72 6f 6e 2e 6e 0a 40 01 |on numbe|ron.n.@.|
|00003fb0| 00 4b 01 55 76 6e 5d 3d | 69 31 20 74 68 65 6e 20 |.K.Uvn]=|i1 then |
|00003fc0| 62 65 67 69 6e 0d 0a 0d | 28 52 29 65 6d 6f 76 65 |begin...|(R)emove|
|00003fd0| 20 66 69 6c 65 65 69 01 | 52 58 58 74 2c 27 20 20 | fileei.|RXXt,' |
|00003fe0| 20 20 20 20 3b 28 55 29 | 70 6c 6f 61 64 20 66 69 | ;(U)|pload fi|
|00003ff0| 6c 65 73 20 69 6e 20 74 | 68 65 20 62 61 74 63 68 |les in t|he batch|
|00004000| 20 75 70 6c 6f 61 64 20 | 71 75 65 75 65 20 28 61 | upload |queue (a|
|00004010| 64 64 20 77 69 74 68 20 | 28 42 29 61 74 63 68 29 |dd with |(B)atch)|
|00004020| 6e 0a 40 01 00 4a 00 36 | 76 6e 5d 3d 69 31 20 74 |n.@..J.6|vn]=i1 t|
|00004030| 68 65 6e 20 62 65 67 69 | 6e 0d 0a 0e 28 55 29 70 |hen begi|n...(U)p|
|00004040| 6c 6f 61 64 20 42 61 74 | 63 68 74 01 55 58 58 74 |load Bat|cht.UXXt|
|00004050| 2c 27 20 20 20 20 20 20 | |,' | |
+--------+-------------------------+-------------------------+--------+--------+
