NETWORK.60
FILE INFORMATION
FILENAME(S): NETWORK.60
FILE TYPE(S): PRG
FILE SIZE: 24.1K
FIRST SEEN: 2025-11-30 16:45:37
APPEARS ON: 1 disk(s)
FILE HASH
e936069d722f65660205cc962793c8cc70c92a3860dcd2b29ce687ed18b2f421
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TALENTED RULERZ | NETWORK.60 | PRG | High Voltage Complete C64 Collection | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 00 00 97 38 36 30 2C 30 3A 97 39 39 |.. ....860,0:.99|
00000010: 35 2C 30 3A 97 38 35 37 2C 30 3A 89 37 31 32 30 |5,0:.857,0:.7120|
00000020: 00 34 08 01 00 A0 31 35 3A 9F 31 35 2C 44 45 2C |.4....15:.15,DE,|
00000030: 31 35 3A 8E 00 4B 08 02 00 9E 36 35 34 38 34 3A |15:..K....65484:|
00000040: A0 32 3A A0 38 3A A0 31 35 3A 8E 00 6B 08 03 00 |.2:.8:.15:..k...|
00000050: 49 24 B2 C8 28 54 58 24 2C C2 28 38 35 36 29 AB |I$..(TX$,.(856).|
00000060: 31 29 3A 9E 35 31 31 30 34 3A 8E 00 8C 08 04 00 |1):.51104:......|
00000070: 8D 31 35 3A 97 31 39 35 2C 52 4C 3A 97 31 39 36 |.15:.195,RL:.196|
00000080: 2C 52 48 3A 9E 35 31 35 31 32 3A 8E 00 95 08 05 |,RH:.51512:.....|
00000090: 00 89 32 32 32 00 B5 08 06 00 49 24 B2 C8 28 54 |..222.....I$..(T|
000000A0: 58 24 2C C2 28 38 35 36 29 AB 31 29 3A 9E 35 31 |X$,.(856).1):.51|
000000B0: 35 32 30 3A 8E 00 C4 08 07 00 97 35 33 32 36 39 |520:.......53269|
000000C0: 2C 30 3A 8E 00 E7 08 08 00 46 47 B2 C5 28 C8 28 |,0:......FG..(.(|
000000D0: C4 28 54 4C AB B5 28 C5 28 54 49 24 29 AD 31 30 |.(TL..(.(TI$).10|
000000E0: 30 29 29 2C 33 29 29 00 13 09 09 00 8B 46 47 B3 |0)),3))......FG.|
000000F0: 31 AF 54 4C B3 39 39 39 A7 49 24 B2 47 24 AA 22 |1.TL.999.I$.G$."|
00000100: 12 9B D4 49 4D 45 20 D5 50 22 3A 40 49 24 3A 89 |...IME .P":@I$:.|
00000110: 32 30 35 00 19 09 0A 00 8E 00 2C 09 0C 00 49 24 |205.......,...I$|
00000120: B2 C8 28 49 24 2C 31 29 3A 89 33 32 00 3F 09 0D |..(I$,1):.32.?..|
00000130: 00 49 24 B2 C8 28 49 24 2C 33 29 3A 89 33 32 00 |.I$..(I$,3):.32.|
00000140: 53 09 0E 00 97 39 39 37 2C 32 3A 9E 35 31 30 34 |S....997,2:.5104|
00000150: 38 3A 8E 00 8F 09 0F 00 52 4D B2 B5 28 52 AD 36 |8:......RM..(R.6|
00000160: 35 35 33 36 29 3A 52 54 B2 52 AB 52 4D AC 36 35 |5536):RT.R.RM.65|
00000170: 35 33 36 3A 52 48 B2 B5 28 52 54 AD 32 35 36 29 |536:RH..(RT.256)|
00000180: 3A 52 4C B2 52 54 AB 52 48 AC 32 35 36 3A 8E 00 |:RL.RT.RH.256:..|
00000190: 9D 09 10 00 42 B2 31 36 30 3A 89 37 34 00 B2 09 |....B.160:.74...|
000001A0: 17 00 42 B2 31 3A 8D 35 30 3A 8B 41 42 B1 32 30 |..B.1:.50:.AB.20|
000001B0: A7 32 00 BA 09 18 00 89 32 36 00 E9 09 19 00 8D |.2......26......|
000001C0: 32 3A 9F 31 35 2C 4D 44 2C 31 35 3A 9F 38 2C 4D |2:.15,MD,15:.8,M|
000001D0: 44 2C 32 2C 59 24 AA 46 54 24 3A 8D 32 32 30 30 |D,2,Y$.FT$:.2200|
000001E0: 3A 8B 45 4E B1 32 30 A7 32 00 F5 09 1A 00 40 22 |:.EN.20.2.....@"|
000001F0: 9F 22 AA 47 24 00 18 0A 1B 00 9E 35 31 36 35 36 |.".G$......51656|
00000200: 3A 5F 22 5C 4E 9F 22 3A 41 42 B2 C2 28 32 35 31 |:_"\N.":AB..(251|
00000210: 29 3A 8D 32 3A 89 38 30 00 20 0A 1E 00 89 33 31 |):.2:.80. ....31|
00000220: 00 2E 0A 1F 00 9E 35 31 35 30 34 3A 89 33 00 3B |......51504:.3.;|
00000230: 0A 20 00 8B 49 24 B2 22 22 A7 8E 00 6F 0A 21 00 |. ..I$.""...o.!.|
00000240: 53 43 24 B2 22 22 3A 81 47 B2 31 A4 C3 28 49 24 |SC$."":.G.1..(I$|
00000250: 29 3A 53 43 24 B2 53 43 24 AA C7 28 28 C6 28 CA |):SC$.SC$..((.(.|
00000260: 28 49 24 2C 47 2C 31 29 29 AF 31 32 37 29 29 00 |(I$,G,1)).127)).|
00000270: 7E 0A 22 00 82 3A 49 24 B2 53 43 24 3A 8E 00 8B |~."..:I$.SC$:...|
00000280: 0A 28 00 5F 22 2D 22 3A 89 38 30 00 96 0A 31 00 |.(._"-":.80...1.|
00000290: 45 4E 24 B2 22 22 00 A3 0A 32 00 41 42 B2 30 3A |EN$.""...2.AB.0:|
000002A0: 8D 36 37 00 B7 0A 33 00 8B 42 B2 31 A7 45 4E 24 |.67...3..B.1.EN$|
000002B0: B2 22 2C 53 2C 52 22 00 D1 0A 34 00 8B 4C 44 B2 |.",S,R"...4..LD.|
000002C0: 41 20 B0 20 44 43 24 28 41 29 B2 22 2D 22 A7 35 |A . DC$(A)."-".5|
000002D0: 35 00 01 0B 35 00 A0 31 35 3A 8B C8 28 44 43 24 |5...5..15:..(DC$|
000002E0: 28 41 29 2C 31 29 B2 22 2F 22 A7 9F 31 35 2C 44 |(A),1)."/"..15,D|
000002F0: 52 28 41 29 2C 31 35 2C 22 49 30 3A 22 3A A0 31 |R(A),15,"I0:":.1|
00000300: 35 00 21 0B 36 00 9F 31 35 2C 44 52 28 41 29 2C |5.!.6..15,DR(A),|
00000310: 31 35 3A 98 31 35 2C 44 43 24 28 41 29 3A A0 31 |15:.15,DC$(A):.1|
00000320: 35 00 66 0B 37 00 8B 42 A7 8D 32 3A 9F 31 35 2C |5.f.7..B..2:.15,|
00000330: 44 52 28 41 29 2C 31 35 3A 99 47 24 44 52 24 28 |DR(A),15:.G$DR$(|
00000340: 41 29 4F 24 45 4E 24 3A 9F 38 2C 44 52 28 41 29 |A)O$EN$:.8,DR(A)|
00000350: 2C 32 2C 44 52 24 28 41 29 AA 4F 24 AA 45 4E 24 |,2,DR$(A).O$.EN$|
00000360: 3A 8D 32 32 30 30 00 7C 0B 38 00 4C 44 B2 41 3A |:.2200.|.8.LD.A:|
00000370: 8B 45 4E B1 32 30 A7 41 42 B2 45 4E 00 86 0B 39 |.EN.20.AB.EN...9|
00000380: 00 42 B2 30 3A 8E 00 9D 0B 3A 00 97 39 39 37 2C |.B.0:....:..997,|
00000390: 34 3A 9E 35 31 30 34 38 3A 89 32 32 31 00 B4 0B |4:.51048:.221...|
000003A0: 3D 00 42 B2 32 3A 45 4E 24 B2 22 2C 53 2C 57 22 |=.B.2:EN$.",S,W"|
000003B0: 3A 89 35 30 00 E9 0B 3E 00 43 B2 31 30 32 32 37 |:.50...>.C.10227|
000003C0: 33 30 3A 8B C2 28 36 37 38 29 B2 31 A7 43 B2 39 |30:..(678).1.C.9|
000003D0: 38 35 32 35 30 3A 97 35 36 33 33 34 2C C2 28 35 |85250:.56334,.(5|
000003E0: 36 33 33 34 29 B0 31 32 38 00 2B 0C 3F 00 52 B2 |6334).128.+.?.R.|
000003F0: 43 AD 42 52 25 3A 8D 31 35 3A 97 36 36 35 2C 52 |C.BR%:.15:.665,R|
00000400: 4C 3A 97 36 36 36 2C 52 48 3A 52 B2 43 AD 42 52 |L:.666,RH:R.C.BR|
00000410: 25 AD 32 AB 31 30 30 3A 8D 31 35 3A 97 36 36 31 |%.2.100:.15:.661|
00000420: 2C 52 4C 3A 97 36 36 32 2C 52 48 00 7B 0C 40 00 |,RL:.662,RH.{.@.|
00000430: 97 36 35 39 2C AB 28 28 42 52 25 B2 33 30 30 29 |.659,.((BR%.300)|
00000440: AC 36 AA 28 42 52 25 B2 31 32 30 30 29 AC 38 AA |.6.(BR%.1200).8.|
00000450: 28 42 52 25 B2 32 34 30 30 29 AC 31 30 AA 28 42 |(BR%.2400).10.(B|
00000460: 52 25 B2 39 36 30 30 29 AC 31 34 AA 28 42 52 25 |R%.9600).14.(BR%|
00000470: B2 31 39 32 30 30 29 AC 31 35 29 00 91 0C 41 00 |.19200).15)...A.|
00000480: 8B 42 52 25 B2 34 38 30 30 A7 97 36 35 39 2C 31 |.BR%.4800..659,1|
00000490: 32 00 AA 0C 42 00 9E 35 32 32 32 34 3A 97 36 36 |2...B..52224:.66|
000004A0: 37 2C C2 28 36 36 38 29 3A 8E 00 DB 0C 43 00 41 |7,.(668):....C.A|
000004B0: 24 B2 C8 28 4F 24 2C 32 29 3A 41 B2 C5 28 41 24 |$..(O$,2):A..(A$|
000004C0: 29 3A 8B C5 28 41 24 29 B3 31 AF 41 24 B3 B1 22 |):..(A$).1.A$.."|
000004D0: 30 3A 22 A7 41 B2 30 3A 89 36 39 00 FA 0C 44 00 |0:".A.0:.69...D.|
000004E0: 4F 24 B2 CA 28 4F 24 2C 33 29 3A 8B 41 B1 39 A7 |O$..(O$,3):.A.9.|
000004F0: 4F 24 B2 CA 28 4F 24 2C 32 29 00 13 0D 45 00 44 |O$..(O$,2)...E.D|
00000500: 45 B2 44 52 28 41 29 3A 59 24 B2 44 52 24 28 41 |E.DR(A):Y$.DR$(A|
00000510: 29 3A 8E 00 2C 0D 46 00 97 39 39 37 2C 35 3A 9E |):..,.F..997,5:.|
00000520: 35 31 30 34 38 3A 8D 35 3A 89 33 32 00 6D 0D 47 |51048:.5:.32.m.G|
00000530: 00 8D 32 33 30 3A 42 B2 32 3A 45 4E 24 B2 22 2C |..230:B.2:EN$.",|
00000540: 53 2C 41 22 3A 8D 35 30 3A 8B 41 42 B1 31 39 A7 |S,A":.50:.AB.19.|
00000550: 8D 36 31 3A 98 38 2C 22 93 99 D3 54 41 52 54 20 |.61:.8,"...TART |
00000560: C4 41 54 45 3A 22 AA 44 41 24 AA 47 24 00 73 0D |.ATE:".DA$.G$.s.|
00000570: 48 00 8E 00 7C 0D 4A 00 41 B2 54 49 00 91 0D 4B |H...|.J.A.TI...K|
00000580: 00 8B 20 28 54 49 AB 41 29 20 B3 42 20 A7 20 37 |.. (TI.A) .B . 7|
00000590: 35 00 97 0D 4C 00 8E 00 B7 0D 50 00 9E 35 32 32 |5...L.....P..522|
000005A0: 32 37 3A 8B C2 28 32 35 31 29 B2 30 B0 C2 28 38 |27:..(251).0..(8|
000005B0: 34 30 29 B2 31 A7 8E 00 C2 0D 51 00 44 53 B2 31 |40).1.....Q.DS.1|
000005C0: 3A 99 00 E8 0D 52 00 44 53 B2 44 53 AA 31 3A 99 |:....R.DS.DS.1:.|
000005D0: 22 91 22 44 53 3A 9E 35 30 39 35 32 3A 8B C2 28 |"."DS:.50952:..(|
000005E0: 32 35 31 29 B2 30 A7 8E 00 F7 0D 54 00 8B 44 53 |251).0.....T..DS|
000005F0: B3 31 30 30 A7 38 32 00 0D 0E C8 00 8B C2 28 39 |.100.82.......(9|
00000600: 30 36 29 B3 B1 33 A7 97 39 30 36 2C 32 00 1A 0E |06)..3..906,2...|
00000610: CD 00 42 B2 36 34 3A 8D 37 34 00 45 0E CE 00 8D |..B.64:.74.E....|
00000620: 32 3A 42 B2 30 3A 4F 24 B2 22 30 3A 22 3A 8D 35 |2:B.0:O$."0:":.5|
00000630: 30 3A 41 B2 C2 28 39 34 38 29 3A 50 24 B2 22 43 |0:A..(948):P$."C|
00000640: 2F 42 42 53 22 00 69 0E D2 00 40 47 24 AA 47 24 |/BBS".i...@G$.G$|
00000650: AA 22 99 CC 4F 41 44 49 4E 47 20 C2 C2 D3 05 2E |."..OADING .....|
00000660: 2E 2E 22 3A 89 33 32 37 30 00 72 0E DD 00 52 50 |..":.3270.r...RP|
00000670: B2 32 00 7C 0E DE 00 50 50 B2 52 50 00 92 0E DF |.2.|...PP.RP....|
00000680: 00 52 50 B2 50 50 3A 8B 52 50 B3 B1 32 A7 31 31 |.RP.PP:.RP..2.11|
00000690: 32 30 00 BA 0E E0 00 8D 31 31 32 30 3A 41 B2 41 |20......1120:A.A|
000006A0: AF 31 32 37 3A 8B 41 B2 37 38 A7 49 24 B2 22 4E |.127:.A.78.I$."N|
000006B0: 22 3A 40 22 CE 4F 2E 22 3A 8E 00 D5 0E E1 00 8B |":@".O.":.......|
000006C0: 41 B2 38 39 A7 49 24 B2 22 59 22 3A 40 22 D9 45 |A.89.I$."Y":@".E|
000006D0: 53 21 22 3A 8E 00 EB 0E E2 00 8B 41 B2 31 33 A7 |S!":.......A.13.|
000006E0: 49 24 B2 47 24 3A 40 22 22 3A 8E 00 F4 0E E3 00 |I$.G$:@"":......|
000006F0: 89 32 32 33 00 33 0F E6 00 48 B2 C2 28 35 36 33 |.223.3...H..(563|
00000700: 32 38 29 3A 48 B2 C2 28 35 36 33 33 31 29 3A 4D |28):H..(56331):M|
00000710: B2 C2 28 35 36 33 33 30 29 3A 54 4D 24 B2 22 22 |..(56330):TM$.""|
00000720: 3A 8B 28 48 AF 31 36 29 B2 31 36 A7 54 4D 24 B2 |:.(H.16).16.TM$.|
00000730: 22 31 22 00 8E 0F F0 00 54 4D 24 B2 54 4D 24 AA |"1".....TM$.TM$.|
00000740: CA 28 C4 28 48 AF 31 35 29 2C 32 29 AA 22 3A 22 |.(.(H.15),2).":"|
00000750: AA CA 28 C4 28 28 4D AF 32 34 30 29 AD 31 36 29 |..(.((M.240).16)|
00000760: 2C 32 29 AA CA 28 C4 28 4D AF 31 35 29 2C 32 29 |,2)..(.(M.15),2)|
00000770: 3A 43 24 B2 22 20 41 4D 22 3A 8B 28 48 B0 31 32 |:C$." AM":.(H.12|
00000780: 37 29 B2 32 35 35 A7 43 24 B2 22 20 50 4D 00 9F |7).255.C$." PM..|
00000790: 0F FA 00 54 4D 24 B2 54 4D 24 AA 43 24 3A 8E 00 |...TM$.TM$.C$:..|
000007A0: CA 0F 60 04 41 42 B2 30 3A 97 39 38 35 2C 52 50 |..`.AB.0:.985,RP|
000007B0: 3A 97 39 38 38 2C 4C 57 3A 49 24 B2 22 22 3A 8B |:.988,LW:I$."":.|
000007C0: 52 24 B2 22 22 A7 31 31 33 35 00 EA 0F 6A 04 97 |R$."".1135...j..|
000007D0: 39 39 35 2C 31 3A 5F 52 24 AA C7 28 C2 28 39 35 |995,1:_R$..(.(95|
000007E0: 38 29 29 3A 97 39 39 35 2C 30 00 F4 0F 6F 04 52 |8)):.995,0...o.R|
000007F0: 24 B2 22 22 00 1C 10 7E 04 9E 35 31 35 33 36 3A |$.""...~..51536:|
00000800: 97 39 38 37 2C 30 3A 43 B2 C2 28 31 36 32 29 3A |.987,0:C..(162):|
00000810: 8B C2 28 39 39 36 29 B2 31 A7 38 30 00 3E 10 7F |..(996).1.80.>..|
00000820: 04 41 B2 C2 28 38 36 30 29 3A 8B 28 41 29 AF 28 |.A..(860):.(A).(|
00000830: C2 28 31 36 32 29 B2 43 29 A7 31 31 35 31 00 6C |.(162).C).1151.l|
00000840: 10 80 04 8B 28 41 AF 31 29 B2 31 A7 42 B2 31 30 |....(A.1).1.B.10|
00000850: 36 38 3A 8D 31 32 30 30 3A 53 4C B2 42 3A 8D 32 |68:.1200:SL.B:.2|
00000860: 37 32 33 3A 41 B2 C2 28 38 36 30 29 00 8B 10 81 |723:A..(860)....|
00000870: 04 8B 28 41 AF 32 29 B2 32 A7 42 B2 31 30 37 38 |..(A.2).2.B.1078|
00000880: 3A 8D 31 32 30 30 3A 54 4C B2 42 00 AA 10 82 04 |:.1200:TL.B.....|
00000890: 8B 28 41 AF 34 29 B2 34 A7 42 B2 31 30 38 38 3A |.(A.4).4.B.1088:|
000008A0: 8D 31 32 30 30 3A 42 55 B2 42 00 C9 10 83 04 8B |.1200:BU.B......|
000008B0: 28 41 AF 38 29 B2 38 A7 42 B2 31 30 39 38 3A 8D |(A.8).8.B.1098:.|
000008C0: 31 32 30 30 3A 42 44 B2 42 00 E2 10 88 04 97 38 |1200:BD.B......8|
000008D0: 36 30 2C 30 3A 8B C2 28 39 39 36 29 B2 32 A7 32 |60,0:..(996).2.2|
000008E0: 30 30 00 F4 10 8D 04 8B C2 28 39 39 36 29 B2 33 |00.......(996).3|
000008F0: A7 32 30 35 00 35 11 8E 04 8B 4C 57 B2 30 AF 52 |.205.5....LW.0.R|
00000900: 5A B2 32 A7 49 24 B2 22 22 3A 81 52 5A B2 31 A4 |Z.2.I$."":.RZ.1.|
00000910: C2 28 38 38 35 29 AB 31 3A 49 24 B2 49 24 AA C7 |.(885).1:I$.I$..|
00000920: 28 C2 28 35 32 37 33 35 AA 52 5A 29 29 3A 82 3A |(.(52735.RZ)):.:|
00000930: 89 31 31 37 31 00 44 11 8F 04 8B 52 50 B2 31 A7 |.1171.D....RP.1.|
00000940: 3A 40 22 22 00 6C 11 92 04 8B 4C 57 B2 30 AF 52 |:@"".l....LW.0.R|
00000950: 50 B3 B1 32 AF C2 28 38 38 35 29 B1 31 A7 97 38 |P..2..(885).1..8|
00000960: 35 36 2C C2 28 38 38 35 29 3A 8D 36 00 92 11 93 |56,.(885):.6....|
00000970: 04 41 B2 C2 28 35 32 37 33 36 29 3A 8B 4C 57 B2 |.A..(52736):.LW.|
00000980: 30 AF C2 28 38 38 35 29 B2 31 A7 49 24 B2 C7 28 |0..(885).1.I$..(|
00000990: 41 29 00 AB 11 94 04 8B 4C 57 B2 30 AF C2 28 38 |A)......LW.0..(8|
000009A0: 38 35 29 B2 30 A7 49 24 B2 22 22 00 BF 11 9D 04 |85).0.I$."".....|
000009B0: 8B 4C 57 B2 30 AF 52 50 B2 30 A7 3A 40 22 22 00 |.LW.0.RP.0.:@"".|
000009C0: CF 11 A6 04 52 50 B2 30 3A 52 5A B2 30 3A 8E 00 |....RP.0:RZ.0:..|
000009D0: 00 12 B0 04 41 24 B2 22 22 3A 81 5A B2 30 A4 33 |....A$."":.Z.0.3|
000009E0: 3A 41 24 B2 41 24 AA C7 28 C2 28 42 AA 5A 29 AF |:A$.A$..(.(B.Z).|
000009F0: 31 32 37 29 3A 82 3A 42 B2 C5 28 41 24 29 3A 8E |127):.:B..(A$):.|
00000A00: 00 23 12 C6 07 97 35 33 32 38 30 2C 36 3A 8B C2 |.#....53280,6:..|
00000A10: 28 38 32 39 29 A7 4F 24 B2 22 43 48 41 54 22 3A |(829).O$."CHAT":|
00000A20: 89 32 35 00 44 12 D0 07 49 B2 30 3A 5F 22 9A D0 |.25.D...I.0:_"..|
00000A30: 41 47 49 4E 47 05 2E 2E 2E 22 3A 97 35 34 32 39 |AGING....":.5429|
00000A40: 36 2C 31 35 00 59 12 D1 07 8B 49 B1 33 30 A7 97 |6,15.Y....I.30..|
00000A50: 35 34 32 39 36 2C 30 3A 8E 00 6B 12 D2 07 A1 41 |54296,0:..k....A|
00000A60: 24 3A 8B 41 24 B2 22 88 22 A7 8E 00 87 12 D3 07 |$:.A$.".".......|
00000A70: 49 B2 49 AA 31 3A 5F 22 2E 22 3A 9E 35 31 35 36 |I.I.1:_".":.5156|
00000A80: 38 3A 89 32 30 30 31 00 C6 12 02 08 52 B2 42 52 |8:.2001.....R.BR|
00000A90: 25 3A 8D 31 35 3A 97 38 38 38 2C 52 4C 3A 97 38 |%:.15:.888,RL:.8|
00000AA0: 38 39 2C 52 48 3A 52 B2 42 55 3A 8D 31 35 3A 97 |89,RH:R.BU:.15:.|
00000AB0: 38 39 35 2C 52 4D 3A 97 38 39 36 2C 52 4C 3A 97 |895,RM:.896,RL:.|
00000AC0: 38 39 37 2C 52 48 00 31 13 03 08 52 B2 42 44 3A |897,RH.1...R.BD:|
00000AD0: 8D 31 35 3A 97 38 39 38 2C 52 4D 3A 97 38 39 39 |.15:.898,RM:.899|
00000AE0: 2C 52 4C 3A 97 39 30 30 2C 52 48 3A 52 B2 55 4E |,RL:.900,RH:R.UN|
00000AF0: 3A 8D 31 35 3A 97 39 39 37 2C 52 4C 3A 97 39 39 |:.15:.997,RL:.99|
00000B00: 38 2C 52 48 3A 81 49 B2 31 A4 C3 28 44 41 24 29 |8,RH:.I.1..(DA$)|
00000B10: 3A 97 39 36 39 AA 49 2C C6 28 CA 28 44 41 24 2C |:.969.I,.(.(DA$,|
00000B20: 49 2C 31 29 29 3A 82 3A 97 39 36 39 AA 49 2C 31 |I,1)):.:.969.I,1|
00000B30: 33 00 68 13 04 08 52 B2 4E 50 25 3A 8D 31 35 3A |3.h...R.NP%:.15:|
00000B40: 97 39 35 39 2C 52 4C 3A 97 39 36 30 2C 52 48 3A |.959,RL:.960,RH:|
00000B50: 52 B2 54 4C 3A 8D 31 35 3A 97 38 38 30 2C 52 4C |R.TL:.15:.880,RL|
00000B60: 3A 97 38 38 31 2C 52 48 00 7C 13 07 08 97 31 39 |:.881,RH.|....19|
00000B70: 36 2C 32 33 35 3A 97 31 39 35 2C 30 00 88 13 09 |6,235:.195,0....|
00000B80: 08 97 38 33 31 2C 53 4C 00 B4 13 11 08 9E 35 31 |..831,SL......51|
00000B90: 36 39 36 3A 9F 38 2C 33 3A 8D 37 30 36 30 3A 8B |696:.8,3:.7060:.|
00000BA0: C2 28 39 30 36 29 B3 B1 33 A7 9F 38 2C 33 3A 8D |.(906)..3..8,3:.|
00000BB0: 32 36 39 30 00 EF 13 12 08 97 31 39 36 2C 32 32 |2690......196,22|
00000BC0: 39 3A 97 31 39 35 2C 30 3A 9E 35 32 32 32 34 3A |9:.195,0:.52224:|
00000BD0: 9E 35 31 36 39 36 3A 9F 38 2C 33 3A 8D 37 34 30 |.51696:.8,3:.740|
00000BE0: 31 3A 98 38 2C 52 5A 24 3A 9E 35 32 32 32 34 00 |1:.8,RZ$:.52224.|
00000BF0: F6 13 13 08 89 32 00 1C 14 20 08 97 31 36 33 2C |.....2... ..163,|
00000C00: 30 3A 97 31 36 34 2C 32 33 35 3A 9E 35 30 39 39 |0:.164,235:.5099|
00000C10: 32 3A 9F 38 2C 33 3A 8D 36 39 34 35 00 42 14 21 |2:.8,3:.6945.B.!|
00000C20: 08 8B C2 28 39 30 36 29 B3 B1 33 A7 9F 38 2C 33 |...(906)..3..8,3|
00000C30: 3A 8D 32 39 34 30 3A 8D 32 37 31 30 3A 8D 32 37 |:.2940:.2710:.27|
00000C40: 33 30 00 7D 14 22 08 97 31 36 33 2C 30 3A 97 31 |30.}."..163,0:.1|
00000C50: 36 34 2C 32 32 39 3A A0 38 3A 9E 35 32 32 32 34 |64,229:.8:.52224|
00000C60: 3A 9E 35 30 39 39 32 3A 9F 38 2C 33 3A 8D 37 34 |:.50992:.8,3:.74|
00000C70: 30 30 3A 8D 33 31 3A 52 5A 24 B2 49 24 00 C0 14 |00:.31:RZ$.I$...|
00000C80: 23 08 9E 35 32 32 32 34 3A 42 52 25 B2 C2 28 38 |#..52224:BR%..(8|
00000C90: 38 38 29 AA C2 28 38 38 39 29 AC 32 35 36 3A 42 |88)..(889).256:B|
00000CA0: 55 B2 C2 28 38 39 35 29 AC 36 35 35 33 36 AA C2 |U..(895).65536..|
00000CB0: 28 38 39 36 29 AA C2 28 38 39 37 29 AC 32 35 36 |(896)..(897).256|
00000CC0: 00 FB 14 24 08 42 44 B2 C2 28 38 39 38 29 AC 36 |...$.BD..(898).6|
00000CD0: 35 35 33 36 AA C2 28 38 39 39 29 AA C2 28 39 30 |5536..(899)..(90|
00000CE0: 30 29 AC 32 35 36 3A 55 4E B2 C2 28 39 39 37 29 |0).256:UN..(997)|
00000CF0: AA C2 28 39 39 38 29 AC 32 35 36 00 32 15 2E 08 |..(998).256.2...|
00000D00: 97 31 36 33 2C 31 36 30 3A 97 31 36 34 2C 32 35 |.163,160:.164,25|
00000D10: 35 3A 9E 35 30 39 39 32 3A 9F 38 2C 33 3A 8D 33 |5:.50992:.8,3:.3|
00000D20: 31 3A 4E 41 24 B2 49 24 3A A0 38 3A 9E 35 32 32 |1:NA$.I$:.8:.522|
00000D30: 32 34 00 74 15 30 08 52 B2 39 37 30 3A 8D 34 3A |24.t.0.R.970:.4:|
00000D40: 8D 33 3A 44 41 24 B2 49 24 3A 4E 50 25 B2 C2 28 |.3:DA$.I$:NP%..(|
00000D50: 39 35 39 29 AA C2 28 39 36 30 29 AC 32 35 36 3A |959)..(960).256:|
00000D60: 54 4C B2 C2 28 38 38 30 29 AA C2 28 38 38 31 29 |TL..(880)..(881)|
00000D70: AC 32 35 36 00 BD 15 31 08 53 4C B2 C2 28 38 33 |.256...1.SL..(83|
00000D80: 31 29 3A 52 4D 25 B2 C2 28 38 39 34 29 3A 8F 20 |1):RM%..(894):. |
00000D90: 52 3D 39 35 31 3A 47 4F 53 55 42 35 3A 47 4F 53 |R=951:GOSUB5:GOS|
00000DA0: 55 42 33 3A 54 49 24 3D 49 24 3A 47 4F 53 55 42 |UB3:TI$=I$:GOSUB|
00000DB0: 32 33 30 3A 47 4F 53 55 42 32 31 30 30 00 C3 15 |230:GOSUB2100...|
00000DC0: 32 08 8E 00 F2 15 34 08 54 4C B2 C2 28 31 30 31 |2.....4.TL..(101|
00000DD0: 30 29 AC 31 30 3A 8B C9 28 54 4D 24 2C 32 29 B2 |0).10:..(TM$,2).|
00000DE0: 22 50 4D 22 A7 54 4C B2 C2 28 31 30 31 31 29 AC |"PM".TL..(1011).|
00000DF0: 31 30 00 03 16 35 08 8B 54 4C B2 30 A7 54 4C B2 |10...5..TL.0.TL.|
00000E00: 39 39 39 00 09 16 36 08 8E 00 29 16 98 08 84 31 |999...6...)....1|
00000E10: 35 2C 45 4E 24 2C 41 24 2C 42 24 2C 53 43 24 3A |5,EN$,A$,B$,SC$:|
00000E20: 45 4E B2 C5 28 45 4E 24 29 00 2F 16 A2 08 8E 00 |EN..(EN$)./.....|
00000E30: 69 16 6E 0A 49 24 B2 22 22 3A 81 49 B2 30 A4 32 |i.n.I$."":.I.0.2|
00000E40: 31 3A 49 24 B2 49 24 AA 55 24 28 49 29 AA 47 24 |1:I$.I$.U$(I).G$|
00000E50: 3A 82 3A 81 49 B2 31 A4 4E 53 25 3A 49 24 B2 49 |:.:.I.1.NS%:I$.I|
00000E60: 24 AA 59 24 28 49 29 3A 82 00 76 16 70 0A 98 38 |$.Y$(I):..v.p..8|
00000E70: 2C 49 24 3A 89 32 00 A9 16 82 0A 49 24 B2 22 22 |,I$:.2.....I$.""|
00000E80: 3A 81 49 B2 31 A4 4E 53 25 3A 52 B2 57 25 28 49 |:.I.1.NS%:R.W%(I|
00000E90: 29 3A 8D 31 35 3A 49 24 B2 49 24 AA C7 28 52 48 |):.15:I$.I$..(RH|
00000EA0: 29 AA C7 28 52 4C 29 3A 82 00 19 17 8C 0A 4F 24 |)..(RL):......O$|
00000EB0: B2 4E 41 24 AA 47 24 AA 52 4E 24 AA 47 24 AA C4 |.NA$.G$.RN$.G$..|
00000EC0: 28 53 4C 29 AA 47 24 AA 59 4C 24 AA 47 24 AA 50 |(SL).G$.YL$.G$.P|
00000ED0: 4E 24 AA 47 24 AA 43 54 24 AA 47 24 AA 42 44 24 |N$.G$.CT$.G$.BD$|
00000EE0: AA 47 24 AA 44 41 24 AA 47 24 AA 50 41 24 AA 47 |.G$.DA$.G$.PA$.G|
00000EF0: 24 AA C4 28 43 44 25 29 AA 47 24 AA C4 28 4D 57 |$..(CD%).G$..(MW|
00000F00: 25 29 AA 47 24 AA C4 28 4E 50 25 29 AA 47 24 AA |%).G$..(NP%).G$.|
00000F10: C4 28 43 4C 25 29 AA 47 24 00 84 17 8D 0A 49 24 |.(CL%).G$.....I$|
00000F20: B2 4F 24 AA C4 28 43 4C 29 AA 47 24 AA C4 28 42 |.O$..(CL).G$..(B|
00000F30: 55 29 AA 47 24 AA C4 28 42 44 29 AA 47 24 AA C4 |U).G$..(BD).G$..|
00000F40: 28 53 32 29 AA 47 24 AA C4 28 4A 55 29 AA 47 24 |(S2).G$..(JU).G$|
00000F50: AA C4 28 46 44 25 29 AA 47 24 AA C4 28 46 55 25 |..(FD%).G$..(FU%|
00000F60: 29 AA 47 24 AA C4 28 4C 4C 25 29 AA 47 24 AA C4 |).G$..(LL%).G$..|
00000F70: 28 52 4D 25 29 AA 47 24 AA 49 24 3A 98 38 2C 49 |(RM%).G$.I$:.8,I|
00000F80: 24 3A 89 32 00 D0 17 96 0A 4E 41 24 B2 55 24 28 |$:.2.....NA$.U$(|
00000F90: 30 29 3A 52 4E 24 B2 55 24 28 31 29 3A 53 4C B2 |0):RN$.U$(1):SL.|
00000FA0: C5 28 55 24 28 32 29 29 3A 59 4C 24 B2 55 24 28 |.(U$(2)):YL$.U$(|
00000FB0: 33 29 3A 50 4E 24 B2 55 24 28 34 29 3A 43 54 24 |3):PN$.U$(4):CT$|
00000FC0: B2 55 24 28 35 29 3A 42 44 24 B2 55 24 28 36 29 |.U$(5):BD$.U$(6)|
00000FD0: 00 0C 18 97 0A 46 44 25 B2 C5 28 55 24 28 31 38 |.....FD%..(U$(18|
00000FE0: 29 29 3A 46 55 25 B2 C5 28 55 24 28 31 39 29 29 |)):FU%..(U$(19))|
00000FF0: 3A 4C 4C 25 B2 C5 28 55 24 28 32 30 29 29 3A 52 |:LL%..(U$(20)):R|
00001000: 4D 25 B2 C5 28 55 24 28 32 31 29 29 00 4D 18 9B |M%..(U$(21)).M..|
00001010: 0A 4C 4F 24 B2 55 24 28 37 29 3A 50 41 24 B2 55 |.LO$.U$(7):PA$.U|
00001020: 24 28 38 29 3A 43 44 25 B2 C5 28 55 24 28 39 29 |$(8):CD%..(U$(9)|
00001030: 29 3A 4D 57 25 B2 C5 28 55 24 28 31 30 29 29 3A |):MW%..(U$(10)):|
00001040: 4E 50 25 B2 C5 28 55 24 28 31 31 29 29 00 93 18 |NP%..(U$(11))...|
00001050: A0 0A 43 4C 25 B2 C5 28 55 24 28 31 32 29 29 3A |..CL%..(U$(12)):|
00001060: 43 58 B2 C5 28 55 24 28 31 33 29 29 3A 42 55 B2 |CX..(U$(13)):BU.|
00001070: C5 28 55 24 28 31 34 29 29 3A 4A 55 B2 C5 28 55 |.(U$(14)):JU..(U|
00001080: 24 28 31 37 29 29 3A 42 44 B2 C5 28 55 24 28 31 |$(17)):BD..(U$(1|
00001090: 35 29 29 00 B3 18 A1 0A 53 32 B2 C5 28 55 24 28 |5)).....S2..(U$(|
000010A0: 31 36 29 29 3A 8B 43 4C 25 B3 33 39 A7 43 4C 25 |16)):.CL%.39.CL%|
000010B0: B2 33 39 00 D5 18 A2 0A 97 39 38 33 2C 43 4C 25 |.39......983,CL%|
000010C0: 3A 8B 28 53 32 AF 32 AE 53 4C 29 B3 31 A7 53 32 |:.(S2.2.SL).1.S2|
000010D0: B2 32 AE 53 4C 00 02 19 A3 0A 97 38 33 31 2C 53 |.2.SL......831,S|
000010E0: 4C 3A 43 34 B2 35 33 32 34 38 AA 53 4C AC 35 31 |L:C4.53248.SL.51|
000010F0: 3A 4D 31 24 B2 C4 28 53 4C 29 3A 81 49 B2 30 A4 |:M1$..(SL):.I.0.|
00001100: 31 39 00 2E 19 A4 0A 52 B2 43 34 AA 49 3A 8D 32 |19.....R.C4.I:.2|
00001110: 37 32 36 3A 97 31 30 30 30 AA 49 2C 41 3A 82 3A |726:.1000.I,A:.:|
00001120: 52 B2 43 34 AA 32 30 3A 47 4E 24 B2 22 22 00 41 |R.C4.20:GN$."".A|
00001130: 19 A5 0A 8D 34 3A 8D 33 3A 47 4E 24 B2 49 24 3A |....4:.3:GN$.I$:|
00001140: 8E 00 55 19 A6 0A 8D 34 3A 41 B2 C2 28 35 32 39 |..U....4:A..(529|
00001150: 39 32 29 3A 8E 00 90 19 AA 0A 81 49 B2 31 A4 4E |92):.......I.1.N|
00001160: 53 25 3A 52 48 B2 C6 28 C8 28 59 24 28 49 29 2C |S%:RH..(.(Y$(I),|
00001170: 31 29 29 3A 52 4C B2 C6 28 C9 28 59 24 28 49 29 |1)):RL..(.(Y$(I)|
00001180: 2C 31 29 29 3A 52 B2 52 48 AC 32 35 36 AA 52 4C |,1)):R.RH.256.RL|
00001190: 00 A5 19 AF 0A 8B 52 B3 33 32 30 30 30 A7 57 25 |......R.32000.W%|
000011A0: 28 49 29 B2 52 00 AD 19 B4 0A 82 3A 8E 00 B3 19 |(I).R......:....|
000011B0: D2 0A 8F 00 FC 19 FA 0A 50 24 B2 22 4D 2E 22 AA |........P$."M.".|
000011C0: 49 4E 24 3A 4F 24 B2 22 32 3A 22 3A 42 B2 30 3A |IN$:O$."2:":B.0:|
000011D0: 8D 35 30 3A 9F 31 35 2C 44 45 2C 31 35 2C 22 52 |.50:.15,DE,15,"R|
000011E0: 22 AA 59 24 AA 22 54 45 4D 50 3D 22 AA 50 24 3A |".Y$."TEMP=".P$:|
000011F0: 44 42 24 B2 59 24 3A 44 42 B2 44 45 00 22 1A FB |DB$.Y$:DB.DE."..|
00001200: 0A 8D 32 3A 4F 24 B2 22 33 3A 22 3A 50 24 B2 22 |..2:O$."3:":P$."|
00001210: 4D 2E 22 AA 49 4E 24 3A 42 B2 30 3A 8D 35 30 3A |M.".IN$:B.0:.50:|
00001220: 8D 32 00 5F 1A FF 0A 9F 38 2C 44 42 2C 32 2C 44 |.2._....8,DB,2,D|
00001230: 42 24 AA 22 54 45 4D 50 2C 53 2C 52 22 3A 9F 32 |B$."TEMP,S,R":.2|
00001240: 2C 44 45 2C 31 2C 59 24 AA 50 24 AA 22 2C 53 2C |,DE,1,Y$.P$.",S,|
00001250: 57 22 3A 97 38 36 31 2C 30 3A 8D 32 38 36 30 00 |W":.861,0:.2860.|
00001260: 7F 1A 04 0B 9F 31 35 2C 44 42 2C 31 35 2C 22 53 |.....15,DB,15,"S|
00001270: 22 AA 44 42 24 AA 22 54 45 4D 50 22 3A 89 32 00 |".DB$."TEMP":.2.|
00001280: 86 1A 0E 0B 89 32 00 A4 1A 2C 0B 97 39 39 37 2C |.....2...,..997,|
00001290: 31 30 35 3A 9E 35 31 30 34 38 3A 9E 35 31 36 33 |105:.51048:.5163|
000012A0: 32 3A 89 32 00 CD 1A 54 0B 49 24 B2 49 24 AA C7 |2:.2...T.I$.I$..|
000012B0: 28 C2 28 43 34 29 29 3A 8B C2 28 43 34 29 B2 31 |(.(C4)):..(C4).1|
000012C0: 33 B0 C3 28 49 24 29 B1 32 35 33 A7 8E 00 DF 1A |3..(I$).253.....|
000012D0: 5E 0B 43 34 B2 43 34 AA 31 3A 89 32 39 30 30 00 |^.C4.C4.1:.2900.|
000012E0: FB 1A 7C 0B 84 38 2C 55 24 28 30 29 3A 8B 4B 5A |..|..8,U$(0):.KZ|
000012F0: 25 B2 31 A7 4B 5A 25 B2 30 3A 8E 00 37 1B 86 0B |%.1.KZ%.0:..7...|
00001300: 81 49 B2 31 A4 32 31 3A 84 38 2C 55 24 28 49 29 |.I.1.21:.8,U$(I)|
00001310: 3A 8B 49 B1 38 AF 49 B3 31 33 AF C5 28 55 24 28 |:.I.8.I.13..(U$(|
00001320: 49 29 29 B1 33 32 37 36 38 A7 55 24 28 49 29 B2 |I)).32768.U$(I).|
00001330: 22 33 32 37 36 38 22 00 58 1B 8B 0B 82 3A 97 32 |"32768".X....:.2|
00001340: 35 35 2C 4E 53 25 AC 32 3A 9E 35 30 39 37 36 3A |55,NS%.2:.50976:|
00001350: 43 34 B2 35 32 39 39 32 00 87 1B CC 0B 81 5A B2 |C4.52992......Z.|
00001360: 31 A4 4E 53 25 3A 59 24 28 5A 29 B2 C7 28 C2 28 |1.NS%:Y$(Z)..(.(|
00001370: 43 34 29 29 AA C7 28 C2 28 43 34 AA 31 29 29 3A |C4))..(.(C4.1)):|
00001380: 43 34 B2 43 34 AA 32 00 8F 1B CE 0B 82 3A 8E 00 |C4.C4.2......:..|
00001390: A4 1B 80 0C 4F 24 B2 22 35 3A 4D 4F 44 22 3A 8D |....O$."5:MOD":.|
000013A0: 33 38 30 30 00 B4 1B 85 0C 8B 52 5A 24 B2 22 22 |3800......RZ$.""|
000013B0: A7 8D 32 36 00 E4 1B 8A 0C 8D 32 3A 52 5A B2 31 |..26......2:RZ.1|
000013C0: 3A 8D 37 30 3A 49 24 B2 C8 28 49 24 2C 33 29 3A |:.70:I$..(I$,3):|
000013D0: 58 43 B2 B5 28 C5 28 49 24 29 29 3A 8B 49 24 B2 |XC..(.(I$)):.I$.|
000013E0: 47 24 A7 8E 00 FA 1B 94 0C 8B 58 43 B3 31 B0 58 |G$........XC.1.X|
000013F0: 43 B1 4C 53 25 A7 33 32 30 30 00 3E 1C 96 0C 43 |C.LS%.3200.>...C|
00001400: 52 B2 42 55 AC C2 28 31 30 31 34 29 AB 42 44 AA |R.BU..(1014).BD.|
00001410: 4E 50 25 AC C2 28 38 34 34 29 3A 8B 43 52 B3 C2 |NP%..(844):.CR..|
00001420: 28 31 30 31 33 29 AF C2 28 31 30 31 33 29 B3 B1 |(1013)..(1013)..|
00001430: 30 AF C2 28 31 30 31 34 29 B3 B1 30 A7 8E 00 53 |0..(1014)..0...S|
00001440: 1C 98 0C 42 44 B2 42 44 AA C2 28 31 30 31 33 29 |...BD.BD..(1013)|
00001450: AC 31 30 00 76 1C 9E 0C 8B 28 C5 28 41 52 24 28 |.10.v....(.(AR$(|
00001460: 58 43 29 29 AF 32 AE 53 4C 29 B3 31 A7 8D 31 34 |XC)).2.SL).1..14|
00001470: 3A 89 33 32 30 30 00 B0 1C A8 0C 97 39 39 37 2C |:.3200......997,|
00001480: 31 34 3A 9E 35 31 30 34 38 3A 52 5A 24 B2 41 52 |14:.51048:RZ$.AR|
00001490: 24 28 58 43 29 3A 8D 37 33 30 30 3A 8D 37 33 30 |$(XC):.7300:.730|
000014A0: 30 3A 4D 44 B2 C5 28 49 24 29 3A 8D 37 33 30 30 |0:MD..(I$):.7300|
000014B0: 00 D2 1C A9 0C 97 39 30 38 2C C5 28 49 24 29 3A |......908,.(I$):|
000014C0: 8D 37 33 30 30 3A 97 39 30 36 2C 31 3A 50 24 B2 |.7300:.906,1:P$.|
000014D0: 49 24 00 DC 1C AD 0C 8D 32 30 35 30 00 0B 1D B2 |I$......2050....|
000014E0: 0C 8B C8 28 50 24 2C 31 29 B2 22 2D 22 A7 81 49 |...(P$,1)."-"..I|
000014F0: B2 31 A4 31 30 30 30 3A 82 3A 9E 34 39 31 35 32 |.1.1000:.:.49152|
00001500: 3A 50 24 B2 CA 28 50 24 2C 32 29 00 1A 1D BC 0C |:P$..(P$,2).....|
00001510: 93 50 24 2C 4D 44 2C 31 3A 8A 00 35 1D C6 0C 8B |.P$,MD,1:..5....|
00001520: 41 B1 33 30 A7 41 B2 41 AB 33 30 3A 50 24 B2 22 |A.30.A.A.30:P$."|
00001530: 2D 22 AA 50 24 00 44 1D C7 0C 4D 44 B2 41 3A 89 |-".P$.D...MD.A:.|
00001540: 33 32 34 35 00 73 1D D8 0E 9E 36 35 34 38 34 3A |3245.s....65484:|
00001550: 42 B2 31 3A 8D 35 30 3A 84 38 2C 4C 53 24 3A 4C |B.1:.50:.8,LS$:L|
00001560: 53 25 B2 C5 28 4C 53 24 29 3A 81 41 41 B2 31 A4 |S%..(LS$):.AA.1.|
00001570: 4C 53 25 00 8A 1D DD 0E 8D 33 31 3A 41 52 24 28 |LS%......31:AR$(|
00001580: 41 41 29 B2 49 24 3A 82 3A 8E 00 97 1D 5A 0F 8B |AA).I$:.:....Z..|
00001590: 49 24 B2 22 22 A7 8E 00 C4 1D 64 0F 53 43 24 B2 |I$."".....d.SC$.|
000015A0: 22 22 3A 81 4B B2 31 A4 C3 28 49 24 29 3A 41 B2 |"":.K.1..(I$):A.|
000015B0: C6 28 CA 28 49 24 2C 4B 2C 31 29 29 3A 41 B2 41 |.(.(I$,K,1)):A.A|
000015C0: AF 31 32 37 00 E0 1D 68 0F 8B 41 B1 36 34 AF 41 |.127...h..A.64.A|
000015D0: B3 39 31 A7 53 43 24 B2 53 43 24 AA C7 28 41 29 |.91.SC$.SC$..(A)|
000015E0: 00 FC 1D 69 0F 8B 41 B1 34 37 AF 41 B3 35 38 A7 |...i..A.47.A.58.|
000015F0: 53 43 24 B2 53 43 24 AA C7 28 41 29 00 0B 1E 6E |SC$.SC$..(A)...n|
00001600: 0F 82 3A 49 24 B2 53 43 24 3A 8E 00 21 1E 21 1B |..:I$.SC$:..!.!.|
00001610: 8D 32 33 30 3A 84 38 2C 43 4C 3A 84 38 2C 56 49 |.230:.8,CL:.8,VI|
00001620: 24 00 4B 1E 26 1B 84 38 2C 44 41 24 2C 45 4D 2C |$.K.&..8,DA$,EM,|
00001630: 45 4D 25 2C 4E 55 25 2C 4D 55 25 2C 44 47 25 2C |EM%,NU%,MU%,DG%,|
00001640: 4E 53 25 2C 4E 44 25 2C 4C 42 25 00 69 1E 2B 1B |NS%,ND%,LB%.i.+.|
00001650: 81 41 B2 31 A4 35 3A 8D 33 31 3A 52 5A 24 B2 49 |.A.1.5:.31:RZ$.I|
00001660: 24 3A 8D 37 30 31 32 3A 82 00 B1 1E 3A 1B 81 49 |$:.7012:....:..I|
00001670: B2 31 A4 4E 53 25 3A 84 38 2C 53 55 24 28 49 29 |.1.NS%:.8,SU$(I)|
00001680: 3A 84 38 2C 52 51 25 28 49 29 2C 52 57 25 28 49 |:.8,RQ%(I),RW%(I|
00001690: 29 2C 5A 25 28 49 29 2C 52 41 28 49 29 2C 57 41 |),Z%(I),RA(I),WA|
000016A0: 28 49 29 2C 53 4F 25 28 49 29 2C 41 50 25 28 49 |(I),SO%(I),AP%(I|
000016B0: 29 00 C3 1E 3F 1B 58 25 28 49 29 B2 5A 25 28 49 |)...?.X%(I).Z%(I|
000016C0: 29 3A 82 00 E5 1E 43 1B 81 41 B2 36 A4 4E 44 25 |):....C..A.6.ND%|
000016D0: AA 35 3A 8D 33 31 3A 52 5A 24 B2 49 24 3A 8D 37 |.5:.31:RZ$.I$:.7|
000016E0: 30 31 32 3A 82 00 17 1F 44 1B 81 49 B2 31 A4 4E |012:....D..I.1.N|
000016F0: 44 25 3A 84 38 2C 55 31 28 49 29 2C 55 32 28 49 |D%:.8,U1(I),U2(I|
00001700: 29 2C 55 33 28 49 29 2C 55 4F 25 28 49 29 2C 44 |),U3(I),UO%(I),D|
00001710: 4E 24 28 49 29 3A 82 00 37 1F 45 1B 81 49 B2 31 |N$(I):..7.E..I.1|
00001720: A4 4C 42 25 3A 84 38 2C 4C 42 25 28 49 29 2C 4C |.LB%:.8,LB%(I),L|
00001730: 42 24 28 49 29 3A 82 00 4D 1F 49 1B 84 38 2C 4C |B$(I):..M.I..8,L|
00001740: 43 24 3A 8D 33 31 3A 54 43 24 B2 49 24 00 54 1F |C$:.31:TC$.I$.T.|
00001750: 62 1B 89 32 00 8C 1F 64 1B 8D 37 33 30 30 3A 44 |b..2...d..7300:D|
00001760: 52 28 41 29 B2 C5 28 49 24 29 3A 8D 37 33 30 30 |R(A)..(I$):.7300|
00001770: 3A 44 52 24 28 41 29 B2 49 24 3A 8D 37 33 30 30 |:DR$(A).I$:.7300|
00001780: 3A 44 43 24 28 41 29 B2 49 24 3A 8E 00 95 1F 6C |:DC$(A).I$:....l|
00001790: 1B 8D 32 33 30 00 DC 1F 94 1B 98 38 2C 43 4C 3A |..230......8,CL:|
000017A0: 98 38 2C 56 49 24 3A 98 38 2C 44 41 24 22 2C 22 |.8,VI$:.8,DA$","|
000017B0: 45 4D 22 2C 22 45 4D 25 22 2C 22 4E 55 25 22 2C |EM","EM%","NU%",|
000017C0: 22 4D 55 25 22 2C 22 44 47 25 22 2C 22 4E 53 25 |"MU%","DG%","NS%|
000017D0: 22 2C 22 4E 44 25 22 2C 22 4C 42 25 00 04 20 99 |","ND%","LB%.. .|
000017E0: 1B 81 41 B2 31 A4 35 3A 98 38 2C 44 52 28 41 29 |..A.1.5:.8,DR(A)|
000017F0: 22 3B 22 44 52 24 28 41 29 22 3B 22 44 43 24 28 |";"DR$(A)";"DC$(|
00001800: 41 29 3A 82 00 1B 20 A8 1B 81 49 B2 31 A4 4E 53 |A):... ...I.1.NS|
00001810: 25 3A 98 38 2C 53 55 24 28 49 29 00 5C 20 A9 1B |%:.8,SU$(I).\ ..|
00001820: 98 38 2C 52 51 25 28 49 29 22 2C 22 52 57 25 28 |.8,RQ%(I)","RW%(|
00001830: 49 29 22 2C 22 5A 25 28 49 29 22 2C 22 52 41 28 |I)","Z%(I)","RA(|
00001840: 49 29 22 2C 22 57 41 28 49 29 22 2C 22 53 4F 25 |I)","WA(I)","SO%|
00001850: 28 49 29 22 2C 22 41 50 25 28 49 29 00 8E 20 AD |(I)","AP%(I).. .|
00001860: 1B 82 3A 81 41 B2 31 A4 4E 44 25 3A 98 38 2C 44 |..:.A.1.ND%:.8,D|
00001870: 52 28 41 AA 35 29 22 3B 22 44 52 24 28 41 AA 35 |R(A.5)";"DR$(A.5|
00001880: 29 22 3B 22 44 43 24 28 41 AA 35 29 3A 82 00 C8 |)";"DC$(A.5):...|
00001890: 20 B2 1B 81 49 B2 31 A4 4E 44 25 3A 98 38 2C 55 | ...I.1.ND%:.8,U|
000018A0: 31 28 49 29 22 2C 22 55 32 28 49 29 22 2C 22 55 |1(I)","U2(I)","U|
000018B0: 33 28 49 29 22 2C 22 55 4F 25 28 49 29 22 2C 22 |3(I)","UO%(I)","|
000018C0: 44 4E 24 28 49 29 3A 82 00 EA 20 B3 1B 81 49 B2 |DN$(I):... ...I.|
000018D0: 31 A4 4C 42 25 3A 98 38 2C 4C 42 25 28 49 29 22 |1.LB%:.8,LB%(I)"|
000018E0: 2C 22 4C 42 24 28 49 29 3A 82 00 FC 20 B7 1B 98 |,"LB$(I):... ...|
000018F0: 38 2C 4C 43 24 3A 98 38 2C 54 43 24 00 03 21 C6 |8,LC$:.8,TC$..!.|
00001900: 1B 89 32 00 2E 21 D0 1B 8B C2 28 38 31 37 29 B2 |..2..!....(817).|
00001910: 31 39 33 A7 9F 31 35 2C C2 28 31 38 36 29 2C 31 |193..15,.(186),1|
00001920: 35 3A 98 31 35 2C 22 55 4A 22 3A A0 31 35 00 82 |5:.15,"UJ":.15..|
00001930: 21 DA 1B 9E 35 31 37 30 34 3A 9E 35 31 35 38 34 |!...51704:.51584|
00001940: 3A A0 35 3A 97 32 34 38 2C 32 30 32 3A 97 32 35 |:.5:.248,202:.25|
00001950: 30 2C 31 35 34 3A 9F 35 2C 32 2C 30 2C C7 28 36 |0,154:.5,2,0,.(6|
00001960: 29 3A 97 35 36 2C 31 35 35 3A 97 35 32 2C 31 35 |):.56,155:.52,15|
00001970: 35 3A 97 36 34 34 2C 31 35 35 3A 97 35 34 2C 31 |5:.644,155:.54,1|
00001980: 35 35 00 B3 21 E1 1B 54 58 24 B2 22 22 3A 81 49 |55..!..TX$."":.I|
00001990: B2 31 A4 31 35 3A 54 58 24 B2 54 58 24 AA 22 2E |.1.15:TX$.TX$.".|
000019A0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000019B0: 22 3A 82 00 C7 21 E4 1B 97 35 33 32 36 39 2C 30 |":...!...53269,0|
000019C0: 3A 97 31 39 38 2C 30 00 19 22 EE 1B 4C 44 B2 AB |:.198,0.."..LD..|
000019D0: 31 3A 41 B2 C2 28 39 31 33 29 3A 97 35 33 32 38 |1:A..(913):.5328|
000019E0: 31 2C 30 3A 97 35 33 32 38 30 2C 30 3A 86 4C 42 |1,0:.53280,0:.LB|
000019F0: 24 28 41 29 2C 4C 42 25 28 41 29 2C 41 52 24 28 |$(A),LB%(A),AR$(|
00001A00: C2 28 39 31 36 29 29 2C 55 24 28 32 32 29 2C 4C |.(916)),U$(22),L|
00001A10: 24 28 C2 28 39 32 34 29 29 00 61 22 EF 1B 41 B2 |$(.(924)).a"..A.|
00001A20: C2 28 39 31 34 29 3A 86 44 43 24 28 36 AA 41 29 |.(914):.DC$(6.A)|
00001A30: 2C 44 52 28 36 AA 41 29 2C 44 52 24 28 36 AA 41 |,DR(6.A),DR$(6.A|
00001A40: 29 2C 55 31 28 41 29 2C 55 32 28 41 29 2C 55 33 |),U1(A),U2(A),U3|
00001A50: 28 41 29 2C 55 4F 25 28 41 29 2C 44 4E 24 28 41 |(A),UO%(A),DN$(A|
00001A60: 29 00 A9 22 F0 1B 41 B2 C2 28 39 31 35 29 3A 86 |).."..A..(915):.|
00001A70: 57 25 28 41 29 2C 5A 25 28 41 29 2C 58 25 28 41 |W%(A),Z%(A),X%(A|
00001A80: 29 2C 53 55 24 28 41 29 2C 41 50 25 28 41 29 2C |),SU$(A),AP%(A),|
00001A90: 53 4F 25 28 41 29 2C 57 41 28 41 29 2C 52 41 28 |SO%(A),WA(A),RA(|
00001AA0: 41 29 2C 52 51 25 28 41 29 00 BB 22 F2 1B 86 52 |A),RQ%(A).."...R|
00001AB0: 57 25 28 41 29 2C 59 24 28 41 29 00 E2 22 F3 1B |W%(A),Y$(A).."..|
00001AC0: 46 24 B2 22 22 3A 52 B2 39 32 38 3A 8D 34 3A 8D |F$."":R.928:.4:.|
00001AD0: 33 3A 52 5A 24 B2 49 24 3A 41 B2 30 3A 8D 37 30 |3:RZ$.I$:A.0:.70|
00001AE0: 31 32 00 0B 23 48 1C 51 39 24 B2 22 9F C0 C0 C0 |12..#H.Q9$."....|
00001AF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 3A 5A 50 24 B2 |..........":ZP$.|
00001B00: 22 22 3A 47 24 B2 C7 28 31 33 29 00 35 23 51 1C |"":G$..(13).5#Q.|
00001B10: 8B C2 28 39 30 36 29 B1 30 A7 8D 32 30 38 30 3A |..(906).0..2080:|
00001B20: 8D 36 32 3A 8B C2 28 39 30 36 29 B3 B1 33 A7 9E |.62:..(906)..3..|
00001B30: 35 31 35 37 36 00 56 23 52 1C 52 B2 36 37 39 3A |51576.V#R.R.679:|
00001B40: 8D 34 3A 8D 33 3A 52 5A 24 B2 49 24 3A 41 B2 35 |.4:.3:RZ$.I$:A.5|
00001B50: 3A 8D 37 30 31 32 00 7A 23 53 1C 44 45 B2 C2 28 |:.7012.z#S.DE..(|
00001B60: 39 30 38 29 3A 47 25 B2 44 45 3A 4D 44 B2 44 45 |908):G%.DE:MD.DE|
00001B70: 3A 59 24 B2 44 52 24 28 35 29 00 84 23 5C 1C 89 |:Y$.DR$(5)..#\..|
00001B80: 37 35 30 30 00 BA 23 84 1C 49 24 B2 22 22 3A 81 |7500..#..I$."":.|
00001B90: 49 B2 31 A4 C3 28 52 5A 24 29 3A 41 24 B2 CA 28 |I.1..(RZ$):A$..(|
00001BA0: 52 5A 24 2C 49 2C 31 29 3A 8B 41 24 B3 B1 22 3B |RZ$,I,1):.A$..";|
00001BB0: 22 A7 49 24 B2 49 24 AA 41 24 00 ED 23 8E 1C 8B |".I$.I$.A$..#...|
00001BC0: 41 24 B2 22 3B 22 A7 49 B2 C3 28 52 5A 24 29 3A |A$.";".I..(RZ$):|
00001BD0: 52 5A 24 B2 C9 28 52 5A 24 2C C3 28 52 5A 24 29 |RZ$..(RZ$,.(RZ$)|
00001BE0: AB C3 28 49 24 29 AB 31 29 3A 82 3A 8E 00 FC 23 |..(I$).1):.:...#|
00001BF0: 98 1C 82 3A 52 5A 24 B2 22 22 3A 8E 00 2D 24 E8 |...:RZ$."":..-$.|
00001C00: 1C 84 38 2C 4C 53 24 3A 4E 4D 25 B2 C5 28 4C 53 |..8,LS$:NM%..(LS|
00001C10: 24 29 3A 81 49 B2 31 A4 4E 4D 25 3A 8D 33 31 3A |$):.I.1.NM%:.31:|
00001C20: 4C 24 28 49 29 B2 49 24 3A 82 3A 89 32 00 4F 24 |L$(I).I$:.:.2.O$|
00001C30: E9 1C 98 38 2C 4E 4D 25 3A 81 49 B2 31 A4 4E 4D |...8,NM%:.I.1.NM|
00001C40: 25 3A 98 38 2C 4C 24 28 49 29 3A 82 3A 89 32 00 |%:.8,L$(I):.:.2.|
00001C50: 8D 24 4C 1D 8F 20 2A 2A 20 4E 45 54 57 4F 52 4B |.$L.. ** NETWORK|
00001C60: 20 4D 4F 44 55 4C 45 20 37 2F 32 36 2F 39 31 20 | MODULE 7/26/91 |
00001C70: 42 59 20 47 55 4E 54 48 45 52 20 42 49 52 5A 4E |BY GUNTHER BIRZN|
00001C80: 49 45 4B 53 20 20 20 20 20 20 20 2A 2A 00 CB 24 |IEKS **..$|
00001C90: 56 1D 8F 20 2A 2A 20 50 4F 4B 45 20 39 30 36 2C |V.. ** POKE 906,|
00001CA0: 33 20 4D 45 41 4E 53 20 54 48 45 20 42 42 53 20 |3 MEANS THE BBS |
00001CB0: 49 53 20 43 41 4C 4C 49 4E 47 20 4F 55 54 20 41 |IS CALLING OUT A|
00001CC0: 53 20 41 20 4E 4F 44 45 20 2A 2A 00 09 25 60 1D |S A NODE **..%`.|
00001CD0: 8F 20 2A 2A 20 50 4F 4B 45 20 39 30 36 2C 32 20 |. ** POKE 906,2 |
00001CE0: 4D 45 41 4E 53 20 41 20 4E 4F 44 45 20 49 53 20 |MEANS A NODE IS |
00001CF0: 43 41 4C 4C 49 4E 47 20 54 48 45 20 42 42 53 20 |CALLING THE BBS |
00001D00: 4E 4F 52 4D 41 4C 20 2A 2A 00 47 25 6A 1D 8F 20 |NORMAL **.G%j.. |
00001D10: 2A 2A 20 50 4F 4B 45 20 39 30 36 2C 31 20 4D 45 |** POKE 906,1 ME|
00001D20: 41 4E 53 20 54 48 45 20 4E 45 54 20 49 53 20 41 |ANS THE NET IS A|
00001D30: 43 43 45 53 53 45 44 20 41 53 20 41 20 4D 4F 44 |CCESSED AS A MOD|
00001D40: 55 4C 45 20 20 2A 2A 00 50 25 74 1D 8F 20 2A 2A |ULE **.P%t.. **|
00001D50: 00 80 25 7E 1D 8F 20 2A 2A 20 4D 41 49 4C 20 46 |..%~.. ** MAIL F|
00001D60: 4F 52 20 54 48 45 20 4E 45 54 57 4F 52 4B 20 4E |OR THE NETWORK N|
00001D70: 4F 44 45 20 49 53 20 53 54 4F 52 45 44 20 41 53 |ODE IS STORED AS|
00001D80: 00 A3 25 88 1D 8F 20 2A 2A 20 5B 53 50 41 43 45 |..%... ** [SPACE|
00001D90: 5D 4E 45 54 57 4F 52 4B 20 49 44 45 4E 54 49 46 |]NETWORK IDENTIF|
00001DA0: 49 45 52 00 AC 25 92 1D 8F 20 2A 2A 00 E0 25 9C |IER..%... **..%.|
00001DB0: 1D 8F 20 2A 2A 20 55 53 45 52 20 49 44 20 48 41 |.. ** USER ID HA|
00001DC0: 53 20 4E 45 54 57 4F 52 4B 20 49 44 45 4E 54 49 |S NETWORK IDENTI|
00001DD0: 46 49 45 52 20 41 46 54 45 52 20 49 54 20 49 46 |FIER AFTER IT IF|
00001DE0: 00 16 26 A6 1D 8F 20 2A 2A 20 4D 45 53 53 41 47 |..&... ** MESSAG|
00001DF0: 45 20 4F 52 20 4D 41 49 4C 20 4F 52 49 47 49 4E |E OR MAIL ORIGIN|
00001E00: 41 54 45 44 20 46 52 4F 4D 20 41 4E 4F 54 48 45 |ATED FROM ANOTHE|
00001E10: 52 20 4E 4F 44 45 00 1F 26 B0 1D 8F 20 2A 2A 00 |R NODE..&... **.|
00001E20: 28 26 BA 1D 8F 20 2A 2A 00 33 26 BB 1D 8D 32 34 |(&... **.3&...24|
00001E30: 35 30 30 00 63 26 BF 1D 86 20 4E 57 24 28 34 2C |500.c&... NW$(4,|
00001E40: 35 30 29 3A 86 53 46 24 28 35 30 29 3A 8F 20 53 |50):.SF$(50):. S|
00001E50: 46 24 20 3D 20 53 45 4E 44 20 46 49 4C 45 20 4C |F$ = SEND FILE L|
00001E60: 49 53 54 00 A3 26 C0 1D 86 20 45 4D 25 28 31 30 |IST..&... EM%(10|
00001E70: 30 2C 32 29 3A 8F 20 45 4D 25 20 53 54 4F 52 45 |0,2):. EM% STORE|
00001E80: 53 20 45 4D 41 49 4C 20 49 44 53 20 44 55 52 49 |S EMAIL IDS DURI|
00001E90: 4E 47 20 45 4D 41 49 4C 20 50 52 4F 43 45 53 53 |NG EMAIL PROCESS|
00001EA0: 49 4E 47 00 C1 26 C4 1D 8B 20 C2 28 39 30 36 29 |ING..&... .(906)|
00001EB0: B2 31 20 A7 20 97 39 30 36 2C 30 3A 89 37 37 30 |.1 . .906,0:.770|
00001EC0: 30 00 E6 26 CE 1D 8B 20 C2 28 39 30 36 29 B2 32 |0..&... .(906).2|
00001ED0: 20 A7 20 97 39 30 36 2C 30 3A 97 38 34 30 2C 30 | . .906,0:.840,0|
00001EE0: 3A 89 38 30 30 30 00 10 27 D8 1D 8B 20 C2 28 39 |:.8000..'... .(9|
00001EF0: 30 36 29 B2 33 20 A7 20 97 39 30 36 2C 30 3A 97 |06).3 . .906,0:.|
00001F00: 38 34 30 2C 30 3A 99 22 93 22 3A 89 39 30 30 30 |840,0:.".":.9000|
00001F10: 00 16 27 E2 1D 80 00 1F 27 14 1E 8F 20 2A 2A 00 |..'.....'... **.|
00001F20: 3C 27 1E 1E 8F 20 2A 2A 20 4D 4F 44 55 4C 41 52 |<'... ** MODULAR|
00001F30: 20 41 43 43 45 53 53 20 4D 45 4E 55 00 45 27 28 | ACCESS MENU.E'(|
00001F40: 1E 8F 20 2A 2A 00 4B 27 2D 1E 8F 00 7E 27 32 1E |.. **.K'-...~'2.|
00001F50: 4F 24 B2 22 30 3A 22 3A 42 B2 30 3A 8D 35 30 3A |O$."0:":B.0:.50:|
00001F60: 9F 37 2C 44 45 2C 37 2C 59 24 AA 22 4E 45 54 4C |.7,DE,7,Y$."NETL|
00001F70: 49 53 54 2C 53 2C 52 22 3A 84 37 2C 4E 4E 00 86 |IST,S,R":.7,NN..|
00001F80: 27 35 1E 40 47 24 00 9A 27 3C 1E 81 49 B2 31 A4 |'5.@G$..'<..I.1.|
00001F90: 4E 4E 20 3A 8D 31 30 30 30 30 00 C2 27 46 1E 40 |NN :.10000..'F.@|
00001FA0: 22 9A 0E 5B 05 22 AA CA 28 C4 28 49 29 2C 32 29 |"..[."..(.(I),2)|
00001FB0: AA 22 9A 5D 05 3A 22 AA 4E 57 24 28 30 2C 49 29 |.".].:".NW$(0,I)|
00001FC0: 3A 82 00 CD 27 50 1E A0 37 3A A0 31 35 00 07 28 |:...'P..7:.15..(|
00001FD0: 5A 1E 5F 47 24 AA 22 9A D7 48 49 43 48 20 CE 4F |Z._G$."..HICH .O|
00001FE0: 44 45 20 D4 4F 20 CE 45 54 20 D7 49 54 48 05 3F |DE .O .ET .ITH.?|
00001FF0: 3A 22 3A 8D 35 3A 8B 49 24 B2 47 24 B0 49 24 B2 |:":.5:.I$.G$.I$.|
00002000: 22 22 A7 37 37 33 30 00 1F 28 5F 1E 8B 49 24 B2 |"".7730..(_..I$.|
00002010: 22 51 22 A7 97 39 30 36 2C 31 3A 89 32 30 35 00 |"Q"..906,1:.205.|
00002020: 54 28 64 1E 8D 31 35 30 30 30 3A 44 32 25 B2 C5 |T(d..15000:D2%..|
00002030: 28 49 24 29 3A 8F 20 44 32 25 3D 4E 55 4D 42 45 |(I$):. D2%=NUMBE|
00002040: 52 20 4F 46 20 4E 4F 44 45 20 54 4F 20 4E 45 54 |R OF NODE TO NET|
00002050: 57 4F 52 4B 00 6A 28 78 1E 44 31 25 B2 30 3A 54 |WORK.j(x.D1%.0:T|
00002060: 52 25 B2 30 3A 89 39 30 37 32 00 8C 28 DC 1E 8F |R%.0:.9072..(...|
00002070: 20 2A 2A 20 43 48 4F 4F 53 45 20 53 55 42 20 54 | ** CHOOSE SUB T|
00002080: 4F 20 4E 45 54 57 4F 52 4B 20 2A 2A 00 AD 28 E6 |O NETWORK **..(.|
00002090: 1E 56 49 B2 30 3A 41 24 B2 49 24 3A 99 41 24 3A |.VI.0:A$.I$:.A$:|
000020A0: 81 20 5A 20 B2 20 31 20 A4 20 4E 53 25 00 D8 28 |. Z . 1 . NS%..(|
000020B0: F0 1E 49 24 B2 53 55 24 28 5A 29 3A 8D 31 36 30 |..I$.SU$(Z):.160|
000020C0: 30 30 3A 99 49 24 3A 8B 49 24 B2 41 24 A7 56 49 |00:.I$:.I$.A$.VI|
000020D0: B2 5A 3A 5A B2 4E 53 25 00 E0 28 FA 1E 82 20 5A |.Z:Z.NS%..(... Z|
000020E0: 00 E6 28 04 1F 8E 00 EF 28 40 1F 8F 20 2A 2A 00 |..(.....(@.. **.|
000020F0: 10 29 4A 1F 8F 20 2A 2A 20 4E 45 54 57 4F 52 4B |.)J.. ** NETWORK|
00002100: 20 49 53 20 42 45 49 4E 47 20 43 41 4C 4C 45 44 | IS BEING CALLED|
00002110: 00 19 29 54 1F 8F 20 2A 2A 00 60 29 5E 1F 8F 20 |..)T.. **.`)^.. |
00002120: 55 53 45 52 4C 4F 47 20 41 4E 44 20 53 54 41 54 |USERLOG AND STAT|
00002130: 53 20 41 52 45 20 41 4C 52 45 41 44 59 20 52 45 |S ARE ALREADY RE|
00002140: 41 44 20 49 4E 2E 20 20 59 4C 24 20 3D 20 4E 45 |AD IN. YL$ = NE|
00002150: 54 57 4F 52 4B 20 49 44 45 4E 54 49 46 49 45 52 |TWORK IDENTIFIER|
00002160: 00 9D 29 68 1F 4F 24 B2 22 30 3A 4E 49 44 20 22 |..)h.O$."0:NID "|
00002170: AA 59 4C 24 3A 42 B2 31 3A 8D 35 30 3A 8F 20 52 |.YL$:B.1:.50:. R|
00002180: 45 41 44 20 49 4E 46 4F 20 46 4F 52 20 54 48 45 |EAD INFO FOR THE|
00002190: 20 43 41 4C 4C 49 4E 47 20 4E 4F 44 45 00 AF 29 | CALLING NODE..)|
000021A0: 69 1F 8D 31 37 32 30 30 3A 8D 34 30 30 30 30 00 |i..17200:.40000.|
000021B0: E4 29 6D 1F 8D 34 32 30 30 30 3A 41 24 B2 57 57 |.)m..42000:A$.WW|
000021C0: 24 3A 8B C5 28 41 24 29 B3 32 A7 8D 31 33 35 33 |$:..(A$).2..1353|
000021D0: 30 3A 8F 20 54 4F 47 47 4C 45 20 54 4F 20 50 55 |0:. TOGGLE TO PU|
000021E0: 4E 54 45 52 00 0B 2A 6E 1F 8B C5 28 41 24 29 B2 |NTER..*n...(A$).|
000021F0: 32 A7 8D 31 33 35 34 30 3A 8F 20 54 4F 47 47 4C |2..13540:. TOGGL|
00002200: 45 20 54 4F 20 58 4D 4F 44 45 4D 00 34 2A 6F 1F |E TO XMODEM.4*o.|
00002210: 8B C5 28 41 24 29 B2 33 A7 8D 31 33 35 35 35 3A |..(A$).3..13555:|
00002220: 8F 20 54 4F 47 47 4C 45 20 54 4F 20 58 4D 4F 44 |. TOGGLE TO XMOD|
00002230: 45 4D 31 4B 00 3A 2A 74 1F 8F 00 40 2A 76 1F 8F |EM1K.:*t...@*v..|
00002240: 00 46 2A 7C 1F 8F 00 5F 2A 7E 1F 8F 20 42 41 54 |.F*|..._*~.. BAT|
00002250: 43 48 20 4E 45 57 20 55 44 53 20 53 45 4E 44 00 |CH NEW UDS SEND.|
00002260: 7B 2A 80 1F 8F 20 42 41 54 43 48 20 4E 45 57 20 |{*... BATCH NEW |
00002270: 55 44 53 20 52 45 43 45 49 56 45 00 84 2A 86 1F |UDS RECEIVE..*..|
00002280: 51 53 B2 31 00 8A 2A 8B 1F 8F 00 AC 2A 90 1F 81 |QS.1..*.....*...|
00002290: 20 49 20 B2 20 31 20 A4 20 51 53 3A 99 20 22 D1 | I . 1 . QS:. ".|
000022A0: 55 45 55 45 20 D3 55 42 20 23 22 49 00 B2 2A 92 |UEUE .UB #"I..*.|
000022B0: 1F 8F 00 B8 2A 9A 1F 8F 00 BE 2A 9C 1F 8F 00 C4 |....*.....*.....|
000022C0: 2A 9F 1F 8F 00 CA 2A A0 1F 8F 00 D2 2A A2 1F 8D |*.....*.....*...|
000022D0: 38 30 00 EC 2A A4 1F 8D 39 38 35 30 3A 8F 20 53 |80..*...9850:. S|
000022E0: 45 4E 44 20 4D 45 53 53 41 47 45 53 00 F4 2A A6 |END MESSAGES..*.|
000022F0: 1F 8D 38 30 00 11 2B AE 1F 8D 39 37 30 30 3A 8F |..80..+...9700:.|
00002300: 20 52 45 43 45 49 56 45 20 4D 45 53 53 41 47 45 | RECEIVE MESSAGE|
00002310: 53 00 17 2B B3 1F 8F 00 1F 2B B8 1F 82 20 49 00 |S..+.....+... I.|
00002320: 41 2B BA 1F 52 B2 55 4E AA 31 3A 8D 31 33 39 30 |A+..R.UN.1:.1390|
00002330: 30 3A 8F 20 57 52 49 54 45 20 55 53 45 52 4C 4F |0:. WRITE USERLO|
00002340: 47 00 53 2B BB 1F 8D 31 35 30 30 30 3A 8D 32 35 |G.S+...15000:.25|
00002350: 30 30 30 00 6C 2B BC 1F 8D 31 33 37 30 30 3A 8F |000.l+...13700:.|
00002360: 20 57 52 49 54 45 20 53 54 41 54 53 00 94 2B BD | WRITE STATS..+.|
00002370: 1F 8D 31 39 33 30 30 3A 8F 20 50 52 4F 43 45 53 |..19300:. PROCES|
00002380: 53 20 4D 41 49 4C 20 49 46 20 53 45 4E 54 20 54 |S MAIL IF SENT T|
00002390: 4F 20 55 53 00 C1 2B C2 1F 97 39 30 36 2C 32 3A |O US..+...906,2:|
000023A0: 89 32 30 35 3A 8F 20 45 4E 44 20 4F 46 20 54 48 |.205:. END OF TH|
000023B0: 45 20 4E 45 54 57 4F 52 4B 20 53 45 53 53 49 4F |E NETWORK SESSIO|
000023C0: 4E 00 CA 2B 28 23 8F 20 2A 2A 00 ED 2B 32 23 8F |N..+(#. **..+2#.|
000023D0: 20 2A 2A 20 4E 45 54 57 4F 52 4B 20 49 53 20 41 | ** NETWORK IS A|
000023E0: 20 43 41 4C 4C 49 4E 47 20 4E 4F 44 45 00 F6 2B | CALLING NODE..+|
000023F0: 3C 23 8F 20 2A 2A 00 19 2C 46 23 8F 20 2A 2A 20 |<#. **..,F#. ** |
00002400: 52 45 41 44 20 4E 45 54 4C 49 53 54 20 4E 55 4D |READ NETLIST NUM|
00002410: 42 45 52 53 20 44 4F 57 4E 00 44 2C 50 23 8F 20 |BERS DOWN.D,P#. |
00002420: 2A 2A 20 43 41 4C 4C 20 4E 4F 44 45 53 20 54 48 |** CALL NODES TH|
00002430: 41 54 20 4E 45 45 44 20 54 4F 20 42 45 20 43 41 |AT NEED TO BE CA|
00002440: 4C 4C 45 44 00 4D 2C 5A 23 8F 20 2A 2A 00 57 2C |LLED.M,Z#. **.W,|
00002450: 5F 23 44 32 25 B2 30 00 8B 2C 64 23 4F 24 B2 22 |_#D2%.0..,d#O$."|
00002460: 30 3A 22 3A 42 B2 30 3A 8D 35 30 3A 9F 37 2C 44 |0:":B.0:.50:.7,D|
00002470: 45 2C 37 2C 59 24 AA 22 4E 45 54 4C 49 53 54 2C |E,7,Y$."NETLIST,|
00002480: 53 2C 52 22 3A 84 37 2C 44 31 25 00 AE 2C 66 23 |S,R":.7,D1%..,f#|
00002490: 81 49 B2 31 A4 44 31 25 3A 8D 31 30 30 30 30 3A |.I.1.D1%:.10000:|
000024A0: 82 3A A0 37 3A A0 31 35 3A 44 32 25 B2 30 00 D4 |.:.7:.15:D2%.0..|
000024B0: 2C 6E 23 44 32 25 B2 44 32 25 AA 31 3A 54 52 25 |,n#D2%.D2%.1:TR%|
000024C0: B2 30 3A 8F 20 2A 2A 20 52 45 41 44 20 4E 4F 44 |.0:. ** READ NOD|
000024D0: 45 20 49 4E 00 0A 2D 70 23 97 38 34 30 2C 30 3A |E IN..-p#.840,0:|
000024E0: 54 52 25 B2 54 52 25 AA 31 3A 99 47 24 AA 22 0E |TR%.TR%.1:.G$.".|
000024F0: 9A CE 45 54 57 4F 52 4B 20 CE 41 4D 45 05 3A 22 |..ETWORK .AME.:"|
00002500: 4E 57 24 28 30 2C 44 32 25 29 00 2E 2D 71 23 99 |NW$(0,D2%)..-q#.|
00002510: 20 20 20 22 9A CE 45 54 57 4F 52 4B 20 CE 55 4D | "..ETWORK .UM|
00002520: 42 05 3A 22 4E 57 24 28 34 2C 44 32 25 29 00 4E |B.:"NW$(4,D2%).N|
00002530: 2D 78 23 8F 20 2A 2A 20 43 48 45 43 4B 20 42 49 |-x#. ** CHECK BI|
00002540: 54 20 41 47 41 49 4E 53 54 20 44 41 54 45 00 73 |T AGAINST DATE.s|
00002550: 2D 82 23 41 B2 C5 28 CA 28 44 41 24 2C 33 29 29 |-.#A..(.(DA$,3))|
00002560: 3A 8B 41 B2 30 A7 41 B2 C5 28 CA 28 44 41 24 2C |:.A.0.A..(.(DA$,|
00002570: 34 29 29 00 85 2D 87 23 8B 44 32 25 B1 44 31 25 |4))..-.#.D2%.D1%|
00002580: A7 39 31 31 30 00 BA 2D 8C 23 8B CA 28 4E 57 24 |.9110..-.#..(NW$|
00002590: 28 31 2C 44 32 25 29 2C 41 2C 31 29 B3 B1 22 31 |(1,D2%),A,1).."1|
000025A0: 22 A7 99 47 24 22 CE 4F 54 20 C9 54 53 20 C4 41 |"..G$".OT .TS .A|
000025B0: 59 22 47 24 3A 89 39 34 39 30 00 CF 2D 96 23 8D |Y"G$:.9490..-.#.|
000025C0: 39 35 30 30 3A 8F 20 44 49 41 4C 20 4F 55 54 00 |9500:. DIAL OUT.|
000025D0: E4 2D A0 23 8B 41 42 B2 31 AF 54 52 25 B3 33 A7 |.-.#.AB.1.TR%.3.|
000025E0: 39 30 37 32 00 22 2E AA 23 55 4E B2 C5 28 4E 57 |9072."..#UN..(NW|
000025F0: 24 28 32 2C 44 32 25 29 29 3A 52 B2 55 4E AA 31 |$(2,D2%)):R.UN.1|
00002600: 3A 8D 31 33 38 30 30 3A 8D 32 37 31 30 3A 8D 32 |:.13800:.2710:.2|
00002610: 37 33 30 3A 8F 20 52 45 41 44 20 55 53 45 52 4C |730:. READ USERL|
00002620: 4F 47 00 5A 2E B4 23 4F 24 B2 22 30 3A 4E 49 44 |OG.Z..#O$."0:NID|
00002630: 20 22 AA 59 4C 24 3A 42 B2 31 3A 8D 35 30 3A 8F | ".YL$:B.1:.50:.|
00002640: 20 52 45 41 44 20 49 4E 46 4F 20 46 4F 52 20 43 | READ INFO FOR C|
00002650: 41 4C 4C 45 44 20 4E 4F 44 45 00 71 2E 04 24 8D |ALLED NODE.q..$.|
00002660: 31 37 30 30 30 3A 8F 20 44 4F 20 53 43 52 49 50 |17000:. DO SCRIP|
00002670: 54 00 93 2E 05 24 8D 34 30 30 30 30 3A 8F 20 52 |T....$.40000:. R|
00002680: 45 41 44 20 49 4E 54 4F 20 4D 53 47 20 42 55 46 |EAD INTO MSG BUF|
00002690: 46 45 52 00 C8 2E 0E 24 8D 34 32 30 30 30 3A 41 |FER....$.42000:A|
000026A0: 24 B2 57 57 24 3A 8B C5 28 41 24 29 B3 32 A7 8D |$.WW$:..(A$).2..|
000026B0: 31 33 35 33 30 3A 8F 20 54 4F 47 47 4C 45 20 54 |13530:. TOGGLE T|
000026C0: 4F 20 50 55 4E 54 45 52 00 EF 2E 18 24 8B C5 28 |O PUNTER....$..(|
000026D0: 41 24 29 B2 32 A7 8D 31 33 35 34 30 3A 8F 20 54 |A$).2..13540:. T|
000026E0: 4F 47 47 4C 45 20 54 4F 20 58 4D 4F 44 45 4D 00 |OGGLE TO XMODEM.|
000026F0: 18 2F 22 24 8B C5 28 41 24 29 B2 33 A7 8D 31 33 |./"$..(A$).3..13|
00002700: 35 35 35 3A 8F 20 54 4F 47 47 4C 45 20 54 4F 20 |555:. TOGGLE TO |
00002710: 58 4D 4F 44 45 4D 31 4B 00 1E 2F 2C 24 8F 00 24 |XMODEM1K../,$..$|
00002720: 2F 36 24 8F 00 2A 2F 40 24 8F 00 46 2F 4A 24 8F |/6$..*/@$..F/J$.|
00002730: 20 42 41 54 43 48 20 4E 45 57 20 55 44 53 20 52 | BATCH NEW UDS R|
00002740: 45 43 45 49 56 45 00 5F 2F 4C 24 8F 20 42 41 54 |ECEIVE._/L$. BAT|
00002750: 43 48 20 4E 45 57 20 55 44 53 20 53 45 4E 44 00 |CH NEW UDS SEND.|
00002760: 68 2F 54 24 51 53 B2 31 00 6E 2F 59 24 8F 00 91 |h/T$QS.1.n/Y$...|
00002770: 2F 5E 24 81 20 49 20 B2 20 31 20 A4 20 51 53 3A |/^$. I . 1 . QS:|
00002780: 99 20 22 D1 55 45 55 45 44 20 D3 55 42 20 23 22 |. ".UEUED .UB #"|
00002790: 49 00 97 2F 68 24 8F 00 9D 2F 7C 24 8F 00 A3 2F |I../h$.../|$.../|
000027A0: 86 24 8F 00 A9 2F 8B 24 8F 00 B1 2F 8C 24 8D 38 |.$.../.$.../.$.8|
000027B0: 30 00 B7 2F 8D 24 8F 00 D4 2F 90 24 8D 39 37 30 |0../.$.../.$.970|
000027C0: 30 3A 8F 20 52 45 43 45 49 56 45 20 4D 45 53 53 |0:. RECEIVE MESS|
000027D0: 41 47 45 53 00 EE 2F A4 24 8D 39 38 35 30 3A 8F |AGES../.$.9850:.|
000027E0: 20 53 45 4E 44 20 4D 45 53 53 41 47 45 53 00 F4 | SEND MESSAGES..|
000027F0: 2F AE 24 8F 00 FC 2F B8 24 82 20 49 00 02 30 B9 |/.$.../.$. I..0.|
00002800: 24 8F 00 23 30 C2 24 8D 31 35 30 30 30 3A 8F 20 |$..#0.$.15000:. |
00002810: 48 41 4E 47 20 55 50 20 4F 4E 20 54 48 45 20 4E |HANG UP ON THE N|
00002820: 4F 44 45 00 45 30 CC 24 52 B2 55 4E AA 31 3A 8D |ODE.E0.$R.UN.1:.|
00002830: 31 33 39 30 30 3A 8F 20 57 52 49 54 45 20 55 53 |13900:. WRITE US|
00002840: 45 52 4C 4F 47 00 50 30 D1 24 8D 32 35 30 30 30 |ERLOG.P0.$.25000|
00002850: 00 69 30 D6 24 8D 31 33 37 30 30 3A 8F 20 57 52 |.i0.$.13700:. WR|
00002860: 49 54 45 20 53 54 41 54 53 00 7F 30 12 25 8B 20 |ITE STATS..0.%. |
00002870: 44 32 25 B3 44 31 25 20 A7 20 89 39 30 37 30 00 |D2%.D1% . .9070.|
00002880: AD 30 14 25 8D 31 39 33 30 30 3A 8F 20 50 52 4F |.0.%.19300:. PRO|
00002890: 43 45 53 53 20 4D 41 49 4C 20 46 49 4C 45 53 20 |CESS MAIL FILES |
000028A0: 49 46 20 54 48 45 59 20 45 58 49 53 54 00 BF 30 |IF THEY EXIST..0|
000028B0: 17 25 A0 37 3A A0 38 3A A0 32 3A 89 32 30 35 00 |.%.7:.8:.2:.205.|
000028C0: C8 30 1C 25 8F 20 2A 2A 00 E4 30 26 25 8F 20 2A |.0.%. **..0&%. *|
000028D0: 2A 20 41 43 54 55 41 4C 4C 59 20 43 41 4C 4C 20 |* ACTUALLY CALL |
000028E0: 4E 4F 44 45 00 ED 30 30 25 8F 20 2A 2A 00 0D 31 |NODE..00%. **..1|
000028F0: 35 25 44 54 25 B2 30 3A 42 52 25 B2 C5 28 4E 57 |5%DT%.0:BR%..(NW|
00002900: 24 28 33 2C 44 32 25 29 29 3A 8D 36 32 00 3B 31 |$(3,D2%)):.62.;1|
00002910: 3A 25 8D 31 35 30 30 30 3A 99 22 11 9A C4 49 41 |:%.15000:."...IA|
00002920: 4C 49 4E 47 20 C1 54 54 45 4D 50 54 05 3A 22 AA |LING .TTEMPT.:".|
00002930: C4 28 44 54 25 AA 31 29 AA 47 24 00 72 31 3B 25 |.(DT%.1).G$.r1;%|
00002940: 98 35 2C 22 41 54 44 54 22 3B 3A 81 49 B2 31 A4 |.5,"ATDT";:.I.1.|
00002950: C3 28 4E 57 24 28 34 2C 44 32 25 29 29 3A 41 24 |.(NW$(4,D2%)):A$|
00002960: B2 CA 28 4E 57 24 28 34 2C 44 32 25 29 2C 49 2C |..(NW$(4,D2%),I,|
00002970: 31 29 00 85 31 3C 25 8B 41 24 B2 22 5F 22 A7 41 |1)..1<%.A$."_".A|
00002980: 24 B2 22 2C 22 00 95 31 44 25 98 35 2C 41 24 3B |$.","..1D%.5,A$;|
00002990: 3A 82 3A 98 35 00 9E 31 4E 25 41 B2 54 49 00 BB |:.:.5..1N%A.TI..|
000029A0: 31 58 25 9E 35 32 32 32 37 3A 8B 20 C2 28 32 35 |1X%.52227:. .(25|
000029B0: 31 29 B2 30 20 A7 20 39 36 30 30 00 D5 31 62 25 |1).0 . 9600..1b%|
000029C0: 8B 20 28 54 49 AB 41 29 B3 20 31 38 30 30 20 A7 |. (TI.A). 1800 .|
000029D0: 20 39 35 36 30 00 EF 31 6C 25 44 54 25 B2 44 54 | 9560..1l%DT%.DT|
000029E0: 25 AA 31 3A 8B 44 54 25 B3 34 A7 39 35 33 30 00 |%.1:.DT%.4.9530.|
000029F0: 06 32 76 25 41 42 B2 38 3A 8E 3A 8F 20 2A 2A 20 |.2v%AB.8:.:. ** |
00002A00: 46 41 49 4C 45 44 00 2F 32 80 25 41 42 B2 30 3A |FAILED./2.%AB.0:|
00002A10: 99 22 9A C3 4F 4E 4E 45 43 54 45 44 05 2E 2E 2E |."..ONNECTED....|
00002A20: 22 47 24 3A 97 38 34 30 2C 30 3A 8D 32 33 30 00 |"G$:.840,0:.230.|
00002A30: 6B 32 8A 25 4F 24 B2 22 43 41 4C 4C 45 52 53 22 |k2.%O$."CALLERS"|
00002A40: 3A 8D 37 31 3A 98 38 2C 22 CE 45 54 57 4F 52 4B |:.71:.8,".ETWORK|
00002A50: 3A 22 AA 4E 57 24 28 30 2C 44 32 25 29 AA 22 20 |:".NW$(0,D2%)." |
00002A60: C1 54 20 22 AA 54 4D 24 3A 8D 32 00 71 32 94 25 |.T ".TM$:.2.q2.%|
00002A70: 8E 00 7A 32 E4 25 8F 20 2A 2A 00 95 32 EE 25 8F |..z2.%. **..2.%.|
00002A80: 20 2A 2A 20 52 45 54 52 49 45 56 45 20 4D 45 53 | ** RETRIEVE MES|
00002A90: 53 41 47 45 53 00 9E 32 F8 25 8F 20 2A 2A 00 BA |SAGES..2.%. **..|
00002AA0: 32 F9 25 8F 20 2A 2A 20 46 49 52 53 54 20 47 45 |2.%. ** FIRST GE|
00002AB0: 54 20 53 55 42 20 4E 41 4D 45 00 DC 32 FA 25 8F |T SUB NAME..2.%.|
00002AC0: 20 2A 2A 20 53 48 4F 55 4C 44 20 48 41 56 45 20 | ** SHOULD HAVE |
00002AD0: 44 4F 55 42 4C 45 20 52 56 53 27 53 00 E7 32 FD |DOUBLE RVS'S..2.|
00002AE0: 25 8D 35 31 30 30 30 00 22 33 02 26 99 47 24 AA |%.51000."3.&.G$.|
00002AF0: 22 9A D2 45 54 52 49 45 56 49 4E 47 20 CD 45 53 |"..ETRIEVING .ES|
00002B00: 53 41 47 45 53 05 2E 2E 2E 22 53 55 24 28 56 49 |SAGES...."SU$(VI|
00002B10: 29 47 24 3A 49 24 B2 22 22 3A 41 42 B2 30 3A 4A |)G$:I$."":AB.0:J|
00002B20: B2 30 00 3A 33 0C 26 4F 24 B2 22 32 3A 22 3A 42 |.0.:3.&O$."2:":B|
00002B30: B2 30 3A 8D 35 30 3A 41 B2 30 00 70 33 16 26 41 |.0:.50:A.0.p3.&A|
00002B40: B2 41 AA 31 3A 50 24 B2 22 22 3A A1 23 35 2C 41 |.A.1:P$."":.#5,A|
00002B50: 24 3A 8B 41 B1 34 30 30 30 30 A7 99 47 24 22 9A |$:.A.40000..G$".|
00002B60: D4 49 4D 45 CF 55 54 05 2E 2E 2E 22 47 24 3A 8E |.IME.UT...."G$:.|
00002B70: 00 82 33 20 26 8B 41 24 B3 B1 22 09 22 A7 39 37 |..3 &.A$..".".97|
00002B80: 35 30 00 8D 33 2A 26 A1 23 35 2C 41 24 00 C9 33 |50..3*&.#5,A$..3|
00002B90: 2B 26 8B 41 24 B3 B1 22 22 AF 41 24 B3 B1 22 09 |+&.A$.."".A$..".|
00002BA0: 22 AF 41 24 B3 B1 22 3A 22 AF 41 24 B3 B1 22 2A |".A$..":".A$.."*|
00002BB0: 22 AF 41 24 B3 B1 22 3F 22 AF 41 24 B3 B1 47 24 |".A$.."?".A$..G$|
00002BC0: A7 50 24 B2 50 24 AA 41 24 00 EF 33 34 26 8B 41 |.P$.P$.A$..34&.A|
00002BD0: 24 B2 22 04 22 A7 99 47 24 22 9A CD 53 47 20 C4 |$."."..G$"..SG .|
00002BE0: 4F 57 4E 4C 4F 41 44 20 CF 56 45 52 22 3A 8E 00 |OWNLOAD .VER":..|
00002BF0: 0E 34 39 26 8B C3 28 50 24 29 B1 32 32 A7 99 50 |.49&..(P$).22..P|
00002C00: 24 22 20 D4 4F 4F 20 CC 4F 4E 47 22 3A 8E 00 1F |$" .OO .ONG":...|
00002C10: 34 3E 26 8B 41 24 B3 B1 47 24 A7 39 37 37 30 00 |4>&.A$..G$.9770.|
00002C20: 32 34 48 26 41 B2 32 3A 8F 20 53 45 51 20 46 49 |24H&A.2:. SEQ FI|
00002C30: 4C 45 00 59 34 49 26 50 24 B2 22 49 4E 45 54 2E |LE.Y4I&P$."INET.|
00002C40: 46 49 4C 45 2C 53 22 3A 8D 31 32 30 30 30 3A 8F |FILE,S":.12000:.|
00002C50: 20 47 45 54 20 46 49 4C 45 00 63 34 4A 26 89 39 | GET FILE.c4J&.9|
00002C60: 37 34 30 00 86 34 52 26 41 B2 30 3A 99 22 53 4F |740..4R&A.0:."SO|
00002C70: 4D 45 54 48 49 4E 47 20 57 52 4F 4E 47 21 21 22 |METHING WRONG!!"|
00002C80: 3A 89 39 37 34 30 00 8F 34 7A 26 8F 20 2A 2A 00 |:.9740..4z&. **.|
00002C90: A6 34 84 26 8F 20 2A 2A 20 53 45 4E 44 20 4D 45 |.4.&. ** SEND ME|
00002CA0: 53 53 41 47 45 53 00 AF 34 8E 26 8F 20 2A 2A 00 |SSAGES..4.&. **.|
00002CB0: B8 34 8F 26 8F 20 2A 2A 00 C1 34 90 26 8F 20 2A |.4.&. **..4.&. *|
00002CC0: 2A 00 CC 34 93 26 8D 35 30 30 30 30 00 00 35 98 |*..4.&.50000..5.|
00002CD0: 26 99 47 24 AA 22 9A D3 45 4E 44 49 4E 47 20 CD |&.G$."..ENDING .|
00002CE0: 45 53 53 41 47 45 53 05 2E 2E 2E 22 53 55 24 28 |ESSAGES...."SU$(|
00002CF0: 56 49 29 47 24 3A 49 24 B2 22 22 3A 41 42 B2 30 |VI)G$:I$."":AB.0|
00002D00: 00 34 35 A2 26 81 20 5A 20 B2 20 31 20 A4 20 34 |.45.&. Z . 1 . 4|
00002D10: 30 30 30 3A A1 23 35 2C 41 24 3A A1 42 24 3A 8B |000:.#5,A$:.B$:.|
00002D20: 41 24 B3 B1 22 22 B0 42 24 B3 B1 22 22 A7 5A B2 |A$.."".B$.."".Z.|
00002D30: 37 30 30 30 00 53 35 AC 26 8B 20 41 24 B2 22 2A |7000.S5.&. A$."*|
00002D40: 22 B0 42 24 B2 22 2A 22 A7 5A B2 37 30 30 30 3A |".B$."*".Z.7000:|
00002D50: 82 3A 8E 00 5B 35 B6 26 82 3A 8F 00 6F 35 BB 26 |.:..[5.&.:..o5.&|
00002D60: 42 B2 30 3A 4F 24 B2 22 32 3A 22 3A 8D 35 30 00 |B.0:O$."2:":.50.|
00002D70: 87 35 C0 26 46 24 B2 22 46 49 4C 45 2E 22 AA 59 |.5.&F$."FILE.".Y|
00002D80: 4C 24 AA 22 2C 53 22 00 8F 35 CA 26 8D 31 36 00 |L$.",S"..5.&.16.|
00002D90: CB 35 D4 26 4F 24 B2 22 09 09 09 09 09 09 09 09 |.5.&O$."........|
00002DA0: 09 09 22 AA 46 24 AA 22 2C 52 22 AA 47 24 3A 81 |..".F$.",R".G$:.|
00002DB0: 5A B2 31 A4 C3 28 4F 24 29 3A 41 24 B2 CA 28 4F |Z.1..(O$):A$..(O|
00002DC0: 24 2C 5A 2C 31 29 3A 99 41 24 3B 00 D8 35 D9 26 |$,Z,1):.A$;..5.&|
00002DD0: 98 35 2C 41 24 3B 3A 82 00 E7 35 DE 26 8D 31 36 |.5,A$;:...5.&.16|
00002DE0: 3A 8D 31 33 30 30 30 00 0A 36 E8 26 8D 31 36 3A |:.13000..6.&.16:|
00002DF0: 40 22 09 09 09 09 09 09 09 09 09 09 04 04 04 04 |@"..............|
00002E00: 04 04 C4 4F 4E 45 21 22 3A 8E 00 10 36 F2 26 8F |...ONE!":...6.&.|
00002E10: 00 37 36 10 27 8F 20 2A 2A 20 52 45 41 44 20 4D |.76.'. ** READ M|
00002E20: 41 49 4E 20 4E 4F 44 45 20 49 4E 46 4F 52 4D 41 |AIN NODE INFORMA|
00002E30: 54 49 4F 4E 20 49 4E 00 56 36 1A 27 84 37 2C 4E |TION IN.V6.'.7,N|
00002E40: 57 24 28 30 2C 49 29 3A 8F 20 4E 45 54 57 4F 52 |W$(0,I):. NETWOR|
00002E50: 4B 20 4E 41 4D 45 00 82 36 42 27 84 37 2C 4E 57 |K NAME..6B'.7,NW|
00002E60: 24 28 31 2C 49 29 3A 8F 20 44 41 59 53 20 4F 46 |$(1,I):. DAYS OF|
00002E70: 20 4D 4F 4E 54 48 20 54 4F 20 43 41 4C 4C 20 4F | MONTH TO CALL O|
00002E80: 55 54 00 B3 36 47 27 8B C3 28 4E 57 24 28 31 2C |UT..6G'..(NW$(1,|
00002E90: 49 29 29 B3 33 31 A7 4E 57 24 28 31 2C 49 29 B2 |I)).31.NW$(1,I).|
00002EA0: 4E 57 24 28 31 2C 49 29 AA 22 30 22 3A 89 31 30 |NW$(1,I)."0":.10|
00002EB0: 30 35 35 00 E1 36 60 27 84 37 2C 4E 57 24 28 32 |055..6`'.7,NW$(2|
00002EC0: 2C 49 29 3A 8F 20 49 44 20 4F 4E 20 42 42 53 20 |,I):. ID ON BBS |
00002ED0: 46 4F 52 20 4E 45 57 20 4D 53 47 20 43 4F 55 4E |FOR NEW MSG COUN|
00002EE0: 54 00 F8 36 6A 27 84 37 2C 4E 57 24 28 33 2C 49 |T..6j'.7,NW$(3,I|
00002EF0: 29 3A 8F 20 42 41 55 44 00 1E 37 74 27 84 37 2C |):. BAUD..7t'.7,|
00002F00: 4E 57 24 28 34 2C 49 29 3A 8F 20 50 48 4F 4E 45 |NW$(4,I):. PHONE|
00002F10: 20 23 20 54 4F 20 43 41 4C 4C 20 4F 55 54 00 24 | # TO CALL OUT.$|
00002F20: 37 92 27 8E 00 2D 37 E0 2E 8F 20 2A 2A 00 63 37 |7.'..-7... **.c7|
00002F30: EA 2E 8F 20 2A 2A 20 44 4F 57 4E 4C 4F 41 44 20 |... ** DOWNLOAD |
00002F40: 46 49 4C 45 20 46 24 20 54 4F 20 44 45 56 49 43 |FILE F$ TO DEVIC|
00002F50: 45 20 44 45 2C 20 44 52 49 56 45 20 23 20 59 24 |E DE, DRIVE # Y$|
00002F60: 20 2A 2A 00 6C 37 F4 2E 8F 20 2A 2A 00 83 37 F9 | **.l7... **..7.|
00002F70: 2E 41 42 B2 30 3A 8B 53 53 25 B2 31 A7 8D 32 31 |.AB.0:.SS%.1..21|
00002F80: 30 30 30 00 AF 37 FA 2E 8B 20 41 42 20 B1 20 30 |000..7... AB . 0|
00002F90: 20 A7 99 22 D0 52 45 4D 41 54 55 52 45 20 C4 4F | ..".REMATURE .O|
00002FA0: 57 4E 4C 4F 41 44 20 C1 42 4F 52 54 22 3A 8E 00 |WNLOAD .BORT":..|
00002FB0: 01 38 FE 2E 99 22 11 11 9A C4 4F 57 4E 4C 4F 41 |.8..."....OWNLOA|
00002FC0: 44 49 4E 47 20 C6 49 4C 45 05 3A 22 AA 46 24 3A |DING .ILE.:".F$:|
00002FD0: 99 3A 99 22 9A D7 41 49 54 49 4E 47 20 C6 4F 52 |.:."..AITING .OR|
00002FE0: 20 C1 43 4B 4E 4F 57 4C 45 44 47 45 4D 45 4E 54 | .CKNOWLEDGEMENT|
00002FF0: 05 2E 2E 2E 22 AA C7 28 31 33 29 AA C7 28 31 33 |...."..(13)..(13|
00003000: 29 00 14 38 08 2F 8F 49 46 51 37 54 48 45 4E 31 |)..8./.IFQ7THEN1|
00003010: 32 30 38 30 00 4A 38 12 2F 8F 50 4F 4B 45 34 37 |2080.J8./.POKE47|
00003020: 34 30 36 2C 30 3A 41 3D 31 3A 50 4F 4B 45 34 39 |406,0:A=1:POKE49|
00003030: 31 34 37 2C 41 3A 49 46 41 3D 32 54 48 45 4E 50 |147,A:IFA=2THENP|
00003040: 4F 4B 45 34 37 34 30 36 2C 31 00 6D 38 1C 2F 8F |OKE47406,1.m8./.|
00003050: 20 41 20 3D 20 31 20 46 4F 52 20 50 52 47 2C 20 | A = 1 FOR PRG, |
00003060: 41 20 3D 20 32 20 46 4F 52 20 53 45 51 00 7A 38 |A = 2 FOR SEQ.z8|
00003070: 26 2F 8F 4A 3D 31 3A 5A 3D 31 00 9C 38 30 2F 8F |&/.J=1:Z=1..80/.|
00003080: 49 46 51 37 3D 30 4F 52 50 45 45 4B 28 38 34 30 |IFQ7=0ORPEEK(840|
00003090: 29 3D 31 54 48 45 4E 31 32 31 32 30 00 DE 38 3A |)=1THEN12120..8:|
000030A0: 2F 8F 20 4A 3D 4A 2B 31 3A 47 45 54 23 35 2C 41 |/. J=J+1:GET#5,A|
000030B0: 24 3A 49 46 4A 3E 32 30 30 30 30 4F 52 5A 3E 37 |$:IFJ>20000ORZ>7|
000030C0: 4F 52 50 45 45 4B 28 31 39 37 29 3C 3E 36 34 54 |ORPEEK(197)<>64T|
000030D0: 48 45 4E 41 42 3D 31 3A 52 45 54 55 52 4E 00 FC |HENAB=1:RETURN..|
000030E0: 38 3F 2F 8F 20 49 46 41 24 3D 22 04 22 54 48 45 |8?/. IFA$="."THE|
000030F0: 4E 41 42 3D 34 3A 52 45 54 55 52 4E 00 1C 39 44 |NAB=4:RETURN..9D|
00003100: 2F 8F 20 20 47 4F 53 55 42 38 30 3A 49 46 41 24 |/. GOSUB80:IFA$|
00003110: 3D 22 22 54 48 45 4E 31 32 30 39 30 00 56 39 4E |=""THEN12090.V9N|
00003120: 2F 8F 20 41 3D 28 41 53 43 28 41 24 29 41 4E 44 |/. A=(ASC(A$)AND|
00003130: 39 35 29 3A 49 46 41 3C 3E 37 31 41 4E 44 41 3C |95):IFA<>71ANDA<|
00003140: 3E 36 35 54 48 45 4E 5A 3D 5A 2B 31 3A 47 4F 54 |>65THENZ=Z+1:GOT|
00003150: 4F 31 32 30 39 30 00 76 39 58 2F A0 31 35 3A 9F |O12090.v9X/.15:.|
00003160: 31 35 2C 44 45 2C 31 35 3A 8D 31 35 32 30 30 3A |15,DE,15:.15200:|
00003170: 9E 35 31 30 30 30 00 94 39 62 2F 9E 35 31 30 30 |.51000..9b/.5100|
00003180: 38 3A 8F 52 3D 34 39 31 34 37 3A 47 4F 53 55 42 |8:.R=49147:GOSUB|
00003190: 32 37 32 36 00 D0 39 6C 2F 8F 20 49 46 41 3C 31 |2726..9l/. IFA<1|
000031A0: 4F 52 41 3E 33 4F 52 50 45 45 4B 28 35 31 32 29 |ORA>3ORPEEK(512)|
000031B0: 3D 31 54 48 45 4E 41 42 3D 31 3A 43 4C 4F 53 45 |=1THENAB=1:CLOSE|
000031C0: 32 3A 43 4C 4F 53 45 31 35 3A 52 45 54 55 52 4E |2:CLOSE15:RETURN|
000031D0: 00 EA 39 76 2F A0 32 3A 9F 32 2C 44 45 2C 33 2C |..9v/.2:.2,DE,3,|
000031E0: 59 24 AA 50 24 AA 22 2C 57 22 00 0B 3A 7B 2F 8B |Y$.P$.",W"..:{/.|
000031F0: 41 44 25 B2 31 A7 A0 32 3A 9F 32 2C 44 45 2C 33 |AD%.1..2:.2,DE,3|
00003200: 2C 59 24 AA 50 24 AA 22 2C 41 22 00 45 3A 80 2F |,Y$.P$.",A".E:./|
00003210: 99 31 3A 9E 35 31 30 30 30 3A 99 32 3A 9E 35 31 |.1:.51000:.2:.51|
00003220: 30 31 36 3A 99 33 3A 99 47 24 AA 22 9A C4 4F 57 |016:.3:.G$."..OW|
00003230: 4E 4C 4F 41 44 20 C3 4F 4D 50 4C 45 54 45 05 2E |NLOAD .OMPLETE..|
00003240: 2E 2E 22 47 24 00 52 3A 8A 2F A0 31 35 3A A0 32 |.."G$.R:./.15:.2|
00003250: 3A 8E 00 5B 3A C8 32 8F 20 2A 2A 00 91 3A D2 32 |:..[:.2. **..:.2|
00003260: 8F 20 2A 2A 20 55 50 4C 4F 41 44 20 46 49 4C 45 |. ** UPLOAD FILE|
00003270: 20 46 24 20 46 52 4F 4D 20 44 45 56 49 43 45 20 | F$ FROM DEVICE |
00003280: 44 45 2C 20 44 52 49 56 45 20 23 20 59 24 20 2A |DE, DRIVE # Y$ *|
00003290: 2A 00 9A 3A DC 32 8F 20 2A 2A 00 B7 3A E1 32 41 |*..:.2. **..:.2A|
000032A0: 42 B2 30 3A 8B 20 53 53 25 20 B2 20 31 20 A7 20 |B.0:. SS% . 1 . |
000032B0: 8D 20 32 32 33 30 30 00 DD 3A E2 32 8B 20 41 42 |. 22300..:.2. AB|
000032C0: 20 B2 20 31 20 A7 20 99 20 22 D0 52 45 2D D5 50 | . 1 . . ".RE-.P|
000032D0: 4C 4F 41 44 20 C1 42 4F 52 54 22 3A 8E 00 FD 3A |LOAD .BORT":...:|
000032E0: E6 32 99 22 11 11 9A D5 50 4C 4F 41 44 49 4E 47 |.2."....PLOADING|
000032F0: 20 C6 49 4C 45 05 3A 22 AA 46 24 3A 99 00 31 3B | .ILE.:".F$:..1;|
00003300: EB 32 99 22 9A D7 41 49 54 49 4E 47 20 C6 4F 52 |.2."..AITING .OR|
00003310: 20 C1 43 4B 4E 4F 57 4C 45 44 47 45 4D 45 4E 54 | .CKNOWLEDGEMENT|
00003320: 05 2E 2E 2E 22 AA C7 28 31 33 29 AA C7 28 31 33 |...."..(13)..(13|
00003330: 29 00 4A 3B F0 32 8B C2 28 38 34 30 29 B2 31 B0 |).J;.2..(840).1.|
00003340: 51 37 B2 30 A7 31 33 30 39 30 00 69 3B FA 32 5A |Q7.0.13090.i;.2Z|
00003350: B2 30 3A 4A B2 31 3A A1 23 35 2C 41 24 3A 97 36 |.0:J.1:.#5,A$:.6|
00003360: 36 37 2C C2 28 36 36 38 29 00 A7 3B 04 33 4A B2 |67,.(668)..;.3J.|
00003370: 4A AA 31 3A A1 23 35 2C 41 24 3A 8B 4A B1 32 35 |J.1:.#5,A$:.J.25|
00003380: 30 30 30 B0 5A B1 37 B0 C2 28 31 39 37 29 B3 B1 |000.Z.7..(197)..|
00003390: 36 34 A7 99 22 C1 42 4F 52 54 20 D0 52 45 4D 41 |64..".BORT .REMA|
000033A0: 54 55 52 45 22 3A 8E 00 C8 3B 09 33 8B 41 24 B2 |TURE":...;.3.A$.|
000033B0: 22 04 22 A7 41 42 B2 34 3A 99 22 D5 53 45 52 20 |".".AB.4:.".SER |
000033C0: C1 42 4F 52 54 22 3A 8E 00 DD 3B 0E 33 8D 38 30 |.BORT":...;.3.80|
000033D0: 3A 8B 41 24 B2 22 22 A7 31 33 30 36 30 00 08 3C |:.A$."".13060..<|
000033E0: 18 33 41 B2 28 C6 28 41 24 29 AF 39 35 29 3A 8B |.3A.(.(A$).95):.|
000033F0: 41 B3 B1 37 31 AF 41 B3 B1 36 35 A7 5A B2 5A AA |A..71.A..65.Z.Z.|
00003400: 31 3A 89 31 33 30 36 30 00 29 3C 22 33 A0 31 35 |1:.13060.)<"3.15|
00003410: 3A 9F 31 35 2C 44 45 2C 31 35 3A 8B 51 37 B2 30 |:.15,DE,15:.Q7.0|
00003420: A7 97 34 37 34 30 36 2C 30 00 40 3C 2C 33 9F 32 |..47406,0.@<,3.2|
00003430: 2C 44 45 2C 33 2C 59 24 AA 46 24 AA 22 2C 52 22 |,DE,3,Y$.F$.",R"|
00003440: 00 5B 3C 36 33 54 59 B2 31 3A 8B C9 28 46 24 2C |.[<63TY.1:..(F$,|
00003450: 31 29 B2 22 53 22 A7 54 59 B2 32 00 82 3C 40 33 |1)."S".TY.2..<@3|
00003460: 8D 31 35 33 30 30 3A 9E 35 31 30 30 30 3A 97 34 |.15300:.51000:.4|
00003470: 39 31 34 37 2C 54 59 3A 9E 35 31 30 32 34 3A 8D |9147,TY:.51024:.|
00003480: 38 30 00 AB 3C 41 33 8B C2 28 35 31 32 29 B2 31 |80..<A3..(512).1|
00003490: A7 A0 32 3A A0 31 35 3A 99 22 D0 52 4F 54 4F 43 |..2:.15:.".ROTOC|
000034A0: 4F 4C 20 C5 52 52 4F 52 22 3A 8E 00 E1 3C 4A 33 |OL .RROR":...<J3|
000034B0: 99 39 3A 9E 35 31 30 30 30 3A 99 38 3A 97 34 39 |.9:.51000:.8:.49|
000034C0: 31 34 34 2C 51 37 3A 9E 35 31 30 33 32 3A 99 37 |144,Q7:.51032:.7|
000034D0: 3A 9E 36 35 34 38 34 3A 99 36 3A A0 32 3A A0 31 |:.65484:.6:.2:.1|
000034E0: 35 00 02 3D 4F 33 99 47 24 AA 22 9A D5 50 4C 4F |5..=O3.G$."..PLO|
000034F0: 41 44 20 C3 4F 4D 50 4C 45 54 45 05 2E 2E 2E 22 |AD .OMPLETE...."|
00003500: 47 24 00 0F 3D 54 33 A0 32 3A A0 31 35 3A 8E 00 |G$..=T3.2:.15:..|
00003510: 18 3D BC 34 8F 20 2A 2A 00 32 3D C6 34 8F 20 2A |.=.4. **.2=.4. *|
00003520: 2A 20 54 4F 47 47 4C 45 20 50 52 4F 54 4F 43 4F |* TOGGLE PROTOCO|
00003530: 4C 53 00 3B 3D D0 34 8F 20 2A 2A 00 6E 3D DA 34 |LS.;=.4. **.n=.4|
00003540: 51 37 B2 32 35 35 3A 51 35 24 B2 22 50 55 4E 54 |Q7.255:Q5$."PUNT|
00003550: 45 52 22 3A 52 B2 34 37 33 36 39 3A 8D 32 37 32 |ER":R.47369:.272|
00003560: 36 3A 8B 41 B2 31 36 39 A7 31 33 35 36 30 00 74 |6:.A.169.13560.t|
00003570: 3D DF 34 8E 00 A7 3D E4 34 51 37 B2 30 3A 51 35 |=.4...=.4Q7.0:Q5|
00003580: 24 B2 22 58 2D 4D 4F 44 45 4D 22 3A 52 B2 34 37 |$."X-MODEM":R.47|
00003590: 33 36 39 3A 8D 32 37 32 36 3A 8B 41 B3 B1 31 36 |369:.2726:.A..16|
000035A0: 39 A7 31 33 35 36 30 00 AD 3D EE 34 8E 00 E2 3D |9.13560..=.4...=|
000035B0: F3 34 51 37 B2 30 3A 51 35 24 B2 22 58 2D 4D 4F |.4Q7.0:Q5$."X-MO|
000035C0: 44 45 4D 31 4B 22 3A 52 B2 34 37 33 36 39 3A 8D |DEM1K":R.47369:.|
000035D0: 32 37 32 36 3A 8B 41 B3 B1 31 36 39 A7 31 33 35 |2726:.A..169.135|
000035E0: 36 30 00 E8 3D F4 34 8E 00 29 3E F8 34 99 47 24 |60..=.4..)>.4.G$|
000035F0: 22 9A D4 4F 47 47 4C 45 20 D4 4F 20 22 51 35 24 |"..OGGLE .O "Q5$|
00003600: 47 24 3A 42 B2 30 3A 4F 24 B2 22 30 3A 22 3A 8D |G$:B.0:O$."0:":.|
00003610: 35 30 3A 9F 38 2C C2 28 39 34 39 29 2C 31 2C 51 |50:.8,.(949),1,Q|
00003620: 35 24 AA 22 2C 50 2C 52 22 00 40 3E 02 35 97 37 |5$.",P,R".@>.5.7|
00003630: 38 30 2C 30 3A 9E 36 35 34 39 33 3A A0 38 3A 8E |80,0:.65493:.8:.|
00003640: 00 5C 3E 20 35 8F 20 2A 2A 20 52 45 41 44 20 53 |.\> 5. ** READ S|
00003650: 54 41 54 53 20 46 49 4C 45 20 2A 2A 00 79 3E 2A |TATS FILE **.y>*|
00003660: 35 4F 24 B2 22 53 54 41 54 53 22 3A 42 B2 31 3A |5O$."STATS":B.1:|
00003670: 8D 35 30 3A 89 36 39 34 35 00 96 3E 84 35 8F 20 |.50:.6945..>.5. |
00003680: 2A 2A 20 57 52 49 54 45 20 53 54 41 54 53 20 46 |** WRITE STATS F|
00003690: 49 4C 45 20 2A 2A 00 D1 3E 8E 35 50 24 B2 22 53 |ILE **..>.5P$."S|
000036A0: 54 41 54 53 22 3A 42 B2 30 3A 4F 24 B2 50 24 3A |TATS":B.0:O$.P$:|
000036B0: 8D 35 30 3A 9F 31 35 2C 44 45 2C 31 35 2C 22 53 |.50:.15,DE,15,"S|
000036C0: 22 AA 59 24 AA 4F 24 3A A0 31 35 3A 4F 24 B2 50 |".Y$.O$:.15:O$.P|
000036D0: 24 00 E8 3E 93 35 42 B2 32 3A 45 4E 24 B2 22 2C |$..>.5B.2:EN$.",|
000036E0: 53 2C 57 22 3A 8D 35 30 00 F2 3E 98 35 89 37 30 |S,W":.50..>.5.70|
000036F0: 36 30 00 14 3F E8 35 8F 20 2A 2A 20 52 45 41 44 |60..?.5. ** READ|
00003700: 20 55 53 45 52 4C 4F 47 20 52 45 43 4F 52 44 20 | USERLOG RECORD |
00003710: 52 20 2A 2A 00 4E 3F ED 35 8F 20 2A 2A 20 47 4F |R **.N?.5. ** GO|
00003720: 53 55 42 32 37 31 30 3A 47 4F 53 55 42 32 37 33 |SUB2710:GOSUB273|
00003730: 30 20 52 45 41 44 53 20 55 53 45 52 4C 4F 47 20 |0 READS USERLOG |
00003740: 49 4E 54 4F 20 55 53 45 52 20 56 41 52 53 00 59 |INTO USER VARS.Y|
00003750: 3F F2 35 8D 31 34 30 30 30 00 63 3F FC 35 89 32 |?.5.14000.c?.5.2|
00003760: 39 34 30 00 86 3F 4C 36 8F 20 2A 2A 20 57 52 49 |940..?L6. ** WRI|
00003770: 54 45 20 55 53 45 52 4C 4F 47 20 52 45 43 4F 52 |TE USERLOG RECOR|
00003780: 44 20 52 20 2A 2A 00 91 3F 56 36 8D 31 34 30 30 |D R **..?V6.1400|
00003790: 30 00 9B 3F 60 36 89 32 36 39 30 00 AB 3F B0 36 |0..?`6.2690..?.6|
000037A0: 8F 20 47 4F 53 55 42 32 36 35 30 00 B6 3F BA 36 |. GOSUB2650..?.6|
000037B0: 8D 31 34 31 30 30 00 DB 3F C4 36 8D 31 35 3A 98 |.14100..?.6.15:.|
000037C0: 31 35 2C 22 50 22 C7 28 39 38 29 C7 28 52 4C 29 |15,"P".(98).(RL)|
000037D0: C7 28 52 48 29 C7 28 32 29 3A 8E 00 EB 3F 14 37 |.(RH).(2):...?.7|
000037E0: 8F 20 47 4F 53 55 42 32 36 34 30 00 0B 40 1E 37 |. GOSUB2640..@.7|
000037F0: 42 B2 32 3A 4F 24 B2 22 55 53 45 52 4C 4F 47 22 |B.2:O$."USERLOG"|
00003800: 3A 45 4E 24 B2 22 22 3A 89 35 30 00 21 40 98 3A |:EN$."":.50.!@.:|
00003810: 8F 20 2A 2A 2A 20 48 41 4E 47 20 55 50 20 2A 2A |. *** HANG UP **|
00003820: 2A 00 52 40 A2 3A 99 20 47 24 20 22 9A C8 41 4E |*.R@.:. G$ "..AN|
00003830: 47 49 4E 47 20 D5 50 20 C1 4E 44 20 D2 45 53 45 |GING .P .ND .ESE|
00003840: 54 54 49 4E 47 20 CD 4F 44 45 4D 05 2E 2E 2E 22 |TTING .ODEM...."|
00003850: 47 24 00 73 40 AA 3A 9E 35 30 39 36 30 3A 8B 42 |G$.s@.:.50960:.B|
00003860: 52 25 B3 31 32 30 30 A7 42 52 25 B2 33 30 30 3A |R%.1200.BR%.300:|
00003870: 8D 36 32 00 9C 40 AB 3A 9E 35 32 32 33 30 3A 97 |.62..@.:.52230:.|
00003880: 35 36 35 37 39 2C 33 38 3A 8D 31 36 3A 9E 35 32 |56579,38:.16:.52|
00003890: 32 33 33 3A 97 35 36 35 37 39 2C 30 00 D2 40 AC |233:.56579,0..@.|
000038A0: 3A 98 35 2C 22 01 01 01 22 3B 3A 8D 31 36 3A 98 |:.5,"...";:.16:.|
000038B0: 35 2C 22 41 54 48 22 3A 8D 31 36 3A 9E 35 32 32 |5,"ATH":.16:.522|
000038C0: 32 37 3A 8B C2 28 32 35 31 29 B2 30 A7 31 35 30 |27:..(251).0.150|
000038D0: 31 39 00 D8 40 AD 3A 8E 00 FA 40 FC 3A 8F 20 2A |19..@.:...@.:. *|
000038E0: 2A 2A 20 54 55 52 4E 20 4F 46 46 20 34 20 4D 48 |** TURN OFF 4 MH|
000038F0: 5A 20 4D 4F 44 45 20 2A 2A 2A 00 0C 41 06 3B 97 |Z MODE ***..A.;.|
00003900: 30 2C C2 28 30 29 B0 31 32 38 3A 8E 00 30 41 60 |0,.(0).128:..0A`|
00003910: 3B 8F 20 2A 2A 2A 20 43 4C 45 41 52 20 53 43 52 |;. *** CLEAR SCR|
00003920: 45 45 4E 20 46 4F 52 20 54 52 41 4E 53 46 45 52 |EEN FOR TRANSFER|
00003930: 00 75 41 6A 3B 9E 35 31 35 38 34 3A 99 22 93 11 |.uAj;.51584:."..|
00003940: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00003950: 11 11 11 22 AA 4E 41 24 AA 22 20 22 AA 50 24 AA |...".NA$." ".P$.|
00003960: 47 24 AA 22 99 C7 4F 4F 44 3A 22 A3 31 35 29 22 |G$."..OOD:".15)"|
00003970: C2 41 44 3A 22 00 80 41 74 3B 89 31 35 31 31 30 |.AD:"..At;.15110|
00003980: 00 A4 41 C4 3B 8F 20 2A 2A 2A 20 43 4C 45 41 52 |..A.;. *** CLEAR|
00003990: 20 53 43 52 45 45 4E 20 46 4F 52 20 54 52 41 4E | SCREEN FOR TRAN|
000039A0: 53 46 45 52 00 E9 41 CE 3B 9E 35 31 35 38 34 3A |SFER..A.;.51584:|
000039B0: 99 22 93 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
000039C0: 11 11 11 11 11 11 11 22 AA 4E 41 24 AA 22 20 22 |.......".NA$." "|
000039D0: AA 46 24 AA 47 24 AA 22 99 C7 4F 4F 44 3A 22 A3 |.F$.G$."..OOD:".|
000039E0: 31 35 29 22 C2 41 44 3A 22 00 F4 41 D8 3B 89 31 |15)".AD:"..A.;.1|
000039F0: 35 31 31 30 00 18 42 28 3C 8F 20 54 49 4D 45 20 |5110..B(<. TIME |
00003A00: 44 45 4C 41 59 20 57 49 54 48 20 52 45 41 44 49 |DELAY WITH READI|
00003A10: 4E 47 20 4D 4F 44 45 4D 00 21 42 32 3C 41 B2 54 |NG MODEM.!B2<A.T|
00003A20: 49 00 45 42 3C 3C A1 23 35 2C 41 24 3A 99 41 24 |I.EB<<.#5,A$:.A$|
00003A30: 3B 3A 8B 20 28 54 49 AB 41 29 20 B3 42 20 A7 20 |;:. (TI.A) .B . |
00003A40: 31 35 34 32 30 00 4B 42 46 3C 8E 00 58 42 80 3E |15420.KBF<..XB.>|
00003A50: 8B 49 24 B2 22 22 A7 8E 00 85 42 8A 3E 53 43 24 |.I$.""....B.>SC$|
00003A60: B2 22 22 3A 81 4B B2 31 A4 C3 28 49 24 29 3A 41 |."":.K.1..(I$):A|
00003A70: B2 C6 28 CA 28 49 24 2C 4B 2C 31 29 29 3A 41 B2 |..(.(I$,K,1)):A.|
00003A80: 41 AF 31 32 37 00 A1 42 94 3E 8B 41 B1 36 34 AF |A.127..B.>.A.64.|
00003A90: 41 B3 39 31 A7 53 43 24 B2 53 43 24 AA C7 28 41 |A.91.SC$.SC$..(A|
00003AA0: 29 00 BD 42 9E 3E 8B 41 B1 34 37 AF 41 B3 35 38 |)..B.>.A.47.A.58|
00003AB0: A7 53 43 24 B2 53 43 24 AA C7 28 41 29 00 CC 42 |.SC$.SC$..(A)..B|
00003AC0: A8 3E 82 3A 49 24 B2 53 43 24 3A 8E 00 E6 42 68 |.>.:I$.SC$:...Bh|
00003AD0: 42 8F 20 2A 2A 2A 20 53 43 52 49 50 54 20 46 49 |B. *** SCRIPT FI|
00003AE0: 4C 45 20 2A 2A 2A 00 F0 42 72 42 84 38 2C 49 24 |LE ***..BrB.8,I$|
00003AF0: 00 0D 43 7C 42 43 43 24 B2 C8 28 49 24 2C 33 29 |..C|BCC$..(I$,3)|
00003B00: 3A 41 B2 C5 28 CA 28 49 24 2C 35 29 29 00 31 43 |:A..(.(I$,5)).1C|
00003B10: 86 42 8B 20 43 43 24 20 B2 20 22 44 45 4C 22 20 |.B. CC$ . "DEL" |
00003B20: A7 20 42 20 B2 20 41 AC 36 30 3A 8D 31 35 34 30 |. B . A.60:.1540|
00003B30: 30 00 53 43 90 42 8B 20 43 43 24 20 B2 20 22 54 |0.SC.B. CC$ . "T|
00003B40: 58 54 22 20 A7 20 8D 31 37 31 30 30 3A 89 31 37 |XT" . .17100:.17|
00003B50: 30 31 30 00 70 43 9A 42 8B 20 43 43 24 20 B2 20 |010.pC.B. CC$ . |
00003B60: 22 43 48 52 22 20 A7 20 98 35 2C C7 28 41 29 3B |"CHR" . .5,.(A);|
00003B70: 00 88 43 A4 42 8B 20 28 43 43 24 20 B2 20 22 45 |..C.B. (CC$ . "E|
00003B80: 4E 44 22 29 20 A7 20 8E 00 93 43 AE 42 89 31 37 |ND") . ...C.B.17|
00003B90: 30 31 30 00 B6 43 CC 42 8F 20 2A 2A 2A 20 50 52 |010..C.B. *** PR|
00003BA0: 49 4E 54 20 54 45 58 54 20 49 4E 20 53 43 52 49 |INT TEXT IN SCRI|
00003BB0: 50 54 20 2A 2A 2A 00 C6 43 D6 42 49 24 B2 20 CA |PT ***..C.BI$. .|
00003BC0: 28 49 24 2C 35 29 00 E5 43 DB 42 A1 23 35 2C 41 |(I$,5)..C.B.#5,A|
00003BD0: 24 3A 99 41 24 3B 3A 8B 41 24 B3 B1 22 22 A7 20 |$:.A$;:.A$.."". |
00003BE0: 31 37 31 31 35 00 FA 43 E0 42 81 20 5A 5A 20 B2 |17115..C.B. ZZ .|
00003BF0: 20 31 20 A4 20 C3 28 49 24 29 00 15 44 EA 42 42 | 1 . .(I$)..D.BB|
00003C00: B2 34 3A 8D 37 34 3A 98 35 2C CA 28 49 24 2C 5A |.4:.74:.5,.(I$,Z|
00003C10: 5A 2C 31 29 3B 00 26 44 F4 42 82 20 5A 5A 3A 42 |Z,1);.&D.B. ZZ:B|
00003C20: B2 34 3A 89 37 34 00 47 44 30 43 8F 20 2A 2A 2A |.4:.74.GD0C. ***|
00003C30: 20 52 45 41 44 20 53 43 52 49 50 54 20 54 4F 20 | READ SCRIPT TO |
00003C40: 45 4E 44 20 2A 2A 2A 00 67 44 3A 43 84 38 2C 49 |END ***.gD:C.8,I|
00003C50: 24 3A 8B C8 28 49 24 2C 33 29 B3 B1 22 45 4E 44 |$:..(I$,3).."END|
00003C60: 22 A7 31 37 32 31 30 00 6D 44 44 43 8E 00 78 44 |".17210.mDDC..xD|
00003C70: 50 46 8F 20 2A 2A 2A 2A 00 8D 44 5A 46 8F 20 2A |PF. ****..DZF. *|
00003C80: 2A 2A 2A 20 53 45 4E 44 20 4D 41 49 4C 00 98 44 |*** SEND MAIL..D|
00003C90: 64 46 8F 20 2A 2A 2A 2A 00 B5 44 6E 46 99 47 24 |dF. ****..DnF.G$|
00003CA0: 22 9A D3 45 4E 44 49 4E 47 20 CD 41 49 4C 05 2E |"..ENDING .AIL..|
00003CB0: 2E 2E 22 47 24 00 C9 44 73 46 42 B2 30 3A 4F 24 |.."G$..DsFB.0:O$|
00003CC0: B2 22 33 3A 22 3A 8D 35 30 00 D4 44 78 46 89 31 |."3:":.50..DxF.1|
00003CD0: 38 33 30 30 00 DF 44 B4 46 8F 20 2A 2A 2A 2A 00 |8300..D.F. ****.|
00003CE0: F7 44 BE 46 8F 20 2A 2A 2A 2A 20 52 45 43 45 49 |.D.F. **** RECEI|
00003CF0: 56 45 20 4D 41 49 4C 00 02 45 C8 46 8F 20 2A 2A |VE MAIL..E.F. **|
00003D00: 2A 2A 00 21 45 D2 46 99 47 24 22 9A D2 45 43 45 |**.!E.F.G$"..ECE|
00003D10: 49 56 49 4E 47 20 CD 41 49 4C 05 2E 2E 2E 22 47 |IVING .AIL...."G|
00003D20: 24 00 35 45 D7 46 42 B2 30 3A 4F 24 B2 22 33 3A |$.5E.FB.0:O$."3:|
00003D30: 22 3A 8D 35 30 00 40 45 DC 46 89 31 38 34 30 30 |":.50.@E.F.18400|
00003D40: 00 4B 45 18 47 8F 20 2A 2A 2A 2A 00 6E 45 22 47 |.KE.G. ****.nE"G|
00003D50: 8F 20 2A 2A 2A 2A 20 53 45 4E 44 20 50 52 45 53 |. **** SEND PRES|
00003D60: 50 45 43 49 46 49 45 44 20 46 49 4C 45 53 00 79 |PECIFIED FILES.y|
00003D70: 45 2C 47 8F 20 2A 2A 2A 2A 00 A6 45 36 47 99 47 |E,G. ****..E6G.G|
00003D80: 24 22 9A D3 45 4E 44 49 4E 47 20 D0 52 45 53 50 |$"..ENDING .RESP|
00003D90: 45 43 49 46 49 45 44 20 C6 49 4C 45 28 53 29 05 |ECIFIED .ILE(S).|
00003DA0: 2E 2E 2E 22 47 24 00 BA 45 3B 47 42 B2 30 3A 4F |..."G$..E;GB.0:O|
00003DB0: 24 B2 22 32 3A 22 3A 8D 35 30 00 C5 45 40 47 89 |$."2:":.50..E@G.|
00003DC0: 31 38 33 30 30 00 D0 45 4A 47 8F 20 2A 2A 2A 2A |18300..EJG. ****|
00003DD0: 00 F6 45 54 47 8F 20 2A 2A 2A 2A 20 52 45 43 45 |..ETG. **** RECE|
00003DE0: 49 56 45 20 50 52 45 53 50 45 43 49 46 49 45 44 |IVE PRESPECIFIED|
00003DF0: 20 46 49 4C 45 53 00 01 46 5E 47 8F 20 2A 2A 2A | FILES..F^G. ***|
00003E00: 2A 00 30 46 68 47 99 47 24 22 9A D2 45 43 45 49 |*.0FhG.G$"..ECEI|
00003E10: 56 49 4E 47 20 D0 52 45 53 50 45 43 49 46 49 45 |VING .RESPECIFIE|
00003E20: 44 20 C6 49 4C 45 28 53 29 05 2E 2E 2E 22 47 24 |D .ILE(S)...."G$|
00003E30: 00 44 46 6D 47 42 B2 30 3A 4F 24 B2 22 32 3A 22 |.DFmGB.0:O$."2:"|
00003E40: 3A 8D 35 30 00 4F 46 72 47 89 31 38 34 30 30 00 |:.50.OFrG.18400.|
00003E50: 71 46 7C 47 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |qF|G. **********|
00003E60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003E70: 2A 00 93 46 7D 47 8F 20 2A 2A 20 55 50 4C 4F 41 |*..F}G. ** UPLOA|
00003E80: 44 20 50 52 45 53 50 45 43 27 45 44 20 46 49 4C |D PRESPEC'ED FIL|
00003E90: 45 2A 2A 00 B5 46 7E 47 8F 20 2A 2A 2A 2A 2A 2A |E**..F~G. ******|
00003EA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003EB0: 2A 2A 2A 2A 2A 00 FC 46 80 47 8B 20 53 46 25 20 |*****..F.G. SF% |
00003EC0: B2 20 31 20 A7 20 31 38 33 36 30 3A 8F 20 53 45 |. 1 . 18360:. SE|
00003ED0: 4E 44 20 46 49 4C 45 53 20 49 4E 20 53 46 24 28 |ND FILES IN SF$(|
00003EE0: 29 20 49 46 20 53 45 4E 44 20 46 49 4C 45 53 20 |) IF SEND FILES |
00003EF0: 41 4C 52 45 41 44 59 20 52 45 41 44 00 1B 47 81 |ALREADY READ..G.|
00003F00: 47 8D 34 32 30 30 30 3A 41 41 24 B2 57 57 24 3A |G.42000:AA$.WW$:|
00003F10: 8B C5 28 41 41 24 29 B3 31 A7 8E 00 30 47 86 47 |..(AA$).1...0G.G|
00003F20: 81 20 49 20 B2 20 31 20 A4 20 C5 28 41 41 24 29 |. I . 1 . .(AA$)|
00003F30: 00 38 47 90 47 8D 38 30 00 51 47 9A 47 8D 34 32 |.8G.G.80.QG.G.42|
00003F40: 30 30 30 3A 46 24 B2 57 57 24 3A 8D 35 30 30 30 |000:F$.WW$:.5000|
00003F50: 30 00 6B 47 9F 47 8D 32 32 30 30 30 3A 8F 20 4F |0.kG.G.22000:. O|
00003F60: 55 54 20 49 46 20 49 20 3D 20 31 00 8E 47 A4 47 |UT IF I = 1..G.G|
00003F70: 53 53 25 B2 31 3A 8D 31 33 30 30 30 3A 53 53 25 |SS%.1:.13000:SS%|
00003F80: B2 30 3A 8F 20 53 45 4E 44 20 46 49 4C 45 00 C3 |.0:. SEND FILE..|
00003F90: 47 AB 47 A0 31 35 3A 9F 31 35 2C 44 45 2C 31 35 |G.G.15:.15,DE,15|
00003FA0: 3A 98 31 35 2C 22 53 22 AA 59 24 AA 46 24 3A 99 |:.15,"S".Y$.F$:.|
00003FB0: 22 9A D3 43 52 41 54 43 48 49 4E 47 05 2E 2E 2E |"..CRATCHING....|
00003FC0: 22 46 24 00 CD 47 AE 47 82 20 49 3A 8E 00 EB 47 |"F$..G.G. I:...G|
00003FD0: B8 47 8F 20 2A 2A 2A 20 53 46 24 28 29 20 46 49 |.G. *** SF$() FI|
00003FE0: 4C 45 53 20 54 4F 20 53 45 4E 44 00 01 48 BA 47 |LES TO SEND..H.G|
00003FF0: 8B 20 C5 28 53 46 24 28 30 29 29 B3 31 20 A7 20 |. .(SF$(0)).1 . |
00004000: 8E 00 1D 48 BB 47 81 20 49 20 B2 20 31 20 A4 20 |...H.G. I . 1 . |
00004010: C5 28 53 46 24 28 30 29 29 3A 8D 38 30 00 4C 48 |.(SF$(0)):.80.LH|
00004020: BC 47 46 24 B2 53 46 24 28 49 29 3A 99 46 24 3A |.GF$.SF$(I):.F$:|
00004030: 8D 35 30 30 30 30 3A 8D 32 32 30 30 30 3A 8F 20 |.50000:.22000:. |
00004040: 4F 55 54 20 49 46 20 49 20 3D 20 31 00 63 48 BD |OUT IF I = 1.cH.|
00004050: 47 53 53 25 B2 31 3A 8D 31 33 30 30 30 3A 53 53 |GSS%.1:.13000:SS|
00004060: 25 B2 30 00 98 48 C0 47 A0 31 35 3A 9F 31 35 2C |%.0..H.G.15:.15,|
00004070: 44 45 2C 31 35 3A 98 31 35 2C 22 53 22 AA 59 24 |DE,15:.15,"S".Y$|
00004080: AA 46 24 3A 99 22 9A D3 43 52 41 54 43 48 49 4E |.F$:."..CRATCHIN|
00004090: 47 05 2E 2E 2E 22 46 24 00 A2 48 C1 47 82 20 49 |G...."F$..H.G. I|
000040A0: 3A 8E 00 C4 48 E0 47 8F 20 2A 2A 2A 2A 2A 2A 2A |:...H.G. *******|
000040B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000040C0: 2A 2A 2A 2A 00 E6 48 E1 47 8F 20 2A 2A 20 44 4F |****..H.G. ** DO|
000040D0: 57 4E 4C 44 20 50 52 45 53 50 45 43 27 45 44 20 |WNLD PRESPEC'ED |
000040E0: 46 49 4C 45 2A 2A 00 08 49 E2 47 8F 20 2A 2A 2A |FILE**..I.G. ***|
000040F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00004100: 2A 2A 2A 2A 2A 2A 2A 2A 00 27 49 E5 47 8D 34 32 |********.'I.G.42|
00004110: 30 30 30 3A 41 41 24 B2 57 57 24 3A 8B C5 28 41 |000:AA$.WW$:..(A|
00004120: 41 24 29 B3 31 A7 8E 00 51 49 E6 47 99 47 24 22 |A$).1...QI.G.G$"|
00004130: 9A CE 55 4D 42 45 52 20 CF 46 20 C6 49 4C 45 53 |..UMBER .F .ILES|
00004140: 20 D4 4F 20 D2 45 43 45 49 56 45 05 3A 22 41 41 | .O .ECEIVE.:"AA|
00004150: 24 00 66 49 EA 47 81 20 49 20 B2 20 31 20 A4 20 |$.fI.G. I . 1 . |
00004160: C5 28 41 41 24 29 00 6E 49 F4 47 8D 38 30 00 93 |.(AA$).nI.G.80..|
00004170: 49 FE 47 8D 34 32 30 30 30 3A 50 24 B2 57 57 24 |I.G.42000:P$.WW$|
00004180: 3A 99 47 24 22 9A C6 49 4C 45 4E 41 4D 45 05 3A |:.G$"..ILENAME.:|
00004190: 22 50 24 00 D8 49 08 48 41 44 25 B2 31 3A 53 53 |"P$..I.HAD%.1:SS|
000041A0: 25 B2 31 3A 8D 35 31 30 30 30 3A 8D 31 32 30 30 |%.1:.51000:.1200|
000041B0: 30 3A 53 53 25 B2 30 3A 41 44 25 B2 30 3A 8F 20 |0:SS%.0:AD%.0:. |
000041C0: 52 45 43 45 49 56 45 20 46 49 4C 45 20 57 49 54 |RECEIVE FILE WIT|
000041D0: 48 20 41 50 50 45 4E 44 00 F8 49 0D 48 8F 20 53 |H APPEND..I.H. S|
000041E0: 53 25 20 49 4E 56 4F 4B 45 53 20 53 59 4E 43 20 |S% INVOKES SYNC |
000041F0: 50 52 4F 54 4F 43 4F 4C 00 02 4A 12 48 82 20 49 |PROTOCOL..J.H. I|
00004200: 3A 8E 00 0C 4A 38 4A 8F 20 2A 2A 2A 00 2D 4A 42 |:...J8J. ***.-JB|
00004210: 4A 8F 20 2A 2A 2A 20 52 45 41 44 49 4E 47 20 53 |J. *** READING S|
00004220: 45 4E 44 20 4D 41 49 4C 20 4C 49 53 54 00 51 4A |END MAIL LIST.QJ|
00004230: 4C 4A 8F 20 2A 2A 2A 20 46 4F 52 20 53 45 4E 44 |LJ. *** FOR SEND|
00004240: 49 4E 47 20 41 46 54 45 52 20 52 45 43 45 49 56 |ING AFTER RECEIV|
00004250: 45 00 5B 4A 56 4A 8F 20 2A 2A 2A 00 89 4A 60 4A |E.[JVJ. ***..J`J|
00004260: 99 47 24 22 9A D2 45 41 44 49 4E 47 20 D3 45 4E |.G$"..EADING .EN|
00004270: 44 20 CD 41 49 4C 20 C9 4E 54 4F 20 C2 55 46 46 |D .AIL .NTO .UFF|
00004280: 45 52 05 2E 2E 2E 22 47 24 00 AE 4A 6A 4A 8D 34 |ER...."G$..JjJ.4|
00004290: 32 30 30 30 3A 53 46 24 28 30 29 B2 57 57 24 3A |2000:SF$(0).WW$:|
000042A0: 8B C5 28 53 46 24 28 30 29 29 B3 31 A7 8E 00 C2 |..(SF$(0)).1....|
000042B0: 4A 74 4A 81 20 49 B2 31 A4 C5 28 53 46 24 28 30 |JtJ. I.1..(SF$(0|
000042C0: 29 29 00 D8 4A 7E 4A 8D 34 32 30 30 30 3A 53 46 |))..J~J.42000:SF|
000042D0: 24 28 49 29 B2 57 57 24 00 E2 4A 88 4A 82 20 49 |$(I).WW$..J.J. I|
000042E0: 3A 8E 00 EC 4A 9C 4A 8F 20 2A 2A 2A 00 0D 4B A6 |:...J.J. ***..K.|
000042F0: 4A 8F 20 2A 2A 2A 20 52 45 41 44 49 4E 47 20 53 |J. *** READING S|
00004300: 45 4E 44 20 46 49 4C 45 20 4C 49 53 54 00 31 4B |END FILE LIST.1K|
00004310: B0 4A 8F 20 2A 2A 2A 20 46 4F 52 20 53 45 4E 44 |.J. *** FOR SEND|
00004320: 49 4E 47 20 41 46 54 45 52 20 52 45 43 45 49 56 |ING AFTER RECEIV|
00004330: 45 00 3B 4B BA 4A 8F 20 2A 2A 2A 00 5D 4B C4 4A |E.;K.J. ***.]K.J|
00004340: 99 47 24 22 9A D2 45 41 44 49 4E 47 20 D3 45 4E |.G$"..EADING .EN|
00004350: 44 20 C6 49 4C 45 05 2E 2E 2E 22 47 24 00 82 4B |D .ILE...."G$..K|
00004360: CE 4A 8D 34 32 30 30 30 3A 53 46 24 28 30 29 B2 |.J.42000:SF$(0).|
00004370: 57 57 24 3A 8B C5 28 53 46 24 28 30 29 29 B3 31 |WW$:..(SF$(0)).1|
00004380: A7 8E 00 96 4B D8 4A 81 20 49 B2 31 A4 C5 28 53 |....K.J. I.1..(S|
00004390: 46 24 28 30 29 29 00 AC 4B E2 4A 8D 34 32 30 30 |F$(0))..K.J.4200|
000043A0: 30 3A 53 46 24 28 49 29 B2 57 57 24 00 B6 4B EC |0:SF$(I).WW$..K.|
000043B0: 4A 82 20 49 3A 8E 00 C0 4B 64 4B 8F 20 2A 2A 2A |J. I:...KdK. ***|
000043C0: 00 E2 4B 6E 4B 8F 20 2A 2A 2A 20 43 48 45 43 4B |..KnK. *** CHECK|
000043D0: 20 54 4F 20 53 45 45 20 49 46 20 4D 41 49 4C 20 | TO SEE IF MAIL |
000043E0: 54 4F 00 03 4C 78 4B 8F 20 2A 2A 2A 20 55 53 20 |TO..LxK. *** US |
000043F0: 45 58 49 53 54 53 2E 20 20 49 46 20 49 54 20 44 |EXISTS. IF IT D|
00004400: 4F 45 53 00 27 4C 82 4B 8F 20 2A 2A 2A 20 54 48 |OES.'L.K. *** TH|
00004410: 45 4E 20 42 52 45 41 4B 20 54 48 45 20 4D 41 49 |EN BREAK THE MAI|
00004420: 4C 2D 20 46 49 4C 45 00 4A 4C 8C 4B 8F 20 2A 2A |L- FILE.JL.K. **|
00004430: 2A 20 44 4F 57 4E 20 41 4E 44 20 41 50 50 45 4E |* DOWN AND APPEN|
00004440: 44 20 54 48 45 20 4D 41 49 4C 00 6C 4C 96 4B 8F |D THE MAIL.lL.K.|
00004450: 20 2A 2A 2A 20 54 4F 20 52 45 41 4C 20 55 53 45 | *** TO REAL USE|
00004460: 52 20 4D 41 49 4C 20 46 49 4C 45 53 00 8F 4C A0 |R MAIL FILES..L.|
00004470: 4B 8F 20 2A 2A 2A 20 41 4E 44 20 55 50 44 41 54 |K. *** AND UPDAT|
00004480: 45 20 54 48 45 49 52 20 55 53 45 52 4C 4F 47 00 |E THEIR USERLOG.|
00004490: A3 4C AA 4B 8F 20 2A 2A 2A 20 41 43 43 4F 55 4E |.L.K. *** ACCOUN|
000044A0: 54 53 2E 00 AD 4C B4 4B 8F 20 2A 2A 2A 00 CE 4C |TS...L.K. ***..L|
000044B0: C8 4B 99 47 24 22 9A C3 48 45 43 4B 49 4E 47 20 |.K.G$"..HECKING |
000044C0: CD 41 49 4C 42 4F 58 05 2E 2E 2E 22 47 24 00 ED |.AILBOX...."G$..|
000044D0: 4C CD 4B 4F 24 B2 22 30 3A 4E 57 49 44 22 3A 42 |L.KO$."0:NWID":B|
000044E0: B2 31 3A 8D 35 30 3A 84 38 2C 4E 49 24 00 0A 4D |.1:.50:.8,NI$..M|
000044F0: D2 4B 4F 24 B2 22 33 3A 4D 41 49 4C 2D 22 AA 4E |.KO$."3:MAIL-".N|
00004500: 49 24 3A 42 B2 31 3A 8D 35 30 00 4A 4D DC 4B 8B |I$:B.1:.50.JM.K.|
00004510: 41 42 B2 36 32 A7 99 47 24 22 9A CE 4F 20 CD 41 |AB.62..G$"..O .A|
00004520: 49 4C 20 D4 4F 44 41 59 05 2E 2E 2E 22 47 24 3A |IL .ODAY...."G$:|
00004530: 8E 3A 8F 20 4D 41 49 4C 20 46 49 4C 45 20 49 53 |.:. MAIL FILE IS|
00004540: 20 4E 4F 54 20 54 48 45 52 45 00 6C 4D E6 4B 8B | NOT THERE.lM.K.|
00004550: 41 42 B1 32 30 A7 99 47 24 22 9E C4 49 53 4B 20 |AB.20..G$"..ISK |
00004560: C5 52 52 4F 52 05 23 22 41 42 3A 8E 00 76 4D EB |.RROR.#"AB:..vM.|
00004570: 4B 8F 20 2A 2A 2A 00 9A 4D F0 4B 8F 20 2A 2A 2A |K. ***..M.K. ***|
00004580: 20 42 45 47 49 4E 20 53 54 52 49 50 50 49 4E 47 | BEGIN STRIPPING|
00004590: 20 4D 41 49 4C 20 46 49 4C 45 00 A4 4D FA 4B 8F | MAIL FILE..M.K.|
000045A0: 20 2A 2A 2A 00 BB 4D 04 4C A1 23 38 2C 41 24 3A | ***..M.L.#8,A$:|
000045B0: 8B 53 54 B3 B1 30 A7 A0 38 3A 8E 00 D2 4D 06 4C |.ST..0..8:...M.L|
000045C0: 8B 20 41 24 B3 B1 C7 28 32 35 35 29 A7 31 39 34 |. A$...(255).194|
000045D0: 36 30 00 F3 4D 08 4C 53 31 24 B2 41 24 3A A1 23 |60..M.LS1$.A$:.#|
000045E0: 38 2C 41 24 3A 8B 41 24 B2 22 40 22 A7 41 24 B2 |8,A$:.A$."@".A$.|
000045F0: 22 2B 22 00 05 4E 09 4C 8D 32 30 30 30 30 3A 53 |"+"..N.L.20000:S|
00004600: 32 24 B2 49 24 00 38 4E 0A 4C 8D 32 30 30 30 30 |2$.I$.8N.L.20000|
00004610: 3A 4D 53 B2 C5 28 49 24 29 3A 8F 20 49 44 20 4E |:MS..(I$):. ID N|
00004620: 55 4D 42 45 52 20 54 4F 20 54 41 43 4B 20 4D 41 |UMBER TO TACK MA|
00004630: 49 4C 20 4F 4E 20 54 4F 00 70 4E 0B 4C 41 B2 30 |IL ON TO.pN.LA.0|
00004640: 3A 42 B2 30 3A 81 20 43 36 20 B2 20 31 20 A4 20 |:B.0:. C6 . 1 . |
00004650: C3 28 49 24 29 3A 8B CA 28 49 24 2C 43 36 2C 31 |.(I$):..(I$,C6,1|
00004660: 29 B2 22 2A 22 AF 41 B2 30 A7 41 B2 43 36 3A 82 |)."*".A.0.A.C6:.|
00004670: 00 90 4E 0C 4C 8B CA 28 49 24 2C 43 36 2C 31 29 |..N.L..(I$,C6,1)|
00004680: B2 22 2A 22 A7 42 B2 43 36 3A 43 36 B2 32 35 30 |."*".B.C6:C6.250|
00004690: 00 BF 4E 0D 4C 82 3A 4D 53 B2 C5 28 CA 28 49 24 |..N.L.:MS..(.(I$|
000046A0: 2C 41 AA 31 2C 34 29 29 3A 49 24 B2 C8 28 49 24 |,A.1,4)):I$..(I$|
000046B0: 2C 41 AB 31 29 AA CA 28 49 24 2C 42 AA 31 29 00 |,A.1)..(I$,B.1).|
000046C0: ED 4E 0E 4C 46 24 B2 C4 28 4D 53 29 3A 99 20 47 |.N.LF$..(MS):. G|
000046D0: 24 22 9A D7 52 49 54 49 4E 47 20 CD 41 49 4C 20 |$"..RITING .AIL |
000046E0: C6 4F 52 20 C9 C4 05 3A 22 46 24 47 24 00 10 4F |.OR ...:"F$G$..O|
000046F0: 18 4C 9F 32 2C 44 52 28 33 29 2C 34 2C 44 52 24 |.L.2,DR(3),4,DR$|
00004700: 28 33 29 AA 46 24 AA 22 2C 53 2C 57 22 3A A0 32 |(3).F$.",S,W":.2|
00004710: 00 30 4F 22 4C 9F 32 2C 44 52 28 33 29 2C 34 2C |.0O"L.2,DR(3),4,|
00004720: 44 52 24 28 33 29 AA 46 24 AA 22 2C 53 2C 41 22 |DR$(3).F$.",S,A"|
00004730: 00 48 4F 2C 4C 98 32 2C 53 31 24 3A 98 32 2C 53 |.HO,L.2,S1$:.2,S|
00004740: 32 24 3A 98 32 2C 49 24 00 67 4F 36 4C 8D 32 30 |2$:.2,I$.gO6L.20|
00004750: 31 30 30 3A 8F 20 41 44 44 20 49 44 20 23 20 54 |100:. ADD ID # T|
00004760: 4F 20 41 52 52 41 59 00 A5 4F 40 4C A1 23 38 2C |O ARRAY..O@L.#8,|
00004770: 41 24 3A 52 4F B2 52 4F AA 31 3A 54 53 B2 53 54 |A$:RO.RO.1:TS.ST|
00004780: 3A 8B 41 24 B2 C7 28 32 35 35 29 A7 A0 32 3A 89 |:.A$..(255)..2:.|
00004790: 31 39 34 36 34 3A 8F 20 4E 45 57 20 4D 41 49 4C |19464:. NEW MAIL|
000047A0: 20 50 41 43 4B 00 B8 4F 41 4C 8B 41 24 B2 22 40 | PACK..OAL.A$."@|
000047B0: 22 A7 41 24 B2 22 2B 22 00 ED 4F 4A 4C 98 32 2C |".A$."+"..OJL.2,|
000047C0: 41 24 3B 3A 8B 41 24 B2 C7 28 31 33 29 B0 28 52 |A$;:.A$..(13).(R|
000047D0: 4F B1 33 39 29 A7 52 4F B2 30 3A 99 22 9F CC 49 |O.39).RO.0:."..I|
000047E0: 4E 45 20 D0 52 4F 43 45 53 53 45 44 22 00 01 50 |NE .ROCESSED"..P|
000047F0: 54 4C 8B 20 54 53 20 B2 20 30 20 A7 31 39 35 32 |TL. TS . 0 .1952|
00004800: 30 00 20 50 90 4C 8F 20 2A 2A 20 41 4C 4C 20 4D |0. P.L. ** ALL M|
00004810: 41 49 4C 20 50 41 43 4B 45 54 53 20 44 4F 4E 45 |AIL PACKETS DONE|
00004820: 00 2A 50 9A 4C A0 32 3A A0 38 00 3D 50 A4 4C 81 |.*P.L.2:.8.=P.L.|
00004830: 20 4F 4F 20 B2 20 31 20 A4 20 31 30 30 00 59 50 | OO . 1 . 100.YP|
00004840: A9 4C 8B 20 45 4D 25 28 4F 4F 2C 31 29 20 B2 20 |.L. EM%(OO,1) . |
00004850: 30 20 A7 20 31 39 36 36 30 00 83 50 AE 4C 8F 20 |0 . 19660..P.L. |
00004860: 4F 50 45 4E 20 55 53 45 52 4C 4F 47 20 54 4F 20 |OPEN USERLOG TO |
00004870: 52 45 41 44 20 55 53 45 52 20 45 4D 25 28 4F 4F |READ USER EM%(OO|
00004880: 2C 31 29 00 A8 50 AF 4C 99 47 24 22 9A D2 45 41 |,1)..P.L.G$"..EA|
00004890: 44 49 4E 47 20 D5 53 45 52 4C 4F 47 05 3A 22 45 |DING .SERLOG.:"E|
000048A0: 4D 25 28 4F 4F 2C 31 29 00 D5 50 B0 4C 8B 45 4D |M%(OO,1)..P.L.EM|
000048B0: 25 28 4F 4F 2C 31 29 B3 31 B0 45 4D 25 28 4F 4F |%(OO,1).1.EM%(OO|
000048C0: 2C 31 29 B1 4E 55 25 A7 8D 32 34 30 30 30 3A 89 |,1).NU%..24000:.|
000048D0: 31 39 36 36 30 00 F1 50 B3 4C 52 B2 45 4D 25 28 |19660..P.LR.EM%(|
000048E0: 4F 4F 2C 31 29 AA 31 3A A0 38 3A 8D 31 33 38 30 |OO,1).1:.8:.1380|
000048F0: 30 00 10 51 B4 4C 8B 20 55 24 28 30 29 B2 22 30 |0..Q.L. U$(0)."0|
00004900: 22 A7 8D 32 34 30 30 30 3A 89 20 31 39 36 36 30 |"..24000:. 19660|
00004910: 00 40 51 B8 4C 8F 20 41 44 44 20 45 4D 25 28 4F |.@Q.L. ADD EM%(O|
00004920: 4F 2C 32 29 20 54 4F 20 55 53 45 52 53 20 43 55 |O,2) TO USERS CU|
00004930: 52 52 45 4E 54 20 4D 41 49 4C 20 43 4F 55 4E 54 |RRENT MAIL COUNT|
00004940: 00 61 51 B9 4C 99 47 24 22 9A D7 52 49 54 49 4E |.aQ.L.G$"..RITIN|
00004950: 47 20 D5 53 45 52 4C 4F 47 05 3A 22 55 24 28 30 |G .SERLOG.:"U$(0|
00004960: 29 00 83 51 BD 4C 55 24 28 31 30 29 B2 C4 28 C5 |)..Q.LU$(10)..(.|
00004970: 28 55 24 28 31 30 29 29 AA 45 4D 25 28 4F 4F 2C |(U$(10)).EM%(OO,|
00004980: 32 29 29 00 AD 51 BE 4C 8B 20 45 4D 25 28 4F 4F |2))..Q.L. EM%(OO|
00004990: 2C 31 29 B2 31 20 A7 20 97 38 33 37 2C C2 28 38 |,1).1 . .837,.(8|
000049A0: 33 37 29 AA 45 4D 25 28 4F 4F 2C 32 29 00 CC 51 |37).EM%(OO,2)..Q|
000049B0: C2 4C 8F 20 57 52 49 54 45 20 41 43 43 4F 55 4E |.L. WRITE ACCOUN|
000049C0: 54 20 54 4F 20 55 53 45 52 4C 4F 47 00 EE 51 C7 |T TO USERLOG..Q.|
000049D0: 4C A0 38 3A 52 B2 45 4D 25 28 4F 4F 2C 31 29 AA |L.8:R.EM%(OO,1).|
000049E0: 31 3A 8D 31 34 30 30 30 3A 8D 32 36 37 30 00 F4 |1:.14000:.2670..|
000049F0: 51 CC 4C 82 00 0E 52 D6 4C A0 32 3A A0 38 3A 4F |Q.L...R.L.2:.8:O|
00004A00: 24 B2 22 33 3A 22 3A 42 B2 30 3A 8D 35 30 00 34 |$."3:":B.0:.50.4|
00004A10: 52 DB 4C 99 22 9A C5 52 41 53 49 4E 47 20 CF 4C |R.L."..RASING .L|
00004A20: 44 20 CD 41 49 4C 20 C6 49 4C 45 20 CE 4F 57 05 |D .AIL .ILE .OW.|
00004A30: 2E 2E 2E 22 00 66 52 E0 4C A0 31 35 3A 9F 31 35 |...".fR.L.15:.15|
00004A40: 2C 44 52 28 33 29 2C 31 35 2C 22 53 22 AA 44 52 |,DR(3),15,"S".DR|
00004A50: 24 28 33 29 AA 22 4D 41 49 4C 2D 22 AA 4E 49 24 |$(3)."MAIL-".NI$|
00004A60: 3A A0 31 35 3A 8E 00 6C 52 1F 4E 8E 00 76 52 20 |:.15:..lR.N..vR |
00004A70: 4E 49 24 B2 22 22 00 8D 52 2A 4E A1 23 38 2C 41 |NI$.""..R*N.#8,A|
00004A80: 24 3A 8B 41 24 B2 C7 28 31 33 29 A7 8E 00 A7 52 |$:.A$..(13)....R|
00004A90: 34 4E 49 24 B2 49 24 AA 41 24 3A 8B C3 28 49 24 |4NI$.I$.A$:..(I$|
00004AA0: 29 B2 32 35 35 A7 8E 00 B4 52 39 4E 8B 53 54 B3 |).255....R9N.ST.|
00004AB0: B1 30 A7 8E 00 BF 52 3E 4E 89 32 30 30 31 30 00 |.0....R>N.20010.|
00004AC0: D7 52 84 4E 44 4F B2 30 3A 81 20 4F 4F 20 B2 20 |.R.NDO.0:. OO . |
00004AD0: 31 20 A4 20 31 30 30 00 0E 53 8E 4E 8B 20 45 4D |1 . 100..S.N. EM|
00004AE0: 25 28 4F 4F 2C 31 29 20 B2 20 4D 53 20 A7 20 45 |%(OO,1) . MS . E|
00004AF0: 4D 25 28 4F 4F 2C 32 29 20 B2 20 45 4D 25 28 4F |M%(OO,2) . EM%(O|
00004B00: 4F 2C 32 29 AA 20 31 3A 44 4F 20 B2 20 31 00 4E |O,2). 1:DO . 1.N|
00004B10: 53 98 4E 8B 20 45 4D 25 28 4F 4F 2C 31 29 20 B2 |S.N. EM%(OO,1) .|
00004B20: 20 30 20 AF 20 44 4F 20 B2 20 30 20 A7 20 45 4D | 0 . DO . 0 . EM|
00004B30: 25 28 4F 4F 2C 31 29 20 B2 20 4D 53 3A 45 4D 25 |%(OO,1) . MS:EM%|
00004B40: 28 4F 4F 2C 32 29 B2 20 31 3A 44 4F B2 31 00 56 |(OO,2). 1:DO.1.V|
00004B50: 53 A2 4E 82 3A 8E 00 78 53 08 52 8F 20 2A 2A 2A |S.N.:..xS.R. ***|
00004B60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00004B70: 2A 2A 2A 2A 2A 2A 2A 2A 00 99 53 12 52 8F 20 2A |********..S.R. *|
00004B80: 2A 2A 20 4D 55 4C 54 49 20 52 45 43 45 49 56 45 |** MULTI RECEIVE|
00004B90: 20 50 52 4F 54 4F 43 4F 4C 00 BB 53 1C 52 8F 20 | PROTOCOL..S.R. |
00004BA0: 2A 2A 2A 20 46 4F 52 20 54 48 45 20 50 55 52 50 |*** FOR THE PURP|
00004BB0: 4F 53 45 20 4F 46 20 53 59 4E 43 00 D8 53 26 52 |OSE OF SYNC..S&R|
00004BC0: 8F 20 2A 2A 2A 20 57 49 54 48 20 54 48 45 20 4D |. *** WITH THE M|
00004BD0: 41 49 4C 20 53 45 4E 44 00 FA 53 30 52 8F 20 2A |AIL SEND..S0R. *|
00004BE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00004BF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2E 54 6C 52 99 |**********..TlR.|
00004C00: 47 24 AA 22 9A D2 45 54 52 49 45 56 45 20 D3 59 |G$."..ETRIEVE .Y|
00004C10: 4E 43 05 2E 2E 2E 22 50 24 3A 49 24 B2 22 22 3A |NC...."P$:I$."":|
00004C20: 41 42 B2 30 3A 4A B2 30 3A 4A 24 B2 22 22 00 5E |AB.0:J.0:J$."".^|
00004C30: 54 76 52 4A B2 4A AA 31 3A A1 23 35 2C 41 24 3A |TvRJ.J.1:.#5,A$:|
00004C40: 8B 4A B1 34 30 30 30 30 A7 99 47 24 22 9A D4 49 |.J.40000..G$"..I|
00004C50: 4D 45 CF 55 54 05 2E 2E 2E 22 47 24 3A 8E 00 71 |ME.UT...."G$:..q|
00004C60: 54 80 52 8B 41 24 B3 B1 22 09 22 A7 32 31 31 31 |T.R.A$..".".2111|
00004C70: 30 00 7C 54 8A 52 A1 23 35 2C 41 24 00 B8 54 94 |0.|T.R.#5,A$..T.|
00004C80: 52 8B 41 24 B3 B1 22 22 AF 41 24 B3 B1 22 09 22 |R.A$.."".A$.."."|
00004C90: AF 41 24 B3 B1 22 3A 22 AF 41 24 B3 B1 22 2A 22 |.A$..":".A$.."*"|
00004CA0: AF 41 24 B3 B1 22 3F 22 AF 41 24 B3 B1 47 24 A7 |.A$.."?".A$..G$.|
00004CB0: 4A 24 B2 4A 24 AA 41 24 00 EA 54 9E 52 8B 41 24 |J$.J$.A$..T.R.A$|
00004CC0: B2 22 04 22 A7 99 47 24 22 9A D3 59 4E 43 05 3A |."."..G$"..YNC.:|
00004CD0: 9A CE 4F A0 C6 49 4C 45 20 D4 4F 20 D3 45 4E 44 |..O..ILE .O .END|
00004CE0: 05 21 22 3A 41 42 B2 31 3A 8E 00 09 55 A8 52 8B |.!":AB.1:...U.R.|
00004CF0: C3 28 4A 24 29 B1 32 32 A7 99 50 24 22 20 D4 4F |.(J$).22..P$" .O|
00004D00: 4F 20 CC 4F 4E 47 22 3A 8E 00 1B 55 B2 52 8B 41 |O .ONG":...U.R.A|
00004D10: 24 B3 B1 47 24 A7 32 31 31 33 30 00 21 55 BC 52 |$..G$.21130.!U.R|
00004D20: 8E 00 43 55 F0 55 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..CU.U. ********|
00004D30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00004D40: 2A 2A 2A 00 61 55 FA 55 8F 20 2A 2A 2A 20 4D 55 |***.aU.U. *** MU|
00004D50: 4C 54 49 20 53 45 4E 44 20 50 52 4F 54 4F 43 4F |LTI SEND PROTOCO|
00004D60: 4C 00 83 55 04 56 8F 20 2A 2A 2A 20 46 4F 52 20 |L..U.V. *** FOR |
00004D70: 54 48 45 20 50 55 52 50 4F 53 45 20 4F 46 20 53 |THE PURPOSE OF S|
00004D80: 59 4E 43 00 A4 55 0E 56 8F 20 2A 2A 2A 20 57 49 |YNC..U.V. *** WI|
00004D90: 54 48 20 54 48 45 20 4D 41 49 4C 20 52 45 54 52 |TH THE MAIL RETR|
00004DA0: 49 45 56 45 00 C6 55 18 56 8F 20 2A 2A 2A 2A 2A |IEVE..U.V. *****|
00004DB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00004DC0: 2A 2A 2A 2A 2A 2A 00 F1 55 B8 56 99 47 24 AA 22 |******..U.V.G$."|
00004DD0: 9A D3 45 4E 44 49 4E 47 20 D3 59 4E 43 05 2E 2E |..ENDING .YNC...|
00004DE0: 2E 22 46 24 47 24 3A 49 24 B2 22 22 3A 41 42 B2 |."F$G$:I$."":AB.|
00004DF0: 30 00 25 56 C2 56 81 20 5A 20 B2 20 31 20 A4 20 |0.%V.V. Z . 1 . |
00004E00: 34 30 30 30 3A A1 23 35 2C 41 24 3A A1 42 24 3A |4000:.#5,A$:.B$:|
00004E10: 8B 41 24 B3 B1 22 22 B0 42 24 B3 B1 22 22 A7 5A |.A$.."".B$.."".Z|
00004E20: B2 37 30 30 30 00 49 56 CC 56 8B 20 41 24 B2 22 |.7000.IV.V. A$."|
00004E30: 2A 22 B0 42 24 B2 22 2A 22 A7 5A B2 37 30 30 30 |*".B$."*".Z.7000|
00004E40: 3A 82 3A 41 42 B2 31 3A 8E 00 51 56 D6 56 82 3A |:.:AB.1:..QV.V.:|
00004E50: 8E 00 85 56 1C 57 A0 31 35 2C 44 45 2C 31 35 3A |...V.W.15,DE,15:|
00004E60: 9F 31 35 2C 44 45 2C 31 35 3A A0 32 3A 9F 32 2C |.15,DE,15:.2:.2,|
00004E70: 44 45 2C 33 2C 59 24 AA 46 24 AA 22 2C 52 22 3A |DE,3,Y$.F$.",R":|
00004E80: 8D 32 32 30 30 00 AC 56 1D 57 A0 32 3A A0 31 35 |.2200..V.W.2:.15|
00004E90: 3A 42 B2 31 30 30 3A 8D 37 34 3A 8B 20 45 4E 20 |:B.100:.74:. EN |
00004EA0: B3 20 32 31 20 A7 20 32 32 33 30 39 00 DA 56 1E |. 21 . 22309..V.|
00004EB0: 57 40 22 09 09 09 09 09 09 09 09 09 09 09 09 09 |W@".............|
00004EC0: 09 09 09 09 09 09 09 09 09 04 04 04 04 04 04 04 |................|
00004ED0: 04 04 04 04 22 3A 41 42 B2 31 00 0D 57 1F 57 99 |....":AB.1..W.W.|
00004EE0: 20 47 24 22 CE 4F 54 20 D3 45 4E 44 49 4E 47 20 | G$".OT .ENDING |
00004EF0: D3 59 4E 43 05 2E 2E 2E 9A C6 49 4C 45 20 CE 4F |.YNC......ILE .O|
00004F00: 54 20 C8 45 52 45 05 2E 2E 2E 22 47 24 00 13 57 |T .ERE...."G$..W|
00004F10: 20 57 8E 00 1B 57 25 57 8D 31 36 00 57 57 26 57 | W...W%W.16.WW&W|
00004F20: 4F 24 B2 22 09 09 09 09 09 09 09 09 09 09 22 AA |O$."..........".|
00004F30: 46 24 AA 22 2C 52 22 AA 47 24 3A 81 5A B2 31 A4 |F$.",R".G$:.Z.1.|
00004F40: C3 28 4F 24 29 3A 41 24 B2 CA 28 4F 24 2C 5A 2C |.(O$):A$..(O$,Z,|
00004F50: 31 29 3A 99 41 24 3B 00 64 57 30 57 98 35 2C 41 |1):.A$;.dW0W.5,A|
00004F60: 24 3B 3A 82 00 6E 57 3A 57 8D 31 36 3A 8E 00 89 |$;:..nW:W.16:...|
00004F70: 57 D8 59 8F 20 2A 2A 2A 20 57 52 49 54 45 20 45 |W.Y. *** WRITE E|
00004F80: 4D 41 49 4C 20 42 41 43 4B 00 B5 57 E2 59 98 32 |MAIL BACK..W.Y.2|
00004F90: 2C C7 28 32 35 35 29 C7 28 31 33 29 22 C6 41 49 |,.(255).(13)".AI|
00004FA0: 4C 45 44 20 CE 45 54 CD 41 49 4C 22 C7 28 31 33 |LED .ET.AIL".(13|
00004FB0: 29 C4 28 31 29 00 E6 57 EC 59 98 32 2C 22 C5 52 |).(1)..W.Y.2,".R|
00004FC0: 52 4F 52 CD 41 49 4C 22 C7 28 31 33 29 44 41 24 |ROR.AIL".(13)DA$|
00004FD0: C7 28 31 33 29 22 CE 45 54 57 4F 52 4B 22 C7 28 |.(13)".ETWORK".(|
00004FE0: 31 33 29 54 4D 24 00 ED 57 F6 59 98 32 00 16 58 |13)TM$..W.Y.2..X|
00004FF0: 00 5A 98 32 2C 22 C6 41 49 4C 45 44 20 D3 45 4E |.Z.2,".AILED .EN|
00005000: 44 49 4E 47 20 4E 45 54 4D 41 49 4C 20 54 4F 20 |DING NETMAIL TO |
00005010: 55 53 45 52 2E 22 00 1D 58 0A 5A 98 32 00 37 58 |USER."..X.Z.2.7X|
00005020: 14 5A 98 32 2C 22 D0 4F 53 53 49 42 4C 45 20 43 |.Z.2,".OSSIBLE C|
00005030: 41 55 53 45 53 3A 22 00 3E 58 16 5A 98 32 00 5F |AUSES:".>X.Z.2._|
00005040: 58 18 5A 98 32 2C 22 31 3A 20 D5 53 45 52 C9 C4 |X.Z.2,"1: .SER..|
00005050: A0 C4 49 44 20 CE 4F 54 20 C5 58 49 53 54 22 00 |..ID .OT .XIST".|
00005060: 7C 58 19 5A 98 32 2C 22 32 3A 20 D5 53 45 52 20 ||X.Z.2,"2: .SER |
00005070: D7 41 53 20 C4 45 4C 45 54 45 44 22 00 A6 58 1A |.AS .ELETED"..X.|
00005080: 5A 8F 20 50 52 49 4E 54 23 32 2C 22 33 3A 20 D5 |Z. PRINT#2,"3: .|
00005090: 53 45 52 CE 41 4D 45 20 C4 49 44 20 CE 4F 54 20 |SER.AME .ID .OT |
000050A0: C5 58 49 53 54 22 00 AD 58 1B 5A 98 32 00 B6 58 |.XIST"..X.Z.2..X|
000050B0: 28 5A A0 32 3A 8E 00 EF 58 C0 5D 42 B2 30 3A 4F |(Z.2:...X.]B.0:O|
000050C0: 24 B2 22 33 3A 22 3A 8D 35 30 3A A0 38 3A A0 31 |$."3:":.50:.8:.1|
000050D0: 35 3A 9F 31 35 2C 44 45 2C 31 35 2C 22 53 22 AA |5:.15,DE,15,"S".|
000050E0: 59 24 AA C4 28 45 4D 25 28 4F 4F 2C 31 29 29 00 |Y$..(EM%(OO,1)).|
000050F0: F9 58 CA 5D A0 31 35 3A 8E 00 12 59 B4 5F 8F 20 |.X.].15:...Y._. |
00005100: 4F 4C 44 20 44 4F 4E 47 4C 45 20 52 4F 55 54 49 |OLD DONGLE ROUTI|
00005110: 4E 45 00 18 59 04 60 8E 00 3A 59 A7 61 8F 20 50 |NE..Y.`..:Y.a. P|
00005120: 41 52 53 45 52 20 46 4F 52 20 4E 45 57 20 4E 45 |ARSER FOR NEW NE|
00005130: 54 57 4F 52 4B 20 43 4F 44 45 00 41 59 A8 61 8D |TWORK CODE.AY.a.|
00005140: 32 00 61 59 B2 61 4F 24 B2 22 32 3A 49 4E 45 54 |2.aY.aO$."2:INET|
00005150: 2E 46 49 4C 45 22 3A 42 B2 31 3A 8D 35 30 3A 8D |.FILE":B.1:.50:.|
00005160: 32 00 6E 59 BC 61 8B 41 42 B2 36 32 A7 8E 00 A6 |2.nY.a.AB.62....|
00005170: 59 DA 61 86 4E 31 25 28 4E 53 25 29 2C 4E 33 24 |Y.a.N1%(NS%),N3$|
00005180: 28 31 35 30 29 2C 4E 32 25 28 35 30 29 3A 99 22 |(150),N2%(50):."|
00005190: 05 11 50 52 4F 43 45 53 53 49 4E 47 20 4E 45 54 |..PROCESSING NET|
000051A0: 2E 46 49 4C 45 22 00 B1 59 DF 61 89 32 35 31 30 |.FILE"..Y.a.2510|
000051B0: 30 00 D2 59 E4 61 42 B2 32 3A 4F 24 B2 22 30 3A |0..Y.aB.2:O$."0:|
000051C0: 53 59 53 2E 4E 45 54 2E 4E 4F 44 45 53 22 3A 8D |SYS.NET.NODES":.|
000051D0: 34 39 00 F7 59 EE 61 8D 31 35 3A 98 31 35 2C 22 |49..Y.a.15:.15,"|
000051E0: 50 22 C7 28 39 38 29 C7 28 52 4C 29 C7 28 52 48 |P".(98).(RL).(RH|
000051F0: 29 C7 28 31 29 3A 8E 00 FD 59 F8 61 8F 00 1F 5A |).(1):...Y.a...Z|
00005200: 0C 62 4F 24 B2 22 30 3A 4E 57 49 44 22 3A 42 B2 |.bO$."0:NWID":B.|
00005210: 31 3A 8D 35 30 3A 84 38 2C 4E 49 24 3A 8D 32 00 |1:.50:.8,NI$:.2.|
00005220: 3F 5A 16 62 4F 24 B2 22 30 3A 4E 45 54 2E 4D 45 |?Z.bO$."0:NET.ME|
00005230: 53 53 2E 4F 55 54 22 3A 42 B2 31 3A 8D 35 30 00 |SS.OUT":B.1:.50.|
00005240: 5A 5A 17 62 81 4A B2 31 A4 35 30 3A 84 38 2C 4E |ZZ.b.J.1.50:.8,N|
00005250: 32 25 28 4A 29 3A 82 3A 8D 32 00 82 5A 1B 62 52 |2%(J):.:.2..Z.bR|
00005260: B2 31 3A 8D 32 35 30 36 30 3A 84 38 2C 4E 4F 25 |.1:.25060:.8,NO%|
00005270: 3A 52 B2 32 3A 8D 32 35 30 36 30 3A 84 38 2C 5A |:R.2:.25060:.8,Z|
00005280: 58 24 00 8F 5A 20 62 81 4A B2 32 A4 4E 4F 25 00 |X$..Z b.J.2.NO%.|
00005290: AE 5A 25 62 52 B2 4A AA 31 3A 8D 32 35 30 36 30 |.Z%bR.J.1:.25060|
000052A0: 3A 84 38 2C 49 4E 24 2C 4C 4F 24 3A 8D 32 00 CA |:.8,IN$,LO$:.2..|
000052B0: 5A 2A 62 42 B2 31 3A 4F 24 B2 22 30 3A 4E 45 54 |Z*bB.1:O$."0:NET|
000052C0: 2E 22 AA 49 4E 24 3A 8D 35 30 00 F8 5A 34 62 84 |.".IN$:.50..Z4b.|
000052D0: 38 2C 4E 33 25 3A 4E 33 24 28 30 29 B2 C4 28 4E |8,N3%:N3$(0)..(N|
000052E0: 33 25 29 3A 81 4B B2 31 A4 4E 33 25 3A 84 38 2C |3%):.K.1.N3%:.8,|
000052F0: 4E 33 24 28 4B 29 3A 82 00 26 5B 3E 62 84 38 2C |N3$(K):..&[>b.8,|
00005300: 4E 33 25 3A 4E 31 25 28 30 29 B2 4E 33 25 3A 81 |N3%:N1%(0).N3%:.|
00005310: 4B B2 31 A4 4E 33 25 3A 84 38 2C 4E 31 25 28 4B |K.1.N3%:.8,N1%(K|
00005320: 29 3A 82 3A 8D 32 00 4A 5B 48 62 42 B2 31 3A 4F |):.:.2.J[HbB.1:O|
00005330: 24 B2 22 32 3A 49 4E 45 54 2E 46 49 4C 45 22 3A |$."2:INET.FILE":|
00005340: 8D 35 30 3A 84 38 2C 5A 31 24 00 70 5B 49 62 8B |.50:.8,Z1$.p[Ib.|
00005350: C8 28 5A 31 24 2C 31 29 B2 22 5E 22 A7 5A 31 24 |.(Z1$,1)."^".Z1$|
00005360: B2 CA 28 5A 31 24 2C 32 29 3A 89 32 35 31 36 31 |..(Z1$,2):.25161|
00005370: 00 83 5B 4A 62 8B 49 4E 24 B2 5A 31 24 A7 32 35 |..[Jb.IN$.Z1$.25|
00005380: 37 30 30 00 92 5B 52 62 84 38 2C 5A 31 24 2C 5A |700..[Rb.8,Z1$,Z|
00005390: 31 24 00 C9 5B 66 62 5A 5A B2 30 3A 81 4B B2 31 |1$..[fbZZ.0:.K.1|
000053A0: A4 C5 28 4E 33 24 28 30 29 29 3A 8B 5A 31 24 B2 |..(N3$(0)):.Z1$.|
000053B0: 4E 33 24 28 4B 29 A7 5A 5A B2 31 3A 4B B2 C5 28 |N3$(K).ZZ.1:K..(|
000053C0: 4E 33 24 28 30 29 29 AA 31 00 CF 5B 70 62 82 00 |N3$(0)).1..[pb..|
000053D0: EE 5B 7A 62 8B 5A 5A B2 31 A7 32 36 30 30 30 3A |.[zb.ZZ.1.26000:|
000053E0: 8F 20 45 2D 4D 41 49 4C 20 46 4F 55 4E 44 00 22 |. E-MAIL FOUND."|
000053F0: 5C 84 62 5A 5A B2 30 3A 81 4B B2 31 A4 4E 31 25 |\.bZZ.0:.K.1.N1%|
00005400: 28 30 29 3A 8B C5 28 5A 31 24 29 B2 4E 31 25 28 |(0):..(Z1$).N1%(|
00005410: 4B 29 A7 5A 5A B2 31 3A 4B B2 4E 31 25 28 30 29 |K).ZZ.1:K.N1%(0)|
00005420: AA 31 00 28 5C 8E 62 82 00 48 5C 98 62 8B 5A 5A |.1.(\.b..H\.b.ZZ|
00005430: B2 31 A7 32 37 30 30 30 3A 8F 20 4D 45 53 53 41 |.1.27000:. MESSA|
00005440: 47 45 20 46 4F 55 4E 44 00 4E 5C 9D 62 8F 00 56 |GE FOUND.N\.b..V|
00005450: 5C A2 62 8D 33 31 00 6F 5C A7 62 42 B2 35 3A 8D |\.b.31.o\.bB.5:.|
00005460: 37 34 3A 8B 53 54 B3 B1 30 A7 32 35 37 30 30 00 |74:.ST..0.25700.|
00005470: 88 5C AC 62 8B C8 28 49 24 2C 32 29 B3 B1 22 5E |.\.b..(I$,2).."^|
00005480: 5E 22 A7 32 35 32 35 30 00 A8 5C 9C 63 84 38 2C |^".25250..\.c.8,|
00005490: 5A 31 24 3A 42 B2 35 3A 8D 37 34 3A 8B 53 54 B3 |Z1$:B.5:.74:.ST.|
000054A0: B1 30 A7 32 35 37 30 30 00 AE 5C 00 64 8F 00 B9 |.0.25700..\.d...|
000054B0: 5C 0A 64 89 32 35 31 39 30 00 C2 5C 64 64 8D 32 |\.d.25190..\dd.2|
000054C0: 3A 82 00 F8 5C 6E 64 8D 32 3A 89 33 30 30 30 30 |:...\nd.2:.30000|
000054D0: 3A 8F 20 4A 55 4D 50 20 54 4F 20 50 52 4F 43 45 |:. JUMP TO PROCE|
000054E0: 53 53 20 4F 55 52 20 4D 41 49 4C 20 41 4E 44 20 |SS OUR MAIL AND |
000054F0: 4D 45 53 53 41 47 45 53 00 0B 5D 8F 65 8F 20 45 |MESSAGES..].e. E|
00005500: 2D 4D 41 49 4C 20 46 4F 55 4E 44 00 43 5D 90 65 |-MAIL FOUND.C].e|
00005510: 4F 24 B2 22 32 3A 46 49 4C 45 2E 22 AA 49 4E 24 |O$."2:FILE.".IN$|
00005520: 3A 8D 36 37 3A 9F 39 2C 44 45 2C 39 2C 59 24 AA |:.67:.9,DE,9,Y$.|
00005530: 4F 24 AA 22 2C 53 2C 52 22 3A A0 39 3A 84 31 35 |O$.",S,R":.9:.15|
00005540: 2C 45 4E 00 71 5D 91 65 8B 45 4E B2 36 32 A7 9F |,EN.q].e.EN.62..|
00005550: 39 2C 44 45 2C 39 2C 59 24 AA 4F 24 AA 22 2C 53 |9,DE,9,Y$.O$.",S|
00005560: 2C 57 22 3A 98 39 2C 5A 58 24 3A 89 32 36 30 32 |,W":.9,ZX$:.2602|
00005570: 30 00 8A 5D 9A 65 9F 39 2C 44 45 2C 39 2C 59 24 |0..].e.9,DE,9,Y$|
00005580: AA 4F 24 AA 22 2C 53 2C 41 22 00 A1 5D A4 65 98 |.O$.",S,A"..].e.|
00005590: 39 2C C7 28 32 35 35 29 22 5E 5E 22 47 24 5A 31 |9,.(255)"^^"G$Z1|
000055A0: 24 00 A9 5D AE 65 8D 33 31 00 C5 5D B8 65 8B C8 |$..].e.31..].e..|
000055B0: 28 49 24 2C 32 29 B2 22 5E 5E 22 A7 A0 39 3A 89 |(I$,2)."^^"..9:.|
000055C0: 32 35 35 30 30 00 E8 5D BA 65 42 B2 35 3A 8D 37 |25500..].eB.5:.7|
000055D0: 34 3A 8B 53 54 B3 B1 30 A7 98 39 2C 49 24 3A A0 |4:.ST..0..9,I$:.|
000055E0: 39 3A 89 32 35 35 30 30 00 02 5E BD 65 98 39 2C |9:.25500..^.e.9,|
000055F0: 49 24 3B 3A 8B C3 28 49 24 29 B3 B1 32 35 35 A7 |I$;:..(I$)..255.|
00005600: 98 39 00 0D 5E C2 65 89 32 36 30 33 30 00 25 5E |.9..^.e.26030.%^|
00005610: 77 69 8F 20 4E 45 54 20 4D 45 53 53 41 47 45 20 |wi. NET MESSAGE |
00005620: 46 4F 55 4E 44 00 5D 5E 78 69 4F 24 B2 22 32 3A |FOUND.]^xiO$."2:|
00005630: 46 49 4C 45 2E 22 AA 49 4E 24 3A 8D 36 37 3A 9F |FILE.".IN$:.67:.|
00005640: 39 2C 44 45 2C 39 2C 59 24 AA 4F 24 AA 22 2C 53 |9,DE,9,Y$.O$.",S|
00005650: 2C 52 22 3A A0 39 3A 84 31 35 2C 45 4E 00 8B 5E |,R":.9:.15,EN..^|
00005660: 79 69 8B 45 4E B2 36 32 A7 9F 39 2C 44 45 2C 39 |yi.EN.62..9,DE,9|
00005670: 2C 59 24 AA 4F 24 AA 22 2C 53 2C 57 22 3A 98 39 |,Y$.O$.",S,W":.9|
00005680: 2C 5A 58 24 3A 89 32 37 30 32 30 00 A4 5E 82 69 |,ZX$:.27020..^.i|
00005690: 9F 39 2C 44 45 2C 39 2C 59 24 AA 4F 24 AA 22 2C |.9,DE,9,Y$.O$.",|
000056A0: 53 2C 41 22 00 BB 5E 8C 69 98 39 2C C7 28 32 35 |S,A"..^.i.9,.(25|
000056B0: 35 29 22 5E 5E 22 47 24 5A 31 24 00 C3 5E 96 69 |5)"^^"G$Z1$..^.i|
000056C0: 8D 33 31 00 DF 5E A0 69 8B C8 28 49 24 2C 32 29 |.31..^.i..(I$,2)|
000056D0: B2 22 5E 5E 22 A7 A0 39 3A 89 32 35 35 30 30 00 |."^^"..9:.25500.|
000056E0: 02 5F A2 69 42 B2 35 3A 8D 37 34 3A 8B 53 54 B3 |._.iB.5:.74:.ST.|
000056F0: B1 30 A7 98 39 2C 49 24 3A A0 39 3A 89 32 35 35 |.0..9,I$:.9:.255|
00005700: 30 30 00 1C 5F A5 69 98 39 2C 49 24 3B 3A 8B C3 |00.._.i.9,I$;:..|
00005710: 28 49 24 29 B3 B1 32 35 35 A7 98 39 00 27 5F AA |(I$)..255..9.'_.|
00005720: 69 89 32 37 30 33 30 00 3C 5F 2F 75 8F 20 50 41 |i.27030.<_/u. PA|
00005730: 52 53 45 52 20 46 4F 52 20 42 42 53 00 59 5F 30 |RSER FOR BBS.Y_0|
00005740: 75 52 B2 32 3A 8D 32 35 30 36 30 3A 84 38 2C 49 |uR.2:.25060:.8,I|
00005750: 4E 24 2C 4C 4F 24 3A 8D 32 00 7A 5F 31 75 42 B2 |N$,LO$:.2.z_1uB.|
00005760: 31 3A 4F 24 B2 22 30 3A 53 54 41 54 53 22 3A 8D |1:O$."0:STATS":.|
00005770: 35 30 3A 84 38 2C 41 2C 41 24 00 94 5F 32 75 A1 |50:.8,A,A$.._2u.|
00005780: 23 38 2C 41 24 3A 8B 41 24 B3 B1 22 2C 22 A7 33 |#8,A$:.A$..",".3|
00005790: 30 30 30 32 00 AA 5F 33 75 84 38 2C 41 2C 41 2C |0002.._3u.8,A,A,|
000057A0: 41 2C 41 2C 44 47 25 3A 8D 32 00 C6 5F 3A 75 42 |A,A,DG%:.2.._:uB|
000057B0: B2 31 3A 4F 24 B2 22 30 3A 4E 45 54 2E 22 AA 49 |.1:O$."0:NET.".I|
000057C0: 4E 24 3A 8D 35 30 00 F4 5F 44 75 84 38 2C 4E 33 |N$:.50.._Du.8,N3|
000057D0: 25 3A 4E 33 24 28 30 29 B2 C4 28 4E 33 25 29 3A |%:N3$(0)..(N3%):|
000057E0: 81 4B B2 31 A4 4E 33 25 3A 84 38 2C 4E 33 24 28 |.K.1.N3%:.8,N3$(|
000057F0: 4B 29 3A 82 00 22 60 4E 75 84 38 2C 4E 33 25 3A |K):.."`Nu.8,N3%:|
00005800: 4E 31 25 28 30 29 B2 4E 33 25 3A 81 4B B2 31 A4 |N1%(0).N3%:.K.1.|
00005810: 4E 33 25 3A 84 38 2C 4E 31 25 28 4B 29 3A 82 3A |N3%:.8,N1%(K):.:|
00005820: 8D 32 00 46 60 94 75 42 B2 31 3A 4F 24 B2 22 32 |.2.F`.uB.1:O$."2|
00005830: 3A 49 4E 45 54 2E 46 49 4C 45 22 3A 8D 35 30 3A |:INET.FILE":.50:|
00005840: 84 38 2C 5A 31 24 00 55 60 9E 75 84 38 2C 5A 31 |.8,Z1$.U`.u.8,Z1|
00005850: 24 2C 5A 31 24 00 8C 60 A8 75 5A 5A B2 30 3A 81 |$,Z1$..`.uZZ.0:.|
00005860: 4B B2 31 A4 C5 28 4E 33 24 28 30 29 29 3A 8B 5A |K.1..(N3$(0)):.Z|
00005870: 31 24 B2 4E 33 24 28 4B 29 A7 5A 5A B2 31 3A 4B |1$.N3$(K).ZZ.1:K|
00005880: B2 C5 28 4E 33 24 28 30 29 29 AA 31 00 92 60 B2 |..(N3$(0)).1..`.|
00005890: 75 82 00 B1 60 BC 75 8B 5A 5A B2 31 A7 33 31 30 |u...`.u.ZZ.1.310|
000058A0: 30 30 3A 8F 20 45 2D 4D 41 49 4C 20 46 4F 55 4E |00:. E-MAIL FOUN|
000058B0: 44 00 E5 60 DA 75 5A 5A B2 30 3A 81 4B B2 31 A4 |D..`.uZZ.0:.K.1.|
000058C0: 4E 31 25 28 30 29 3A 8B C5 28 5A 31 24 29 B2 4E |N1%(0):..(Z1$).N|
000058D0: 31 25 28 4B 29 A7 5A 5A B2 31 3A 4B B2 4E 31 25 |1%(K).ZZ.1:K.N1%|
000058E0: 28 30 29 AA 31 00 EB 60 E4 75 82 00 0B 61 EE 75 |(0).1..`.u...a.u|
000058F0: 8B 5A 5A B2 31 A7 33 32 30 30 30 3A 8F 20 4D 45 |.ZZ.1.32000:. ME|
00005900: 53 53 41 47 45 20 46 4F 55 4E 44 00 11 61 F8 75 |SSAGE FOUND..a.u|
00005910: 8F 00 19 61 02 76 8D 33 31 00 32 61 0C 76 42 B2 |...a.v.31.2a.vB.|
00005920: 35 3A 8D 37 34 3A 8B 53 54 B3 B1 30 A7 33 39 30 |5:.74:.ST..0.390|
00005930: 30 30 00 4B 61 16 76 8B C8 28 49 24 2C 32 29 B3 |00.Ka.v..(I$,2).|
00005940: B1 22 5E 5E 22 A7 33 30 32 31 30 00 6B 61 20 76 |."^^".30210.ka v|
00005950: 84 38 2C 5A 31 24 3A 42 B2 35 3A 8D 37 34 3A 8B |.8,Z1$:B.5:.74:.|
00005960: 53 54 B3 B1 30 A7 33 39 30 30 30 00 76 61 2A 76 |ST..0.39000.va*v|
00005970: 89 33 30 31 32 30 00 AB 61 18 79 4F 24 B2 22 32 |.30120..a.yO$."2|
00005980: 3A 4D 2E 22 AA 49 4E 24 3A 8D 36 37 3A 9F 39 2C |:M.".IN$:.67:.9,|
00005990: 44 45 2C 39 2C 59 24 AA 4F 24 AA 22 2C 53 2C 52 |DE,9,Y$.O$.",S,R|
000059A0: 22 3A A0 39 3A 84 31 35 2C 45 4E 00 D2 61 19 79 |":.9:.15,EN..a.y|
000059B0: 8B 45 4E B2 36 32 A7 9F 39 2C 44 45 2C 39 2C 59 |.EN.62..9,DE,9,Y|
000059C0: 24 AA 4F 24 AA 22 2C 53 2C 57 22 3A 89 33 31 30 |$.O$.",S,W":.310|
000059D0: 32 30 00 EB 61 22 79 9F 39 2C 44 45 2C 39 2C 59 |20..a"y.9,DE,9,Y|
000059E0: 24 AA 4F 24 AA 22 2C 53 2C 41 22 00 FD 61 2C 79 |$.O$.",S,A"..a,y|
000059F0: 98 39 2C C7 28 32 35 35 29 22 5E 5E 22 00 05 62 |.9,.(255)"^^"..b|
00005A00: 36 79 8D 33 31 00 21 62 40 79 8B C8 28 49 24 2C |6y.31.!b@y..(I$,|
00005A10: 32 29 B2 22 5E 5E 22 A7 A0 39 3A 89 33 30 32 32 |2)."^^"..9:.3022|
00005A20: 30 00 44 62 42 79 42 B2 35 3A 8D 37 34 3A 8B 53 |0.DbByB.5:.74:.S|
00005A30: 54 B3 B1 30 A7 98 39 2C 49 24 3A A0 39 3A 89 33 |T..0..9,I$:.9:.3|
00005A40: 30 32 32 30 00 5E 62 45 79 98 39 2C 49 24 3B 3A |0220.^bEy.9,I$;:|
00005A50: 8B C3 28 49 24 29 B3 B1 32 35 35 A7 98 39 00 69 |..(I$)..255..9.i|
00005A60: 62 4A 79 89 33 31 30 33 30 00 A9 62 00 7D 56 49 |bJy.31030..b.}VI|
00005A70: B2 4E 32 25 28 C5 28 5A 31 24 29 29 3A 41 B2 5A |.N2%(.(Z1$)):A.Z|
00005A80: 25 28 56 49 29 AA 31 3A 97 38 33 39 2C 28 C2 28 |%(VI).1:.839,(.(|
00005A90: 38 33 39 29 AA 31 29 3A 52 51 25 28 56 49 29 B2 |839).1):RQ%(VI).|
00005AA0: 52 51 25 28 56 49 29 AA 31 00 BD 62 01 7D 5A 25 |RQ%(VI).1..b.}Z%|
00005AB0: 28 56 49 29 B2 5A 25 28 56 49 29 AA 31 00 DF 62 |(VI).Z%(VI).1..b|
00005AC0: 0A 7D 8B 41 AD 44 47 25 B3 B1 B5 28 41 AD 44 47 |.}.A.DG%...(A.DG|
00005AD0: 25 29 A7 41 B2 41 AB 31 3A 89 33 32 30 31 30 00 |%).A.A.1:.32010.|
00005AE0: 18 63 14 7D 4F 24 B2 22 32 3A 53 22 AA C4 28 56 |.c.}O$."2:S"..(V|
00005AF0: 49 29 AA 22 20 4D 22 AA C4 28 41 29 3A 8D 36 37 |I)." M"..(A):.67|
00005B00: 3A 9F 39 2C 44 45 2C 39 2C 59 24 AA 4F 24 AA 22 |:.9,DE,9,Y$.O$."|
00005B10: 2C 53 2C 52 22 3A A0 39 00 46 63 1E 7D 84 31 35 |,S,R":.9.Fc.}.15|
00005B20: 2C 45 4E 3A 8B 45 4E B2 36 32 A7 9F 39 2C 44 45 |,EN:.EN.62..9,DE|
00005B30: 2C 39 2C 59 24 AA 4F 24 AA 22 2C 53 2C 57 22 3A |,9,Y$.O$.",S,W":|
00005B40: 89 33 32 30 35 30 00 5F 63 28 7D 9F 39 2C 44 45 |.32050._c(}.9,DE|
00005B50: 2C 39 2C 59 24 AA 4F 24 AA 22 2C 53 2C 41 22 00 |,9,Y$.O$.",S,A".|
00005B60: 6D 63 32 7D 98 39 2C C7 28 32 35 35 29 00 75 63 |mc2}.9,.(255).uc|
00005B70: 3C 7D 8D 33 31 00 91 63 46 7D 8B C8 28 49 24 2C |<}.31..cF}..(I$,|
00005B80: 32 29 B2 22 5E 5E 22 A7 A0 39 3A 89 33 30 32 34 |2)."^^"..9:.3024|
00005B90: 30 00 B4 63 50 7D 42 B2 35 3A 8D 37 34 3A 8B 53 |0..cP}B.5:.74:.S|
00005BA0: 54 B3 B1 30 A7 98 39 2C 49 24 3A A0 39 3A 89 33 |T..0..9,I$:.9:.3|
00005BB0: 30 32 34 30 00 CE 63 5A 7D 98 39 2C 49 24 3B 3A |0240..cZ}.9,I$;:|
00005BC0: 8B C3 28 49 24 29 B3 B1 32 35 35 A7 98 39 00 D9 |..(I$)..255..9..|
00005BD0: 63 64 7D 89 33 32 30 36 30 00 F7 63 57 98 8F 20 |cd}.32060..cW.. |
00005BE0: 43 4F 50 59 20 4D 41 49 4C 20 54 4F 20 4D 41 49 |COPY MAIL TO MAI|
00005BF0: 4C 20 44 52 49 56 45 00 FE 63 58 98 8D 32 00 28 |L DRIVE..cX..2.(|
00005C00: 64 59 98 4F 24 B2 22 32 3A 4D 2E 22 AA 49 4E 24 |dY.O$."2:M.".IN$|
00005C10: 3A 42 B2 31 3A 8D 35 30 3A 8D 32 3A 8B 45 4E B2 |:B.1:.50:.2:.EN.|
00005C20: 36 32 A7 33 39 30 35 30 00 32 64 62 98 8D 32 37 |62.39050.2db..27|
00005C30: 37 30 00 52 64 71 98 42 B2 31 3A 4F 24 B2 22 33 |70.Rdq.B.1:O$."3|
00005C40: 3A 4D 41 49 4C 2D 22 AA 4E 49 24 3A 8D 35 30 3A |:MAIL-".NI$:.50:|
00005C50: 8D 32 00 79 64 72 98 8B 45 4E B2 36 32 A7 9F 39 |.2.ydr..EN.62..9|
00005C60: 2C 44 45 2C 39 2C 59 24 AA 4F 24 AA 22 2C 53 2C |,DE,9,Y$.O$.",S,|
00005C70: 57 22 3A 89 33 39 30 33 30 00 92 64 73 98 9F 39 |W":.39030..ds..9|
00005C80: 2C 44 45 2C 39 2C 59 24 AA 4F 24 AA 22 2C 53 2C |,DE,9,Y$.O$.",S,|
00005C90: 41 22 00 B1 64 76 98 9F 38 2C 44 45 2C 32 2C 59 |A"..dv..8,DE,2,Y|
00005CA0: 24 AA 22 4D 2E 22 AA 49 4E 24 AA 22 2C 53 2C 52 |$."M.".IN$.",S,R|
00005CB0: 22 00 D1 64 78 98 8D 33 31 3A 8B C8 28 49 24 2C |"..dx..31:..(I$,|
00005CC0: 32 29 B2 22 5E 5E 22 A7 49 24 B2 C7 28 32 35 35 |2)."^^".I$..(255|
00005CD0: 29 00 F4 64 79 98 42 B2 35 3A 8D 37 34 3A 8B 53 |)..dy.B.5:.74:.S|
00005CE0: 54 B3 B1 30 A7 98 39 2C 49 24 3A 8D 32 3A 89 33 |T..0..9,I$:.2:.3|
00005CF0: 39 30 35 30 00 0E 65 7A 98 98 39 2C 49 24 3B 3A |9050..ez..9,I$;:|
00005D00: 8B C3 28 49 24 29 B3 B1 32 35 35 A7 98 39 00 19 |..(I$)..255..9..|
00005D10: 65 7C 98 89 33 39 30 33 32 00 4A 65 8A 98 4F 24 |e|..39032.Je..O$|
00005D20: B2 22 32 3A 49 4E 45 54 2E 46 49 4C 45 22 3A 8D |."2:INET.FILE":.|
00005D30: 36 37 3A 9F 31 35 2C 44 45 2C 31 35 2C 22 53 22 |67:.15,DE,15,"S"|
00005D40: AA 59 24 AA 4F 24 3A A0 31 35 00 77 65 8F 98 4F |.Y$.O$:.15.we..O|
00005D50: 24 B2 22 33 3A 4D 2E 22 AA 49 4E 24 3A 8D 36 37 |$."3:M.".IN$:.67|
00005D60: 3A 9F 31 35 2C 44 45 2C 31 35 2C 22 53 22 AA 59 |:.15,DE,15,"S".Y|
00005D70: 24 AA 4F 24 3A 8D 32 00 A7 65 90 98 4F 24 B2 22 |$.O$:.2..e..O$."|
00005D80: 32 3A 46 49 4C 45 2E 22 AA 59 4C 24 3A 8D 36 37 |2:FILE.".YL$:.67|
00005D90: 3A 9F 31 35 2C 44 45 2C 31 35 2C 22 53 22 AA 59 |:.15,DE,15,"S".Y|
00005DA0: 24 AA 4F 24 3A 8D 32 00 AD 65 94 98 8E 00 CE 65 |$.O$:.2..e.....e|
00005DB0: 40 9C 8F 20 2A 2A 2A 20 52 45 41 44 20 4E 49 44 |@.. *** READ NID|
00005DC0: 20 46 49 4C 45 20 49 4E 54 4F 20 4D 53 47 00 F6 | FILE INTO MSG..|
00005DD0: 65 4A 9C 4C 53 25 B2 30 3A 99 47 24 47 24 22 CC |eJ.LS%.0:.G$G$".|
00005DE0: 49 4E 45 53 20 D2 45 41 44 3A 22 CA 28 C4 28 4C |INES .EAD:".(.(L|
00005DF0: 53 25 29 2C 32 29 00 0A 66 54 9C 97 39 38 39 2C |S%),2)..fT..989,|
00005E00: 30 3A 97 39 39 30 2C 32 32 34 00 41 66 72 9C 9E |0:.990,224.Afr..|
00005E10: 35 31 35 30 34 3A 52 B2 C2 28 39 38 39 29 AA C2 |51504:R..(989)..|
00005E20: 28 39 39 30 29 AC 32 35 36 3A 97 31 39 35 2C C2 |(990).256:.195,.|
00005E30: 28 39 38 39 29 3A 97 31 39 36 2C C2 28 39 39 30 |(989):.196,.(990|
00005E40: 29 00 75 66 A4 9C 4C 53 25 B2 4C 53 25 AA 31 3A |).uf..LS%.LS%.1:|
00005E50: 52 B2 52 AA C2 28 38 35 36 29 3A 8D 31 35 3A 97 |R.R..(856):.15:.|
00005E60: 39 38 39 2C 52 4C 3A 97 39 39 30 2C 52 48 3A 9E |989,RL:.990,RH:.|
00005E70: 35 31 36 32 34 00 97 66 6C 9D 8B 53 54 B1 30 B0 |51624..fl..ST.0.|
00005E80: 52 B1 36 35 32 37 36 A7 56 56 B2 35 37 33 34 34 |R.65276.VV.57344|
00005E90: 3A 99 3A 99 3A 89 32 00 BE 66 28 A0 99 22 91 CC |:.:.:.2..f(.."..|
00005EA0: 49 4E 45 53 20 D2 45 41 44 3A 22 AA CA 28 C4 28 |INES .EAD:"..(.(|
00005EB0: 4C 53 25 29 2C 32 29 3A 89 34 30 30 35 30 00 DC |LS%),2):.40050..|
00005EC0: 66 10 A4 8F 20 2A 2A 2A 20 52 45 41 44 20 4D 53 |f... *** READ MS|
00005ED0: 47 20 42 55 46 46 45 52 20 2A 2A 2A 00 F9 66 1A |G BUFFER ***..f.|
00005EE0: A4 8F 20 2A 2A 2A 20 52 20 3D 20 35 37 33 34 34 |.. *** R = 57344|
00005EF0: 20 54 4F 20 53 54 41 52 54 00 18 67 24 A4 52 B2 | TO START..g$.R.|
00005F00: 56 56 3A 8D 34 3A 56 56 24 B2 22 22 3A 57 57 24 |VV:.4:VV$."":WW$|
00005F10: B2 22 22 3A 57 57 B2 30 00 54 67 2E A4 41 B2 C2 |."":WW.0.Tg..A..|
00005F20: 28 35 32 39 39 32 AA 57 57 29 3A 56 56 24 B2 C7 |(52992.WW):VV$..|
00005F30: 28 41 29 3A 57 57 B2 57 57 AA 31 3A 56 56 B2 56 |(A):WW.WW.1:VV.V|
00005F40: 56 AA 31 3A 8B 56 56 24 B2 22 40 22 A7 56 56 24 |V.1:.VV$."@".VV$|
00005F50: B2 22 2B 22 00 66 67 38 A4 8B 20 56 56 24 B2 C7 |."+".fg8.. VV$..|
00005F60: 28 31 33 29 A7 8E 00 7D 67 42 A4 57 57 24 B2 57 |(13)...}gB.WW$.W|
00005F70: 57 24 AA 56 56 24 3A 89 34 32 30 33 30 00 93 67 |W$.VV$:.42030..g|
00005F80: 50 C3 8F 20 2A 2A 20 53 45 4E 44 20 53 59 4E 43 |P.. ** SEND SYNC|
00005F90: 20 2A 2A 00 A4 67 5A C3 41 B2 54 49 3A 98 35 2C | **..gZ.A.TI:.5,|
00005FA0: 22 59 22 3B 00 B9 67 64 C3 A1 23 35 2C 41 24 3A |"Y";..gd..#5,A$:|
00005FB0: 8B 41 24 B2 22 5A 22 A7 8E 00 C1 67 69 C3 8D 38 |.A$."Z"....gi..8|
00005FC0: 30 00 DB 67 6E C3 8B 20 28 54 49 AB 41 29 20 B3 |0..gn.. (TI.A) .|
00005FD0: 31 30 30 20 A7 20 35 30 30 32 30 00 E6 67 78 C3 |100 . 50020..gx.|
00005FE0: 89 35 30 30 31 30 00 FF 67 38 C7 8F 20 2A 2A 20 |.50010..g8.. ** |
00005FF0: 52 45 43 45 49 56 45 20 53 59 4E 43 20 2A 2A 00 |RECEIVE SYNC **.|
00006000: 08 68 42 C7 41 B2 54 49 00 29 68 43 C7 A1 23 35 |.hB.A.TI.)hC..#5|
00006010: 2C 41 24 3A 8B 20 28 54 49 AB 41 29 20 B1 20 33 |,A$:. (TI.A) . 3|
00006020: 36 39 30 30 20 A7 32 30 30 00 41 68 4B C7 8B 41 |6900 .200.AhK..A|
00006030: 24 B3 B1 22 59 22 A7 8D 38 30 3A 89 35 31 30 31 |$.."Y"..80:.5101|
00006040: 31 00 64 68 4C C7 98 35 2C 22 5A 5A 5A 5A 5A 5A |1.dhL..5,"ZZZZZZ|
00006050: 5A 5A 5A 5A 5A 5A 5A 5A 5A 5A 5A 5A 5A 5A 5A 5A |ZZZZZZZZZZZZZZZZ|
00006060: 22 3B 3A 8E 00 00 |";:... |
.. ....860,0:.995,0:.857,0:.7120.4... 15
:.15,DE,15:..K....65484: 2: 8: 15:..K...
I$.H(TX$,B(856).1):.51104:.......15:.195
,RL:.196,RH:.51512:.......222.....I$.H(T
X$,B(856).1):.51520:..D....53269,0:.....
.FG.E(H(D(TL..(E(TI$).100)),3))......FG.
1.TL.999.I$.G$."..TIME UP":@I$:.205.....
..,...I$.H(I$,1):.32.?...I$.H(I$,3):.32.
S....997,2:.51048:......RM..(R.65536):RT
.R.RM.65536:RH..(RT.256):RL.RT.RH.256:..
....B.160:.74.....B.1:.50:.AB.20.2......
26......2:.15,MD,15:.8,MD,2,Y$.FT$:.2200
:.EN.20.2.....@".".G$......51656:_"\N.":
AB.B(251):.2:.80. ....31......51504:.3.;
. ..I$.""...O.!.SC$."":.G.1.C(I$):SC$.SC
$.G((F(J(I$,G,1)).127)).~."..:I$.SC$:...
.(._"-":.80...1.EN$.""...2.AB.0:.67...3.
.B.1.EN$.",S,R".Q.4..LD.A . DC$(A)."-".5
5...5. 15:.H(DC$(A),1)."/"..15,DR(A),15,
"I0:": 15.!.6..15,DR(A),15:.15,DC$(A): 1
5.F.7..B..2:.15,DR(A),15:.G$DR$(A)O$EN$:
.8,DR(A),2,DR$(A).O$.EN$:.2200.|.8.LD.A:
.EN.20.AB.EN...9.B.0:....:..997,4:.51048
:.221...=.B.2:EN$.",S,W":.50...>.C.10227
30:.B(678).1.C.985250:.56334,B(56334).12
8.+.?.R.C.BR%:.15:.665,RL:.666,RH:R.C.BR
%.2.100:.15:.661,RL:.662,RH.{.@..659,.((
BR%.300).6.(BR%.1200).8.(BR%.2400).10.(B
R%.9600).14.(BR%.19200).15)...A..BR%.480
0..659,12...B..52224:.667,B(668):....C.A
$.H(O$,2):A.E(A$):.E(A$).1.A$.."0:".A.0:
.69...D.O$.J(O$,3):.A.9.O$.J(O$,2)...E.D
E.DR(A):Y$.DR$(A):..,.F..997,5:.51048:.5
:.32.M.G..230:B.2:EN$.",S,A":.50:.AB.19.
.61:.8,"..START DATE:".DA$.G$.S.H...|.J.
A.TI...K.. (TI.A) .B . 75...L.....P..522
27:.B(251).0.B(840).1...B.Q.DS.1:....R.D
S.DS.1:."."DS:.50952:.B(251).0.....T..DS
.100.82...H..B(906)..3..906,2...M.B.64:.
74.E.N..2:B.0:O$."0:":.50:A.B(948):P$."C
/BBS".I.R.@G$.G$.".LOADING BBS....":.327
0.R...RP.2.|...PP.RP.....RP.PP:.RP..2.11
20......1120:A.A.127:.A.78.I$."N":@"NO."
:..U....A.89.I$."Y":@"YES!":.......A.13.
I$.G$:@"":.......223.3...H.B(56328):H.B(
56331):M.B(56330):TM$."":.(H.16).16.TM$.
"1".....TM$.TM$.J(D(H.15),2).":".J(D((M.
240).16),2).J(D(M.15),2):C$." AM":.(H.12
7).255.C$." PM.....TM$.TM$.C$:..J.`.AB.0
:.985,RP:.988,LW:I$."":.R$."".1135...J..
995,1:_R$.G(B(958)):.995,0...O.R$.""...~
..51536:.987,0:C.B(162):.B(996).1.80.>.
.A.B(860):.(A).(B(162).C).1151.L....(A.1
).1.B.1068:.1200:SL.B:.2723:A.B(860)....
..(A.2).2.B.1078:.1200:TL.B......(A.4).4
.B.1088:.1200:BU.B.I....(A.8).8.B.1098:.
1200:BD.B......860,0:.B(996).2.200......
B(996).3.205.5....LW.0.RZ.2.I$."":.RZ.1.
B(885).1:I$.I$.G(B(52735.RZ)):.:.1171.D.
...RP.1.:@"".L....LW.0.RP..2.B(885).1..8
56,B(885):.6.....A.B(52736):.LW.0.B(885)
.1.I$.G(A)......LW.0.B(885).0.I$."".....
.LW.0.RP.0.:@"".O...RP.0:RZ.0:......A$."
":.Z.0.3:A$.A$.G(B(B.Z).127):.:B.E(A$):.
.#.F..53280,6:.B(829).O$."CHAT":.25.D.P.
I.0:_".PAGING....":.54296,15.Y.Q..I.30..
54296,0:..K.R..A$:.A$.".".....S.I.I.1:_"
.":.51568:.2001.F...R.BR%:.15:.888,RL:.8
89,RH:R.BU:.15:.895,RM:.896,RL:.897,RH.1
...R.BD:.15:.898,RM:.899,RL:.900,RH:R.UN
:.15:.997,RL:.998,RH:.I.1.C(DA$):.969.I,
F(J(DA$,I,1)):.:.969.I,13.H...R.NP%:.15:
.959,RL:.960,RH:R.TL:.15:.880,RL:.881,RH
.|....196,235:.195,0......831,SL......51
696:.8,3:.7060:.B(906)..3..8,3:.2690....
..196,229:.195,0:.52224:.51696:.8,3:.740
1:.8,RZ$:.52224......2... ..163,0:.164,2
35:.50992:.8,3:.6945.B.!..B(906)..3..8,3
:.2940:.2710:.2730.}."..163,0:.164,229:
8:.52224:.50992:.8,3:.7400:.31:RZ$.I$...
#..52224:BR%.B(888).B(889).256:BU.B(895)
.65536.B(896).B(897).256...$.BD.B(898).6
5536.B(899).B(900).256:UN.B(997).B(998).
256.2....163,160:.164,255:.50992:.8,3:.3
1:NA$.I$: 8:.52224.T.0.R.970:.4:.3:DA$.I
$:NP%.B(959).B(960).256:TL.B(880).B(881)
.256...1.SL.B(831):RM%.B(894):. R=951:GO
SUB5:GOSUB3:TI$=I$:GOSUB230:GOSUB2100.C.
2.....4.TL.B(1010).10:.I(TM$,2)."PM".TL.
B(1011).10...5..TL.0.TL.999...6...)....1
5,EN$,A$,B$,SC$:EN.E(EN$)./.....I.N.I$."
":.I.0.21:I$.I$.U$(I).G$:.:.I.1.NS%:I$.I
$.Y$(I):..V.P..8,I$:.2.....I$."":.I.1.NS
%:R.W%(I):.15:I$.I$.G(RH).G(RL):......O$
.NA$.G$.RN$.G$.D(SL).G$.YL$.G$.PN$.G$.CT
$.G$.BD$.G$.DA$.G$.PA$.G$.D(CD%).G$.D(MW
%).G$.D(NP%).G$.D(CL%).G$.....I$.O$.D(CL
).G$.D(BU).G$.D(BD).G$.D(S2).G$.D(JU).G$
.D(FD%).G$.D(FU%).G$.D(LL%).G$.D(RM%).G$
.I$:.8,I$:.2.P...NA$.U$(0):RN$.U$(1):SL.
E(U$(2)):YL$.U$(3):PN$.U$(4):CT$.U$(5):B
D$.U$(6).....FD%.E(U$(18)):FU%.E(U$(19))
:LL%.E(U$(20)):RM%.E(U$(21)).M...LO$.U$(
7):PA$.U$(8):CD%.E(U$(9)):MW%.E(U$(10)):
NP%.E(U$(11))... .CL%.E(U$(12)):CX.E(U$(
13)):BU.E(U$(14)):JU.E(U$(17)):BD.E(U$(1
5)).....S2.E(U$(16)):.CL%.39.CL%.39.U...
.983,CL%:.(S2.2.SL).1.S2.2.SL......831,S
L:C4.53248.SL.51:M1$.D(SL):.I.0.19.....R
.C4.I:.2726:.1000.I,A:.:R.C4.20:GN$."".A
....4:.3:GN$.I$:..U....4:A.B(52992):....
...I.1.NS%:RH.F(H(Y$(I),1)):RL.F(I(Y$(I)
,1)):R.RH.256.RL......R.32000.W%(I).R...
...:....R.......P$."M.".IN$:O$."2:":B.0:
.50:.15,DE,15,"R".Y$."TEMP=".P$:DB$.Y$:D
B.DE."....2:O$."3:":P$."M.".IN$:B.0:.50:
.2._....8,DB,2,DB$."TEMP,S,R":.2,DE,1,Y$
.P$.",S,W":.861,0:.2860.....15,DB,15,"S
".DB$."TEMP":.2......2...,..997,105:.510
48:.51632:.2.M.T.I$.I$.G(B(C4)):.B(C4).1
3.C(I$).253.....^.C4.C4.1:.2900...|..8,U
$(0):.KZ%.1.KZ%.0:..7....I.1.21:.8,U$(I)
:.I.8.I.13.E(U$(I)).32768.U$(I)."32768".
X....:.255,NS%.2:.50976:C4.52992...L..Z.
1.NS%:Y$(Z).G(B(C4)).G(B(C4.1)):C4.C4.2.
..N..:......O$."5:MOD":.3800......RZ$.""
..26......2:RZ.1:.70:I$.H(I$,3):XC..(E(I
$)):.I$.G$........XC.1.XC.LS%.3200.>...C
R.BU.B(1014).BD.NP%.B(844):.CR.B(1013).B
(1013)..0.B(1014)..0...S...BD.BD.B(1013)
.10.V....(E(AR$(XC)).2.SL).1..14:.3200..
....997,14:.51048:RZ$.AR$(XC):.7300:.730
0:MD.E(I$):.7300.R....908,E(I$):.7300:.9
06,1:P$.I$......2050......H(P$,1)."-"..I
.1.1000:.:.49152:P$.J(P$,2)......P$,MD,1
:..5.F..A.30.A.A.30:P$."-".P$.D.G.MD.A:.
3245.S.X..65484:B.1:.50:.8,LS$:LS%.E(LS$
):.AA.1.LS%......31:AR$(AA).I$:.:....Z..
I$.""...D.D.SC$."":.K.1.C(I$):A.F(J(I$,K
,1)):A.A.127...H..A.64.A.91.SC$.SC$.G(A)
...I..A.47.A.58.SC$.SC$.G(A)...N..:I$.SC
$:..!.!..230:.8,CL:.8,VI$.K.&..8,DA$,EM,
EM%,NU%,MU%,DG%,NS%,ND%,LB%.I.+..A.1.5:.
31:RZ$.I$:.7012:....:..I.1.NS%:.8,SU$(I)
:.8,RQ%(I),RW%(I),Z%(I),RA(I),WA(I),SO%(
I),AP%(I).C.?.X%(I).Z%(I):....C..A.6.ND%
.5:.31:RZ$.I$:.7012:....D..I.1.ND%:.8,U1
(I),U2(I),U3(I),UO%(I),DN$(I):..7.E..I.1
.LB%:.8,LB%(I),LB$(I):..M.I..8,LC$:.31:T
C$.I$.T.B..2...D..7300:DR(A).E(I$):.7300
:DR$(A).I$:.7300:DC$(A).I$:....L..230...
...8,CL:.8,VI$:.8,DA$","EM","EM%","NU%",
"MU%","DG%","NS%","ND%","LB%.. ...A.1.5:
.8,DR(A)";"DR$(A)";"DC$(A):... ...I.1.NS
%:.8,SU$(I).\ ...8,RQ%(I)","RW%(I)","Z%(
I)","RA(I)","WA(I)","SO%(I)","AP%(I).. .
..:.A.1.ND%:.8,DR(A.5)";"DR$(A.5)";"DC$(
A.5):..H ...I.1.ND%:.8,U1(I)","U2(I)","U
3(I)","UO%(I)","DN$(I):... ...I.1.LB%:.8
,LB%(I)","LB$(I):... ...8,LC$:.8,TC$..!F
..2..!P..B(817).193..15,B(186),15:.15,"U
J": 15..!Z..51704:.51584: 5:.248,202:.25
0,154:.5,2,0,G(6):.56,155:.52,155:.644,1
55:.54,155..!..TX$."":.I.1.15:TX$.TX$.".
................":..G!...53269,0:.198,0.
."..LD..1:A.B(913):.53281,0:.53280,0:.LB
$(A),LB%(A),AR$(B(916)),U$(22),L$(B(924)
).A"..A.B(914):.DC$(6.A),DR(6.A),DR$(6.A
),U1(A),U2(A),U3(A),UO%(A),DN$(A).."..A.
B(915):.W%(A),Z%(A),X%(A),SU$(A),AP%(A),
SO%(A),WA(A),RA(A),RQ%(A).."...RW%(A),Y$
(A).."..F$."":R.928:.4:.3:RZ$.I$:A.0:.70
12..#H.Q9$."..............":ZP$."":G$.G(
13).5#Q..B(906).0..2080:.62:.B(906)..3..
51576.V#R.R.679:.4:.3:RZ$.I$:A.5:.7012.Z
#S.DE.B(908):G%.DE:MD.DE:Y$.DR$(5)..#\..
7500..#..I$."":.I.1.C(RZ$):A$.J(RZ$,I,1)
:.A$..";".I$.I$.A$..#...A$.";".I.C(RZ$):
RZ$.I(RZ$,C(RZ$).C(I$).1):.:...#...:RZ$.
"":..-$...8,LS$:NM%.E(LS$):.I.1.NM%:.31:
L$(I).I$:.:.2.O$...8,NM%:.I.1.NM%:.8,L$(
I):.:.2..$L.. ** NETWORK MODULE 7/26/91
BY GUNTHER BIRZNIEKS **.K$V.. ** P
OKE 906,3 MEANS THE BBS IS CALLING OUT A
S A NODE **..%`.. ** POKE 906,2 MEANS A
NODE IS CALLING THE BBS NORMAL **.G%J..
** POKE 906,1 MEANS THE NET IS ACCESSED
AS A MODULE **.P%T.. **..%~.. ** MAIL F
OR THE NETWORK NODE IS STORED AS..%... *
* [SPACE]NETWORK IDENTIFIER..%... **..%.
.. ** USER ID HAS NETWORK IDENTIFIER AFT
ER IT IF..&... ** MESSAGE OR MAIL ORIGIN
ATED FROM ANOTHER NODE..&... **.(&... **
.3&...24500.C&... NW$(4,50):.SF$(50):. S
F$ = SEND FILE LIST..&... EM%(100,2):. E
M% STORES EMAIL IDS DURING EMAIL PROCESS
ING.A&D.. B(906).1 . .906,0:.7700..&N..
B(906).2 . .906,0:.840,0:.8000..'X.. B(9
06).3 . .906,0:.840,0:.".":.9000..'.....
'... **.<'... ** MODULAR ACCESS MENU.E'(
.. **.K'-...~'2.O$."0:":B.0:.50:.7,DE,7,
Y$."NETLIST,S,R":.7,NN..'5.@G$..'<..I.1.
NN :.10000.B'F.@"..[.".J(D(I),2).".].:".
NW$(0,I):..M'P. 7: 15..(Z._G$.".WHICH NO
DE TO NET WITH.?:":.5:.I$.G$.I$."".7730.
.(_..I$."Q"..906,1:.205.T(D..15000:D2%.E
(I$):. D2%=NUMBER OF NODE TO NETWORK.J(X
.D1%.0:TR%.0:.9072..(... ** CHOOSE SUB T
O NETWORK **..(..VI.0:A$.I$:.A$:. Z . 1
. NS%.X(..I$.SU$(Z):.16000:.I$:.I$.A$.VI
.Z:Z.NS%..(... Z..(.....(@.. **..)J.. **
NETWORK IS BEING CALLED..)T.. **.`)^..
USERLOG AND STATS ARE ALREADY READ IN.
YL$ = NETWORK IDENTIFIER..)H.O$."0:NID "
.YL$:B.1:.50:. READ INFO FOR THE CALLING
NODE..)I..17200:.40000..)M..42000:A$.WW
$:.E(A$).2..13530:. TOGGLE TO PUNTER..*N
..E(A$).2..13540:. TOGGLE TO XMODEM.4*O.
.E(A$).3..13555:. TOGGLE TO XMODEM1K.:*T
...@*V...F*|..._*~.. BATCH NEW UDS SEND.
{*... BATCH NEW UDS RECEIVE..*..QS.1..*.
....*... I . 1 . QS:. "QUEUE SUB #"I..*.
....*.....*....D*....J* ...R*...80..*...
9850:. SEND MESSAGES..*...80..+...9700:.
RECEIVE MESSAGES..+.....+... I.A+..R.UN
.1:.13900:. WRITE USERLOG.S+...15000:.25
000.L+...13700:. WRITE STATS..+...19300:
. PROCESS MAIL IF SENT TO US.A+B..906,2:
.205:. END OF THE NETWORK SESSION.J+(#.
**..+2#. ** NETWORK IS A CALLING NODE..+
<#. **..,F#. ** READ NETLIST NUMBERS DOW
N.D,P#. ** CALL NODES THAT NEED TO BE CA
LLED.M,Z#. **.W,_#D2%.0..,D#O$."0:":B.0:
.50:.7,DE,7,Y$."NETLIST,S,R":.7,D1%..,F#
.I.1.D1%:.10000:.: 7: 15:D2%.0.T,N#D2%.D
2%.1:TR%.0:. ** READ NODE IN..-P#.840,0:
TR%.TR%.1:.G$."..NETWORK NAME.:"NW$(0,D2
%)..-Q#. ".NETWORK NUMB.:"NW$(4,D2%).N
-X#. ** CHECK BIT AGAINST DATE.S-.#A.E(J
(DA$,3)):.A.0.A.E(J(DA$,4))..-.#.D2%.D1%
.9110..-.#.J(NW$(1,D2%),A,1).."1"..G$"NO
T ITS DAY"G$:.9490.O-.#.9500:. DIAL OUT.
.- #.AB.1.TR%.3.9072."..#UN.E(NW$(2,D2%)
):R.UN.1:.13800:.2710:.2730:. READ USERL
OG.Z..#O$."0:NID ".YL$:B.1:.50:. READ IN
FO FOR CALLED NODE.Q..$.17000:. DO SCRIP
T....$.40000:. READ INTO MSG BUFFER.H..$
.42000:A$.WW$:.E(A$).2..13530:. TOGGLE T
O PUNTER....$.E(A$).2..13540:. TOGGLE TO
XMODEM../"$.E(A$).3..13555:. TOGGLE TO
XMODEM1K../,$..$/6$..*/@$..F/J$. BATCH N
EW UDS RECEIVE._/L$. BATCH NEW UDS SEND.
H/T$QS.1.N/Y$.../^$. I . 1 . QS:. "QUEUE
D SUB #"I../H$.../|$.../.$.../.$.../.$.8
0../.$..T/.$.9700:. RECEIVE MESSAGES../.
$.9850:. SEND MESSAGES../.$.../.$. I..0.
$..#0B$.15000:. HANG UP ON THE NODE.E0L$
R.UN.1:.13900:. WRITE USERLOG.P0Q$.25000
.I0V$.13700:. WRITE STATS.0.%. D2%.D1%
. .9070..0.%.19300:. PROCESS MAIL FILES
IF THEY EXIST..0.% 7: 8: 2:.205.H0.%. **
..0&%. ** ACTUALLY CALL NODE..00%. **..1
5%DT%.0:BR%.E(NW$(3,D2%)):.62.;1:%.15000
:."..DIALING ATTEMPT.:".D(DT%.1).G$.R1;%
.5,"ATDT";:.I.1.C(NW$(4,D2%)):A$.J(NW$(4
,D2%),I,1)..1<%.A$."_".A$.","..1D%.5,A$;
:.:.5..1N%A.TI..1X%.52227:. B(251).0 . 9
600.U1B%. (TI.A). 1800 . 9560..1L%DT%.DT
%.1:.DT%.4.9530..2V%AB.8:.:. ** FAILED./
2.%AB.0:.".CONNECTED...."G$:.840,0:.230.
K2.%O$."CALLERS":.71:.8,"NETWORK:".NW$(0
,D2%)." AT ".TM$:.2.Q2.%..Z2.%. **..2.%.
** RETRIEVE MESSAGES..2.%. **..2.%. **
FIRST GET SUB NAME..2.%. ** SHOULD HAVE
DOUBLE RVS'S..2.%.51000."3.&.G$.".RETRIE
VING MESSAGES...."SU$(VI)G$:I$."":AB.0:J
.0.:3.&O$."2:":B.0:.50:A.0.P3.&A.A.1:P$.
"":.#5,A$:.A.40000..G$".TIMEOUT...."G$:.
..3 &.A$..".".9750..3*&.#5,A$.I3+&.A$.."
".A$..".".A$..":".A$.."*".A$.."?".A$..G$
.P$.P$.A$..34&.A$."."..G$".MSG DOWNLOAD
OVER":...49&.C(P$).22..P$" TOO LONG":...
4>&.A$..G$.9770.24H&A.2:. SEQ FILE.Y4I&P
$."INET.FILE,S":.12000:. GET FILE.C4J&.9
740..4R&A.0:."SOMETHING WRONG!!":.9740..
4Z&. **..4.&. ** SEND MESSAGES..4.&. **.
.4.&. **.A4.&. **.L4.&.50000..5.&.G$.".S
ENDING MESSAGES...."SU$(VI)G$:I$."":AB.0
.45.&. Z . 1 . 4000:.#5,A$:.B$:.A$.."".B
$.."".Z.7000.S5.&. A$."*".B$."*".Z.7000:
.:..[5.&.:..O5.&B.0:O$."2:":.50..5.&F$."
FILE.".YL$.",S"..5J&.16.K5T&O$."........
..".F$.",R".G$:.Z.1.C(O$):A$.J(O$,Z,1):.
A$;.X5Y&.5,A$;:...5.&.16:.13000..6.&.16:
@"................DONE!":...6.&..76.'. *
* READ MAIN NODE INFORMATION IN.V6.'.7,N
W$(0,I):. NETWORK NAME..6B'.7,NW$(1,I):.
DAYS OF MONTH TO CALL OUT..6G'.C(NW$(1,
I)).31.NW$(1,I).NW$(1,I)."0":.10055..6`'
.7,NW$(2,I):. ID ON BBS FOR NEW MSG COUN
T..6J'.7,NW$(3,I):. BAUD..7T'.7,NW$(4,I)
:. PHONE # TO CALL OUT.$7.'..-7... **.C7
... ** DOWNLOAD FILE F$ TO DEVICE DE, DR
IVE # Y$ **.L7... **..7..AB.0:.SS%.1..21
000..7... AB . 0 .."PREMATURE DOWNLOAD A
BORT":...8..."...DOWNLOADING FILE.:".F$:
.:.".WAITING FOR ACKNOWLEDGEMENT....".G(
13).G(13)..8./.IFQ7THEN12080.J8./.POKE47
406,0:A=1:POKE49147,A:IFA=2THENPOKE47406
,1.M8./. A = 1 FOR PRG, A = 2 FOR SEQ.Z8
&/.J=1:Z=1..80/.IFQ7=0ORPEEK(840)=1THEN1
2120..8:/. J=J+1:GET#5,A$:IFJ>20000ORZ>7
ORPEEK(197)<>64THENAB=1:RETURN..8?/. IFA
$="."THENAB=4:RETURN..9D/. GOSUB80:IFA$
=""THEN12090.V9N/. A=(ASC(A$)AND95):IFA<
>71ANDA<>65THENZ=Z+1:GOTO12090.V9X/ 15:.
15,DE,15:.15200:.51000..9B/.51008:.R=491
47:GOSUB2726.P9L/. IFA<1ORA>3ORPEEK(512)
=1THENAB=1:CLOSE2:CLOSE15:RETURN..9V/ 2:
.2,DE,3,Y$.P$.",W"..:{/.AD%.1. 2:.2,DE,3
,Y$.P$.",A".E:./.1:.51000:.2:.51016:.3:.
G$.".DOWNLOAD COMPLETE...."G$.R:./ 15: 2
:..[:H2. **..:R2. ** UPLOAD FILE F$ FROM
DEVICE DE, DRIVE # Y$ **..:.2. **..:.2A
B.0:. SS% . 1 . . 22300..:.2. AB . 1 . .
"PRE-UPLOAD ABORT":...:.2."...UPLOADING
FILE.:".F$:..1;.2.".WAITING FOR ACKNOWL
EDGEMENT....".G(13).G(13).J;.2.B(840).1.
Q7.0.13090.I;.2Z.0:J.1:.#5,A$:.667,B(668
)..;.3J.J.1:.#5,A$:.J.25000.Z.7.B(197)..
64.."ABORT PREMATURE":..H;.3.A$.".".AB.4
:."USER ABORT":...;.3.80:.A$."".13060..<
.3A.(F(A$).95):.A..71.A..65.Z.Z.1:.13060
.)<"3 15:.15,DE,15:.Q7.0..47406,0.@<,3.2
,DE,3,Y$.F$.",R".[<63TY.1:.I(F$,1)."S".T
Y.2..<@3.15300:.51000:.49147,TY:.51024:.
80..<A3.B(512).1. 2: 15:."PROTOCOL ERROR
":...<J3.9:.51000:.8:.49144,Q7:.51032:.7
:.65484:.6: 2: 15..=O3.G$.".UPLOAD COMPL
ETE...."G$..=T3 2: 15:...=.4. **.2=F4. *
* TOGGLE PROTOCOLS.;=P4. **.N=Z4Q7.255:Q
5$."PUNTER":R.47369:.2726:.A.169.13560.T
=.4...=.4Q7.0:Q5$."X-MODEM":R.47369:.272
6:.A..169.13560..=.4...=.4Q7.0:Q5$."X-MO
DEM1K":R.47369:.2726:.A..169.13560..=.4.
.)>.4.G$".TOGGLE TO "Q5$G$:B.0:O$."0:":.
50:.8,B(949),1,Q5$.",P,R".@>.5.780,0:.65
493: 8:..\> 5. ** READ STATS FILE **.Y>*
5O$."STATS":B.1:.50:.6945..>.5. ** WRITE
STATS FILE **.Q>.5P$."STATS":B.0:O$.P$:
.50:.15,DE,15,"S".Y$.O$: 15:O$.P$..>.5B.
2:EN$.",S,W":.50..>.5.7060..?.5. ** READ
USERLOG RECORD R **.N?.5. ** GOSUB2710:
GOSUB2730 READS USERLOG INTO USER VARS.Y
?.5.14000.C?.5.2940..?L6. ** WRITE USERL
OG RECORD R **..?V6.14000..?`6.2690..?.6
. GOSUB2650..?.6.14100..?D6.15:.15,"P"G(
98)G(RL)G(RH)G(2):...?.7. GOSUB2640..@.7
B.2:O$."USERLOG":EN$."":.50.!@.:. *** HA
NG UP ***.R@.:. G$ ".HANGING UP AND RESE
TTING MODEM...."G$.S@.:.50960:.BR%.1200.
BR%.300:.62..@.:.52230:.56579,38:.16:.52
233:.56579,0.R@.:.5,"...";:.16:.5,"ATH":
.16:.52227:.B(251).0.15019.X@.:...@.:. *
** TURN OFF 4 MHZ MODE ***..A.;.0,B(0).1
28:..0A`;. *** CLEAR SCREEN FOR TRANSFER
.UAJ;.51584:.".....................".NA$
." ".P$.G$.".GOOD:".15)"BAD:"..AT;.15110
..AD;. *** CLEAR SCREEN FOR TRANSFER..AN
;.51584:.".....................".NA$." "
.F$.G$.".GOOD:".15)"BAD:"..AX;.15110..B(
<. TIME DELAY WITH READING MODEM.!B2<A.T
I.EB<<.#5,A$:.A$;:. (TI.A) .B . 15420.KB
F<..XB.>.I$.""....B.>SC$."":.K.1.C(I$):A
.F(J(I$,K,1)):A.A.127..B.>.A.64.A.91.SC$
.SC$.G(A)..B.>.A.47.A.58.SC$.SC$.G(A).LB
.>.:I$.SC$:...BHB. *** SCRIPT FILE ***..
BRB.8,I$..C|BCC$.H(I$,3):A.E(J(I$,5)).1C
.B. CC$ . "DEL" . B . A.60:.15400.SC.B.
CC$ . "TXT" . .17100:.17010.PC.B. CC$ .
"CHR" . .5,G(A);..C.B. (CC$ . "END") . .
..C.B.17010..CLB. *** PRINT TEXT IN SCRI
PT ***.FCVBI$. J(I$,5)..C.B.#5,A$:.A$;:.
A$.."". 17115..C.B. ZZ . 1 . C(I$)..D.BB
.4:.74:.5,J(I$,ZZ,1);.&D.B. ZZ:B.4:.74.G
D0C. *** READ SCRIPT TO END ***.GD:C.8,I
$:.H(I$,3).."END".17210.MDDC..XDPF. ****
..DZF. **** SEND MAIL..DDF. ****..DNF.G$
".SENDING MAIL...."G$.IDSFB.0:O$."3:":.5
0.TDXF.18300..D.F. ****..D.F. **** RECEI
VE MAIL..EHF. ****.!ERF.G$".RECEIVING MA
IL...."G$.5EWFB.0:O$."3:":.50.@E.F.18400
.KE.G. ****.NE"G. **** SEND PRESPECIFIED
FILES.YE,G. ****..E6G.G$".SENDING PRESP
ECIFIED FILE(S)...."G$..E;GB.0:O$."2:":.
50.EE@G.18300.PEJG. ****..ETG. **** RECE
IVE PRESPECIFIED FILES..F^G. ****.0FHG.G
$".RECEIVING PRESPECIFIED FILE(S)...."G$
.DFMGB.0:O$."2:":.50.OFRG.18400.QF|G. **
*************************..F}G. ** UPLOA
D PRESPEC'ED FILE**..F~G. **************
*************..F.G. SF% . 1 . 18360:. SE
ND FILES IN SF$() IF SEND FILES ALREADY
READ..G.G.42000:AA$.WW$:.E(AA$).1...0G.G
. I . 1 . E(AA$).8G.G.80.QG.G.42000:F$.W
W$:.50000.KG.G.22000:. OUT IF I = 1..G.G
SS%.1:.13000:SS%.0:. SEND FILE.CG.G 15:.
15,DE,15:.15,"S".Y$.F$:.".SCRATCHING....
"F$.MG.G. I:...G.G. *** SF$() FILES TO S
END..H.G. E(SF$(0)).1 . ...H.G. I . 1 .
E(SF$(0)):.80.LH.GF$.SF$(I):.F$:.50000:.
22000:. OUT IF I = 1.CH.GSS%.1:.13000:SS
%.0..H.G 15:.15,DE,15:.15,"S".Y$.F$:.".S
CRATCHING...."F$..HAG. I:..DH.G. *******
********************..H.G. ** DOWNLD PRE
SPEC'ED FILE**..I.G. *******************
********.'I.G.42000:AA$.WW$:.E(AA$).1...
QI.G.G$".NUMBER OF FILES TO RECEIVE.:"AA
$.FI.G. I . 1 . E(AA$).NI.G.80..I.G.4200
0:P$.WW$:.G$".FILENAME.:"P$.XI.HAD%.1:SS
%.1:.51000:.12000:SS%.0:AD%.0:. RECEIVE
FILE WITH APPEND..I.H. SS% INVOKES SYNC
PROTOCOL..J.H. I:...J8J. ***.-JBJ. *** R
EADING SEND MAIL LIST.QJLJ. *** FOR SEND
ING AFTER RECEIVE.[JVJ. ***..J`J.G$".REA
DING SEND MAIL INTO BUFFER...."G$..JJJ.4
2000:SF$(0).WW$:.E(SF$(0)).1...BJTJ. I.1
.E(SF$(0)).XJ~J.42000:SF$(I).WW$..J.J. I
:...J.J. ***..K.J. *** READING SEND FILE
LIST.1K.J. *** FOR SENDING AFTER RECEIV
E.;K.J. ***.]KDJ.G$".READING SEND FILE..
.."G$..KNJ.42000:SF$(0).WW$:.E(SF$(0)).1
....KXJ. I.1.E(SF$(0))..K.J.42000:SF$(I)
.WW$..K.J. I:...KDK. ***..KNK. *** CHECK
TO SEE IF MAIL TO..LXK. *** US EXISTS.
IF IT DOES.'L.K. *** THEN BREAK THE MAI
L- FILE.JL.K. *** DOWN AND APPEND THE MA
IL.LL.K. *** TO REAL USER MAIL FILES..L
K. *** AND UPDATE THEIR USERLOG..L.K. **
* ACCOUNTS...L.K. ***.NLHK.G$".CHECKING
MAILBOX...."G$..LMKO$."0:NWID":B.1:.50:.
8,NI$..MRKO$."3:MAIL-".NI$:B.1:.50.JM.K.
AB.62..G$".NO MAIL TODAY...."G$:.:. MAIL
FILE IS NOT THERE.LM.K.AB.20..G$".DISK
ERROR.#"AB:..VM.K. ***..M.K. *** BEGIN S
TRIPPING MAIL FILE..M.K. ***..M.L.#8,A$:
.ST..0. 8:..RM.L. A$..G(255).19460..M.LS
1$.A$:.#8,A$:.A$."@".A$."+"..N.L.20000:S
2$.I$.8N.L.20000:MS.E(I$):. ID NUMBER TO
TACK MAIL ON TO.PN.LA.0:B.0:. C6 . 1 .
C(I$):.J(I$,C6,1)."*".A.0.A.C6:...N.L.J(
I$,C6,1)."*".B.C6:C6.250..N.L.:MS.E(J(I$
,A.1,4)):I$.H(I$,A.1).J(I$,B.1)..N.LF$.D
(MS):. G$".WRITING MAIL FOR ID.:"F$G$..O
.L.2,DR(3),4,DR$(3).F$.",S,W": 2.0O"L.2,
DR(3),4,DR$(3).F$.",S,A".HO,L.2,S1$:.2,S
2$:.2,I$.GO6L.20100:. ADD ID # TO ARRAY.
.O@L.#8,A$:RO.RO.1:TS.ST:.A$.G(255). 2:.
19464:. NEW MAIL PACK..OAL.A$."@".A$."+"
..OJL.2,A$;:.A$.G(13).(RO.39).RO.0:.".LI
NE PROCESSED"..PTL. TS . 0 .19520. P.L.
** ALL MAIL PACKETS DONE.*P.L 2: 8.=P.L.
OO . 1 . 100.YP.L. EM%(OO,1) . 0 . 1966
0..P.L. OPEN USERLOG TO READ USER EM%(OO
,1)..P.L.G$".READING USERLOG.:"EM%(OO,1)
.UP.L.EM%(OO,1).1.EM%(OO,1).NU%..24000:.
19660..P.LR.EM%(OO,1).1: 8:.13800..Q.L.
U$(0)."0"..24000:. 19660.@Q.L. ADD EM%(O
O,2) TO USERS CURRENT MAIL COUNT.AQ.L.G$
".WRITING USERLOG.:"U$(0)..Q.LU$(10).D(E
(U$(10)).EM%(OO,2))..Q.L. EM%(OO,1).1 .
.837,B(837).EM%(OO,2).LQBL. WRITE ACCOUN
T TO USERLOG..QGL 8:R.EM%(OO,1).1:.14000
:.2670..QLL...RVL 2: 8:O$."3:":B.0:.50.4
R.L.".ERASING OLD MAIL FILE NOW....".FR.
L 15:.15,DR(3),15,"S".DR$(3)."MAIL-".NI$
: 15:..LR.N..VR NI$.""..R*N.#8,A$:.A$.G(
13)....R4NI$.I$.A$:.C(I$).255....R9N.ST.
.0....R>N.20010.WR.NDO.0:. OO . 1 . 100.
.S.N. EM%(OO,1) . MS . EM%(OO,2) . EM%(O
O,2). 1:DO . 1.NS.N. EM%(OO,1) . 0 . DO
. 0 . EM%(OO,1) . MS:EM%(OO,2). 1:DO.1.V
S.N.:..XS.R. ***************************
..S.R. *** MULTI RECEIVE PROTOCOL..S.R.
*** FOR THE PURPOSE OF SYNC.XS&R. *** WI
TH THE MAIL SEND..S0R. *****************
**********..TLR.G$.".RETRIEVE SYNC...."P
$:I$."":AB.0:J.0:J$."".^TVRJ.J.1:.#5,A$:
.J.40000..G$".TIMEOUT...."G$:..QT.R.A$..
".".21110.|T.R.#5,A$..T.R.A$.."".A$.."."
.A$..":".A$.."*".A$.."?".A$..G$.J$.J$.A$
..T.R.A$."."..G$".SYNC.:.NO FILE TO SEND
.!":AB.1:...U.R.C(J$).22..P$" TOO LONG":
...U.R.A$..G$.21130.!U.R..CU.U. ********
*******************.AU.U. *** MULTI SEND
PROTOCOL..U.V. *** FOR THE PURPOSE OF S
YNC..U.V. *** WITH THE MAIL RETRIEVE.FU.
V. ***************************..U.V.G$."
.SENDING SYNC...."F$G$:I$."":AB.0.%VBV.
Z . 1 . 4000:.#5,A$:.B$:.A$.."".B$.."".Z
.7000.IVLV. A$."*".B$."*".Z.7000:.:AB.1:
..QVVV.:...V.W 15,DE,15:.15,DE,15: 2:.2,
DE,3,Y$.F$.",R":.2200..V.W 2: 15:B.100:.
74:. EN . 21 . 22309.ZV.W@".............
....................":AB.1..W.W. G$"NOT
SENDING SYNC.....FILE NOT HERE...."G$..W
W...W%W.16.WW&WO$."..........".F$.",R".
G$:.Z.1.C(O$):A$.J(O$,Z,1):.A$;.DW0W.5,A
$;:..NW:W.16:...WXY. *** WRITE EMAIL BAC
K..W.Y.2,G(255)G(13)"FAILED NETMAIL"G(13
)D(1)..W.Y.2,"ERRORMAIL"G(13)DA$G(13)"NE
TWORK"G(13)TM$..W.Y.2..X.Z.2,"FAILED SEN
DING NETMAIL TO USER."..X.Z.2.7X.Z.2,"PO
SSIBLE CAUSES:".>X.Z.2._X.Z.2,"1: USERID
DID NOT EXIST".|X.Z.2,"2: USER WAS DELE
TED"..X.Z. PRINT#2,"3: USERNAME DID NOT
EXIST"..X.Z.2..X(Z 2:...X.]B.0:O$."3:":.
50: 8: 15:.15,DE,15,"S".Y$.D(EM%(OO,1)).
.XJ] 15:...Y._. OLD DONGLE ROUTINE..Y.`.
.:Y.A. PARSER FOR NEW NETWORK CODE.AY.A.
2.AY.AO$."2:INET.FILE":B.1:.50:.2.NY.A.A
B.62....YZA.N1%(NS%),N3$(150),N2%(50):."
..PROCESSING NET.FILE"..Y.A.25100.RY.AB.
2:O$."0:SYS.NET.NODES":.49..Y.A.15:.15,"
P"G(98)G(RL)G(RH)G(1):...Y.A...Z.BO$."0:
NWID":B.1:.50:.8,NI$:.2.?Z.BO$."0:NET.ME
SS.OUT":B.1:.50.ZZ.B.J.1.50:.8,N2%(J):.:
.2..Z.BR.1:.25060:.8,NO%:R.2:.25060:.8,Z
X$..Z B.J.2.NO%..Z%BR.J.1:.25060:.8,IN$,
LO$:.2.JZ*BB.1:O$."0:NET.".IN$:.50..Z4B.
8,N3%:N3$(0).D(N3%):.K.1.N3%:.8,N3$(K):.
.&[>B.8,N3%:N1%(0).N3%:.K.1.N3%:.8,N1%(K
):.:.2.J[HBB.1:O$."2:INET.FILE":.50:.8,Z
1$.P[IB.H(Z1$,1)."^".Z1$.J(Z1$,2):.25161
..[JB.IN$.Z1$.25700..[RB.8,Z1$,Z1$.I[FBZ
Z.0:.K.1.E(N3$(0)):.Z1$.N3$(K).ZZ.1:K.E(
N3$(0)).1.O[PB...[ZB.ZZ.1.26000:. E-MAIL
FOUND."\.BZZ.0:.K.1.N1%(0):.E(Z1$).N1%(
K).ZZ.1:K.N1%(0).1.(\.B..H\.B.ZZ.1.27000
:. MESSAGE FOUND.N\.B..V\.B.31.O\.BB.5:.
74:.ST..0.25700..\.B.H(I$,2).."^^".25250
..\.C.8,Z1$:B.5:.74:.ST..0.25700..\.D...
\.D.25190.B\DD.2:...\ND.2:.30000:. JUMP
TO PROCESS OUR MAIL AND MESSAGES..].E. E
-MAIL FOUND.C].EO$."2:FILE.".IN$:.67:.9,
DE,9,Y$.O$.",S,R": 9:.15,EN.Q].E.EN.62..
9,DE,9,Y$.O$.",S,W":.9,ZX$:.26020..].E.9
,DE,9,Y$.O$.",S,A"..].E.9,G(255)"^^"G$Z1
$..].E.31.E].E.H(I$,2)."^^". 9:.25500..]
.EB.5:.74:.ST..0..9,I$: 9:.25500..^.E.9,
I$;:.C(I$)..255..9..^BE.26030.%^WI. NET
MESSAGE FOUND.]^XIO$."2:FILE.".IN$:.67:.
9,DE,9,Y$.O$.",S,R": 9:.15,EN..^YI.EN.62
..9,DE,9,Y$.O$.",S,W":.9,ZX$:.27020..^.I
.9,DE,9,Y$.O$.",S,A"..^.I.9,G(255)"^^"G$
Z1$.C^.I.31..^ I.H(I$,2)."^^". 9:.25500.
._.IB.5:.74:.ST..0..9,I$: 9:.25500.._.I.
9,I$;:.C(I$)..255..9.'_.I.27030.<_/U. PA
RSER FOR BBS.Y_0UR.2:.25060:.8,IN$,LO$:.
2.Z_1UB.1:O$."0:STATS":.50:.8,A,A$.._2U.
#8,A$:.A$..",".30002.._3U.8,A,A,A,A,DG%:
.2.F_:UB.1:O$."0:NET.".IN$:.50.._DU.8,N3
%:N3$(0).D(N3%):.K.1.N3%:.8,N3$(K):.."`N
U.8,N3%:N1%(0).N3%:.K.1.N3%:.8,N1%(K):.:
.2.F`.UB.1:O$."2:INET.FILE":.50:.8,Z1$.U
`.U.8,Z1$,Z1$..`.UZZ.0:.K.1.E(N3$(0)):.Z
1$.N3$(K).ZZ.1:K.E(N3$(0)).1..`.U...`.U.
ZZ.1.31000:. E-MAIL FOUND..`ZUZZ.0:.K.1.
N1%(0):.E(Z1$).N1%(K).ZZ.1:K.N1%(0).1..`
.U...A.U.ZZ.1.32000:. MESSAGE FOUND..A.U
...A.V.31.2A.VB.5:.74:.ST..0.39000.KA.V.
H(I$,2).."^^".30210.KA V.8,Z1$:B.5:.74:.
ST..0.39000.VA*V.30120..A.YO$."2:M.".IN$
:.67:.9,DE,9,Y$.O$.",S,R": 9:.15,EN.RA.Y
.EN.62..9,DE,9,Y$.O$.",S,W":.31020..A"Y.
9,DE,9,Y$.O$.",S,A"..A,Y.9,G(255)"^^"..B
6Y.31.!B@Y.H(I$,2)."^^". 9:.30220.DBBYB.
5:.74:.ST..0..9,I$: 9:.30220.^BEY.9,I$;:
.C(I$)..255..9.IBJY.31030..B.}VI.N2%(E(Z
1$)):A.Z%(VI).1:.839,(B(839).1):RQ%(VI).
RQ%(VI).1..B.}Z%(VI).Z%(VI).1..B.}.A.DG%
...(A.DG%).A.A.1:.32010..C.}O$."2:S".D(V
I)." M".D(A):.67:.9,DE,9,Y$.O$.",S,R": 9
.FC.}.15,EN:.EN.62..9,DE,9,Y$.O$.",S,W":
.32050._C(}.9,DE,9,Y$.O$.",S,A".MC2}.9,G
(255).UC<}.31..CF}.H(I$,2)."^^". 9:.3024
0..CP}B.5:.74:.ST..0..9,I$: 9:.30240.NCZ
}.9,I$;:.C(I$)..255..9.YCD}.32060..CW..
COPY MAIL TO MAIL DRIVE..CX..2.(DY.O$."2
:M.".IN$:B.1:.50:.2:.EN.62.39050.2DB..27
70.RDQ.B.1:O$."3:MAIL-".NI$:.50:.2.YDR..
EN.62..9,DE,9,Y$.O$.",S,W":.39030..DS..9
,DE,9,Y$.O$.",S,A"..DV..8,DE,2,Y$."M.".I
N$.",S,R".QDX..31:.H(I$,2)."^^".I$.G(255
)..DY.B.5:.74:.ST..0..9,I$:.2:.39050..EZ
..9,I$;:.C(I$)..255..9..E|..39032.JE..O$
."2:INET.FILE":.67:.15,DE,15,"S".Y$.O$:
15.WE..O$."3:M.".IN$:.67:.15,DE,15,"S".Y
$.O$:.2..E..O$."2:FILE.".YL$:.67:.15,DE,
15,"S".Y$.O$:.2..E....NE@.. *** READ NID
FILE INTO MSG..EJ.LS%.0:.G$G$"LINES REA
D:"J(D(LS%),2)..FT..989,0:.990,224.AFR..
51504:R.B(989).B(990).256:.195,B(989):.1
96,B(990).UF..LS%.LS%.1:R.R.B(856):.15:.
989,RL:.990,RH:.51624..FL..ST.0.R.65276.
VV.57344:.:.:.2..F( .".LINES READ:".J(D(
LS%),2):.40050..F... *** READ MSG BUFFER
***..F... *** R = 57344 TO START..G$.R.
VV:.4:VV$."":WW$."":WW.0.TG..A.B(52992.W
W):VV$.G(A):WW.WW.1:VV.VV.1:.VV$."@".VV$
."+".FG8.. VV$.G(13)...}GB.WW$.WW$.VV$:.
42030..GPC. ** SEND SYNC **..GZCA.TI:.5,
"Y";..GDC.#5,A$:.A$."Z"...AGIC.80..GNC.
(TI.A) .100 . 50020..GXC.50010..G8G. **
RECEIVE SYNC **..HBGA.TI.)HCG.#5,A$:. (T
I.A) . 36900 .200.AHKG.A$.."Y"..80:.5101
1.DHLG.5,"ZZZZZZZZZZZZZZZZZZZZZZ";:...
> CLICK IMAGE PREVIEW FOR FULL MODAL