/ MacHack 1994 / MacHack 1994.toast / MacHack™ 1987-1994 / MacHack™ '90 / Source Code ƒ.sea / Source Code ƒ / Modula2 ƒ / DataStack Filer / StackFiles.Mod

< prev

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0e 53 74 61 63 6b 46 | 69 6c 65 73 2e 4d 6f 64 |..StackF|iles.Mod|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 c0 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 17 64 00 | 00 01 7e a2 9e 22 a7 a2 |......d.|..~.."..|
|00000060| 9e 22 a7 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |."......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 4a 04 00 00 |........|....J...|
|00000080| 65 20 2a 29 0d 09 74 68 | 65 53 74 61 63 6b 20 3a |e *)..th|eStack :|
|00000090| 3d 20 73 74 61 63 6b 3b | 0d 09 74 68 65 53 65 61 |= stack;|..theSea|
|000000a0| 72 63 68 4e 61 6d 65 20 | 3a 3d 20 56 41 4c 28 53 |rchName |:= VAL(S|
|000000b0| 74 72 69 6e 67 50 74 72 | 2c 68 65 61 64 65 72 29 |tringPtr|,header)|
|000000c0| 3b 0d 09 6e 20 3a 3d 20 | 53 65 61 72 63 68 53 74 |;..n := |SearchSt|
|000000d0| 61 63 6b 42 79 4e 61 6d | 65 28 31 2c 74 6f 74 46 |ackByNam|e(1,totF|
|000000e0| 69 6c 2d 31 29 3b 0d 09 | 0d 09 49 46 20 28 6e 20 |il-1);..|..IF (n |
|000000f0| 3d 20 30 29 20 41 4e 44 | 20 28 74 6f 74 46 69 6c |= 0) AND| (totFil|
|00000100| 20 3e 20 31 29 20 54 48 | 45 4e 0d 09 09 28 2a 20 | > 1) TH|EN...(* |
|00000110| 53 65 61 72 63 68 20 66 | 61 69 6c 65 64 2c 20 61 |Search f|ailed, a|
|00000120| 6e 64 20 74 68 65 20 6c | 61 73 74 20 69 6e 64 65 |nd the l|ast inde|
|00000130| 78 20 73 65 61 72 63 68 | 65 64 20 77 61 73 20 74 |x search|ed was t|
|00000140| 68 65 4b 65 79 49 6e 64 | 65 78 2e 20 2a 29 0d 09 |heKeyInd|ex. *)..|
|00000150| 09 73 74 72 50 74 72 20 | 3a 3d 20 56 41 4c 28 53 |.strPtr |:= VAL(S|
|00000160| 74 72 69 6e 67 50 74 72 | 2c 47 65 74 48 65 61 64 |tringPtr|,GetHead|
|00000170| 65 72 41 64 64 72 28 73 | 74 61 63 6b 2c 6e 4b 65 |erAddr(s|tack,nKe|
|00000180| 79 73 5e 5e 5b 74 68 65 | 4b 65 79 49 6e 64 65 78 |ys^^[the|KeyIndex|
|00000190| 5d 29 29 3b 0d 09 09 49 | 46 20 49 55 43 6f 6d 70 |]));...I|F IUComp|
|000001a0| 53 74 72 69 6e 67 28 74 | 68 65 53 65 61 72 63 68 |String(t|heSearch|
|000001b0| 4e 61 6d 65 2c 73 74 72 | 50 74 72 29 20 3e 20 30 |Name,str|Ptr) > 0|
|000001c0| 20 54 48 45 4e 20 49 4e | 43 28 74 68 65 4b 65 79 | THEN IN|C(theKey|
|000001d0| 49 6e 64 65 78 29 20 45 | 4e 44 3b 0d 09 45 4c 53 |Index) E|ND;..ELS|
|000001e0| 49 46 20 28 6e 20 23 20 | 30 29 20 54 48 45 4e 0d |IF (n # |0) THEN.|
|000001f0| 09 09 28 2a 20 73 65 61 | 72 63 68 20 66 6f 75 6e |..(* sea|rch foun|
|00000200| 64 20 61 20 63 61 72 64 | 20 77 69 74 68 20 73 61 |d a card| with sa|
|00000210| 6d 65 20 6e 61 6d 65 2c | 20 73 6f 20 77 65 20 69 |me name,| so we i|
|00000220| 6e 73 65 72 74 20 74 68 | 65 20 6e 65 77 20 6e 61 |nsert th|e new na|
|00000230| 6d 65 4b 65 79 20 74 68 | 65 72 65 2e 20 2a 29 0d |meKey th|ere. *).|
|00000240| 09 09 74 68 65 4b 65 79 | 49 6e 64 65 78 20 3a 3d |..theKey|Index :=|
|00000250| 20 6e 3b 0d 09 09 45 4e | 44 3b 0d 09 0d 09 73 72 | n;...EN|D;....sr|
|00000260| 63 20 3a 3d 20 41 44 52 | 28 6e 4b 65 79 73 5e 5e |c := ADR|(nKeys^^|
|00000270| 5b 74 68 65 4b 65 79 49 | 6e 64 65 78 5d 29 3b 0d |[theKeyI|ndex]);.|
|00000280| 09 42 6c 6f 63 6b 4d 6f | 76 65 28 73 72 63 2c 73 |.BlockMo|ve(src,s|
|00000290| 72 63 2b 53 49 5a 45 28 | 43 41 52 44 49 4e 41 4c |rc+SIZE(|CARDINAL|
|000002a0| 29 2c 28 74 6f 74 46 69 | 6c 2d 74 68 65 4b 65 79 |),(totFi|l-theKey|
|000002b0| 49 6e 64 65 78 29 2a 53 | 49 5a 45 28 43 41 52 44 |Index)*S|IZE(CARD|
|000002c0| 49 4e 41 4c 29 29 3b 0d | 09 6e 4b 65 79 73 5e 5e |INAL));.|.nKeys^^|
|000002d0| 5b 74 68 65 4b 65 79 49 | 6e 64 65 78 5d 20 3a 3d |[theKeyI|ndex] :=|
|000002e0| 20 69 6e 64 78 3b 0d 09 | 45 4e 44 20 53 65 74 43 | indx;..|END SetC|
|000002f0| 61 72 64 4e 61 6d 65 3b | 0d 0d 0d 50 52 4f 43 45 |ardName;|...PROCE|
|00000300| 44 55 52 45 20 43 6f 75 | 6e 74 43 61 72 64 73 28 |DURE Cou|ntCards(|
|00000310| 73 74 61 63 6b 3a 44 61 | 74 61 53 74 61 63 6b 29 |stack:Da|taStack)|
|00000320| 3a 43 41 52 44 49 4e 41 | 4c 3b 0d 42 45 47 49 4e |:CARDINA|L;.BEGIN|
|00000330| 0d 09 52 45 54 55 52 4e | 20 73 74 61 63 6b 5e 5e |..RETURN| stack^^|
|00000340| 2e 74 6f 74 61 6c 46 69 | 6c 6c 65 64 3b 0d 09 45 |.totalFi|lled;..E|
|00000350| 4e 44 20 43 6f 75 6e 74 | 43 61 72 64 73 3b 0d 0d |ND Count|Cards;..|
|00000360| 50 52 4f 43 45 44 55 52 | 45 20 47 65 74 43 61 72 |PROCEDUR|E GetCar|
|00000370| 64 42 79 49 6e 64 78 28 | 73 74 61 63 6b 3a 44 61 |dByIndx(|stack:Da|
|00000380| 74 61 53 74 61 63 6b 3b | 20 69 6e 64 78 3a 43 41 |taStack;| indx:CA|
|00000390| 52 44 49 4e 41 4c 29 3a | 41 44 44 52 45 53 53 3b |RDINAL):|ADDRESS;|
|000003a0| 0d 56 41 52 20 61 20 3a | 41 44 44 52 45 53 53 3b |.VAR a :|ADDRESS;|
|000003b0| 0d 42 45 47 49 4e 0d 09 | 64 61 74 61 53 74 61 63 |.BEGIN..|dataStac|
|000003c0| 6b 45 72 72 20 3a 3d 20 | 6e 6f 45 72 72 3b 0d 09 |kErr := |noErr;..|
|000003d0| 61 20 3a 3d 20 56 41 4c | 28 41 44 44 52 45 53 53 |a := VAL|(ADDRESS|
|000003e0| 2c 47 65 74 48 65 61 64 | 65 72 41 64 64 72 28 73 |,GetHead|erAddr(s|
|000003f0| 74 61 63 6b 2c 69 6e 64 | 78 29 29 3b 0d 09 49 46 |tack,ind|x));..IF|
|00000400| 20 61 20 3d 20 4e 49 4c | 20 54 48 45 4e 0d 09 09 | a = NIL| THEN...|
|00000410| 64 61 74 61 53 74 61 63 | 6b 45 72 72 20 3a 3d 20 |dataStac|kErr := |
|00000420| 6e 6f 74 46 6f 75 6e 64 | 3b 0d 09 09 52 45 54 55 |notFound|;...RETU|
|00000430| 52 4e 20 4e 49 4c 3b 0d | 09 45 4c 53 45 0d 09 09 |RN NIL;.|.ELSE...|
|00000440| 52 45 54 55 52 4e 20 61 | 20 2b 20 53 49 5a 45 28 |RETURN a| + SIZE(|
|00000450| 43 61 72 64 48 65 61 64 | 65 72 29 3b 0d 09 09 45 |CardHead|er);...E|
|00000460| 4e 44 3b 0d 09 45 4e 44 | 20 47 65 74 43 61 72 64 |ND;..END| GetCard|
|00000470| 42 79 49 6e 64 78 3b 0d | 0d 50 52 4f 43 45 44 55 |ByIndx;.|.PROCEDU|
|00000480| 52 45 20 47 65 74 43 61 | 72 64 42 79 49 44 28 73 |RE GetCa|rdByID(s|
|00000490| 74 61 63 6b 3a 44 61 74 | 61 53 74 61 63 6b 3b 20 |tack:Dat|aStack; |
|000004a0| 69 64 3a 4c 4f 4e 47 43 | 41 52 44 29 3a 41 44 44 |id:LONGC|ARD):ADD|
|000004b0| 52 45 53 53 3b 0d 56 41 | 52 20 61 20 3a 41 44 44 |RESS;.VA|R a :ADD|
|000004c0| 52 45 53 53 3b 0d 42 45 | 47 49 4e 0d 09 64 61 74 |RESS;.BE|GIN..dat|
|000004d0| 61 53 74 61 63 6b 45 72 | 72 20 3a 3d 20 6e 6f 45 |aStackEr|r := noE|
|000004e0| 72 72 3b 0d 09 61 20 3a | 3d 20 56 41 4c 28 41 44 |rr;..a :|= VAL(AD|
|000004f0| 44 52 45 53 53 2c 47 65 | 74 48 65 61 64 65 72 41 |DRESS,Ge|tHeaderA|
|00000500| 64 64 72 28 73 74 61 63 | 6b 2c 47 65 74 43 61 72 |ddr(stac|k,GetCar|
|00000510| 64 49 6e 64 78 28 73 74 | 61 63 6b 2c 69 64 2c 22 |dIndx(st|ack,id,"|
|00000520| 22 29 29 29 3b 0d 09 49 | 46 20 61 20 3d 20 4e 49 |")));..I|F a = NI|
|00000530| 4c 20 54 48 45 4e 0d 09 | 09 64 61 74 61 53 74 61 |L THEN..|.dataSta|
|00000540| 63 6b 45 72 72 20 3a 3d | 20 6e 6f 74 46 6f 75 6e |ckErr :=| notFoun|
|00000550| 64 3b 0d 09 09 52 45 54 | 55 52 4e 20 4e 49 4c 3b |d;...RET|URN NIL;|
|00000560| 0d 09 45 4c 53 45 0d 09 | 09 52 45 54 55 52 4e 20 |..ELSE..|.RETURN |
|00000570| 61 20 2b 20 53 49 5a 45 | 28 43 61 72 64 48 65 61 |a + SIZE|(CardHea|
|00000580| 64 65 72 29 3b 0d 09 09 | 45 4e 44 3b 0d 09 45 4e |der);...|END;..EN|
|00000590| 44 20 47 65 74 43 61 72 | 64 42 79 49 44 3b 0d 0d |D GetCar|dByID;..|
|000005a0| 50 52 4f 43 45 44 55 52 | 45 20 47 65 74 43 61 72 |PROCEDUR|E GetCar|
|000005b0| 64 42 79 4e 61 6d 65 28 | 73 74 61 63 6b 3a 44 61 |dByName(|stack:Da|
|000005c0| 74 61 53 74 61 63 6b 3b | 20 6e 61 6d 65 3a 41 52 |taStack;| name:AR|
|000005d0| 52 41 59 20 4f 46 20 43 | 48 41 52 29 3a 41 44 44 |RAY OF C|HAR):ADD|
|000005e0| 52 45 53 53 3b 0d 56 41 | 52 20 61 20 3a 41 44 44 |RESS;.VA|R a :ADD|
|000005f0| 52 45 53 53 3b 0d 42 45 | 47 49 4e 0d 09 64 61 74 |RESS;.BE|GIN..dat|
|00000600| 61 53 74 61 63 6b 45 72 | 72 20 3a 3d 20 6e 6f 45 |aStackEr|r := noE|
|00000610| 72 72 3b 0d 09 61 20 3a | 3d 20 56 41 4c 28 41 44 |rr;..a :|= VAL(AD|
|00000620| 44 52 45 53 53 2c 47 65 | 74 48 65 61 64 65 72 41 |DRESS,Ge|tHeaderA|
|00000630| 64 64 72 28 73 74 61 63 | 6b 2c 47 65 74 43 61 72 |ddr(stac|k,GetCar|
|00000640| 64 49 6e 64 78 28 73 74 | 61 63 6b 2c 30 2c 6e 61 |dIndx(st|ack,0,na|
|00000650| 6d 65 29 29 29 3b 0d 09 | 49 46 20 61 20 3d 20 4e |me)));..|IF a = N|
|00000660| 49 4c 20 54 48 45 4e 0d | 09 09 64 61 74 61 53 74 |IL THEN.|..dataSt|
|00000670| 61 63 6b 45 72 72 20 3a | 3d 20 6e 6f 74 46 6f 75 |ackErr :|= notFou|
|00000680| 6e 64 3b 0d 09 09 52 45 | 54 55 52 4e 20 4e 49 4c |nd;...RE|TURN NIL|
|00000690| 3b 0d 09 45 4c 53 45 0d | 09 09 52 45 54 55 52 4e |;..ELSE.|..RETURN|
|000006a0| 20 61 20 2b 20 53 49 5a | 45 28 43 61 72 64 48 65 | a + SIZ|E(CardHe|
|000006b0| 61 64 65 72 29 3b 0d 09 | 09 45 4e 44 3b 0d 09 45 |ader);..|.END;..E|
|000006c0| 4e 44 20 47 65 74 43 61 | 72 64 42 79 4e 61 6d 65 |ND GetCa|rdByName|
|000006d0| 3b 0d 0d 0d 50 52 4f 43 | 45 44 55 52 45 20 46 6f |;...PROC|EDURE Fo|
|000006e0| 72 41 6c 6c 43 61 72 64 | 73 44 6f 28 73 74 61 63 |rAllCard|sDo(stac|
|000006f0| 6b 3a 44 61 74 61 53 74 | 61 63 6b 3b 20 64 6f 3a |k:DataSt|ack; do:|
|00000700| 44 6f 50 72 6f 63 29 3b | 0d 56 41 52 20 69 20 3a |DoProc);|.VAR i :|
|00000710| 43 41 52 44 49 4e 41 4c | 3b 0d 42 45 47 49 4e 0d |CARDINAL|;.BEGIN.|
|00000720| 09 46 4f 52 20 69 20 3a | 3d 20 31 20 54 4f 20 73 |.FOR i :|= 1 TO s|
|00000730| 74 61 63 6b 5e 5e 2e 74 | 6f 74 61 6c 46 69 6c 6c |tack^^.t|otalFill|
|00000740| 65 64 20 44 4f 0d 09 09 | 64 6f 28 56 41 4c 28 41 |ed DO...|do(VAL(A|
|00000750| 44 44 52 45 53 53 2c 47 | 65 74 48 65 61 64 65 72 |DDRESS,G|etHeader|
|00000760| 41 64 64 72 28 73 74 61 | 63 6b 2c 69 29 29 20 2b |Addr(sta|ck,i)) +|
|00000770| 20 53 49 5a 45 28 43 61 | 72 64 48 65 61 64 65 72 | SIZE(Ca|rdHeader|
|00000780| 29 29 3b 0d 09 09 45 4e | 44 3b 0d 09 45 4e 44 20 |));...EN|D;..END |
|00000790| 46 6f 72 41 6c 6c 43 61 | 72 64 73 44 6f 3b 0d 0d |ForAllCa|rdsDo;..|
|000007a0| 50 52 4f 43 45 44 55 52 | 45 20 49 6e 49 44 4f 72 |PROCEDUR|E InIDOr|
|000007b0| 64 65 72 44 6f 28 73 74 | 61 63 6b 3a 44 61 74 61 |derDo(st|ack:Data|
|000007c0| 53 74 61 63 6b 3b 20 64 | 6f 3a 44 6f 50 72 6f 63 |Stack; d|o:DoProc|
|000007d0| 29 3b 0d 56 41 52 20 69 | 2c 6e 20 3a 43 41 52 44 |);.VAR i|,n :CARD|
|000007e0| 49 4e 41 4c 3b 0d 42 45 | 47 49 4e 0d 09 46 4f 52 |INAL;.BE|GIN..FOR|
|000007f0| 20 69 20 3a 3d 20 31 20 | 54 4f 20 73 74 61 63 6b | i := 1 |TO stack|
|00000800| 5e 5e 2e 74 6f 74 61 6c | 46 69 6c 6c 65 64 20 44 |^^.total|Filled D|
|00000810| 4f 0d 09 09 6e 20 3a 3d | 20 73 74 61 63 6b 5e 5e |O...n :=| stack^^|
|00000820| 2e 69 64 4b 65 79 73 5e | 5e 5b 69 5d 3b 0d 09 09 |.idKeys^|^[i];...|
|00000830| 64 6f 28 56 41 4c 28 41 | 44 44 52 45 53 53 2c 47 |do(VAL(A|DDRESS,G|
|00000840| 65 74 48 65 61 64 65 72 | 41 64 64 72 28 73 74 61 |etHeader|Addr(sta|
|00000850| 63 6b 2c 6e 29 29 20 2b | 20 53 49 5a 45 28 43 61 |ck,n)) +| SIZE(Ca|
|00000860| 72 64 48 65 61 64 65 72 | 29 29 3b 0d 09 09 45 4e |rdHeader|));...EN|
|00000870| 44 3b 0d 09 45 4e 44 20 | 49 6e 49 44 4f 72 64 65 |D;..END |InIDOrde|
|00000880| 72 44 6f 3b 0d 0d 50 52 | 4f 43 45 44 55 52 45 20 |rDo;..PR|OCEDURE |
|00000890| 49 6e 4e 61 6d 65 4f 72 | 64 65 72 44 6f 28 73 74 |InNameOr|derDo(st|
|000008a0| 61 63 6b 3a 44 61 74 61 | 53 74 61 63 6b 3b 20 64 |ack:Data|Stack; d|
|000008b0| 6f 3a 44 6f 50 72 6f 63 | 29 3b 0d 56 41 52 20 69 |o:DoProc|);.VAR i|
|000008c0| 2c 6e 20 3a 43 41 52 44 | 49 4e 41 4c 3b 0d 42 45 |,n :CARD|INAL;.BE|
|000008d0| 47 49 4e 0d 09 46 4f 52 | 20 69 20 3a 3d 20 31 20 |GIN..FOR| i := 1 |
|000008e0| 54 4f 20 73 74 61 63 6b | 5e 5e 2e 74 6f 74 61 6c |TO stack|^^.total|
|000008f0| 46 69 6c 6c 65 64 20 44 | 4f 0d 09 09 6e 20 3a 3d |Filled D|O...n :=|
|00000900| 20 73 74 61 63 6b 5e 5e | 2e 6e 61 6d 65 4b 65 79 | stack^^|.nameKey|
|00000910| 73 5e 5e 5b 69 5d 3b 0d | 09 09 64 6f 28 56 41 4c |s^^[i];.|..do(VAL|
|00000920| 28 41 44 44 52 45 53 53 | 2c 47 65 74 48 65 61 64 |(ADDRESS|,GetHead|
|00000930| 65 72 41 64 64 72 28 73 | 74 61 63 6b 2c 6e 29 29 |erAddr(s|tack,n))|
|00000940| 20 2b 20 53 49 5a 45 28 | 43 61 72 64 48 65 61 64 | + SIZE(|CardHead|
|00000950| 65 72 29 29 3b 0d 09 09 | 45 4e 44 3b 0d 09 45 4e |er));...|END;..EN|
|00000960| 44 20 49 6e 4e 61 6d 65 | 4f 72 64 65 72 44 6f 3b |D InName|OrderDo;|
|00000970| 0d 0d 0d 45 4e 44 20 44 | 61 74 61 53 74 61 63 6b |...END D|ataStack|
|00000980| 73 2e 0d 0d 01 00 00 01 | 04 00 0e 41 00 01 0c 53 |s.......|...A...S|
|00000990| 79 73 74 65 6d 5f 48 41 | 4c 54 58 0d 53 79 73 74 |ystem_HA|LTX.Syst|
|000009a0| 65 6d 5f 4d 55 4c 55 33 | 32 0d 53 79 73 74 65 6d |em_MULU3|2.System|
|000009b0| 5f 44 49 56 55 33 32 0d | 53 79 73 74 65 6d 5f 4d |_DIVU32.|System_M|
|000009c0| 55 4c 53 33 32 0d 53 79 | 73 74 65 6d 5f 44 49 56 |ULS32.Sy|stem_DIV|
|000009d0| 53 33 32 14 53 79 73 74 | 65 6d 5f 5f 30 30 30 30 |S32.Syst|em__0000|
|000009e0| 30 30 30 30 30 30 30 30 | 0f 53 79 73 74 65 6d 5f |00000000|.System_|
|000009f0| 5f 47 6c 6f 62 61 6c 73 | 0d 25 4c 6f 63 61 6c 53 |_Globals|.%LocalS|
|00000a00| 74 72 69 6e 67 73 18 44 | 61 74 61 53 74 61 63 6b |trings.D|ataStack|
|00000a10| 73 5f 5f 42 39 32 41 38 | 39 43 37 30 30 30 30 13 |s__B92A8|9C70000.|
|00000a20| 44 61 74 61 53 74 61 63 | 6b 73 5f 5f 47 6c 6f 62 |DataStac|ks__Glob|
|00000a30| 61 6c 73 15 44 61 74 61 | 53 74 61 63 6b 73 47 6c |als.Data|StacksGl|
|00000a40| 6f 62 61 6c 42 6c 6f 63 | 6b 16 4d 61 63 54 79 70 |obalBloc|k.MacTyp|
|00000a50| 65 73 5f 5f 42 37 44 37 | 31 36 30 45 30 30 30 31 |es__B7D7|160E0001|
|00000a60| 11 4d 61 63 54 79 70 65 | 73 5f 5f 47 6c 6f 62 61 |.MacType|s__Globa|
|00000a70| 6c 73 17 44 61 74 61 53 | 74 61 63 6b 73 5f 4e 65 |ls.DataS|tacks_Ne|
|00000a80| 77 44 61 74 61 53 74 61 | 63 6b 1b 44 61 74 61 53 |wDataSta|ck.DataS|
|00000a90| 74 61 63 6b 73 5f 44 69 | 73 70 6f 73 65 44 61 74 |tacks_Di|sposeDat|
|00000aa0| 61 53 74 61 63 6b 18 44 | 61 74 61 53 74 61 63 6b |aStack.D|ataStack|
|00000ab0| 73 5f 4c 6f 61 64 44 61 | 74 61 53 74 61 63 6b 18 |s_LoadDa|taStack.|
|00000ac0| 44 61 74 61 53 74 61 63 | 6b 73 5f 44 75 6d 70 44 |DataStac|ks_DumpD|
|00000ad0| 61 74 61 53 74 61 63 6b | 12 44 61 74 61 53 74 61 |ataStack|.DataSta|
|00000ae0| 63 6b 73 5f 41 64 64 43 | 61 72 64 15 44 61 74 61 |cks_AddC|ard.Data|
|00000af0| 53 74 61 63 6b 73 5f 52 | 65 6d 6f 76 65 43 61 72 |Stacks_R|emoveCar|
|00000b00| 64 16 44 61 74 61 53 74 | 61 63 6b 73 5f 47 65 74 |d.DataSt|acks_Get|
|00000b10| 43 61 72 64 49 6e 64 78 | 14 44 61 74 61 53 74 61 |CardIndx|.DataSta|
|00000b20| 63 6b 73 5f 47 65 74 43 | 61 72 64 49 44 16 44 61 |cks_GetC|ardID.Da|
|00000b30| 74 61 53 74 61 63 6b 73 | 5f 47 65 74 43 61 72 64 |taStacks|_GetCard|
|00000b40| 4e 61 6d 65 16 44 61 74 | 61 53 74 61 63 6b 73 5f |Name.Dat|aStacks_|
|00000b50| 53 65 74 43 61 72 64 4e | 61 6d 65 15 44 61 74 61 |SetCardN|ame.Data|
|00000b60| 53 74 61 63 6b 73 5f 43 | 6f 75 6e 74 43 61 72 64 |Stacks_C|ountCard|
|00000b70| 73 18 44 61 74 61 53 74 | 61 63 6b 73 5f 47 65 74 |s.DataSt|acks_Get|
|00000b80| 43 61 72 64 42 79 49 6e | 64 78 16 44 61 74 61 53 |CardByIn|dx.DataS|
|00000b90| 74 61 63 6b 73 5f 47 65 | 74 43 61 72 64 42 79 49 |tacks_Ge|tCardByI|
|00000ba0| 44 18 44 61 74 61 53 74 | 61 63 6b 73 5f 47 65 74 |D.DataSt|acks_Get|
|00000bb0| 43 61 72 64 42 79 4e 61 | 6d 65 18 44 61 74 61 53 |CardByNa|me.DataS|
|00000bc0| 74 61 63 6b 73 5f 46 6f | 72 41 6c 6c 43 61 72 64 |tacks_Fo|rAllCard|
|00000bd0| 73 44 6f 16 44 61 74 61 | 53 74 61 63 6b 73 5f 49 |sDo.Data|Stacks_I|
|00000be0| 6e 49 44 4f 72 64 65 72 | 44 6f 18 44 61 74 61 53 |nIDOrder|Do.DataS|
|00000bf0| 74 61 63 6b 73 5f 49 6e | 4e 61 6d 65 4f 72 64 65 |tacks_In|NameOrde|
|00000c00| 72 44 6f 0a 44 61 74 61 | 53 74 61 63 6b 73 09 25 |rDo.Data|Stacks.%|
|00000c10| 4d 6f 64 32 49 6e 69 74 | 11 4d 61 63 54 79 70 65 |Mod2Init|.MacType|
|00000c20| 73 5f 64 65 62 75 67 73 | 74 72 1b 4d 65 6d 6f 72 |s_debugs|tr.Memor|
|00000c30| 79 4d 61 6e 61 67 65 72 | 5f 5f 42 37 44 37 31 36 |yManager|__B7D716|
|00000c40| 31 30 30 30 30 31 16 4d | 65 6d 6f 72 79 4d 61 6e |100001.M|emoryMan|
|00000c50| 61 67 65 72 5f 5f 47 6c | 6f 62 61 6c 73 1a 4d 65 |ager__Gl|obals.Me|
|00000c60| 6d 6f 72 79 4d 61 6e 61 | 67 65 72 5f 49 6e 69 74 |moryMana|ger_Init|
|00000c70| 41 70 70 6c 5a 6f 6e 65 | 19 4d 65 6d 6f 72 79 4d |ApplZone|.MemoryM|
|00000c80| 61 6e 61 67 65 72 5f 53 | 65 74 41 70 70 6c 42 61 |anager_S|etApplBa|
|00000c90| 73 65 16 4d 65 6d 6f 72 | 79 4d 61 6e 61 67 65 72 |se.Memor|yManager|
|00000ca0| 5f 49 6e 69 74 5a 6f 6e | 65 1a 4d 65 6d 6f 72 79 |_InitZon|e.Memory|
|00000cb0| 4d 61 6e 61 67 65 72 5f | 53 65 74 41 70 70 6c 4c |Manager_|SetApplL|
|00000cc0| 69 6d 69 74 0b 4d 41 58 | 41 50 50 4c 5a 4f 4e 45 |imit.MAX|APPLZONE|
|00000cd0| 19 4d 65 6d 6f 72 79 4d | 61 6e 61 67 65 72 5f 4d |.MemoryM|anager_M|
|00000ce0| 6f 72 65 4d 61 73 74 65 | 72 73 15 4d 65 6d 6f 72 |oreMaste|rs.Memor|
|00000cf0| 79 4d 61 6e 61 67 65 72 | 5f 47 65 74 5a 6f 6e 65 |yManager|_GetZone|
|00000d00| 15 4d 65 6d 6f 72 79 4d | 61 6e 61 67 65 72 5f 53 |.MemoryM|anager_S|
|00000d10| 65 74 5a 6f 6e 65 17 4d | 65 6d 6f 72 79 4d 61 6e |etZone.M|emoryMan|
|00000d20| 61 67 65 72 5f 4e 65 77 | 48 61 6e 64 6c 65 1a 4d |ager_New|Handle.M|
|00000d30| 65 6d 6f 72 79 4d 61 6e | 61 67 65 72 5f 44 69 73 |emoryMan|ager_Dis|
|00000d40| 70 6f 73 48 61 6e 64 6c | 65 1b 4d 65 6d 6f 72 79 |posHandl|e.Memory|
|00000d50| 4d 61 6e 61 67 65 72 5f | 47 65 74 48 61 6e 64 6c |Manager_|GetHandl|
|00000d60| 65 53 69 7a 65 1b 4d 65 | 6d 6f 72 79 4d 61 6e 61 |eSize.Me|moryMana|
|00000d70| 67 65 72 5f 53 65 74 48 | 61 6e 64 6c 65 53 69 7a |ger_SetH|andleSiz|
|00000d80| 65 18 4d 65 6d 6f 72 79 | 4d 61 6e 61 67 65 72 5f |e.Memory|Manager_|
|00000d90| 48 61 6e 64 6c 65 5a 6f | 6e 65 1b 4d 65 6d 6f 72 |HandleZo|ne.Memor|
|00000da0| 79 4d 61 6e 61 67 65 72 | 5f 52 65 63 6f 76 65 72 |yManager|_Recover|
|00000db0| 48 61 6e 64 6c 65 1b 4d | 65 6d 6f 72 79 4d 61 6e |Handle.M|emoryMan|
|00000dc0| 61 67 65 72 5f 52 65 61 | 6c 6c 6f 63 48 61 6e 64 |ager_Rea|llocHand|
|00000dd0| 6c 65 14 4d 65 6d 6f 72 | 79 4d 61 6e 61 67 65 72 |le.Memor|yManager|
|00000de0| 5f 4e 65 77 50 74 72 17 | 4d 65 6d 6f 72 79 4d 61 |_NewPtr.|MemoryMa|
|00000df0| 6e 61 67 65 72 5f 44 69 | 73 70 6f 73 50 74 72 18 |nager_Di|sposPtr.|
|00000e00| 4d 65 6d 6f 72 79 4d 61 | 6e 61 67 65 72 5f 47 65 |MemoryMa|nager_Ge|
|00000e10| 74 50 74 72 53 69 7a 65 | 18 4d 65 6d 6f 72 79 4d |tPtrSize|.MemoryM|
|00000e20| 61 6e 61 67 65 72 5f 53 | 65 74 50 74 72 53 69 7a |anager_S|etPtrSiz|
|00000e30| 65 15 4d 65 6d 6f 72 79 | 4d 61 6e 61 67 65 72 5f |e.Memory|Manager_|
|00000e40| 50 74 72 5a 6f 6e 65 15 | 4d 65 6d 6f 72 79 4d 61 |PtrZone.|MemoryMa|
|00000e50| 6e 61 67 65 72 5f 46 72 | 65 65 4d 65 6d 14 4d 65 |nager_Fr|eeMem.Me|
|00000e60| 6d 6f 72 79 4d 61 6e 61 | 67 65 72 5f 4d 61 78 4d |moryMana|ger_MaxM|
|00000e70| 65 6d 18 4d 65 6d 6f 72 | 79 4d 61 6e 61 67 65 72 |em.Memor|yManager|
|00000e80| 5f 43 6f 6d 70 61 63 74 | 4d 65 6d 16 4d 65 6d 6f |_Compact|Mem.Memo|
|00000e90| 72 79 4d 61 6e 61 67 65 | 72 5f 52 65 73 72 76 4d |ryManage|r_ResrvM|
|00000ea0| 65 6d 16 4d 65 6d 6f 72 | 79 4d 61 6e 61 67 65 72 |em.Memor|yManager|
|00000eb0| 5f 50 75 72 67 65 4d 65 | 6d 19 4d 65 6d 6f 72 79 |_PurgeMe|m.Memory|
|00000ec0| 4d 61 6e 61 67 65 72 5f | 45 6d 70 74 79 48 61 6e |Manager_|EmptyHan|
|00000ed0| 64 6c 65 13 4d 65 6d 6f | 72 79 4d 61 6e 61 67 65 |dle.Memo|ryManage|
|00000ee0| 72 5f 48 4c 6f 63 6b 15 | 4d 65 6d 6f 72 79 4d 61 |r_HLock.|MemoryMa|
|00000ef0| 6e 61 67 65 72 5f 48 55 | 6e 6c 6f 63 6b 14 4d 65 |nager_HU|nlock.Me|
|00000f00| 6d 6f 72 79 4d 61 6e 61 | 67 65 72 5f 48 50 75 72 |moryMana|ger_HPur|
|00000f10| 67 65 16 4d 65 6d 6f 72 | 79 4d 61 6e 61 67 65 72 |ge.Memor|yManager|
|00000f20| 5f 48 4e 6f 50 75 72 67 | 65 19 4d 65 6d 6f 72 79 |_HNoPurg|e.Memory|
|00000f30| 4d 61 6e 61 67 65 72 5f | 53 65 74 47 72 6f 77 5a |Manager_|SetGrowZ|
|00000f40| 6f 6e 65 17 4d 65 6d 6f | 72 79 4d 61 6e 61 67 65 |one.Memo|ryManage|
|00000f50| 72 5f 42 6c 6f 63 6b 4d | 6f 76 65 07 4d 4f 56 45 |r_BlockM|ove.MOVE|
|00000f60| 48 48 49 16 4d 65 6d 6f | 72 79 4d 61 6e 61 67 65 |HHI.Memo|ryManage|
|00000f70| 72 5f 4d 61 78 42 6c 6f | 63 6b 18 4d 65 6d 6f 72 |r_MaxBlo|ck.Memor|
|00000f80| 79 4d 61 6e 61 67 65 72 | 5f 50 75 72 67 65 53 70 |yManager|_PurgeSp|
|00000f90| 61 63 65 18 4d 65 6d 6f | 72 79 4d 61 6e 61 67 65 |ace.Memo|ryManage|
|00000fa0| 72 5f 53 74 61 63 6b 53 | 70 61 63 65 1c 4d 65 6d |r_StackS|pace.Mem|
|00000fb0| 6f 72 79 4d 61 6e 61 67 | 65 72 5f 4e 65 77 45 6d |oryManag|er_NewEm|
|00000fc0| 70 74 79 48 61 6e 64 6c | 65 16 4d 65 6d 6f 72 79 |ptyHandl|e.Memory|
|00000fd0| 4d 61 6e 61 67 65 72 5f | 48 53 65 74 52 42 69 74 |Manager_|HSetRBit|
|00000fe0| 16 4d 65 6d 6f 72 79 4d | 61 6e 61 67 65 72 5f 48 |.MemoryM|anager_H|
|00000ff0| 43 6c 72 52 42 69 74 17 | 4d 65 6d 6f 72 79 4d 61 |ClrRBit.|MemoryMa|
|00001000| 6e 61 67 65 72 5f 48 47 | 65 74 53 74 61 74 65 17 |nager_HG|etState.|
|00001010| 4d 65 6d 6f 72 79 4d 61 | 6e 61 67 65 72 5f 48 53 |MemoryMa|nager_HS|
|00001020| 65 74 53 74 61 74 65 0c | 4e 45 57 48 41 4e 44 4c |etState.|NEWHANDL|
|00001030| 45 53 59 53 0e 4e 45 57 | 48 41 4e 44 4c 45 43 4c |ESYS.NEW|HANDLECL|
|00001040| 45 41 52 11 4e 45 57 48 | 41 4e 44 4c 45 53 59 53 |EAR.NEWH|ANDLESYS|
|00001050| 43 4c 45 41 52 09 4e 45 | 57 50 54 52 53 59 53 0b |CLEAR.NE|WPTRSYS.|
|00001060| 4e 45 57 50 54 52 43 4c | 45 41 52 0e 4e 45 57 50 |NEWPTRCL|EAR.NEWP|
|00001070| 54 52 53 59 53 43 4c 45 | 41 52 19 46 69 6c 65 4d |TRSYSCLE|AR.FileM|
|00001080| 61 6e 61 67 65 72 5f 5f | 42 37 44 37 31 36 30 46 |anager__|B7D7160F|
|00001090| 30 30 30 31 14 46 69 6c | 65 4d 61 6e 61 67 65 72 |0001.Fil|eManager|
|000010a0| 5f 5f 47 6c 6f 62 61 6c | 73 17 51 75 69 63 6b 44 |__Global|s.QuickD|
|000010b0| 72 61 77 5f 5f 42 37 44 | 37 31 36 30 46 30 30 30 |raw__B7D|7160F000|
|000010c0| 30 12 51 75 69 63 6b 44 | 72 61 77 5f 5f 47 6c 6f |0.QuickD|raw__Glo|
|000010d0| 62 61 6c 73 14 46 69 6c | 65 4d 61 6e 61 67 65 72 |bals.Fil|eManager|
|000010e0| 5f 47 65 74 56 49 6e 66 | 6f 0a 47 45 54 56 52 45 |_GetVInf|o.GETVRE|
|000010f0| 46 4e 55 4d 12 46 69 6c | 65 4d 61 6e 61 67 65 72 |FNUM.Fil|eManager|
|00001100| 5f 47 65 74 56 6f 6c 12 | 46 69 6c 65 4d 61 6e 61 |_GetVol.|FileMana|
|00001110| 67 65 72 5f 53 65 74 56 | 6f 6c 14 46 69 6c 65 4d |ger_SetV|ol.FileM|
|00001120| 61 6e 61 67 65 72 5f 46 | 6c 75 73 68 56 6f 6c 16 |anager_F|lushVol.|
|00001130| 46 69 6c 65 4d 61 6e 61 | 67 65 72 5f 55 6e 6d 6f |FileMana|ger_Unmo|
|00001140| 75 6e 74 56 6f 6c 11 46 | 69 6c 65 4d 61 6e 61 67 |untVol.F|ileManag|
|00001150| 65 72 5f 45 6a 65 63 74 | 12 46 69 6c 65 4d 61 6e |er_Eject|.FileMan|
|00001160| 61 67 65 72 5f 46 53 4f | 70 65 6e 12 46 69 6c 65 |ager_FSO|pen.File|
|00001170| 4d 61 6e 61 67 65 72 5f | 4f 70 65 6e 52 46 06 46 |Manager_|OpenRF.F|
|00001180| 53 52 45 41 44 07 46 53 | 57 52 49 54 45 07 47 45 |SREAD.FS|WRITE.GE|
|00001190| 54 46 50 4f 53 07 53 45 | 54 46 50 4f 53 06 47 45 |TFPOS.SE|TFPOS.GE|
|000011a0| 54 45 4f 46 06 53 45 54 | 45 4f 46 08 41 4c 4c 4f |TEOF.SET|EOF.ALLO|
|000011b0| 43 41 54 45 07 46 53 43 | 4c 4f 53 45 14 46 69 6c |CATE.FSC|LOSE.Fil|
|000011c0| 65 4d 61 6e 61 67 65 72 | 5f 47 65 74 46 49 6e 66 |eManager|_GetFInf|
|000011d0| 6f 14 46 69 6c 65 4d 61 | 6e 61 67 65 72 5f 53 65 |o.FileMa|nager_Se|
|000011e0| 74 46 49 6e 66 6f 14 46 | 69 6c 65 4d 61 6e 61 67 |tFInfo.F|ileManag|
|000011f0| 65 72 5f 53 65 74 46 4c | 6f 63 6b 14 46 69 6c 65 |er_SetFL|ock.File|
|00001200| 4d 61 6e 61 67 65 72 5f | 52 73 74 46 4c 6f 63 6b |Manager_|RstFLock|
|00001210| 12 46 69 6c 65 4d 61 6e | 61 67 65 72 5f 52 65 6e |.FileMan|ager_Ren|
|00001220| 61 6d 65 12 46 69 6c 65 | 4d 61 6e 61 67 65 72 5f |ame.File|Manager_|
|00001230| 43 72 65 61 74 65 14 46 | 69 6c 65 4d 61 6e 61 67 |Create.F|ileManag|
|00001240| 65 72 5f 46 53 44 65 6c | 65 74 65 08 47 45 54 56 |er_FSDel|ete.GETV|
|00001250| 49 4e 46 4f 06 47 45 54 | 56 4f 4c 06 53 45 54 56 |INFO.GET|VOL.SETV|
|00001260| 4f 4c 08 46 4c 55 53 48 | 56 4f 4c 0a 55 4e 4d 4f |OL.FLUSH|VOL.UNMO|
|00001270| 55 4e 54 56 4f 4c 05 45 | 4a 45 43 54 06 46 53 4f |UNTVOL.E|JECT.FSO|
|00001280| 50 45 4e 06 4f 50 45 4e | 52 46 08 47 45 54 46 49 |PEN.OPEN|RF.GETFI|
|00001290| 4e 46 4f 08 53 45 54 46 | 49 4e 46 4f 08 53 45 54 |NFO.SETF|INFO.SET|
|000012a0| 46 4c 4f 43 4b 08 52 53 | 54 46 4c 4f 43 4b 06 52 |FLOCK.RS|TFLOCK.R|
|000012b0| 45 4e 41 4d 45 06 43 52 | 45 41 54 45 08 46 53 44 |ENAME.CR|EATE.FSD|
|000012c0| 45 4c 45 54 45 0e 50 42 | 48 47 45 54 56 4f 4c 50 |ELETE.PB|HGETVOLP|
|000012d0| 41 52 4d 53 0f 50 42 48 | 47 45 54 4c 4f 47 49 4e |ARMS.PBH|GETLOGIN|
|000012e0| 49 4e 46 4f 0f 50 42 48 | 47 45 54 44 49 52 41 43 |INFO.PBH|GETDIRAC|
|000012f0| 43 45 53 53 0f 50 42 48 | 53 45 54 44 49 52 41 43 |CESS.PBH|SETDIRAC|
|00001300| 43 45 53 53 08 50 42 48 | 4d 41 50 49 44 0a 50 42 |CESS.PBH|MAPID.PB|
|00001310| 48 4d 41 50 4e 41 4d 45 | 0b 50 42 48 43 4f 50 59 |HMAPNAME|.PBHCOPY|
|00001320| 46 49 4c 45 0d 50 42 48 | 4d 4f 56 45 52 45 4e 41 |FILE.PBH|MOVERENA|
|00001330| 4d 45 0b 50 42 48 4f 50 | 45 4e 44 45 4e 59 0d 50 |ME.PBHOP|ENDENY.P|
|00001340| 42 48 4f 50 45 4e 52 46 | 44 45 4e 59 06 50 42 4f |BHOPENRF|DENY.PBO|
|00001350| 50 45 4e 07 50 42 43 4c | 4f 53 45 06 50 42 52 45 |PEN.PBCL|OSE.PBRE|
|00001360| 41 44 07 50 42 57 52 49 | 54 45 09 50 42 43 4f 4e |AD.PBWRI|TE.PBCON|
|00001370| 54 52 4f 4c 08 50 42 53 | 54 41 54 55 53 08 50 42 |TROL.PBS|TATUS.PB|
|00001380| 4b 49 4c 4c 49 4f 0a 50 | 42 47 45 54 56 49 4e 46 |KILLIO.P|BGETVINF|
|00001390| 4f 08 50 42 47 45 54 56 | 4f 4c 08 50 42 53 45 54 |O.PBGETV|OL.PBSET|
|000013a0| 56 4f 4c 0a 50 42 46 4c | 55 53 48 56 4f 4c 08 50 |VOL.PBFL|USHVOL.P|
|000013b0| 42 43 52 45 41 54 45 08 | 50 42 44 45 4c 45 54 45 |BCREATE.|PBDELETE|
|000013c0| 08 50 42 4f 50 45 4e 52 | 46 08 50 42 52 45 4e 41 |.PBOPENR|F.PBRENA|
|000013d0| 4d 45 0a 50 42 47 45 54 | 46 49 4e 46 4f 0a 50 42 |ME.PBGET|FINFO.PB|
|000013e0| 53 45 54 46 49 4e 46 4f | 0a 50 42 53 45 54 46 4c |SETFINFO|.PBSETFL|
|000013f0| 4f 43 4b 0a 50 42 52 53 | 54 46 4c 4f 43 4b 0a 50 |OCK.PBRS|TFLOCK.P|
|00001400| 42 53 45 54 46 56 45 52 | 53 0a 50 42 41 4c 4c 4f |BSETFVER|S.PBALLO|
|00001410| 43 41 54 45 08 50 42 47 | 45 54 45 4f 46 08 50 42 |CATE.PBG|ETEOF.PB|
|00001420| 53 45 54 45 4f 46 09 50 | 42 47 45 54 46 50 4f 53 |SETEOF.P|BGETFPOS|
|00001430| 09 50 42 53 45 54 46 50 | 4f 53 0b 50 42 46 4c 55 |.PBSETFP|OS.PBFLU|
|00001440| 53 48 46 49 4c 45 0a 50 | 42 4d 4f 55 4e 54 56 4f |SHFILE.P|BMOUNTVO|
|00001450| 4c 0c 50 42 55 4e 4d 4f | 55 4e 54 56 4f 4c 07 50 |L.PBUNMO|UNTVOL.P|
|00001460| 42 45 4a 45 43 54 09 50 | 42 4f 46 46 4c 49 4e 45 |BEJECT.P|BOFFLINE|
|00001470| 08 41 44 44 44 52 49 56 | 45 08 50 42 4f 50 45 4e |.ADDDRIV|E.PBOPEN|
|00001480| 57 44 09 50 42 43 4c 4f | 53 45 57 44 09 50 42 48 |WD.PBCLO|SEWD.PBH|
|00001490| 53 45 54 56 4f 4c 09 50 | 42 48 47 45 54 56 4f 4c |SETVOL.P|BHGETVOL|
|000014a0| 09 50 42 43 41 54 4d 4f | 56 45 0b 50 42 44 49 52 |.PBCATMO|VE.PBDIR|
|000014b0| 43 52 45 41 54 45 0b 50 | 42 47 45 54 57 44 49 4e |CREATE.P|BGETWDIN|
|000014c0| 46 4f 0c 50 42 47 45 54 | 46 43 42 49 4e 46 4f 0c |FO.PBGET|FCBINFO.|
|000014d0| 50 42 47 45 54 43 41 54 | 49 4e 46 4f 0c 50 42 53 |PBGETCAT|INFO.PBS|
|000014e0| 45 54 43 41 54 49 4e 46 | 4f 0d 50 42 41 4c 4c 4f |ETCATINF|O.PBALLO|
|000014f0| 43 43 4f 4e 54 49 47 0b | 50 42 4c 4f 43 4b 52 41 |CCONTIG.|PBLOCKRA|
|00001500| 4e 47 45 0d 50 42 55 4e | 4c 4f 43 4b 52 41 4e 47 |NGE.PBUN|LOCKRANG|
|00001510| 45 0a 50 42 53 45 54 56 | 49 4e 46 4f 0b 50 42 48 |E.PBSETV|INFO.PBH|
|00001520| 47 45 54 56 49 4e 46 4f | 07 50 42 48 4f 50 45 4e |GETVINFO|.PBHOPEN|
|00001530| 09 50 42 48 4f 50 45 4e | 52 46 09 50 42 48 43 52 |.PBHOPEN|RF.PBHCR|
|00001540| 45 41 54 45 09 50 42 48 | 44 45 4c 45 54 45 09 50 |EATE.PBH|DELETE.P|
|00001550| 42 48 52 45 4e 41 4d 45 | 0b 50 42 48 52 53 54 46 |BHRENAME|.PBHRSTF|
|00001560| 4c 4f 43 4b 0b 50 42 48 | 53 45 54 46 4c 4f 43 4b |LOCK.PBH|SETFLOCK|
|00001570| 0b 50 42 48 47 45 54 46 | 49 4e 46 4f 0b 50 42 48 |.PBHGETF|INFO.PBH|
|00001580| 53 45 54 46 49 4e 46 4f | 09 50 42 53 45 54 50 45 |SETFINFO|.PBSETPE|
|00001590| 4f 46 09 47 45 54 46 53 | 51 48 44 52 0a 47 45 54 |OF.GETFS|QHDR.GET|
|000015a0| 44 52 56 51 48 44 52 0a | 47 45 54 56 43 42 51 48 |DRVQHDR.|GETVCBQH|
|000015b0| 44 52 13 46 69 6c 65 4d | 61 6e 61 67 65 72 5f 48 |DR.FileM|anager_H|
|000015c0| 47 65 74 56 6f 6c 13 46 | 69 6c 65 4d 61 6e 61 67 |GetVol.F|ileManag|
|000015d0| 65 72 5f 48 53 65 74 56 | 6f 6c 11 46 69 6c 65 4d |er_HSetV|ol.FileM|
|000015e0| 61 6e 61 67 65 72 5f 48 | 4f 70 65 6e 13 46 69 6c |anager_H|Open.Fil|
|000015f0| 65 4d 61 6e 61 67 65 72 | 5f 48 4f 70 65 6e 52 46 |eManager|_HOpenRF|
|00001600| 13 46 69 6c 65 4d 61 6e | 61 67 65 72 5f 48 43 72 |.FileMan|ager_HCr|
|00001610| 65 61 74 65 15 46 69 6c | 65 4d 61 6e 61 67 65 72 |eate.Fil|eManager|
|00001620| 5f 44 69 72 43 72 65 61 | 74 65 0b 41 4c 4c 4f 43 |_DirCrea|te.ALLOC|
|00001630| 43 4f 4e 54 49 47 13 46 | 69 6c 65 4d 61 6e 61 67 |CONTIG.F|ileManag|
|00001640| 65 72 5f 48 44 65 6c 65 | 74 65 15 46 69 6c 65 4d |er_HDele|te.FileM|
|00001650| 61 6e 61 67 65 72 5f 48 | 47 65 74 46 49 6e 66 6f |anager_H|GetFInfo|
|00001660| 15 46 69 6c 65 4d 61 6e | 61 67 65 72 5f 48 53 65 |.FileMan|ager_HSe|
|00001670| 74 46 49 6e 66 6f 15 46 | 69 6c 65 4d 61 6e 61 67 |tFInfo.F|ileManag|
|00001680| 65 72 5f 48 53 65 74 46 | 4c 6f 63 6b 15 46 69 6c |er_HSetF|Lock.Fil|
|00001690| 65 4d 61 6e 61 67 65 72 | 5f 48 52 73 74 46 4c 6f |eManager|_HRstFLo|
|000016a0| 63 6b 13 46 69 6c 65 4d | 61 6e 61 67 65 72 5f 48 |ck.FileM|anager_H|
|000016b0| 52 65 6e 61 6d 65 13 46 | 69 6c 65 4d 61 6e 61 67 |Rename.F|ileManag|
|000016c0| 65 72 5f 43 61 74 4d 6f | 76 65 06 4f 50 45 4e 57 |er_CatMo|ve.OPENW|
|000016d0| 44 07 43 4c 4f 53 45 57 | 44 09 47 45 54 57 44 49 |D.CLOSEW|D.GETWDI|
|000016e0| 4e 46 4f 07 48 47 45 54 | 56 4f 4c 07 48 53 45 54 |NFO.HGET|VOL.HSET|
|000016f0| 56 4f 4c 05 48 4f 50 45 | 4e 07 48 4f 50 45 4e 52 |VOL.HOPE|N.HOPENR|
|00001700| 46 07 48 43 52 45 41 54 | 45 09 44 49 52 43 52 45 |F.HCREAT|E.DIRCRE|
|00001710| 41 54 45 07 48 44 45 4c | 45 54 45 09 48 47 45 54 |ATE.HDEL|ETE.HGET|
|00001720| 46 49 4e 46 4f 09 48 53 | 45 54 46 49 4e 46 4f 09 |FINFO.HS|ETFINFO.|
|00001730| 48 53 45 54 46 4c 4f 43 | 4b 09 48 52 53 54 46 4c |HSETFLOC|K.HRSTFL|
|00001740| 4f 43 4b 07 48 52 45 4e | 41 4d 45 07 43 41 54 4d |OCK.HREN|AME.CATM|
|00001750| 4f 56 45 14 4c 6f 63 4c | 69 62 5f 5f 42 39 32 41 |OVE.LocL|ib__B92A|
|00001760| 38 43 36 42 30 30 30 30 | 0f 4c 6f 63 4c 69 62 5f |8C6B0000|.LocLib_|
|00001770| 5f 47 6c 6f 62 61 6c 73 | 13 4c 6f 63 4c 69 62 5f |_Globals|.LocLib_|
|00001780| 42 69 6e 61 72 79 53 65 | 61 72 63 68 15 4c 6f 63 |BinarySe|arch.Loc|
|00001790| 4c 69 62 5f 46 72 65 65 | 53 70 61 63 65 4f 6e 56 |Lib_Free|SpaceOnV|
|000017a0| 6f 6c 0e 4c 6f 63 4c 69 | 62 5f 43 6f 70 79 53 74 |ol.LocLi|b_CopySt|
|000017b0| 72 17 44 61 74 61 53 74 | 61 63 6b 73 5f 64 61 74 |r.DataSt|acks_dat|
|000017c0| 61 53 74 61 63 6b 45 72 | 72 00 05 09 00 0b 00 04 |aStackEr|r.......|
|000017d0| 06 09 00 0a 00 00 00 02 | 08 09 00 0a 00 00 00 02 |........|........|
|000017e0| 00 00 06 09 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001800| 64 64 72 28 73 74 61 63 | 6b 2c 69 6e 64 78 29 3b |ddr(stac|k,indx);|
|00001810| 0d 09 49 46 20 68 65 61 | 64 65 72 20 3d 20 4e 49 |..IF hea|der = NI|
|00001820| 4c 20 54 48 45 4e 20 0d | 09 09 64 61 74 61 53 74 |L THEN .|..dataSt|
|00001830| 61 63 6b 45 72 72 20 3a | 3d 20 6e 6f 74 46 6f 75 |ackErr :|= notFou|
|00001840| 6e 64 3b 0d 09 09 52 45 | 54 55 52 4e 3b 0d 09 09 |nd;...RE|TURN;...|
|00001850| 45 4e 44 3b 0d 09 43 6f | 70 79 53 74 72 28 33 31 |END;..Co|pyStr(31|
|00001860| 2c 6e 61 6d 65 2c 68 65 | 61 64 65 72 5e 2e 63 4e |,name,he|ader^.cN|
|00001870| 61 6d 65 29 3b 0d 09 49 | 46 20 74 6f 74 46 69 6c |ame);..I|F totFil|
|00001880| 20 3d 20 31 20 54 48 45 | 4e 20 52 45 54 55 52 4e | = 1 THE|N RETURN|
|00001890| 20 45 4e 44 3b 0d 09 0d | 09 28 2a 20 67 65 74 20 | END;...|.(* get |
|000018a0| 6e 61 6d 65 4b 65 79 49 | 6e 64 65 78 20 66 6f 72 |nameKeyI|ndex for|
|000018b0| 20 6f 72 69 67 69 6e 61 | 6c 20 2a 29 0d 09 6f 6c | origina|l *)..ol|
|000018c0| 64 4b 65 79 49 6e 64 78 | 20 3a 3d 20 46 69 6e 64 |dKeyIndx| := Find|
|000018d0| 4b 65 79 49 6e 64 65 78 | 28 6e 4b 65 79 73 5e 2c |KeyIndex|(nKeys^,|
|000018e0| 20 69 6e 64 78 2c 20 74 | 6f 74 46 69 6c 29 3b 0d | indx, t|otFil);.|
|000018f0| 09 0d 09 64 73 74 20 3a | 3d 20 41 44 52 28 6e 4b |...dst :|= ADR(nK|
|00001900| 65 79 73 5e 5e 5b 6f 6c | 64 4b 65 79 49 6e 64 78 |eys^^[ol|dKeyIndx|
|00001910| 5d 29 3b 0d 09 42 6c 6f | 63 6b 4d 6f 76 65 28 64 |]);..Blo|ckMove(d|
|00001920| 73 74 2b 53 49 5a 45 28 | 43 41 52 44 49 4e 41 4c |st+SIZE(|CARDINAL|
|00001930| 29 2c 64 73 74 2c 28 74 | 6f 74 46 69 6c 2d 6f 6c |),dst,(t|otFil-ol|
|00001940| 64 4b 65 79 49 6e 64 78 | 29 2a 53 49 5a 45 28 43 |dKeyIndx|)*SIZE(C|
|00001950| 41 52 44 49 4e 41 4c 29 | 29 3b 0d 09 0d 09 28 2a |ARDINAL)|);....(*|
|00001960| 20 66 69 6e 64 20 6e 61 | 6d 65 4b 65 79 49 6e 64 | find na|meKeyInd|
|00001970| 65 78 20 66 6f 72 20 6e | 65 77 20 6e 61 6d 00 00 |ex for n|ew nam..|
+--------+-------------------------+-------------------------+--------+--------+