/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / programming / aoflib_2 / AOFLib

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 44 57 | 53 20 41 4f 46 4c 69 62 |..... DW|S AOFLib|
|00000010| 0d 00 14 05 e0 0d 00 1e | 04 0d 00 28 85 dd f2 49 |........|...(...I|
|00000020| 6e 69 74 3a de 5f 41 4f | 46 45 58 50 24 28 32 35 |nit:._AO|FEXP$(25|
|00000030| 35 29 2c 5f 41 4f 46 49 | 4d 50 24 28 32 35 35 29 |5),_AOFI|MP$(255)|
|00000040| 3a de 5f 41 4f 46 45 58 | 50 25 28 32 35 35 29 2c |:._AOFEX|P%(255),|
|00000050| 5f 41 4f 46 49 4d 50 25 | 28 32 35 35 29 2c 5f 41 |_AOFIMP%|(255),_A|
|00000060| 4f 46 54 59 50 45 25 28 | 32 35 35 29 2c 5f 41 4f |OFTYPE%(|255),_AO|
|00000070| 46 52 45 4c 25 28 31 30 | 32 33 29 3a 5f 41 4f 46 |FREL%(10|23):_AOF|
|00000080| 45 58 50 25 3d 30 3a 5f | 41 4f 46 49 4d 50 25 3d |EXP%=0:_|AOFIMP%=|
|00000090| 30 3a 5f 41 4f 46 52 45 | 4c 25 3d 30 3a e1 0d 00 |0:_AOFRE|L%=0:...|
|000000a0| 32 4d dd a4 69 6d 70 28 | 6c 24 29 3a e7 5f 41 4f |2M..imp(|l$):._AO|
|000000b0| 46 49 4d 50 25 3d 32 35 | 35 85 31 2c 22 43 61 6e |FIMP%=25|5.1,"Can|
|000000c0| 27 74 20 49 4d 50 4f 52 | 54 20 22 2b 6c 24 2b 22 |'t IMPOR|T "+l$+"|
|000000d0| 3a 20 54 6f 6f 20 6d 61 | 6e 79 20 49 4d 50 4f 52 |: Too ma|ny IMPOR|
|000000e0| 54 65 64 20 6c 61 62 65 | 6c 73 22 0d 00 3c 5b e7 |Ted labe|ls"..<[.|
|000000f0| 28 70 61 73 73 25 80 32 | 29 20 5f 41 4f 46 49 4d |(pass%.2|) _AOFIM|
|00000100| 50 24 28 5f 41 4f 46 49 | 4d 50 25 29 3d 6c 24 3a |P$(_AOFI|MP%)=l$:|
|00000110| 5f 41 4f 46 49 4d 50 25 | 28 5f 41 4f 46 49 4d 50 |_AOFIMP%|(_AOFIMP|
|00000120| 25 29 3d 50 25 3a 5f 41 | 4f 46 52 45 4c 25 28 5f |%)=P%:_A|OFREL%(_|
|00000130| 41 4f 46 49 4d 50 25 29 | 3d 34 3a 5f 41 4f 46 49 |AOFIMP%)|=4:_AOFI|
|00000140| 4d 50 25 2b 3d 31 0d 00 | 46 09 3d 50 25 2b 38 0d |MP%+=1..|F.=P%+8.|
|00000150| 00 50 4d dd a4 69 6d 61 | 28 6c 24 29 3a e7 5f 41 |.PM..ima|(l$):._A|
|00000160| 4f 46 49 4d 50 25 3d 32 | 35 35 85 31 2c 22 43 61 |OFIMP%=2|55.1,"Ca|
|00000170| 6e 27 74 20 49 4d 50 4f | 52 54 20 22 2b 6c 24 2b |n't IMPO|RT "+l$+|
|00000180| 22 3a 20 54 6f 6f 20 6d | 61 6e 79 20 49 4d 50 4f |": Too m|any IMPO|
|00000190| 52 54 65 64 20 6c 61 62 | 65 6c 73 22 0d 00 5a 5b |RTed lab|els"..Z[|
|000001a0| e7 28 70 61 73 73 25 80 | 32 29 20 5f 41 4f 46 49 |.(pass%.|2) _AOFI|
|000001b0| 4d 50 24 28 5f 41 4f 46 | 49 4d 50 25 29 3d 6c 24 |MP$(_AOF|IMP%)=l$|
|000001c0| 3a 5f 41 4f 46 49 4d 50 | 25 28 5f 41 4f 46 49 4d |:_AOFIMP|%(_AOFIM|
|000001d0| 50 25 29 3d 50 25 3a 5f | 41 4f 46 52 45 4c 25 28 |P%)=P%:_|AOFREL%(|
|000001e0| 5f 41 4f 46 49 4d 50 25 | 29 3d 38 3a 5f 41 4f 46 |_AOFIMP%|)=8:_AOF|
|000001f0| 49 4d 50 25 2b 3d 31 0d | 00 64 06 3d 30 0d 00 6e |IMP%+=1.|.d.=0..n|
|00000200| 4d dd a4 65 78 70 28 6c | 24 29 3a e7 5f 41 4f 46 |M..exp(l|$):._AOF|
|00000210| 45 58 50 25 3d 32 35 35 | 85 31 2c 22 43 61 6e 27 |EXP%=255|.1,"Can'|
|00000220| 74 20 45 58 50 4f 52 54 | 20 22 2b 6c 24 2b 22 3a |t EXPORT| "+l$+":|
|00000230| 20 54 6f 6f 20 6d 61 6e | 79 20 45 58 50 4f 52 54 | Too man|y EXPORT|
|00000240| 65 64 20 6c 61 62 65 6c | 73 22 0d 00 78 46 e7 28 |ed label|s"..xF.(|
|00000250| 70 61 73 73 25 80 32 29 | 20 5f 41 4f 46 45 58 50 |pass%.2)| _AOFEXP|
|00000260| 24 28 5f 41 4f 46 45 58 | 50 25 29 3d 6c 24 3a 5f |$(_AOFEX|P%)=l$:_|
|00000270| 41 4f 46 45 58 50 25 28 | 5f 41 4f 46 45 58 50 25 |AOFEXP%(|_AOFEXP%|
|00000280| 29 3d 50 25 3a 5f 41 4f | 46 45 58 50 25 2b 3d 31 |)=P%:_AO|FEXP%+=1|
|00000290| 0d 00 82 06 3d 30 0d 00 | 8c 4f dd f2 65 78 28 6c |....=0..|.O..ex(l|
|000002a0| 24 2c 6c 25 29 3a e7 5f | 41 4f 46 45 58 50 25 3d |$,l%):._|AOFEXP%=|
|000002b0| 32 35 35 85 31 2c 22 43 | 61 6e 27 74 20 45 58 50 |255.1,"C|an't EXP|
|000002c0| 4f 52 54 20 22 2b 6c 24 | 2b 22 3a 20 54 6f 6f 20 |ORT "+l$|+": Too |
|000002d0| 6d 61 6e 79 20 45 58 50 | 4f 52 54 65 64 20 6c 61 |many EXP|ORTed la|
|000002e0| 62 65 6c 73 22 0d 00 96 | 3d 5f 41 4f 46 45 58 50 |bels"...|=_AOFEXP|
|000002f0| 24 28 5f 41 4f 46 45 58 | 50 25 29 3d 6c 24 3a 5f |$(_AOFEX|P%)=l$:_|
|00000300| 41 4f 46 45 58 50 25 28 | 5f 41 4f 46 45 58 50 25 |AOFEXP%(|_AOFEXP%|
|00000310| 29 3d 6c 25 3a 5f 41 4f | 46 45 58 50 25 2b 3d 31 |)=l%:_AO|FEXP%+=1|
|00000320| 3a e1 0d 00 a0 50 dd a4 | 61 72 65 61 3a e7 5f 41 |:....P..|area:._A|
|00000330| 4f 46 52 45 4c 25 3d 31 | 30 32 33 85 31 2c 22 43 |OFREL%=1|023.1,"C|
|00000340| 61 6e 27 74 20 72 65 6c | 6f 63 61 74 65 3a 20 54 |an't rel|ocate: T|
|00000350| 6f 6f 20 6d 61 6e 79 20 | 61 72 65 61 2d 72 65 6c |oo many |area-rel|
|00000360| 61 74 69 76 65 20 72 65 | 6c 6f 63 61 74 69 6f 6e |ative re|location|
|00000370| 73 22 0d 00 aa 31 e7 28 | 70 61 73 73 25 80 32 29 |s"...1.(|pass%.2)|
|00000380| 20 5f 41 4f 46 54 59 50 | 45 25 28 5f 41 4f 46 52 | _AOFTYP|E%(_AOFR|
|00000390| 45 4c 25 29 3d 50 25 3a | 5f 41 4f 46 52 45 4c 25 |EL%)=P%:|_AOFREL%|
|000003a0| 2b 3d 31 0d 00 b4 06 3d | 30 0d 00 be c5 dd f2 53 |+=1....=|0......S|
|000003b0| 61 76 65 28 6e 24 2c 66 | 25 2c 68 25 29 3a ea 67 |ave(n$,f|%,h%):.g|
|000003c0| 2c 69 2c 63 2c 65 2c 66 | 2c 68 2c 64 2c 6b 2c 62 |,i,c,e,f|,h,d,k,b|
|000003d0| 2c 61 3a ea 64 25 2c 70 | 25 2c 71 25 2c 63 25 3a |,a:.d%,p|%,q%,c%:|
|000003e0| de 64 25 20 38 31 39 32 | 2c 63 25 20 5f 41 4f 46 |.d% 8192|,c% _AOF|
|000003f0| 45 58 50 25 2a 31 36 2b | 5f 41 4f 46 49 4d 50 25 |EXP%*16+|_AOFIMP%|
|00000400| 2a 31 36 3a e3 70 25 3d | 34 b8 36 88 32 3a 4f 25 |*16:.p%=|4.6.2:O%|
|00000410| 3d 64 25 3a 50 25 3d 30 | 3a 5b 6f 70 74 20 70 25 |=d%:P%=0|:[opt p%|
|00000420| 3a 26 26 43 33 43 42 43 | 36 43 35 3a 26 35 3a 26 |:&&C3CBC|6C5:&5:&|
|00000430| 35 3a 20 3d 22 4f 42 4a | 5f 48 45 41 44 22 3a 26 |5: ="OBJ|_HEAD":&|
|00000440| 67 3a 26 69 2d 67 3a 3d | 22 4f 42 4a 5f 41 52 45 |g:&i-g:=|"OBJ_ARE|
|00000450| 41 22 3a 26 63 3a 26 65 | 2d 63 3a 3d 22 4f 42 4a |A":&c:&e|-c:="OBJ|
|00000460| 5f 49 44 46 4e 22 3a 26 | 66 3a 26 68 2d 66 0d 00 |_IDFN":&|f:&h-f..|
|00000470| c8 c5 3d 22 4f 42 4a 5f | 53 59 4d 54 22 3a 26 64 |..="OBJ_|SYMT":&d|
|00000480| 3a 26 6a 2d 64 3a 20 3d | 22 4f 42 4a 5f 53 54 52 |:&j-d: =|"OBJ_STR|
|00000490| 54 22 3a 26 62 3a 26 61 | 2d 62 3a 2e 66 3a 20 3d |T":&b:&a|-b:.f: =|
|000004a0| 22 44 57 53 20 41 4f 46 | 20 65 78 70 6f 72 74 65 |"DWS AOF| exporte|
|000004b0| 72 20 76 73 6e 20 30 2e | 30 37 20 5b 32 37 20 4a |r vsn 0.|07 [27 J|
|000004c0| 75 6e 65 20 31 39 39 36 | 5d 22 2b bd 30 3a 61 6c |une 1996|]"+.0:al|
|000004d0| 69 67 6e 3a 2e 68 3a 2e | 67 3a 26 26 63 35 65 32 |ign:.h:.|g:&&c5e2|
|000004e0| 64 30 38 30 3a 26 31 35 | 30 3a 26 31 3a 26 5f 41 |d080:&15|0:&1:&_A|
|000004f0| 4f 46 45 58 50 25 2b 5f | 41 4f 46 49 4d 50 25 3a |OFEXP%+_|AOFIMP%:|
|00000500| 26 30 3a 26 30 3a 26 34 | 3a 26 35 31 34 3a 26 68 |&0:&0:&4|:&514:&h|
|00000510| 25 2d 66 25 3a 26 5f 41 | 4f 46 49 4d 50 25 2b 5f |%-f%:&_A|OFIMP%+_|
|00000520| 41 4f 46 52 45 4c 25 3a | 26 30 3a 2e 69 3a 2e 63 |AOFREL%:|&0:.i:.c|
|00000530| 3a 20 5d 0d 00 d2 40 65 | 3d 63 2b 68 25 2d 66 25 |: ]...@e|=c+h%-f%|
|00000540| 2b 5f 41 4f 46 49 4d 50 | 25 2a 38 2b 5f 41 4f 46 |+_AOFIMP|%*8+_AOF|
|00000550| 52 45 4c 25 2a 38 3a 62 | 3d 65 3a 61 3d 62 2b 34 |REL%*8:b|=e:a=b+4|
|00000560| 3a 61 2b 3d 31 30 3a e7 | 5f 41 4f 46 45 58 50 25 |:a+=10:.|_AOFEXP%|
|00000570| 3e 30 8c 0d 00 dc 38 e3 | 71 25 3d 30 b8 5f 41 4f |>0....8.|q%=0._AO|
|00000580| 46 45 58 50 25 2d 31 3a | 63 25 21 28 71 25 2a 31 |FEXP%-1:|c%!(q%*1|
|00000590| 36 29 3d 61 2d 62 3a 61 | 2b 3d a9 5f 41 4f 46 45 |6)=a-b:a|+=._AOFE|
|000005a0| 58 50 24 28 71 25 29 2b | 31 3a ed 0d 00 e6 05 cd |XP$(q%)+|1:......|
|000005b0| 0d 00 f0 10 e7 5f 41 4f | 46 49 4d 50 25 3e 30 8c |....._AO|FIMP%>0.|
|000005c0| 0d 00 fa 43 e3 71 25 3d | 30 b8 5f 41 4f 46 49 4d |...C.q%=|0._AOFIM|
|000005d0| 50 25 2d 31 3a 63 25 21 | 28 28 71 25 2b 5f 41 4f |P%-1:c%!|((q%+_AO|
|000005e0| 46 45 58 50 25 29 2a 31 | 36 29 3d 61 2d 62 3a 61 |FEXP%)*1|6)=a-b:a|
|000005f0| 2b 3d a9 5f 41 4f 46 49 | 4d 50 24 28 71 25 29 2b |+=._AOFI|MP$(q%)+|
|00000600| 31 3a ed 0d 01 04 05 cd | 0d 01 0e 65 61 3d 61 2b |1:......|...ea=a+|
|00000610| 33 80 ac 33 3a 64 3d 61 | 3a 6a 3d 64 2b 5f 41 4f |3..3:d=a|:j=d+_AO|
|00000620| 46 45 58 50 25 2a 31 36 | 2b 5f 41 4f 46 49 4d 50 |FEXP%*16|+_AOFIMP|
|00000630| 25 2a 31 36 3a ed 3a 71 | 25 3d ae 6e 24 3a c8 99 |%*16:.:q|%=.n$:..|
|00000640| 31 32 2c 32 2c 71 25 2c | 64 25 2c 50 25 3a c8 99 |12,2,q%,|d%,P%:..|
|00000650| 31 32 2c 32 2c 71 25 2c | 66 25 2c 68 25 2d 66 25 |12,2,q%,|f%,h%-f%|
|00000660| 3a e7 5f 41 4f 46 49 4d | 50 25 3e 30 8c 0d 01 18 |:._AOFIM|P%>0....|
|00000670| 5a e3 70 25 3d 30 b8 5f | 41 4f 46 49 4d 50 25 2d |Z.p%=0._|AOFIMP%-|
|00000680| 31 3a 64 25 21 28 70 25 | 2a 38 29 3d 5f 41 4f 46 |1:d%!(p%|*8)=_AOF|
|00000690| 49 4d 50 25 28 70 25 29 | 3a 64 25 21 28 70 25 2a |IMP%(p%)|:d%!(p%*|
|000006a0| 38 2b 34 29 3d 28 5f 41 | 4f 46 52 45 4c 25 28 70 |8+4)=(_A|OFREL%(p|
|000006b0| 25 29 2b 32 3c 3c 31 36 | 29 2b 5f 41 4f 46 45 58 |%)+2<<16|)+_AOFEX|
|000006c0| 50 25 2b 70 25 3a ed 0d | 01 22 05 cd 0d 01 2c 10 |P%+p%:..|."....,.|
|000006d0| e7 5f 41 4f 46 52 45 4c | 25 3e 30 8c 0d 01 36 41 |._AOFREL|%>0...6A|
|000006e0| e3 70 25 3d 30 b8 5f 41 | 4f 46 52 45 4c 25 2d 31 |.p%=0._A|OFREL%-1|
|000006f0| 3a 64 25 21 28 70 25 2a | 38 29 3d 5f 41 4f 46 54 |:d%!(p%*|8)=_AOFT|
|00000700| 59 50 45 25 28 70 25 29 | 3a 64 25 21 28 70 25 2a |YPE%(p%)|:d%!(p%*|
|00000710| 38 2b 34 29 3d 31 33 31 | 30 37 32 3a ed 0d 01 40 |8+4)=131|072:...@|
|00000720| 05 cd 0d 01 4a 61 c8 99 | 31 32 2c 32 2c 71 25 2c |....Ja..|12,2,q%,|
|00000730| 64 25 2c 5f 41 4f 46 49 | 4d 50 25 2a 38 2b 5f 41 |d%,_AOFI|MP%*8+_A|
|00000740| 4f 46 52 45 4c 25 2a 38 | 3a 6f 25 3d 64 25 3a 21 |OFREL%*8|:o%=d%:!|
|00000750| 6f 25 3d 61 2d 62 3a 6f | 25 2b 3d 34 3a 24 6f 25 |o%=a-b:o|%+=4:$o%|
|00000760| 3d 22 41 52 4d 24 24 43 | 6f 64 65 22 2b bd 30 3a |="ARM$$C|ode"+.0:|
|00000770| 6f 25 2b 3d 31 30 3a e7 | 5f 41 4f 46 45 58 50 25 |o%+=10:.|_AOFEXP%|
|00000780| 3e 30 8c 0d 01 54 3e e3 | 70 25 3d 30 b8 5f 41 4f |>0...T>.|p%=0._AO|
|00000790| 46 45 58 50 25 2d 31 3a | 24 6f 25 3d 5f 41 4f 46 |FEXP%-1:|$o%=_AOF|
|000007a0| 45 58 50 24 28 70 25 29 | 2b bd 30 3a 6f 25 2b 3d |EXP$(p%)|+.0:o%+=|
|000007b0| a9 5f 41 4f 46 45 58 50 | 24 28 70 25 29 2b 31 3a |._AOFEXP|$(p%)+1:|
|000007c0| ed 0d 01 5e 05 cd 0d 01 | 68 10 e7 5f 41 4f 46 49 |...^....|h.._AOFI|
|000007d0| 4d 50 25 3e 30 8c 0d 01 | 72 3e e3 70 25 3d 30 b8 |MP%>0...|r>.p%=0.|
|000007e0| 5f 41 4f 46 49 4d 50 25 | 2d 31 3a 24 6f 25 3d 5f |_AOFIMP%|-1:$o%=_|
|000007f0| 41 4f 46 49 4d 50 24 28 | 70 25 29 2b bd 30 3a 6f |AOFIMP$(|p%)+.0:o|
|00000800| 25 2b 3d a9 5f 41 4f 46 | 49 4d 50 24 28 70 25 29 |%+=._AOF|IMP$(p%)|
|00000810| 2b 31 3a ed 0d 01 7c 05 | cd 0d 01 86 17 70 25 3d |+1:...|.|.....p%=|
|00000820| 6f 25 2b 33 80 ac 33 3a | e7 70 25 3c 3e 6f 25 8c |o%+3..3:|.p%<>o%.|
|00000830| 0d 01 90 1b e3 6f 25 3d | 6f 25 b8 70 25 3a 3f 6f |.....o%=|o%.p%:?o|
|00000840| 25 3d 30 3a ed 3a 6f 25 | 2d 3d 31 0d 01 9a 05 cd |%=0:.:o%|-=1.....|
|00000850| 0d 01 a4 23 c8 99 31 32 | 2c 32 2c 71 25 2c 64 25 |...#..12|,2,q%,d%|
|00000860| 2c 70 25 2d 64 25 3a e7 | 5f 41 4f 46 45 58 50 25 |,p%-d%:.|_AOFEXP%|
|00000870| 3e 30 8c 0d 01 ae 55 70 | 25 3d 63 25 3a e3 70 25 |>0....Up|%=c%:.p%|
|00000880| 3d 30 b8 5f 41 4f 46 45 | 58 50 25 2d 31 3a 63 25 |=0._AOFE|XP%-1:c%|
|00000890| 21 28 70 25 2a 31 36 2b | 34 29 3d 33 3a 63 25 21 |!(p%*16+|4)=3:c%!|
|000008a0| 28 70 25 2a 31 36 2b 38 | 29 3d 5f 41 4f 46 45 58 |(p%*16+8|)=_AOFEX|
|000008b0| 50 25 28 70 25 29 3a 63 | 25 21 28 70 25 2a 31 36 |P%(p%):c|%!(p%*16|
|000008c0| 2b 31 32 29 3d 34 3a ed | 0d 01 b8 05 cd 0d 01 c2 |+12)=4:.|........|
|000008d0| 10 e7 5f 41 4f 46 49 4d | 50 25 3e 30 8c 0d 01 cc |.._AOFIM|P%>0....|
|000008e0| 6b 70 25 3d 63 25 3a e3 | 70 25 3d 30 b8 5f 41 4f |kp%=c%:.|p%=0._AO|
|000008f0| 46 49 4d 50 25 2d 31 3a | 63 25 21 28 28 70 25 2b |FIMP%-1:|c%!((p%+|
|00000900| 5f 41 4f 46 45 58 50 25 | 29 2a 31 36 2b 34 29 3d |_AOFEXP%|)*16+4)=|
|00000910| 32 3a 63 25 21 28 28 70 | 25 2b 5f 41 4f 46 45 58 |2:c%!((p|%+_AOFEX|
|00000920| 50 25 29 2a 31 36 2b 38 | 29 3d 30 3a 63 25 21 28 |P%)*16+8|)=0:c%!(|
|00000930| 28 70 25 2b 5f 41 4f 46 | 45 58 50 25 29 2a 31 36 |(p%+_AOF|EXP%)*16|
|00000940| 2b 31 32 29 3d 34 3a ed | 0d 01 d6 05 cd 0d 01 e0 |+12)=4:.|........|
|00000950| 2f c8 99 31 32 2c 32 2c | 71 25 2c 63 25 2c 5f 41 |/..12,2,|q%,c%,_A|
|00000960| 4f 46 45 58 50 25 2a 31 | 36 2b 5f 41 4f 46 49 4d |OFEXP%*1|6+_AOFIM|
|00000970| 50 25 2a 31 36 3a d9 23 | 71 25 3a e1 0d 01 ea 2f |P%*16:.#|q%:..../|
|00000980| dd f2 52 65 49 6e 69 74 | 3a 5f 41 4f 46 49 4d 50 |..ReInit|:_AOFIMP|
|00000990| 25 3d 30 3a 5f 41 4f 46 | 45 58 50 25 3d 30 3a 5f |%=0:_AOF|EXP%=0:_|
|000009a0| 41 4f 46 52 45 4c 25 3d | 30 3a e1 0d ff          |AOFREL%=|0:...   |
+--------+-------------------------+-------------------------+--------+--------+