home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol229 / frag86.lbr < prev    next >
LBR Archive  |  1986-02-10  |  9.5 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: LBR Archive (archive/lbr).

You can browse this item here: frag86.lbr

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert LBR Archive (archive/lbr) magic Supported
1% dexvert Micro Focus COBOL library (other/microFocusCobolLibrary) ext Unsupported
1% dexvert Micro Focus COBOL Library (other/microFocusCOBOLLibrary) ext Unsupported
100% file LBR archive data default
99% file data default
87% TrID LU library default
12% TrID C64 Hires bitmap default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 20 20 20 20 20 20 20 | 20 20 20 20 00 00 01 00 |. | ....|
|00000010| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000020| 00 46 52 41 47 31 36 20 | 20 41 38 36 01 00 41 00 |.FRAG16 | A86..A.|
|00000030| 00 00 ff ff 00 00 ff ff | 00 00 ff ff 00 00 ff ff |........|........|
|00000040| 00 46 52 41 47 31 36 20 | 20 43 4d 44 42 00 0a 00 |.FRAG16 | CMDB...|
|00000050| 00 00 ff ff 00 00 ff ff | 00 00 ff ff 00 00 ff ff |........|........|
|00000060| ff 20 20 20 20 20 20 20 | 20 20 20 20 00 00 ff ff |. | ....|
|00000070| 00 00 ff ff 00 00 ff ff | 00 00 ff ff 00 00 ff ff |........|........|
|00000080| 3b 20 0d 0a 3b 09 46 52 | 41 47 2e 41 38 36 20 62 |; ..;.FR|AG.A86 b|
|00000090| 61 73 65 64 20 6f 6e 20 | 46 49 4c 45 2d 45 58 54 |ased on |FILE-EXT|
|000000a0| 2e 41 38 36 0d 0a 3b 09 | 33 2f 30 35 2f 38 35 09 |.A86..;.|3/05/85.|
|000000b0| 6d 6f 64 69 66 69 65 64 | 20 62 79 20 43 68 61 72 |modified| by Char|
|000000c0| 6c 69 65 20 47 6f 64 65 | 74 2d 43 65 72 61 6f 6c |lie Gode|t-Ceraol|
|000000d0| 6f 0d 0a 3b 09 09 09 20 | 20 20 20 32 36 31 30 20 |o..;... | 2610 |
|000000e0| 47 6c 65 6e 77 6f 6f 64 | 20 52 6f 61 64 0d 0a 3b |Glenwood| Road..;|
|000000f0| 09 09 09 20 20 20 20 42 | 72 6f 6f 6b 6c 79 6e 2c |... B|rooklyn,|
|00000100| 20 4e 59 20 20 31 31 32 | 31 30 0d 0a 3b 0d 0a 3b | NY 112|10..;..;|
|00000110| 09 6f 20 20 20 20 4e 6f | 77 20 64 69 73 70 6c 61 |.o No|w displa|
|00000120| 79 73 20 61 6c 70 68 61 | 62 65 74 69 63 61 6c 6c |ys alpha|beticall|
|00000130| 79 20 62 79 20 66 69 6c | 65 2c 20 73 6f 20 79 6f |y by fil|e, so yo|
|00000140| 75 20 63 61 6e 20 73 65 | 65 0d 0a 3b 09 20 20 20 |u can se|e..;. |
|00000150| 20 20 74 68 65 20 46 52 | 41 47 6d 65 6e 74 61 74 | the FR|AGmentat|
|00000160| 69 6f 6e 20 6f 66 20 74 | 68 65 20 66 69 6c 65 2e |ion of t|he file.|
|00000170| 0d 0a 3b 09 6f 20 20 20 | 20 43 6c 65 61 6e 65 64 |..;.o | Cleaned|
|00000180| 20 75 70 20 74 68 65 20 | 64 69 73 70 6c 61 79 20 | up the |display |
|00000190| 61 20 62 69 74 2c 20 74 | 6f 6f 0d 0a 3b 09 6f 20 |a bit, t|oo..;.o |
|000001a0| 20 20 20 54 61 6b 65 73 | 20 77 69 6c 64 63 61 72 | Takes| wildcar|
|000001b0| 64 73 20 6f 6e 20 63 6f | 6d 6d 61 6e 64 20 6c 69 |ds on co|mmand li|
|000001c0| 6e 65 0d 0a 3b 0d 0a 3b | 09 46 49 4c 45 2d 45 58 |ne..;..;|.FILE-EX|
|000001d0| 54 2e 41 38 36 20 56 65 | 72 73 69 6f 6e 20 31 2e |T.A86 Ve|rsion 1.|
|000001e0| 30 2c 20 61 73 20 6f 66 | 20 4d 61 72 63 68 20 32 |0, as of| March 2|
|000001f0| 39 2c 20 31 39 38 32 0d | 0a 3b 0d 0a 3b 20 20 4f |9, 1982.|.;..; O|
|00000200| 72 69 67 69 6e 61 6c 6c | 79 20 6e 61 6d 65 64 20 |riginall|y named |
|00000210| 46 49 4c 45 53 2e 41 53 | 4d 2c 20 61 6e 64 20 66 |FILES.AS|M, and f|
|00000220| 72 6f 6d 20 61 20 64 69 | 73 61 73 73 65 6d 62 6c |rom a di|sassembl|
|00000230| 79 20 62 79 0d 0a 3b 20 | 22 4a 2e 41 2e 50 22 20 |y by..; |"J.A.P" |
|00000240| 20 6f 66 20 4a 61 6e 75 | 61 72 79 20 32 33 2c 31 | of Janu|ary 23,1|
|00000250| 39 38 30 2e 2e 2e 46 49 | 4c 45 2d 45 58 54 2e 41 |980...FI|LE-EXT.A|
|00000260| 38 36 20 77 69 6c 6c 20 | 64 69 73 70 6c 61 79 20 |86 will |display |
|00000270| 74 68 65 0d 0a 3b 20 73 | 65 6c 65 63 74 65 64 20 |the..; s|elected |
|00000280| 64 69 73 6b 27 73 20 64 | 69 72 65 63 74 6f 72 79 |disk's d|irectory|
|00000290| 20 65 6e 74 72 69 65 73 | 20 69 6e 20 74 68 65 20 | entries| in the |
|000002a0| 66 6f 72 6d 3a 0d 0a 3b | 20 0d 0a 3b 20 55 73 65 |form:..;| ..; Use|
|000002b0| 72 20 46 69 6c 65 6e 61 | 6d 65 20 52 2f 4f 53 79 |r Filena|me R/OSy|
|000002c0| 73 41 72 63 20 65 78 20 | 72 63 20 3c 2d 2d 2d 2d |sArc ex |rc <----|
|000002d0| 2d 2d 2d 2d 2d 47 72 6f | 75 70 2d 2d 2d 2d 2d 2d |-----Gro|up------|
|000002e0| 2d 2d 2d 3e 0d 0a 3b 20 | 57 68 65 72 65 3a 0d 0a |--->..; |Where:..|
|000002f0| 3b 09 22 55 73 65 72 22 | 20 69 73 20 74 68 65 20 |;."User"| is the |
|00000300| 55 73 65 72 20 61 72 65 | 61 20 66 6f 72 20 74 68 |User are|a for th|
|00000310| 65 20 66 69 6c 65 2e 0d | 0a 3b 09 22 46 69 6c 65 |e file..|.;."File|
|00000320| 6e 61 6d 65 22 20 69 73 | 20 74 68 65 20 41 53 43 |name" is| the ASC|
|00000330| 49 49 20 66 69 6c 65 20 | 6e 61 6d 65 2f 74 79 70 |II file |name/typ|
|00000340| 65 2e 0d 0a 3b 09 22 52 | 2f 4f 22 20 69 73 20 74 |e...;."R|/O" is t|
|00000350| 68 65 20 22 72 65 61 64 | 20 6f 6e 6c 79 22 20 62 |he "read| only" b|
|00000360| 69 74 0d 0a 3b 09 22 53 | 79 73 22 20 69 73 20 74 |it..;."S|ys" is t|
|00000370| 68 65 20 22 73 79 73 74 | 65 6d 20 64 69 72 65 63 |he "syst|em direc|
|00000380| 74 6f 72 79 22 20 62 69 | 74 0d 0a 3b 09 22 41 72 |tory" bi|t..;."Ar|
|00000390| 63 22 20 69 73 20 74 68 | 65 20 22 41 72 63 68 69 |c" is th|e "Archi|
|000003a0| 76 65 22 20 62 69 74 2e | 0d 0a 3b 09 22 65 78 22 |ve" bit.|..;."ex"|
|000003b0| 20 69 73 20 74 68 65 20 | 22 66 69 6c 65 20 65 78 | is the |"file ex|
|000003c0| 74 65 6e 74 22 20 62 79 | 74 65 0d 0a 3b 09 22 72 |tent" by|te..;."r|
|000003d0| 63 22 20 69 73 20 74 68 | 65 20 22 72 65 63 6f 72 |c" is th|e "recor|
|000003e0| 64 20 63 6f 75 6e 74 22 | 20 62 79 74 65 2e 0d 0a |d count"| byte...|
|000003f0| 3b 09 22 47 72 6f 75 70 | 22 20 69 73 20 74 68 65 |;."Group|" is the|
|00000400| 20 22 61 6c 6c 6f 63 61 | 74 69 6f 6e 20 6d 61 70 | "alloca|tion map|
|00000410| 22 20 66 6f 72 20 74 68 | 65 20 66 69 6c 65 2e 0d |" for th|e file..|
|00000420| 0a 3b 20 0d 0a 3b 20 20 | 54 68 65 20 20 70 72 6f |.; ..; |The pro|
|00000430| 67 72 61 6d 20 77 69 6c | 6c 20 64 69 73 70 6c 61 |gram wil|l displa|
|00000440| 79 20 74 68 65 20 64 69 | 73 6b 20 64 69 72 65 63 |y the di|sk direc|
|00000450| 74 6f 72 79 20 65 6e 74 | 72 69 65 73 20 66 6f 72 |tory ent|ries for|
|00000460| 20 74 68 65 20 73 65 6c | 65 63 74 65 64 0d 0a 3b | the sel|ected..;|
|00000470| 20 66 69 6c 65 73 2c 20 | 69 6e 63 6c 75 64 69 6e | files, |includin|
|00000480| 67 20 61 6c 6c 20 74 68 | 65 20 48 65 78 61 64 65 |g all th|e Hexade|
|00000490| 63 69 6d 61 6c 20 69 6e | 66 6f 72 6d 61 74 69 6f |cimal in|formatio|
|000004a0| 6e 20 6f 6e 20 74 68 65 | 20 64 61 74 61 20 6d 61 |n on the| data ma|
|000004b0| 70 2e 0d 0a 3b 09 42 65 | 73 74 20 72 65 67 61 72 |p...;.Be|st regar|
|000004c0| 64 73 2c 20 4b 65 6c 6c | 79 20 53 6d 69 74 68 0d |ds, Kell|y Smith.|
|000004d0| 0a 3b 09 43 50 2f 4d 2d | 4e 45 54 20 28 74 6d 29 |.;.CP/M-|NET (tm)|
|000004e0| 2c 20 38 30 35 2d 35 32 | 37 2d 39 33 32 31 20 28 |, 805-52|7-9321 (|
|000004f0| 4d 6f 64 65 6d 2c 20 33 | 30 30 20 42 61 75 64 29 |Modem, 3|00 Baud)|
|00000500| 2c 20 38 30 35 2d 35 32 | 37 2d 30 35 31 38 20 28 |, 805-52|7-0518 (|
|00000510| 56 65 72 62 61 6c 29 0d | 0a 3b 20 0d 0a 52 65 6c |Verbal).|.; ..Rel|
|00000520| 65 61 73 65 09 09 45 51 | 55 09 31 0d 0a 56 65 72 |ease..EQ|U.1..Ver|
|00000530| 73 69 6f 6e 09 09 45 51 | 55 09 31 36 0d 0a 43 6f |sion..EQ|U.16..Co|
|00000540| 6e 4f 75 74 09 09 45 51 | 55 09 32 0d 0a 50 72 69 |nOut..EQ|U.2..Pri|
|00000550| 6e 74 43 6f 6e 42 75 66 | 09 45 51 55 09 39 0d 0a |ntConBuf|.EQU.9..|
|00000560| 53 65 61 72 63 68 46 69 | 72 73 74 09 45 51 55 09 |SearchFi|rst.EQU.|
|00000570| 31 37 0d 0a 53 65 61 72 | 63 68 4e 65 78 74 09 45 |17..Sear|chNext.E|
|00000580| 51 55 09 31 38 0d 0a 43 | 52 09 09 45 51 55 09 30 |QU.18..C|R..EQU.0|
|00000590| 44 48 09 09 09 3b 41 53 | 43 49 49 20 43 41 52 52 |DH...;AS|CII CARR|
|000005a0| 49 41 47 45 20 52 45 54 | 55 52 4e 0d 0a 4c 46 09 |IAGE RET|URN..LF.|
|000005b0| 09 45 51 55 09 30 41 48 | 09 09 09 3b 41 53 43 49 |.EQU.0AH|...;ASCI|
|000005c0| 49 20 4c 49 4e 45 20 46 | 45 45 44 0d 0a 41 73 63 |I LINE F|EED..Asc|
|000005d0| 69 69 5f 5a 65 72 6f 09 | 45 51 55 09 27 30 27 0d |ii_Zero.|EQU.'0'.|
|000005e0| 0a 53 70 61 63 65 09 09 | 45 51 55 09 27 20 27 0d |.Space..|EQU.' '.|
|000005f0| 0a 4f 4e 09 09 45 51 55 | 09 27 2b 27 0d 0a 4f 46 |.ON..EQU|.'+'..OF|
|00000600| 46 09 09 45 51 55 09 27 | 2d 27 0d 0a 45 4f 53 09 |F..EQU.'|-'..EOS.|
|00000610| 09 45 51 55 09 27 24 27 | 0d 0a 46 5f 54 79 70 65 |.EQU.'$'|..F_Type|
|00000620| 09 09 45 51 55 09 39 0d | 0a 45 78 74 65 6e 74 09 |..EQU.9.|.Extent.|
|00000630| 09 45 51 55 09 31 32 0d | 0a 52 65 63 6f 72 64 43 |.EQU.12.|.RecordC|
|00000640| 6f 75 6e 74 09 45 51 55 | 09 31 35 0d 0a 44 61 74 |ount.EQU|.15..Dat|
|00000650| 61 4d 61 70 09 09 45 51 | 55 09 31 36 0d 0a 45 6e |aMap..EQ|U.16..En|
|00000660| 74 72 79 4c 65 6e 67 74 | 68 09 45 51 55 09 33 34 |tryLengt|h.EQU.34|
|00000670| 0d 0a 3b 0d 0a 09 09 43 | 53 45 47 0d 0a 3b 0d 0a |..;....C|SEG..;..|
|00000680| 46 52 41 47 3a 0d 0a 09 | 09 4d 4f 56 09 44 58 2c |FRAG:...|.MOV.DX,|
|00000690| 44 53 0d 0a 09 09 4d 4f | 56 09 53 53 2c 44 58 0d |DS....MO|V.SS,DX.|
|000006a0| 0a 09 09 4d 4f 56 09 53 | 50 2c 4f 66 66 73 65 74 |...MOV.S|P,Offset|
|000006b0| 20 4c 6f 63 61 6c 5f 53 | 74 61 63 6b 0d 0a 09 09 | Local_S|tack....|
|000006c0| 4d 4f 56 09 45 53 2c 44 | 58 0d 0a 09 09 43 4c 44 |MOV.ES,D|X....CLD|
|000006d0| 0d 0a 09 09 4d 4f 56 09 | 44 58 2c 4f 66 66 73 65 |....MOV.|DX,Offse|
|000006e0| 74 20 53 69 67 6e 4f 6e | 0d 0a 09 09 43 41 4c 4c |t SignOn|....CALL|
|000006f0| 09 50 5f 53 74 72 69 6e | 67 0d 0a 09 09 43 4d 50 |.P_Strin|g....CMP|
|00000700| 09 46 43 42 46 4e 2c 53 | 70 61 63 65 09 09 3b 20 |.FCBFN,S|pace..; |
|00000710| 61 6e 79 74 68 69 6e 67 | 20 69 6e 20 66 63 62 3f |anything| in fcb?|
|00000720| 0d 0a 09 09 4a 4e 45 09 | 67 6f 74 5f 66 69 6c 65 |....JNE.|got_file|
|00000730| 09 09 3b 20 79 65 73 2c | 20 70 72 6f 63 65 65 64 |..; yes,| proceed|
|00000740| 0d 0a 09 09 4d 4f 56 09 | 44 49 2c 4f 66 66 73 65 |....MOV.|DI,Offse|
|00000750| 74 20 46 43 42 46 4e 09 | 09 3b 20 6e 6f 2c 20 66 |t FCBFN.|.; no, f|
|00000760| 69 6c 6c 20 77 69 74 68 | 20 27 3f 27 0d 0a 09 09 |ill with| '?'....|
|00000770| 4d 4f 56 09 43 58 2c 31 | 31 0d 0a 09 09 4d 4f 56 |MOV.CX,1|1....MOV|
|00000780| 09 41 4c 2c 27 3f 27 0d | 0a 09 09 52 45 50 09 53 |.AL,'?'.|...REP.S|
|00000790| 54 4f 53 42 0d 0a 67 6f | 74 5f 66 69 6c 65 3a 0d |TOSB..go|t_file:.|
|000007a0| 0a 09 09 4d 4f 56 09 46 | 43 42 45 58 2c 27 3f 27 |...MOV.F|CBEX,'?'|
|000007b0| 09 09 3b 20 77 65 20 77 | 61 6e 74 20 61 6c 6c 20 |..; we w|ant all |
|000007c0| 74 68 65 20 65 78 74 65 | 6e 74 73 0d 0a 09 09 4d |the exte|nts....M|
|000007d0| 4f 56 09 43 4c 2c 53 65 | 61 72 63 68 46 69 72 73 |OV.CL,Se|archFirs|
|000007e0| 74 0d 0a 4d 41 49 4e 30 | 32 3a 0d 0a 09 09 4d 4f |t..MAIN0|2:....MO|
|000007f0| 56 09 44 58 2c 4f 66 66 | 73 65 74 20 46 43 42 0d |V.DX,Off|set FCB.|
|00000800| 0a 09 09 43 41 4c 4c 09 | 42 44 4f 53 0d 0a 09 09 |...CALL.|BDOS....|
|00000810| 43 4d 50 09 41 4c 2c 30 | 46 46 48 0d 0a 09 09 4a |CMP.AL,0|FFH....J|
|00000820| 45 09 6c 69 73 74 5f 64 | 6f 6e 65 0d 0a 09 09 58 |E.list_d|one....X|
|00000830| 4f 52 09 41 48 2c 41 48 | 0d 0a 09 09 53 48 4c 09 |OR.AH,AH|....SHL.|
|00000840| 41 58 2c 31 09 09 09 3b | 20 74 69 6d 65 73 20 33 |AX,1...;| times 3|
|00000850| 32 0d 0a 09 09 53 48 4c | 09 41 58 2c 31 0d 0a 09 |2....SHL|.AX,1...|
|00000860| 09 53 48 4c 09 41 58 2c | 31 0d 0a 09 09 53 48 4c |.SHL.AX,|1....SHL|
|00000870| 09 41 58 2c 31 0d 0a 09 | 09 53 48 4c 09 41 58 2c |.AX,1...|.SHL.AX,|
|00000880| 31 0d 0a 09 09 4d 4f 56 | 09 53 49 2c 4f 66 66 73 |1....MOV|.SI,Offs|
|00000890| 65 74 20 42 55 46 46 09 | 09 3b 20 70 6c 75 73 20 |et BUFF.|.; plus |
|000008a0| 62 75 66 66 65 72 20 73 | 74 61 72 74 0d 0a 09 09 |buffer s|tart....|
|000008b0| 41 44 44 09 53 49 2c 41 | 58 09 09 09 3b 20 53 49 |ADD.SI,A|X...; SI|
|000008c0| 20 20 2d 2d 3e 20 46 49 | 4c 45 20 49 4e 46 4f 0d | --> FI|LE INFO.|
|000008d0| 0a 09 09 4d 4f 56 09 44 | 49 2c 4c 61 73 74 5f 45 |...MOV.D|I,Last_E|
|000008e0| 6e 74 72 79 0d 0a 09 09 | 4d 4f 56 09 42 58 2c 44 |ntry....|MOV.BX,D|
|000008f0| 49 09 09 09 3b 20 73 61 | 76 65 20 6c 6f 63 61 74 |I...; sa|ve locat|
|00000900| 69 6f 6e 20 69 6e 20 42 | 58 0d 0a 09 09 41 44 44 |ion in B|X....ADD|
|00000910| 09 44 49 2c 32 09 09 09 | 3b 20 61 6c 6c 6f 77 20 |.DI,2...|; allow |
|00000920| 66 6f 72 20 4e 65 78 74 | 20 66 69 65 6c 64 0d 0a |for Next| field..|
|00000930| 09 09 4d 4f 56 09 43 58 | 2c 45 6e 74 72 79 4c 65 |..MOV.CX|,EntryLe|
|00000940| 6e 67 74 68 2f 32 09 3b | 20 62 79 74 65 73 20 74 |ngth/2.;| bytes t|
|00000950| 6f 20 6d 6f 76 65 0d 0a | 09 09 52 45 50 09 4d 4f |o move..|..REP.MO|
|00000960| 56 53 57 09 09 09 3b 20 | 6d 6f 76 65 6d 0d 0a 09 |VSW...; |movem...|
|00000970| 09 4d 4f 56 09 4c 61 73 | 74 5f 45 6e 74 72 79 2c |.MOV.Las|t_Entry,|
|00000980| 44 49 09 09 3b 20 73 61 | 76 65 20 6e 65 77 20 73 |DI..; sa|ve new s|
|00000990| 74 61 72 74 69 6e 67 20 | 70 6c 61 63 65 0d 0a 09 |tarting |place...|
|000009a0| 09 4d 4f 56 09 53 49 2c | 42 58 09 09 09 3b 20 6e |.MOV.SI,|BX...; n|
|000009b0| 6f 77 20 53 49 20 2d 2d | 3e 20 6e 65 77 20 65 6e |ow SI --|> new en|
|000009c0| 74 72 79 0d 0a 09 09 43 | 41 4c 4c 09 49 6e 73 65 |try....C|ALL.Inse|
|000009d0| 72 74 5f 45 6e 74 72 79 | 0d 0a 09 09 4d 4f 56 09 |rt_Entry|....MOV.|
|000009e0| 43 4c 2c 53 65 61 72 63 | 68 4e 65 78 74 0d 0a 09 |CL,Searc|hNext...|
|000009f0| 09 4a 4d 50 53 09 4d 41 | 49 4e 30 32 0d 0a 6c 69 |.JMPS.MA|IN02..li|
|00000a00| 73 74 5f 64 6f 6e 65 3a | 0d 0a 09 09 43 4d 50 09 |st_done:|....CMP.|
|00000a10| 4c 69 73 74 5f 48 65 61 | 64 2c 30 09 09 3b 20 61 |List_Hea|d,0..; a|
|00000a20| 6e 79 74 68 69 6e 67 20 | 74 6f 20 64 69 73 70 6c |nything |to displ|
|00000a30| 61 79 0d 0a 09 09 4a 4e | 45 09 64 6f 5f 64 69 73 |ay....JN|E.do_dis|
|00000a40| 70 6c 61 79 09 09 3b 20 | 79 65 73 2c 20 67 6f 20 |play..; |yes, go |
|00000a50| 61 68 65 61 64 0d 0a 09 | 09 4d 4f 56 09 44 58 2c |ahead...|.MOV.DX,|
|00000a60| 4f 66 66 73 65 74 20 4e | 6f 46 69 6c 65 4d 73 67 |Offset N|oFileMsg|
|00000a70| 09 3b 20 6e 6f 70 65 2c | 20 74 65 6c 6c 20 27 65 |.; nope,| tell 'e|
|00000a80| 6d 20 61 6e 64 20 6c 65 | 61 76 65 0d 0a 09 09 43 |m and le|ave....C|
|00000a90| 41 4c 4c 09 50 5f 53 74 | 72 69 6e 67 0d 0a 09 09 |ALL.P_St|ring....|
|00000aa0| 4a 4d 50 53 09 4d 61 69 | 6e 5f 45 78 69 74 0d 0a |JMPS.Mai|n_Exit..|
|00000ab0| 64 6f 5f 64 69 73 70 6c | 61 79 3a 0d 0a 09 09 4d |do_displ|ay:....M|
|00000ac0| 4f 56 09 44 58 2c 4f 66 | 66 73 65 74 20 48 65 61 |OV.DX,Of|fset Hea|
|00000ad0| 64 65 72 0d 0a 09 09 43 | 41 4c 4c 09 50 5f 53 74 |der....C|ALL.P_St|
|00000ae0| 72 69 6e 67 0d 0a 09 09 | 43 41 4c 4c 09 44 69 73 |ring....|CALL.Dis|
|00000af0| 70 6c 61 79 5f 46 69 6c | 65 73 0d 0a 4d 61 69 6e |play_Fil|es..Main|
|00000b00| 5f 45 78 69 74 3a 0d 0a | 09 09 4d 4f 56 09 43 4c |_Exit:..|..MOV.CL|
|00000b10| 2c 30 0d 0a 09 09 4d 4f | 56 09 44 4c 2c 30 0d 0a |,0....MO|V.DL,0..|
|00000b20| 09 09 43 41 4c 4c 09 42 | 44 4f 53 0d 0a 3b 0d 0a |..CALL.B|DOS..;..|
|00000b30| 3b 09 53 49 20 2d 2d 3e | 20 4e 2c 20 74 68 65 20 |;.SI -->| N, the |
|00000b40| 6e 65 77 20 65 6e 74 72 | 79 3b 20 44 49 20 3d 20 |new entr|y; DI = |
|00000b50| 50 3b 20 42 58 20 3d 20 | 51 0d 0a 3b 0d 0a 49 6e |P; BX = |Q..;..In|
|00000b60| 73 65 72 74 5f 45 6e 74 | 72 79 3a 0d 0a 09 09 4d |sert_Ent|ry:....M|
|00000b70| 4f 56 09 44 49 2c 4f 66 | 66 73 65 74 20 4c 69 73 |OV.DI,Of|fset Lis|
|00000b80| 74 5f 48 65 61 64 09 3b | 20 50 20 3a 3d 20 61 64 |t_Head.;| P := ad|
|00000b90| 64 72 20 6f 66 20 4c 69 | 73 74 48 65 61 64 0d 0a |dr of Li|stHead..|
|00000ba0| 09 09 4d 4f 56 09 57 6f | 72 64 20 50 74 72 20 5b |..MOV.Wo|rd Ptr [|
|00000bb0| 53 49 5d 2c 30 09 09 3b | 20 4e 5e 2e 4e 65 78 74 |SI],0..;| N^.Next|
|00000bc0| 20 3a 3d 20 4e 49 4c 0d | 0a 53 74 6f 77 5f 52 65 | := NIL.|.Stow_Re|
|00000bd0| 70 65 61 74 3a 0d 0a 09 | 09 4d 4f 56 09 42 58 2c |peat:...|.MOV.BX,|
|00000be0| 5b 44 49 5d 09 09 09 3b | 20 51 20 3a 3d 20 50 5e |[DI]...;| Q := P^|
|00000bf0| 2e 4e 65 78 74 0d 0a 09 | 09 4f 52 09 42 58 2c 42 |.Next...|.OR.BX,B|
|00000c00| 58 09 09 09 3b 20 57 68 | 69 6c 65 20 51 20 3c 3e |X...; Wh|ile Q <>|
|00000c10| 20 4e 49 4c 0d 0a 09 09 | 4a 5a 09 53 74 6f 77 5f | NIL....|JZ.Stow_|
|00000c20| 55 6e 74 69 6c 0d 0a 09 | 09 43 41 4c 4c 09 43 6f |Until...|.CALL.Co|
|00000c30| 6d 70 61 72 65 4e 65 77 | 54 6f 4f 6c 64 0d 0a 09 |mpareNew|ToOld...|
|00000c40| 09 4a 42 09 53 74 6f 77 | 5f 4c 54 0d 0a 09 09 4d |.JB.Stow|_LT....M|
|00000c50| 4f 56 09 44 49 2c 42 58 | 09 09 09 3b 20 50 20 3a |OV.DI,BX|...; P :|
|00000c60| 3d 20 51 0d 0a 09 09 4a | 4d 50 53 09 53 74 6f 77 |= Q....J|MPS.Stow|
|00000c70| 5f 52 65 70 65 61 74 0d | 0a 53 74 6f 77 5f 4c 54 |_Repeat.|.Stow_LT|
|00000c80| 3a 0d 0a 09 09 4d 4f 56 | 09 5b 53 49 5d 2c 42 58 |:....MOV|.[SI],BX|
|00000c90| 09 09 09 3b 20 4e 5e 2e | 4e 65 78 74 20 3a 3d 20 |...; N^.|Next := |
|00000ca0| 51 0d 0a 53 74 6f 77 5f | 55 6e 74 69 6c 3a 0d 0a |Q..Stow_|Until:..|
|00000cb0| 09 09 4d 4f 56 09 5b 44 | 49 5d 2c 53 49 09 09 09 |..MOV.[D|I],SI...|
|00000cc0| 3b 20 50 5e 2e 4e 65 78 | 74 20 3a 3d 20 4e 0d 0a |; P^.Nex|t := N..|
|00000cd0| 09 09 52 45 54 0d 0a 3b | 0d 0a 43 6f 6d 70 61 72 |..RET..;|..Compar|
|00000ce0| 65 4e 65 77 54 6f 4f 6c | 64 3a 0d 0a 09 09 4d 4f |eNewToOl|d:....MO|
|00000cf0| 56 09 42 50 2c 42 58 09 | 09 3b 20 73 61 76 65 20 |V.BP,BX.|.; save |
|00000d00| 72 65 67 73 0d 0a 09 09 | 4d 4f 56 09 44 58 2c 53 |regs....|MOV.DX,S|
|00000d10| 49 0d 0a 09 09 41 44 44 | 09 42 58 2c 33 09 09 3b |I....ADD|.BX,3..;|
|00000d20| 20 70 6f 69 6e 74 20 74 | 6f 20 73 74 61 72 74 20 | point t|o start |
|00000d30| 6f 66 20 6e 61 6d 65 0d | 0a 09 09 41 44 44 09 53 |of name.|...ADD.S|
|00000d40| 49 2c 33 0d 0a 09 09 4d | 4f 56 09 43 58 2c 31 32 |I,3....M|OV.CX,12|
|00000d50| 09 09 3b 20 69 6e 63 6c | 75 64 65 73 20 74 68 65 |..; incl|udes the|
|00000d60| 20 65 78 74 65 6e 74 20 | 62 79 74 65 0d 0a 63 6d | extent |byte..cm|
|00000d70| 70 5f 6c 6f 6f 70 3a 0d | 0a 09 09 4c 4f 44 53 42 |p_loop:.|...LODSB|
|00000d80| 09 09 09 3b 20 67 65 74 | 20 62 79 74 65 20 66 72 |...; get| byte fr|
|00000d90| 6f 6d 20 6e 65 77 20 6e | 61 6d 65 0d 0a 09 09 41 |om new n|ame....A|
|00000da0| 4e 44 09 41 4c 2c 37 46 | 48 09 09 3b 20 73 74 72 |ND.AL,7F|H..; str|
|00000db0| 69 70 20 61 74 74 72 69 | 62 75 74 65 73 20 66 6f |ip attri|butes fo|
|00000dc0| 72 20 63 6f 6d 70 61 72 | 65 0d 0a 09 09 4d 4f 56 |r compar|e....MOV|
|00000dd0| 09 41 48 2c 5b 42 58 5d | 09 09 3b 20 67 65 74 20 |.AH,[BX]|..; get |
|00000de0| 62 79 74 65 20 66 72 6f | 6d 20 6f 6c 64 20 6e 61 |byte fro|m old na|
|00000df0| 6d 65 0d 0a 09 09 49 4e | 43 09 42 58 0d 0a 09 09 |me....IN|C.BX....|
|00000e00| 41 4e 44 09 41 48 2c 37 | 46 48 09 09 3b 20 73 74 |AND.AH,7|FH..; st|
|00000e10| 72 69 70 20 61 74 74 72 | 69 62 75 74 65 73 20 66 |rip attr|ibutes f|
|00000e20| 6f 72 20 63 6f 6d 70 61 | 72 65 0d 0a 09 09 43 4d |or compa|re....CM|
|00000e30| 50 09 41 4c 2c 41 48 09 | 09 3b 20 63 6f 6d 70 61 |P.AL,AH.|.; compa|
|00000e40| 72 65 20 6e 65 77 20 76 | 73 20 6f 6c 64 0d 0a 09 |re new v|s old...|
|00000e50| 09 4c 4f 4f 50 45 09 63 | 6d 70 5f 6c 6f 6f 70 09 |.LOOPE.c|mp_loop.|
|00000e60| 3b 20 6c 65 61 76 65 20 | 69 66 20 6e 6f 74 20 65 |; leave |if not e|
|00000e70| 71 75 61 6c 20 6f 72 20 | 43 58 20 3d 20 30 0d 0a |qual or |CX = 0..|
|00000e80| 09 09 4d 4f 56 09 42 58 | 2c 42 50 09 09 3b 20 72 |..MOV.BX|,BP..; r|
|00000e90| 65 73 74 6f 72 65 20 72 | 65 67 73 0d 0a 09 09 4d |estore r|egs....M|
|00000ea0| 4f 56 09 53 49 2c 44 58 | 0d 0a 09 09 52 45 54 0d |OV.SI,DX|....RET.|
|00000eb0| 0a 3b 0d 0a 44 69 73 70 | 6c 61 79 5f 46 69 6c 65 |.;..Disp|lay_File|
|00000ec0| 73 3a 0d 0a 09 09 4d 4f | 56 09 44 49 2c 4c 69 73 |s:....MO|V.DI,Lis|
|00000ed0| 74 5f 48 65 61 64 09 09 | 3b 20 50 20 3a 3d 20 4c |t_Head..|; P := L|
|00000ee0| 69 73 74 68 65 61 64 0d | 0a 77 5f 6c 6f 6f 70 3a |isthead.|.w_loop:|
|00000ef0| 0d 0a 09 09 4f 52 09 44 | 49 2c 44 49 09 09 09 3b |....OR.D|I,DI...;|
|00000f00| 20 77 68 69 6c 65 20 50 | 20 3c 3e 20 4e 49 4c 0d | while P| <> NIL.|
|00000f10| 0a 09 09 4a 4e 5a 09 77 | 5f 6e 6f 74 5f 64 6f 6e |...JNZ.w|_not_don|
|00000f20| 65 0d 0a 09 09 52 45 54 | 0d 0a 77 5f 6e 6f 74 5f |e....RET|..w_not_|
|00000f30| 64 6f 6e 65 3a 0d 0a 09 | 09 4c 45 41 09 53 49 2c |done:...|.LEA.SI,|
|00000f40| 32 5b 44 49 5d 09 09 3b | 20 53 49 20 2d 2d 3e 20 |2[DI]..;| SI --> |
|00000f50| 75 73 65 72 20 6e 75 6d | 62 65 72 0d 0a 09 09 4d |user num|ber....M|
|00000f60| 4f 56 09 42 58 2c 53 49 | 09 09 09 3b 20 73 61 76 |OV.BX,SI|...; sav|
|00000f70| 65 20 6c 6f 63 61 74 69 | 6f 6e 20 69 6e 20 42 58 |e locati|on in BX|
|00000f80| 0d 0a 09 09 43 41 4c 4c | 09 4e 61 6d 65 5f 42 72 |....CALL|.Name_Br|
|00000f90| 65 61 6b 09 09 3b 20 73 | 61 6d 65 20 6e 61 6d 65 |eak..; s|ame name|
|00000fa0| 3f 0d 0a 09 09 4a 4e 43 | 09 6e 65 77 5f 6e 61 6d |?....JNC|.new_nam|
|00000fb0| 65 09 09 3b 20 6e 6f 70 | 65 2c 20 70 72 69 6e 74 |e..; nop|e, print|
|00000fc0| 20 74 68 65 20 69 6e 66 | 6f 0d 0a 3b 0d 0a 09 09 | the inf|o..;....|
|00000fd0| 4d 4f 56 09 44 58 2c 4f | 66 66 73 65 74 20 53 70 |MOV.DX,O|ffset Sp|
|00000fe0| 61 63 65 32 38 09 3b 20 | 79 65 73 2c 20 73 70 61 |ace28.; |yes, spa|
|00000ff0| 63 65 20 66 69 6c 6c 20 | 6f 75 74 70 75 74 0d 0a |ce fill |output..|
|00001000| 09 09 43 41 4c 4c 09 50 | 5f 53 74 72 69 6e 67 0d |..CALL.P|_String.|
|00001010| 0a 09 09 4a 4d 50 53 09 | 73 74 61 72 74 5f 69 6e |...JMPS.|start_in|
|00001020| 66 6f 0d 0a 3b 0d 0a 6e | 65 77 5f 6e 61 6d 65 3a |fo..;..n|ew_name:|
|00001030| 0d 0a 09 09 43 41 4c 4c | 09 50 5f 53 70 61 63 65 |....CALL|.P_Space|
|00001040| 09 09 09 3b 20 69 6e 64 | 65 6e 74 20 6f 6e 65 0d |...; ind|ent one.|
|00001050| 0a 09 09 4c 4f 44 53 42 | 0d 0a 09 09 43 41 4c 4c |...LODSB|....CALL|
|00001060| 09 50 5f 48 65 78 09 09 | 09 3b 20 50 72 69 6e 74 |.P_Hex..|.; Print|
|00001070| 20 55 73 65 72 20 4e 75 | 6d 62 65 72 0d 0a 09 09 | User Nu|mber....|
|00001080| 43 41 4c 4c 09 50 5f 53 | 70 61 63 65 0d 0a 09 09 |CALL.P_S|pace....|
|00001090| 43 41 4c 4c 09 50 5f 53 | 70 61 63 65 0d 0a 09 09 |CALL.P_S|pace....|
|000010a0| 4d 4f 56 09 43 58 2c 38 | 0d 0a 64 6f 5f 6e 61 6d |MOV.CX,8|..do_nam|
|000010b0| 65 3a 0d 0a 09 09 4c 4f | 44 53 42 09 09 09 09 3b |e:....LO|DSB....;|
|000010c0| 20 50 72 69 6e 74 20 66 | 69 6c 65 20 6e 61 6d 65 | Print f|ile name|
|000010d0| 0d 0a 09 09 43 41 4c 4c | 09 50 5f 43 68 61 72 0d |....CALL|.P_Char.|
|000010e0| 0a 09 09 4c 4f 4f 50 09 | 64 6f 5f 6e 61 6d 65 0d |...LOOP.|do_name.|
|000010f0| 0a 09 09 4d 4f 56 09 41 | 4c 2c 27 2e 27 0d 0a 09 |...MOV.A|L,'.'...|
|00001100| 09 43 41 4c 4c 09 50 5f | 43 68 61 72 09 09 09 3b |.CALL.P_|Char...;|
|00001110| 20 50 72 69 6e 74 20 66 | 69 6c 65 20 65 78 74 65 | Print f|ile exte|
|00001120| 6e 73 69 6f 6e 0d 0a 09 | 09 4d 4f 56 09 43 58 2c |nsion...|.MOV.CX,|
|00001130| 33 0d 0a 64 6f 5f 65 78 | 74 3a 0d 0a 09 09 4c 4f |3..do_ex|t:....LO|
|00001140| 44 53 42 0d 0a 09 09 43 | 41 4c 4c 09 50 5f 43 68 |DSB....C|ALL.P_Ch|
|00001150| 61 72 0d 0a 09 09 4c 4f | 4f 50 09 64 6f 5f 65 78 |ar....LO|OP.do_ex|
|00001160| 74 0d 0a 09 09 43 41 4c | 4c 09 50 5f 53 70 61 63 |t....CAL|L.P_Spac|
|00001170| 65 0d 0a 09 09 4c 45 41 | 09 53 49 2c 46 5f 54 79 |e....LEA|.SI,F_Ty|
|00001180| 70 65 5b 42 58 5d 09 09 | 3b 20 70 6f 73 69 74 69 |pe[BX]..|; positi|
|00001190| 6f 6e 20 74 6f 20 65 78 | 74 65 6e 73 69 6f 6e 0d |on to ex|tension.|
|000011a0| 0a 09 09 4d 4f 56 09 43 | 58 2c 33 09 09 09 3b 20 |...MOV.C|X,3...; |
|000011b0| 33 20 63 68 61 72 73 20 | 74 6f 20 70 72 6f 63 65 |3 chars |to proce|
|000011c0| 73 73 0d 0a 64 6f 5f 61 | 74 74 72 3a 0d 0a 09 09 |ss..do_a|ttr:....|
|000011d0| 43 41 4c 4c 09 50 5f 53 | 70 61 63 65 0d 0a 09 09 |CALL.P_S|pace....|
|000011e0| 4c 4f 44 53 42 0d 0a 09 | 09 54 45 53 54 09 41 4c |LODSB...|.TEST.AL|
|000011f0| 2c 38 30 48 09 09 09 3b | 20 53 59 53 2c 20 52 2f |,80H...;| SYS, R/|
|00001200| 4f 2c 20 26 20 41 72 63 | 68 69 76 65 20 62 69 74 |O, & Arc|hive bit|
|00001210| 73 0d 0a 09 09 4d 4f 56 | 09 41 4c 2c 4f 4e 09 09 |s....MOV|.AL,ON..|
|00001220| 09 3b 20 61 73 73 75 6d | 65 20 6f 6e 0d 0a 09 09 |.; assum|e on....|
|00001230| 4a 4e 5a 09 69 74 73 5f | 6f 6e 0d 0a 09 09 4d 4f |JNZ.its_|on....MO|
|00001240| 56 09 41 4c 2c 4f 46 46 | 09 09 09 3b 20 69 74 27 |V.AL,OFF|...; it'|
|00001250| 73 20 6f 66 66 2c 20 73 | 65 6e 64 20 61 20 7a 65 |s off, s|end a ze|
|00001260| 72 6f 0d 0a 69 74 73 5f | 6f 6e 3a 0d 0a 09 09 43 |ro..its_|on:....C|
|00001270| 41 4c 4c 09 50 5f 43 68 | 61 72 0d 0a 09 09 43 41 |ALL.P_Ch|ar....CA|
|00001280| 4c 4c 09 50 5f 53 70 61 | 63 65 0d 0a 09 09 4c 4f |LL.P_Spa|ce....LO|
|00001290| 4f 50 09 64 6f 5f 61 74 | 74 72 0d 0a 09 09 43 41 |OP.do_at|tr....CA|
|000012a0| 4c 4c 09 50 5f 53 70 61 | 63 65 0d 0a 73 74 61 72 |LL.P_Spa|ce..star|
|000012b0| 74 5f 69 6e 66 6f 3a 0d | 0a 09 09 4d 4f 56 09 41 |t_info:.|...MOV.A|
|000012c0| 4c 2c 45 78 74 65 6e 74 | 5b 42 58 5d 09 09 3b 20 |L,Extent|[BX]..; |
|000012d0| 50 72 69 6e 74 20 65 78 | 74 20 62 79 74 65 0d 0a |Print ex|t byte..|
|000012e0| 09 09 43 41 4c 4c 09 50 | 5f 48 65 78 0d 0a 09 09 |..CALL.P|_Hex....|
|000012f0| 43 41 4c 4c 09 50 5f 53 | 70 61 63 65 0d 0a 09 09 |CALL.P_S|pace....|
|00001300| 4d 4f 56 09 41 4c 2c 52 | 65 63 6f 72 64 43 6f 75 |MOV.AL,R|ecordCou|
|00001310| 6e 74 5b 42 58 5d 09 3b | 20 61 6e 64 20 52 43 20 |nt[BX].;| and RC |
|00001320| 62 79 74 65 0d 0a 09 09 | 43 41 4c 4c 09 50 5f 48 |byte....|CALL.P_H|
|00001330| 65 78 0d 0a 09 09 4d 4f | 56 09 44 58 2c 4f 66 66 |ex....MO|V.DX,Off|
|00001340| 73 65 74 20 53 70 61 63 | 65 33 0d 0a 09 09 43 41 |set Spac|e3....CA|
|00001350| 4c 4c 09 50 5f 53 74 72 | 69 6e 67 0d 0a 09 09 4c |LL.P_Str|ing....L|
|00001360| 45 41 09 53 49 2c 44 61 | 74 61 4d 61 70 5b 42 58 |EA.SI,Da|taMap[BX|
|00001370| 5d 0d 0a 09 09 4d 4f 56 | 09 43 58 2c 38 09 09 09 |]....MOV|.CX,8...|
|00001380| 3b 20 61 6e 64 20 74 68 | 65 20 64 61 74 61 20 6d |; and th|e data m|
|00001390| 61 70 0d 0a 64 6f 5f 6d | 61 70 3a 0d 0a 09 09 4c |ap..do_m|ap:....L|
|000013a0| 4f 44 53 57 0d 0a 09 09 | 4f 52 09 41 58 2c 41 58 |ODSW....|OR.AX,AX|
|000013b0| 09 09 09 3b 20 61 6c 6c | 20 7a 65 72 6f 73 3f 0d |...; all| zeros?.|
|000013c0| 0a 09 09 4a 4e 45 09 73 | 65 6e 64 5f 69 74 09 09 |...JNE.s|end_it..|
|000013d0| 09 3b 20 6e 6f 70 65 2c | 20 70 72 69 6e 74 20 68 |.; nope,| print h|
|000013e0| 65 78 0d 0a 09 09 4d 4f | 56 09 44 58 2c 4f 66 66 |ex....MO|V.DX,Off|
|000013f0| 73 65 74 20 53 70 61 63 | 65 34 09 3b 20 79 65 73 |set Spac|e4.; yes|
|00001400| 2c 20 73 65 6e 64 20 34 | 20 62 6c 61 6e 6b 73 0d |, send 4| blanks.|
|00001410| 0a 09 09 43 41 4c 4c 09 | 50 5f 53 74 72 69 6e 67 |...CALL.|P_String|
|00001420| 0d 0a 09 09 4a 4d 50 53 | 09 6e 65 78 74 0d 0a 73 |....JMPS|.next..s|
|00001430| 65 6e 64 5f 69 74 3a 0d | 0a 09 09 43 41 4c 4c 09 |end_it:.|...CALL.|
|00001440| 50 5f 48 65 78 5f 57 6f | 72 64 0d 0a 6e 65 78 74 |P_Hex_Wo|rd..next|
|00001450| 3a 0d 0a 09 09 43 41 4c | 4c 09 50 5f 53 70 61 63 |:....CAL|L.P_Spac|
|00001460| 65 0d 0a 09 09 4c 4f 4f | 50 09 64 6f 5f 6d 61 70 |e....LOO|P.do_map|
|00001470| 0d 0a 09 09 4d 4f 56 09 | 44 49 2c 5b 44 49 5d 09 |....MOV.|DI,[DI].|
|00001480| 09 09 3b 20 50 20 3a 3d | 20 50 5e 2e 4e 65 78 74 |..; P :=| P^.Next|
|00001490| 0d 0a 09 09 43 41 4c 4c | 09 43 52 4c 46 09 09 09 |....CALL|.CRLF...|
|000014a0| 3b 20 6e 65 77 20 6c 69 | 6e 65 0d 0a 09 09 4a 4d |; new li|ne....JM|
|000014b0| 50 09 77 5f 6c 6f 6f 70 | 09 09 09 3b 20 61 6e 64 |P.w_loop|...; and|
|000014c0| 20 62 61 63 6b 20 66 6f | 72 20 6d 6f 72 65 0d 0a | back fo|r more..|
|000014d0| 09 09 52 45 54 0d 0a 3b | 0d 0a 4e 61 6d 65 5f 42 |..RET..;|..Name_B|
|000014e0| 72 65 61 6b 3a 0d 0a 09 | 09 50 55 53 48 09 43 58 |reak:...|.PUSH.CX|
|000014f0| 0d 0a 09 09 50 55 53 48 | 09 53 49 0d 0a 09 09 50 |....PUSH|.SI....P|
|00001500| 55 53 48 09 44 49 0d 0a | 09 09 4d 4f 56 09 44 49 |USH.DI..|..MOV.DI|
|00001510| 2c 4f 66 66 73 65 74 20 | 43 75 72 72 65 6e 74 5f |,Offset |Current_|
|00001520| 4e 61 6d 65 09 3b 20 6c | 61 73 74 20 66 69 6c 65 |Name.; l|ast file|
|00001530| 6e 61 6d 65 20 64 69 73 | 70 6c 61 79 65 64 0d 0a |name dis|played..|
|00001540| 09 09 4c 45 41 09 53 49 | 2c 31 5b 42 58 5d 09 09 |..LEA.SI|,1[BX]..|
|00001550| 3b 20 74 68 69 73 20 66 | 69 6c 65 6e 61 6d 65 0d |; this f|ilename.|
|00001560| 0a 09 09 4d 4f 56 09 43 | 58 2c 31 31 0d 0a 09 09 |...MOV.C|X,11....|
|00001570| 52 45 50 45 09 43 4d 50 | 53 42 0d 0a 09 09 4a 45 |REPE.CMP|SB....JE|
|00001580| 09 73 61 6d 65 5f 6e 61 | 6d 65 09 09 3b 20 72 65 |.same_na|me..; re|
|00001590| 74 75 72 6e 20 43 46 20 | 73 65 74 20 69 66 20 65 |turn CF |set if e|
|000015a0| 71 75 61 6c 0d 0a 09 09 | 4d 4f 56 09 44 49 2c 4f |qual....|MOV.DI,O|
|000015b0| 66 66 73 65 74 20 43 75 | 72 72 65 6e 74 5f 4e 61 |ffset Cu|rrent_Na|
|000015c0| 6d 65 09 3b 20 6e 65 77 | 20 6e 61 6d 65 2c 20 73 |me.; new| name, s|
|000015d0| 61 76 65 20 69 74 0d 0a | 09 09 4c 45 41 09 53 49 |ave it..|..LEA.SI|
|000015e0| 2c 31 5b 42 58 5d 09 09 | 3b 20 61 6e 64 20 72 65 |,1[BX]..|; and re|
|000015f0| 74 75 72 6e 20 43 46 20 | 63 6c 65 61 72 0d 0a 09 |turn CF |clear...|
|00001600| 09 4d 4f 56 09 43 58 2c | 31 31 0d 0a 09 09 52 45 |.MOV.CX,|11....RE|
|00001610| 50 09 4d 4f 56 53 42 0d | 0a 09 09 50 4f 50 09 44 |P.MOVSB.|...POP.D|
|00001620| 49 0d 0a 09 09 50 4f 50 | 09 53 49 0d 0a 09 09 50 |I....POP|.SI....P|
|00001630| 4f 50 09 43 58 0d 0a 09 | 09 43 4c 43 0d 0a 09 09 |OP.CX...|.CLC....|
|00001640| 52 45 54 0d 0a 73 61 6d | 65 5f 6e 61 6d 65 3a 0d |RET..sam|e_name:.|
|00001650| 0a 09 09 50 4f 50 09 44 | 49 0d 0a 09 09 50 4f 50 |...POP.D|I....POP|
|00001660| 09 53 49 0d 0a 09 09 50 | 4f 50 09 43 58 0d 0a 09 |.SI....P|OP.CX...|
|00001670| 09 53 54 43 0d 0a 09 09 | 52 45 54 0d 0a 3b 0d 0a |.STC....|RET..;..|
|00001680| 3b 09 53 59 53 54 45 4d | 20 53 55 42 52 4f 55 54 |;.SYSTEM| SUBROUT|
|00001690| 49 4e 45 53 0d 0a 3b 0d | 0a 50 5f 53 74 72 69 6e |INES..;.|.P_Strin|
|000016a0| 67 3a 0d 0a 09 09 50 55 | 53 48 09 42 58 0d 0a 09 |g:....PU|SH.BX...|
|000016b0| 09 50 55 53 48 09 43 58 | 0d 0a 09 09 50 55 53 48 |.PUSH.CX|....PUSH|
|000016c0| 09 44 58 0d 0a 09 09 4d | 4f 56 09 43 4c 2c 50 72 |.DX....M|OV.CL,Pr|
|000016d0| 69 6e 74 43 6f 6e 42 75 | 66 0d 0a 09 09 43 41 4c |intConBu|f....CAL|
|000016e0| 4c 09 42 44 4f 53 0d 0a | 09 09 50 4f 50 09 44 58 |L.BDOS..|..POP.DX|
|000016f0| 0d 0a 09 09 50 4f 50 09 | 43 58 0d 0a 09 09 50 4f |....POP.|CX....PO|
|00001700| 50 09 42 58 0d 0a 09 09 | 52 45 54 0d 0a 3b 0d 0a |P.BX....|RET..;..|
|00001710| 50 5f 43 68 61 72 3a 0d | 0a 09 09 50 55 53 48 09 |P_Char:.|...PUSH.|
|00001720| 41 58 0d 0a 09 09 50 55 | 53 48 09 43 58 0d 0a 09 |AX....PU|SH.CX...|
|00001730| 09 50 55 53 48 09 44 58 | 0d 0a 09 09 50 55 53 48 |.PUSH.DX|....PUSH|
|00001740| 09 42 58 0d 0a 09 09 4d | 4f 56 09 43 4c 2c 43 6f |.BX....M|OV.CL,Co|
|00001750| 6e 4f 75 74 0d 0a 09 09 | 4d 4f 56 09 44 4c 2c 41 |nOut....|MOV.DL,A|
|00001760| 4c 0d 0a 09 09 41 4e 44 | 09 44 4c 2c 37 46 48 09 |L....AND|.DL,7FH.|
|00001770| 09 3b 20 73 74 72 69 70 | 20 70 61 72 69 74 79 0d |.; strip| parity.|
|00001780| 0a 09 09 43 41 4c 4c 09 | 42 44 4f 53 0d 0a 09 09 |...CALL.|BDOS....|
|00001790| 50 4f 50 09 42 58 0d 0a | 09 09 50 4f 50 09 44 58 |POP.BX..|..POP.DX|
|000017a0| 0d 0a 09 09 50 4f 50 09 | 43 58 0d 0a 09 09 50 4f |....POP.|CX....PO|
|000017b0| 50 09 41 58 0d 0a 09 09 | 52 45 54 0d 0a 3b 0d 0a |P.AX....|RET..;..|
|000017c0| 50 5f 48 65 78 5f 57 6f | 72 64 3a 0d 0a 09 09 58 |P_Hex_Wo|rd:....X|
|000017d0| 43 48 47 09 41 4c 2c 41 | 48 09 09 09 3b 20 64 6f |CHG.AL,A|H...; do|
|000017e0| 20 6d 73 62 20 66 69 72 | 73 74 0d 0a 09 09 43 41 | msb fir|st....CA|
|000017f0| 4c 4c 09 50 5f 48 65 78 | 0d 0a 09 09 58 43 48 47 |LL.P_Hex|....XCHG|
|00001800| 09 41 48 2c 41 4c 09 09 | 09 3b 20 74 68 65 6e 20 |.AH,AL..|.; then |
|00001810| 6c 73 62 0d 0a 09 09 43 | 41 4c 4c 09 50 5f 48 65 |lsb....C|ALL.P_He|
|00001820| 78 0d 0a 09 09 52 45 54 | 0d 0a 3b 0d 0a 50 5f 48 |x....RET|..;..P_H|
|00001830| 65 78 3a 0d 0a 09 09 50 | 55 53 48 09 41 58 0d 0a |ex:....P|USH.AX..|
|00001840| 09 09 50 55 53 48 09 42 | 58 0d 0a 09 09 50 55 53 |..PUSH.B|X....PUS|
|00001850| 48 09 43 58 0d 0a 09 09 | 4d 4f 56 09 42 58 2c 4f |H.CX....|MOV.BX,O|
|00001860| 66 66 73 65 74 20 48 65 | 78 54 61 62 6c 65 0d 0a |ffset He|xTable..|
|00001870| 09 09 4d 4f 56 09 41 48 | 2c 41 4c 09 09 09 3b 20 |..MOV.AH|,AL...; |
|00001880| 73 61 76 65 20 6f 75 72 | 20 62 79 74 65 0d 0a 09 |save our| byte...|
|00001890| 09 4d 4f 56 09 43 4c 2c | 34 09 09 09 3b 20 64 6f |.MOV.CL,|4...; do|
|000018a0| 20 68 69 67 68 20 6e 69 | 62 62 6c 65 0d 0a 09 09 | high ni|bble....|
|000018b0| 53 48 52 09 41 4c 2c 43 | 4c 0d 0a 09 09 58 4c 41 |SHR.AL,C|L....XLA|
|000018c0| 54 09 42 58 09 09 09 3b | 20 67 65 74 20 68 65 78 |T.BX...;| get hex|
|000018d0| 20 64 69 67 69 74 0d 0a | 09 09 43 41 4c 4c 09 50 | digit..|..CALL.P|
|000018e0| 5f 43 68 61 72 0d 0a 09 | 09 4d 4f 56 09 41 4c 2c |_Char...|.MOV.AL,|
|000018f0| 41 48 09 09 09 3b 20 67 | 65 74 20 6f 75 72 20 62 |AH...; g|et our b|
|00001900| 79 74 65 20 62 61 63 6b | 0d 0a 09 09 41 4e 44 09 |yte back|....AND.|
|00001910| 41 4c 2c 30 46 48 09 09 | 09 3b 20 64 6f 20 6c 6f |AL,0FH..|.; do lo|
|00001920| 77 20 6e 69 62 62 6c 65 | 0d 0a 09 09 58 4c 41 54 |w nibble|....XLAT|
|00001930| 09 42 58 09 09 09 3b 20 | 67 65 74 20 68 65 78 20 |.BX...; |get hex |
|00001940| 64 69 67 69 74 0d 0a 09 | 09 43 41 4c 4c 09 50 5f |digit...|.CALL.P_|
|00001950| 43 68 61 72 0d 0a 09 09 | 50 4f 50 09 43 58 0d 0a |Char....|POP.CX..|
|00001960| 09 09 50 4f 50 09 42 58 | 0d 0a 09 09 50 4f 50 09 |..POP.BX|....POP.|
|00001970| 41 58 0d 0a 09 09 52 45 | 54 0d 0a 3b 0d 0a 43 52 |AX....RE|T..;..CR|
|00001980| 4c 46 3a 0d 0a 09 09 50 | 55 53 48 09 41 58 0d 0a |LF:....P|USH.AX..|
|00001990| 09 09 4d 4f 56 09 41 4c | 2c 43 52 0d 0a 09 09 43 |..MOV.AL|,CR....C|
|000019a0| 41 4c 4c 09 50 5f 43 68 | 61 72 0d 0a 09 09 4d 4f |ALL.P_Ch|ar....MO|
|000019b0| 56 09 41 4c 2c 4c 46 0d | 0a 09 09 43 41 4c 4c 09 |V.AL,LF.|...CALL.|
|000019c0| 50 5f 43 68 61 72 0d 0a | 09 09 50 4f 50 09 41 58 |P_Char..|..POP.AX|
|000019d0| 0d 0a 09 09 52 45 54 0d | 0a 3b 0d 0a 50 5f 53 70 |....RET.|.;..P_Sp|
|000019e0| 61 63 65 3a 0d 0a 09 09 | 50 55 53 48 09 41 58 0d |ace:....|PUSH.AX.|
|000019f0| 0a 09 09 4d 4f 56 09 41 | 4c 2c 53 70 61 63 65 0d |...MOV.A|L,Space.|
|00001a00| 0a 09 09 43 41 4c 4c 09 | 50 5f 43 68 61 72 0d 0a |...CALL.|P_Char..|
|00001a10| 09 09 50 4f 50 09 41 58 | 0d 0a 09 09 52 45 54 0d |..POP.AX|....RET.|
|00001a20| 0a 3b 0d 0a 42 44 4f 53 | 3a 0d 0a 09 09 50 55 53 |.;..BDOS|:....PUS|
|00001a30| 48 09 45 53 0d 0a 09 09 | 49 4e 54 09 32 32 34 0d |H.ES....|INT.224.|
|00001a40| 0a 09 09 50 4f 50 09 45 | 53 0d 0a 09 09 52 45 54 |...POP.E|S....RET|
|00001a50| 0d 0a 09 49 46 20 28 4f | 66 66 73 65 74 20 24 20 |...IF (O|ffset $ |
|00001a60| 2d 20 4f 66 66 73 65 74 | 20 46 52 41 47 29 20 4d |- Offset| FRAG) M|
|00001a70| 4f 44 20 31 30 20 45 51 | 20 31 0d 0a 09 09 4e 4f |OD 10 EQ| 1....NO|
|00001a80| 50 0d 0a 09 45 4e 44 49 | 46 0d 0a 3b 0d 0a 09 09 |P...ENDI|F..;....|
|00001a90| 44 53 45 47 0d 0a 3b 0d | 0a 42 41 53 45 50 41 47 |DSEG..;.|.BASEPAG|
|00001aa0| 45 09 45 51 55 09 24 0d | 0a 09 09 52 42 09 35 43 |E.EQU.$.|...RB.5C|
|00001ab0| 48 0d 0a 46 43 42 09 09 | 45 51 55 09 24 09 09 3b |H..FCB..|EQU.$..;|
|00001ac0| 20 64 65 66 61 75 6c 74 | 20 66 63 62 0d 0a 46 43 | default| fcb..FC|
|00001ad0| 42 44 4e 09 09 52 42 09 | 31 0d 0a 46 43 42 46 4e |BDN..RB.|1..FCBFN|
|00001ae0| 09 09 52 42 09 38 0d 0a | 46 43 42 46 54 09 09 52 |..RB.8..|FCBFT..R|
|00001af0| 42 09 31 0d 0a 46 43 42 | 51 09 09 52 42 09 31 0d |B.1..FCB|Q..RB.1.|
|00001b00| 0a 09 09 52 42 09 31 0d | 0a 46 43 42 45 58 09 09 |...RB.1.|.FCBEX..|
|00001b10| 52 42 09 31 0d 0a 46 43 | 42 53 31 09 09 52 42 09 |RB.1..FC|BS1..RB.|
|00001b20| 31 0d 0a 46 43 42 53 32 | 09 09 52 42 09 31 0d 0a |1..FCBS2|..RB.1..|
|00001b30| 46 43 42 52 43 09 09 52 | 42 09 31 0d 0a 46 43 42 |FCBRC..R|B.1..FCB|
|00001b40| 32 09 09 45 51 55 09 24 | 09 09 3b 20 73 65 63 6f |2..EQU.$|..; seco|
|00001b50| 6e 64 20 66 63 62 0d 0a | 46 43 42 32 44 4e 09 09 |nd fcb..|FCB2DN..|
|00001b60| 52 42 09 31 0d 0a 46 43 | 42 32 46 4e 09 09 52 42 |RB.1..FC|B2FN..RB|
|00001b70| 09 38 0d 0a 46 43 42 32 | 46 54 09 09 52 42 09 33 |.8..FCB2|FT..RB.3|
|00001b80| 0d 0a 09 09 52 42 09 34 | 0d 0a 46 43 42 43 52 09 |....RB.4|..FCBCR.|
|00001b90| 09 52 42 09 31 0d 0a 46 | 43 42 52 4e 4f 09 09 52 |.RB.1..F|CBRNO..R|
|00001ba0| 57 09 31 0d 0a 46 43 42 | 52 32 09 09 52 42 09 31 |W.1..FCB|R2..RB.1|
|00001bb0| 0d 0a 42 55 46 46 09 09 | 52 42 09 38 30 48 09 09 |..BUFF..|RB.80H..|
|00001bc0| 3b 20 64 65 66 61 75 6c | 74 20 62 75 66 66 65 72 |; defaul|t buffer|
|00001bd0| 0d 0a 3b 0d 0a 3b 09 69 | 6e 69 74 69 61 6c 69 7a |..;..;.i|nitializ|
|00001be0| 65 64 20 64 61 74 61 0d | 0a 3b 0d 0a 09 09 44 42 |ed data.|.;....DB|
|00001bf0| 09 27 28 63 29 20 31 39 | 38 34 20 43 68 61 72 6c |.'(c) 19|84 Charl|
|00001c00| 69 65 20 47 6f 64 65 74 | 2d 43 65 72 61 6f 6c 6f |ie Godet|-Ceraolo|
|00001c10| 27 0d 0a 53 69 67 6e 4f | 6e 09 09 44 42 09 27 46 |'..SignO|n..DB.'F|
|00001c20| 72 61 67 38 36 20 76 27 | 0d 0a 09 09 44 42 09 28 |rag86 v'|....DB.(|
|00001c30| 52 65 6c 65 61 73 65 20 | 4d 4f 44 20 31 30 29 20 |Release |MOD 10) |
|00001c40| 2b 20 41 73 63 69 69 5f | 5a 65 72 6f 2c 27 2e 27 |+ Ascii_|Zero,'.'|
|00001c50| 0d 0a 09 09 44 42 09 28 | 56 65 72 73 69 6f 6e 20 |....DB.(|Version |
|00001c60| 2f 20 31 30 29 20 2b 20 | 41 73 63 69 69 5f 5a 65 |/ 10) + |Ascii_Ze|
|00001c70| 72 6f 0d 0a 09 09 44 42 | 09 28 56 65 72 73 69 6f |ro....DB|.(Versio|
|00001c80| 6e 20 4d 4f 44 20 31 30 | 29 20 2b 20 41 73 63 69 |n MOD 10|) + Asci|
|00001c90| 69 5f 5a 65 72 6f 0d 0a | 09 09 44 42 09 43 52 2c |i_Zero..|..DB.CR,|
|00001ca0| 4c 46 2c 45 4f 53 0d 0a | 4e 6f 46 69 6c 65 4d 73 |LF,EOS..|NoFileMs|
|00001cb0| 67 09 44 42 09 43 52 2c | 4c 46 2c 27 4e 6f 20 46 |g.DB.CR,|LF,'No F|
|00001cc0| 69 6c 65 28 73 29 20 66 | 6f 75 6e 64 27 2c 43 52 |ile(s) f|ound',CR|
|00001cd0| 2c 4c 46 2c 45 4f 53 0d | 0a 48 65 61 64 65 72 09 |,LF,EOS.|.Header.|
|00001ce0| 09 44 42 09 27 55 73 65 | 72 20 46 69 6c 65 6e 61 |.DB.'Use|r Filena|
|00001cf0| 6d 65 20 20 20 20 20 52 | 2f 4f 53 79 73 41 72 63 |me R|/OSysArc|
|00001d00| 20 65 78 20 72 63 27 0d | 0a 09 09 44 42 09 27 20 | ex rc'.|...DB.' |
|00001d10| 20 20 3c 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | <-----|--------|
|00001d20| 2d 47 72 6f 75 70 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |-Group--|--------|
|00001d30| 2d 2d 2d 2d 3e 27 0d 0a | 09 09 44 42 09 43 52 2c |---->'..|..DB.CR,|
|00001d40| 4c 46 0d 0a 09 09 44 42 | 09 27 3d 3d 3d 3d 3d 3d |LF....DB|.'======|
|00001d50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001d60| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001d70| 3d 3d 3d 27 0d 0a 09 09 | 44 42 09 27 3d 3d 3d 3d |==='....|DB.'====|
|00001d80| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001d90| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001da0| 27 0d 0a 09 09 44 42 09 | 43 52 2c 4c 46 2c 45 4f |'....DB.|CR,LF,EO|
|00001db0| 53 0d 0a 48 65 78 54 61 | 62 6c 65 09 44 42 09 27 |S..HexTa|ble.DB.'|
|00001dc0| 30 31 32 33 34 35 36 37 | 38 39 41 42 43 44 45 46 |01234567|89ABCDEF|
|00001dd0| 27 0d 0a 43 75 72 72 65 | 6e 74 5f 4e 61 6d 65 09 |'..Curre|nt_Name.|
|00001de0| 44 42 09 27 20 20 20 20 | 20 20 20 20 20 20 20 27 |DB.' | '|
|00001df0| 09 09 3b 20 73 74 6f 72 | 65 20 6c 61 73 74 20 66 |..; stor|e last f|
|00001e00| 69 6c 65 20 70 72 69 6e | 74 65 64 0d 0a 53 70 61 |ile prin|ted..Spa|
|00001e10| 63 65 32 38 09 09 44 42 | 09 27 20 20 20 20 20 20 |ce28..DB|.' |
|00001e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e30| 20 20 20 20 20 20 27 2c | 45 4f 53 0d 0a 53 70 61 | ',|EOS..Spa|
|00001e40| 63 65 34 09 09 44 42 09 | 27 20 20 20 20 27 2c 45 |ce4..DB.|' ',E|
|00001e50| 4f 53 0d 0a 53 70 61 63 | 65 33 09 09 44 42 09 27 |OS..Spac|e3..DB.'|
|00001e60| 20 20 20 27 2c 45 4f 53 | 0d 0a 09 49 46 20 28 4f | ',EOS|...IF (O|
|00001e70| 66 66 73 65 74 20 24 20 | 2d 20 4f 66 66 73 65 74 |ffset $ |- Offset|
|00001e80| 20 42 41 53 45 50 41 47 | 45 29 20 4d 4f 44 20 32 | BASEPAG|E) MOD 2|
|00001e90| 20 4e 45 20 30 0d 0a 09 | 09 52 42 09 31 0d 0a 09 | NE 0...|.RB.1...|
|00001ea0| 45 4e 44 49 46 0d 0a 4c | 69 73 74 5f 48 65 61 64 |ENDIF..L|ist_Head|
|00001eb0| 09 44 57 09 30 0d 0a 4c | 61 73 74 5f 45 6e 74 72 |.DW.0..L|ast_Entr|
|00001ec0| 79 09 44 57 09 4f 66 66 | 73 65 74 20 44 69 72 5f |y.DW.Off|set Dir_|
|00001ed0| 41 72 72 61 79 0d 0a 3b | 0d 0a 3b 09 75 6e 69 6e |Array..;|..;.unin|
|00001ee0| 69 74 69 61 6c 69 7a 65 | 64 20 64 61 74 61 0d 0a |itialize|d data..|
|00001ef0| 3b 0d 0a 09 49 46 20 28 | 4f 66 66 73 65 74 20 24 |;...IF (|Offset $|
|00001f00| 20 2d 20 4f 66 66 73 65 | 74 20 42 41 53 45 50 41 | - Offse|t BASEPA|
|00001f10| 47 45 29 20 4d 4f 44 20 | 32 20 4e 45 20 30 0d 0a |GE) MOD |2 NE 0..|
|00001f20| 09 09 52 42 09 31 0d 0a | 09 45 4e 44 49 46 0d 0a |..RB.1..|.ENDIF..|
|00001f30| 09 09 52 53 09 31 32 38 | 0d 0a 4c 6f 63 61 6c 5f |..RS.128|..Local_|
|00001f40| 53 74 61 63 6b 09 45 51 | 55 09 24 0d 0a 44 69 72 |Stack.EQ|U.$..Dir|
|00001f50| 5f 41 72 72 61 79 09 52 | 53 09 32 35 36 20 2a 20 |_Array.R|S.256 * |
|00001f60| 45 6e 74 72 79 4c 65 6e | 67 74 68 0d 0a 4d 69 6e |EntryLen|gth..Min|
|00001f70| 5f 44 61 74 61 09 45 51 | 55 09 28 4f 66 66 73 65 |_Data.EQ|U.(Offse|
|00001f80| 74 20 24 20 2d 20 4f 66 | 66 73 65 74 20 42 41 53 |t $ - Of|fset BAS|
|00001f90| 45 50 41 47 45 29 20 2f | 20 31 36 09 3b 20 66 6f |EPAGE) /| 16.; fo|
|00001fa0| 72 20 67 65 6e 63 6d 64 | 0d 0a 3b 0d 0a 09 45 4e |r gencmd|..;...EN|
|00001fb0| 44 0d 0a 3b 0d 0a 52 65 | 76 65 72 73 65 3a 0d 0a |D..;..Re|verse:..|
|00001fc0| 09 09 4d 4f 56 09 44 49 | 2c 30 0d 0a 09 09 4d 4f |..MOV.DI|,0....MO|
|00001fd0| 56 09 42 58 2c 4c 69 73 | 74 5f 48 65 61 64 0d 0a |V.BX,Lis|t_Head..|
|00001fe0| 09 09 4f 52 09 42 58 2c | 42 58 0d 0a 09 09 4a 5a |..OR.BX,|BX....JZ|
|00001ff0| 09 52 65 76 65 72 73 65 | 5f 64 6f 6e 65 0d 0a 52 |.Reverse|_done..R|
|00002000| 65 76 65 72 73 65 5f 6c | 6f 6f 70 3a 0d 0a 09 09 |everse_l|oop:....|
|00002010| 4d 4f 56 09 53 49 2c 5b | 42 58 5d 0d 0a 09 09 4d |MOV.SI,[|BX]....M|
|00002020| 4f 56 09 5b 42 58 5d 2c | 44 49 0d 0a 09 09 4f 52 |OV.[BX],|DI....OR|
|00002030| 09 53 49 2c 53 49 0d 0a | 09 09 4a 5a 09 52 65 76 |.SI,SI..|..JZ.Rev|
|00002040| 65 72 73 65 5f 44 6f 6e | 65 0d 0a 09 09 4d 4f 56 |erse_Don|e....MOV|
|00002050| 09 44 49 2c 42 58 0d 0a | 09 09 4d 4f 56 09 42 58 |.DI,BX..|..MOV.BX|
|00002060| 2c 53 49 0d 0a 09 09 4a | 4d 50 53 09 52 65 76 65 |,SI....J|MPS.Reve|
|00002070| 72 73 65 5f 6c 6f 6f 70 | 0d 0a 52 65 76 65 72 73 |rse_loop|..Revers|
|00002080| 65 5f 64 6f 6e 65 3a 0d | 0a 09 09 4d 4f 56 09 4c |e_done:.|...MOV.L|
|00002090| 69 73 74 5f 48 65 61 64 | 2c 42 58 0d 0a 09 09 52 |ist_Head|,BX....R|
|000020a0| 45 54 0d 0a 3b 0d 0a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |ET..;...|........|
|000020b0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000020c0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000020d0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000020e0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000020f0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00002100| 01 1e 00 00 00 1e 00 00 | 00 02 22 00 00 00 4a 02 |........|.."...J.|
|00002110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002180| 8c da 8e d2 bc a0 02 8e | c2 fc ba 1e 01 e8 64 01 |........|......d.|
|00002190| 80 3e 5d 00 20 75 0a bf | 5d 00 b9 0b 00 b0 3f f3 |.>]. u..|].....?.|
|000021a0| aa c6 06 68 00 3f b1 11 | ba 5c 00 e8 a1 01 3c ff |...h.?..|.\....<.|
|000021b0| 74 2c 32 e4 d1 e0 d1 e0 | d1 e0 d1 e0 d1 e0 be 80 |t,2.....|........|
|000021c0| 00 03 f0 8b 3e 1e 02 8b | df 83 c7 02 b9 11 00 f3 |....>...|........|
|000021d0| a5 89 3e 1e 02 8b f3 e8 | 23 00 b1 12 eb ca 83 3e |..>.....|#......>|
|000021e0| 1c 02 00 75 08 ba 2d 01 | e8 09 01 eb 09 ba 42 01 |...u..-.|......B.|
|000021f0| e8 01 01 e8 41 00 b1 00 | b2 00 e8 52 01 bf 1c 02 |....A...|...R....|
|00002200| c7 04 00 00 8b 1d 0b db | 74 0b e8 0b 00 72 04 8b |........|t....r..|
|00002210| fb eb f1 89 1c 89 35 c3 | 8b eb 8b d6 83 c3 03 83 |......5.|........|
|00002220| c6 03 b9 0c 00 ac 24 7f | 8a 27 43 80 e4 7f 3a c4 |......$.|.'C...:.|
|00002230| e1 f3 8b dd 8b f2 c3 8b | 3e 1c 02 0b ff 75 01 c3 |........|>....u..|
|00002240| 8d 75 02 8b de e8 87 00 | 73 08 ba f6 01 e8 a4 00 |.u......|s.......|
|00002250| eb 44 e8 f2 00 ac e8 c5 | 00 e8 eb 00 e8 e8 00 b9 |.D......|........|
|00002260| 08 00 ac e8 9a 00 e2 fa | b0 2e e8 93 00 b9 03 00 |........|........|
|00002270| ac e8 8c 00 e2 fa e8 ce | 00 8d 77 09 b9 03 00 e8 |........|..w.....|
|00002280| c5 00 ac a8 80 b0 2b 75 | 02 b0 2d e8 72 00 e8 b6 |......+u|..-.r...|
|00002290| 00 e2 ec e8 b1 00 8a 47 | 0c e8 82 00 e8 a8 00 8a |.......G|........|
|000022a0| 47 0f e8 79 00 ba 18 02 | e8 49 00 8d 77 10 b9 08 |G..y....|.I..w...|
|000022b0| 00 ad 0b c0 75 08 ba 13 | 02 e8 38 00 eb 03 e8 52 |....u...|..8....R|
|000022c0| 00 e8 83 00 e2 eb 8b 3d | e8 6f 00 e9 6d ff c3 51 |.......=|.o..m..Q|
|000022d0| 56 57 bf eb 01 8d 77 01 | b9 0b 00 f3 a6 74 10 bf |VW....w.|.....t..|
|000022e0| eb 01 8d 77 01 b9 0b 00 | f3 a4 5f 5e 59 f8 c3 5f |...w....|.._^Y.._|
|000022f0| 5e 59 f9 c3 53 51 52 b1 | 09 e8 53 00 5a 59 5b c3 |^Y..SQR.|..S.ZY[.|
|00002300| 50 51 52 53 b1 02 8a d0 | 80 e2 7f e8 41 00 5b 5a |PQRS....|....A.[Z|
|00002310| 59 58 c3 86 c4 e8 06 00 | 86 e0 e8 01 00 c3 50 53 |YX......|......PS|
|00002320| 51 bb db 01 8a e0 b1 04 | d2 e8 d7 e8 d2 ff 8a c4 |Q.......|........|
|00002330| 24 0f d7 e8 ca ff 59 5b | 58 c3 50 b0 0d e8 c0 ff |$.....Y[|X.P.....|
|00002340| b0 0a e8 bb ff 58 c3 50 | b0 20 e8 b3 ff 58 c3 06 |.....X.P|. ...X..|
|00002350| cd e0 07 c3 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002460| 28 63 29 20 31 39 38 34 | 20 43 68 61 72 6c 69 65 |(c) 1984| Charlie|
|00002470| 20 47 6f 64 65 74 2d 43 | 65 72 61 6f 6c 6f 46 72 | Godet-C|eraoloFr|
|00002480| 61 67 38 36 20 76 31 2e | 31 36 0d 0a 24 0d 0a 4e |ag86 v1.|16..$..N|
|00002490| 6f 20 46 69 6c 65 28 73 | 29 20 66 6f 75 6e 64 0d |o File(s|) found.|
|000024a0| 0a 24 55 73 65 72 20 46 | 69 6c 65 6e 61 6d 65 20 |.$User F|ilename |
|000024b0| 20 20 20 20 52 2f 4f 53 | 79 73 41 72 63 20 65 78 | R/OS|ysArc ex|
|000024c0| 20 72 63 20 20 20 3c 2d | 2d 2d 2d 2d 2d 2d 2d 2d | rc <-|--------|
|000024d0| 2d 2d 2d 2d 2d 47 72 6f | 75 70 2d 2d 2d 2d 2d 2d |-----Gro|up------|
|000024e0| 2d 2d 2d 2d 2d 2d 2d 2d | 3e 0d 0a 3d 3d 3d 3d 3d |--------|>..=====|
|000024f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002500| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002510| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002520| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002530| 3d 3d 3d 3d 3d 3d 3d 3d | 0d 0a 24 30 31 32 33 34 |========|..$01234|
|00002540| 35 36 37 38 39 41 42 43 | 44 45 46 20 20 20 20 20 |56789ABC|DEF |
|00002550| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002560| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002570| 20 20 24 20 20 20 20 24 | 20 20 20 24 00 00 a0 02 | $ $| $....|
|00002580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+