/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / a / access / !Access / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 20 | 21 52 75 6e 49 6d 61 67 |..... > |!RunImag|
|00000010| 65 0d 00 14 3b f4 20 66 | 6f 72 20 21 41 63 63 65 |e...;. f|or !Acce|
|00000020| 73 73 3a 20 6c 6f 63 6b | 73 2f 75 6e 6c 6f 63 6b |ss: lock|s/unlock|
|00000030| 73 20 6d 75 6c 74 69 70 | 6c 65 20 66 69 6c 65 73 |s multip|le files|
|00000040| 2f 64 69 72 65 63 74 6f | 72 69 65 73 0d 00 1e 18 |/directo|ries....|
|00000050| f4 20 a9 20 4d 61 6a 69 | 64 20 41 6e 77 61 72 20 |. . Maji|d Anwar |
|00000060| 31 39 39 30 0d 00 28 1e | f4 20 76 65 72 73 69 6f |1990..(.|. versio|
|00000070| 6e 20 31 2e 32 30 2c 20 | 41 70 72 69 6c 20 31 39 |n 1.20, |April 19|
|00000080| 39 30 0d 00 32 05 20 0d | 00 3c 0f f2 69 6e 69 74 |90..2. .|.<..init|
|00000090| 69 61 6c 69 73 65 0d 00 | 46 6a ee 20 85 3a 21 65 |ialise..|Fj. .:!e|
|000000a0| 72 72 6f 72 62 6c 6f 63 | 6b 25 3d 30 3a 24 28 65 |rrorbloc|k%=0:$(e|
|000000b0| 72 72 6f 72 62 6c 6f 63 | 6b 25 2b 34 29 3d f6 24 |rrorbloc|k%+4)=.$|
|000000c0| 2b 22 20 61 74 20 6c 69 | 6e 65 20 22 2b c3 9e 2b |+" at li|ne "+..+|
|000000d0| bd 30 3a c8 99 22 57 69 | 6d 70 5f 52 65 70 6f 72 |.0:.."Wi|mp_Repor|
|000000e0| 74 45 72 72 6f 72 22 2c | 65 72 72 6f 72 62 6c 6f |tError",|errorblo|
|000000f0| 63 6b 25 2c 20 33 2c 20 | 22 41 63 63 65 73 73 22 |ck%, 3, |"Access"|
|00000100| 0d 00 50 0d f2 70 6f 6c | 6c 6c 6f 6f 70 0d 00 5a |..P..pol|lloop..Z|
|00000110| 04 0d 00 64 16 c8 99 22 | 57 69 6d 70 5f 43 6c 6f |...d..."|Wimp_Clo|
|00000120| 73 65 44 6f 77 6e 22 0d | 00 6e 05 e0 0d 00 78 04 |seDown".|.n....x.|
|00000130| 0d 00 82 0f dd 20 f2 70 | 6f 6c 6c 6c 6f 6f 70 0d |..... .p|ollloop.|
|00000140| 00 8c 18 70 6f 6c 6c 5f | 6d 61 73 6b 25 3d ac 28 |...poll_|mask%=.(|
|00000150| 26 36 30 33 34 43 29 0d | 00 96 05 f5 0d 00 a0 30 |&6034C).|.......0|
|00000160| c8 99 22 57 69 6d 70 5f | 50 6f 6c 6c 22 20 2c 20 |.."Wimp_|Poll" , |
|00000170| 70 6f 6c 6c 5f 6d 61 73 | 6b 25 2c 20 62 6c 6f 63 |poll_mas|k%, bloc|
|00000180| 6b 25 20 b8 20 72 65 61 | 73 6f 6e 25 0d 00 aa 10 |k% . rea|son%....|
|00000190| c8 8e 20 72 65 61 73 6f | 6e 25 20 ca 0d 00 b4 29 |.. reaso|n% ....)|
|000001a0| 20 c9 20 32 20 20 20 20 | 20 3a c8 99 22 57 69 6d | . 2    | :.."Wim|
|000001b0| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|000001c0| 6c 6f 63 6b 25 0d 00 be | 2a 20 c9 20 33 20 20 20 |lock%...|* . 3   |
|000001d0| 20 20 3a c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |  :.."Wi|mp_Close|
|000001e0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|000001f0| 00 c8 1e 20 c9 20 36 20 | 20 20 20 20 3a f2 62 75 |... . 6 |    :.bu|
|00000200| 74 74 6f 6e 73 28 62 6c | 6f 63 6b 25 29 0d 00 d2 |ttons(bl|ock%)...|
|00000210| 21 20 c9 20 39 20 20 20 | 20 20 3a f2 6d 65 6e 75 |! . 9   |  :.menu|
|00000220| 73 65 6c 65 63 74 28 62 | 6c 6f 63 6b 25 29 0d 00 |select(b|lock%)..|
|00000230| dc 1e 20 c9 20 31 37 2c | 20 31 38 3a f2 72 65 63 |.. . 17,| 18:.rec|
|00000240| 65 69 76 65 28 62 6c 6f | 63 6b 25 29 0d 00 e6 05 |eive(blo|ck%)....|
|00000250| cb 0d 00 f0 0b fd 20 71 | 75 69 74 25 0d 00 fa 05 |...... q|uit%....|
|00000260| e1 0d 01 04 04 0d 01 0e | 11 dd 20 f2 69 6e 69 74 |........|.. .init|
|00000270| 69 61 6c 69 73 65 0d 01 | 18 14 68 65 61 70 5f 73 |ialise..|..heap_s|
|00000280| 69 7a 65 25 3d 26 34 30 | 30 30 0d 01 22 27 de 20 |ize%=&40|00.."'. |
|00000290| 62 6c 6f 63 6b 25 20 31 | 30 30 30 2c 20 69 63 6f |block% 1|000, ico|
|000002a0| 6e 25 20 35 31 32 2c 20 | 6d 65 6e 75 25 20 32 30 |n% 512, |menu% 20|
|000002b0| 30 0d 01 2c 32 de 20 65 | 72 72 6f 72 62 6c 6f 63 |0..,2. e|rrorbloc|
|000002c0| 6b 25 20 35 30 2c 20 62 | 75 66 66 65 72 25 20 34 |k% 50, b|uffer% 4|
|000002d0| 30 2c 20 68 65 61 70 25 | 20 68 65 61 70 5f 73 69 |0, heap%| heap_si|
|000002e0| 7a 65 25 0d 01 36 0e de | 20 6c 6f 63 6b 25 28 34 |ze%..6..| lock%(4|
|000002f0| 29 0d 01 40 04 0d 01 4a | 12 24 62 6c 6f 63 6b 25 |)..@...J|.$block%|
|00000300| 3d 22 54 41 53 4b 22 0d | 01 54 3b c8 99 22 57 69 |="TASK".|.T;.."Wi|
|00000310| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c 32 |mp_Initi|alise",2|
|00000320| 30 30 2c 20 21 62 6c 6f | 63 6b 25 2c 20 22 41 63 |00, !blo|ck%, "Ac|
|00000330| 63 65 73 73 22 20 b8 20 | 2c 20 6f 75 72 74 61 73 |cess" . |, ourtas|
|00000340| 6b 25 0d 01 5e 04 0d 01 | 68 33 c8 99 22 57 69 6d |k%..^...|h3.."Wim|
|00000350| 70 5f 4f 70 65 6e 54 65 | 6d 70 6c 61 74 65 22 2c |p_OpenTe|mplate",|
|00000360| 2c 22 3c 41 63 63 65 73 | 73 24 44 69 72 3e 2e 54 |,"<Acces|s$Dir>.T|
|00000370| 65 6d 70 6c 61 74 65 73 | 22 0d 01 72 3f c8 99 22 |emplates|"..r?.."|
|00000380| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|00000390| 65 22 2c 2c 62 6c 6f 63 | 6b 25 2c 69 63 6f 6e 25 |e",,bloc|k%,icon%|
|000003a0| 2c 69 63 6f 6e 25 2b 32 | 35 35 2c 2d 31 2c 22 69 |,icon%+2|55,-1,"i|
|000003b0| 6e 66 6f 50 44 22 2c 30 | 0d 01 7c 29 c8 99 22 57 |nfoPD",0|..|).."W|
|000003c0| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|000003d0| 22 2c 2c 62 6c 6f 63 6b | 25 20 b8 20 69 6e 66 6f |",,block|% . info|
|000003e0| 25 0d 01 86 44 c8 99 22 | 57 69 6d 70 5f 4c 6f 61 |%...D.."|Wimp_Loa|
|000003f0| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 62 6c 6f 63 |dTemplat|e",,bloc|
|00000400| 6b 25 2c 69 63 6f 6e 25 | 2b 32 35 36 2c 69 63 6f |k%,icon%|+256,ico|
|00000410| 6e 25 2b 35 31 31 2c 2d | 31 2c 22 6f 70 74 69 6f |n%+511,-|1,"optio|
|00000420| 6e 73 22 2c 30 0d 01 90 | 28 c8 99 22 57 69 6d 70 |ns",0...|(.."Wimp|
|00000430| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|00000440| 62 6c 6f 63 6b 25 20 b8 | 20 6f 70 74 25 0d 01 9a |block% .| opt%...|
|00000450| 1a c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 54 65 |..."Wimp|_CloseTe|
|00000460| 6d 70 6c 61 74 65 22 0d | 01 a4 05 20 0d 01 ae 23 |mplate".|... ...#|
|00000470| 73 70 72 69 74 65 24 3d | 22 75 6e 6c 6f 63 6b 2c |sprite$=|"unlock,|
|00000480| 6c 6f 63 6b 22 3a 74 65 | 78 74 24 3d 22 20 22 0d |lock":te|xt$=" ".|
|00000490| 01 b8 28 de 20 73 70 72 | 69 74 65 25 20 28 a9 73 |..(. spr|ite% (.s|
|000004a0| 70 72 69 74 65 24 2b 31 | 29 2c 20 74 65 78 74 25 |prite$+1|), text%|
|000004b0| 20 a9 74 65 78 74 24 0d | 01 c2 18 24 73 70 72 69 | .text$.|...$spri|
|000004c0| 74 65 25 3d 22 53 22 2b | 73 70 72 69 74 65 24 0d |te%="S"+|sprite$.|
|000004d0| 01 cc 10 24 74 65 78 74 | 25 3d 74 65 78 74 24 0d |...$text|%=text$.|
|000004e0| 01 d6 04 0d 01 e0 1e 21 | 62 6c 6f 63 6b 25 20 20 |.......!|block%  |
|000004f0| 3d 2d 31 20 20 3a 62 6c | 6f 63 6b 25 21 34 20 3d |=-1  :bl|ock%!4 =|
|00000500| 30 0d 01 ea 1f 62 6c 6f | 63 6b 25 21 38 20 3d 2d |0....blo|ck%!8 =-|
|00000510| 33 32 20 3a 62 6c 6f 63 | 6b 25 21 31 32 3d 36 38 |32 :bloc|k%!12=68|
|00000520| 0d 01 f4 26 62 6c 6f 63 | 6b 25 21 31 36 3d 36 38 |...&bloc|k%!16=68|
|00000530| 20 20 3a 62 6c 6f 63 6b | 25 21 32 30 3d 26 31 37 |  :block|%!20=&17|
|00000540| 30 31 33 31 30 42 0d 01 | fe 25 62 6c 6f 63 6b 25 |01310B..|.%block%|
|00000550| 21 32 34 3d 74 65 78 74 | 25 3a 62 6c 6f 63 6b 25 |!24=text|%:block%|
|00000560| 21 32 38 3d 73 70 72 69 | 74 65 25 0d 02 08 14 62 |!28=spri|te%....b|
|00000570| 6c 6f 63 6b 25 21 33 32 | 3d a9 74 65 78 74 24 0d |lock%!32|=.text$.|
|00000580| 02 12 25 c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |..%.."Wi|mp_Creat|
|00000590| 65 49 63 6f 6e 22 2c 2c | 62 6c 6f 63 6b 25 20 b8 |eIcon",,|block% .|
|000005a0| 20 69 62 25 0d 02 1c 04 | 0d 02 26 20 f2 6c 6f 61 | ib%....|..& .loa|
|000005b0| 64 6f 70 74 3a f2 75 70 | 64 61 74 65 6f 70 74 3a |dopt:.up|dateopt:|
|000005c0| f2 67 65 74 6c 6f 63 6b | 0d 02 30 04 0d 02 3a 0b |.getlock|..0...:.|
|000005d0| 71 75 69 74 25 3d a3 0d | 02 44 05 e1 0d 02 4e 04 |quit%=..|.D....N.|
|000005e0| 0d 02 58 16 dd 20 f2 62 | 75 74 74 6f 6e 73 28 62 |..X.. .b|uttons(b|
|000005f0| 6c 6f 63 6b 25 29 0d 02 | 62 12 c8 8e 20 62 6c 6f |lock%)..|b... blo|
|00000600| 63 6b 25 21 31 32 20 ca | 0d 02 6c 1b c9 20 2d 32 |ck%!12 .|..l.. -2|
|00000610| 3a e7 20 28 62 6c 6f 63 | 6b 25 21 38 20 80 20 32 |:. (bloc|k%!8 . 2|
|00000620| 29 20 8c 0d 02 76 1a 20 | 20 20 20 20 20 20 20 20 |) ...v. |        |
|00000630| f2 6d 65 6e 75 28 62 6c | 6f 63 6b 25 29 0d 02 80 |.menu(bl|ock%)...|
|00000640| 0d 20 20 20 20 20 20 20 | 20 cc 0d 02 8a 1e 20 20 |.       | .....  |
|00000650| 20 20 20 20 20 20 20 e7 | 20 62 6c 6f 63 6b 25 21 |       .| block%!|
|00000660| 31 36 3d 69 62 25 20 8c | 0d 02 94 2b 20 20 20 20 |16=ib% .|...+    |
|00000670| 20 20 20 20 20 20 62 6c | 6f 63 6b 25 21 32 30 3d |      bl|ock%!20=|
|00000680| 28 31 3c 3c 32 31 29 3a | 62 6c 6f 63 6b 25 21 32 |(1<<21):|block%!2|
|00000690| 34 3d 30 0d 02 9e 2e 20 | 20 20 20 20 20 20 20 20 |4=0.... |        |
|000006a0| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 49 63 6f 6e | .."Wimp|_SetIcon|
|000006b0| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 2b 31 |State",,|block%+1|
|000006c0| 32 0d 02 a8 28 20 20 20 | 20 20 20 20 20 20 20 62 |2...(   |       b|
|000006d0| 6c 6f 63 6b 25 21 31 32 | 3d 6f 70 74 25 3a 62 6c |lock%!12|=opt%:bl|
|000006e0| 6f 63 6b 25 21 31 36 3d | 31 0d 02 b2 2e 20 20 20 |ock%!16=|1....   |
|000006f0| 20 20 20 20 20 20 20 c8 | 99 22 57 69 6d 70 5f 53 |       .|."Wimp_S|
|00000700| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|00000710| 6f 63 6b 25 2b 31 32 0d | 02 bc 0e 20 20 20 20 20 |ock%+12.|...     |
|00000720| 20 20 20 20 cd 0d 02 c6 | 0d 20 20 20 20 20 20 20 |    ....|.       |
|00000730| 20 cd 0d 02 d0 21 c9 20 | 6f 70 74 25 3a e7 20 62 | ....!. |opt%:. b|
|00000740| 6c 6f 63 6b 25 21 31 36 | 3d 30 20 f2 73 61 76 65 |lock%!16|=0 .save|
|00000750| 6f 70 74 0d 02 da 1d 20 | 20 20 20 20 20 20 20 20 |opt.... |        |
|00000760| 20 e7 20 62 6c 6f 63 6b | 25 21 31 36 3d 31 20 8c | . block|%!16=1 .|
|00000770| 0d 02 e4 29 20 20 20 20 | 20 20 20 20 20 20 20 62 |...)    |       b|
|00000780| 6c 6f 63 6b 25 21 31 32 | 3d 2d 32 3a 62 6c 6f 63 |lock%!12|=-2:bloc|
|00000790| 6b 25 21 31 36 3d 69 62 | 25 0d 02 ee 2c 20 20 20 |k%!16=ib|%...,   |
|000007a0| 20 20 20 20 20 20 20 20 | 62 6c 6f 63 6b 25 21 32 |        |block%!2|
|000007b0| 30 3d 28 31 3c 3c 32 31 | 29 3a 62 6c 6f 63 6b 25 |0=(1<<21|):block%|
|000007c0| 21 32 34 3d 30 0d 02 f8 | 2f 20 20 20 20 20 20 20 |!24=0...|/       |
|000007d0| 20 20 20 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 49 |    .."W|imp_SetI|
|000007e0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |conState|",,block|
|000007f0| 25 2b 31 32 0d 03 02 0f | 20 20 20 20 20 20 20 20 |%+12....|        |
|00000800| 20 20 cd 0d 03 0c 05 cb | 0d 03 16 0c f2 67 65 74 |  ......|.....get|
|00000810| 6c 6f 63 6b 0d 03 20 05 | e1 0d 03 2a 04 0d 03 34 |lock.. .|...*...4|
|00000820| 16 dd 20 f2 72 65 63 65 | 69 76 65 28 62 6c 6f 63 |.. .rece|ive(bloc|
|00000830| 6b 25 29 0d 03 3e 12 c8 | 8e 20 62 6c 6f 63 6b 25 |k%)..>..|. block%|
|00000840| 21 31 36 20 ca 0d 03 48 | 10 20 c9 20 30 3a 71 75 |!16 ...H|. . 0:qu|
|00000850| 69 74 25 3d b9 0d 03 52 | 1a 20 c9 20 33 3a f2 64 |it%=...R|. . 3:.d|
|00000860| 61 74 61 6c 6f 61 64 28 | 62 6c 6f 63 6b 25 29 0d |ataload(|block%).|
|00000870| 03 5c 05 cb 0d 03 66 05 | e1 0d 03 70 04 0d 03 7a |.\....f.|...p...z|
|00000880| 12 dd f2 6d 65 6e 75 28 | 62 6c 6f 63 6b 25 29 0d |...menu(|block%).|
|00000890| 03 84 04 0d 03 8e 1e f2 | 6d 5f 68 65 61 64 28 6d |........|m_head(m|
|000008a0| 65 6e 75 25 2c 22 41 63 | 63 65 73 73 22 2c 31 30 |enu%,"Ac|cess",10|
|000008b0| 29 0d 03 98 30 f2 6d 5f | 62 6c 6f 63 6b 28 6d 65 |)...0.m_|block(me|
|000008c0| 6e 75 25 2b 32 38 2c 26 | 30 30 2c 69 6e 66 6f 25 |nu%+28,&|00,info%|
|000008d0| 2c 26 37 30 30 30 30 30 | 31 2c 22 49 6e 66 6f 22 |,&700000|1,"Info"|
|000008e0| 29 0d 03 a2 32 f2 6d 5f | 62 6c 6f 63 6b 28 6d 65 |)...2.m_|block(me|
|000008f0| 6e 75 25 2b 35 32 2c 26 | 30 30 2c 6f 70 74 25 2c |nu%+52,&|00,opt%,|
|00000900| 26 37 30 30 30 30 30 31 | 2c 22 4f 70 74 69 6f 6e |&7000001|,"Option|
|00000910| 73 22 29 0d 03 ac 2d f2 | 6d 5f 62 6c 6f 63 6b 28 |s")...-.|m_block(|
|00000920| 6d 65 6e 75 25 2b 37 36 | 2c 26 38 30 2c 2d 31 2c |menu%+76|,&80,-1,|
|00000930| 26 37 30 30 30 30 30 31 | 2c 22 51 75 69 74 22 29 |&7000001|,"Quit")|
|00000940| 0d 03 b6 04 0d 03 c0 2e | c8 99 22 57 69 6d 70 5f |........|.."Wimp_|
|00000950| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 6d 65 6e |CreateMe|nu",,men|
|00000960| 75 25 2c 62 6c 6f 63 6b | 25 21 30 2d 36 38 2c 32 |u%,block|%!0-68,2|
|00000970| 32 38 0d 03 ca 05 e1 0d | 03 d4 04 0d 03 de 2b dd |28......|......+.|
|00000980| f2 6d 5f 62 6c 6f 63 6b | 28 62 61 73 65 25 2c 66 |.m_block|(base%,f|
|00000990| 6c 61 67 25 2c 70 74 72 | 25 2c 69 63 66 6c 25 2c |lag%,ptr|%,icfl%,|
|000009a0| 64 61 74 61 24 29 0d 03 | e8 3e 62 61 73 65 25 21 |data$)..|.>base%!|
|000009b0| 30 3d 66 6c 61 67 25 3a | 62 61 73 65 25 21 34 3d |0=flag%:|base%!4=|
|000009c0| 70 74 72 25 3a 62 61 73 | 65 25 21 38 3d 69 63 66 |ptr%:bas|e%!8=icf|
|000009d0| 6c 25 3a 24 28 62 61 73 | 65 25 2b 31 32 29 3d 64 |l%:$(bas|e%+12)=d|
|000009e0| 61 74 61 24 0d 03 f2 05 | e1 0d 03 fc 04 0d 04 06 |ata$....|........|
|000009f0| 20 dd f2 6d 5f 68 65 61 | 64 28 62 61 73 65 25 2c | ..m_hea|d(base%,|
|00000a00| 64 61 74 61 24 2c 77 69 | 64 74 68 25 29 0d 04 10 |data$,wi|dth%)...|
|00000a10| 4d 24 62 61 73 65 25 3d | 64 61 74 61 24 3a 62 61 |M$base%=|data$:ba|
|00000a20| 73 65 25 21 31 32 3d 26 | 30 30 30 37 30 32 30 37 |se%!12=&|00070207|
|00000a30| 3a 62 61 73 65 25 21 31 | 36 3d 77 69 64 74 68 25 |:base%!1|6=width%|
|00000a40| 2a 31 36 3a 62 61 73 65 | 25 21 32 30 3d 34 34 3a |*16:base|%!20=44:|
|00000a50| 62 61 73 65 25 21 32 34 | 3d 30 0d 04 1a 05 e1 0d |base%!24|=0......|
|00000a60| 04 24 04 0d 04 2e 20 dd | 20 f2 6d 65 6e 75 73 65 |.$.... .| .menuse|
|00000a70| 6c 65 63 74 28 62 6c 6f | 63 6b 25 29 3a ea 20 73 |lect(blo|ck%):. s|
|00000a80| 74 61 79 0d 04 38 37 c8 | 99 22 57 69 6d 70 5f 47 |tay..87.|."Wimp_G|
|00000a90| 65 74 50 6f 69 6e 74 65 | 72 49 6e 66 6f 22 2c 2c |etPointe|rInfo",,|
|00000aa0| 62 6c 6f 63 6b 25 2b 33 | 32 3a 73 74 61 79 3d 62 |block%+3|2:stay=b|
|00000ab0| 6c 6f 63 6b 25 21 34 30 | 3d 31 0d 04 42 10 c8 8e |lock%!40|=1..B...|
|00000ac0| 20 21 62 6c 6f 63 6b 25 | 20 ca 0d 04 4c 3d 20 c9 | !block%| ...L= .|
|00000ad0| 20 31 20 20 20 3a 62 6c | 6f 63 6b 25 21 35 32 3d | 1   :bl|ock%!52=|
|00000ae0| 6f 70 74 25 3a c8 99 22 | 57 69 6d 70 5f 47 65 74 |opt%:.."|Wimp_Get|
|00000af0| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 62 6c |WindowSt|ate",,bl|
|00000b00| 6f 63 6b 25 2b 35 32 0d | 04 56 2c 20 20 20 20 20 |ock%+52.|.V,     |
|00000b10| 20 20 20 20 20 c8 99 22 | 57 69 6d 70 5f 4f 70 65 |     .."|Wimp_Ope|
|00000b20| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |nWindow"|,,block%|
|00000b30| 2b 35 32 0d 04 60 13 20 | c9 20 32 20 20 20 3a 71 |+52..`. |. 2   :q|
|00000b40| 75 69 74 25 3d b9 0d 04 | 6a 05 cb 0d 04 74 1b e7 |uit%=...|j....t..|
|00000b50| 20 73 74 61 79 20 f2 6d | 65 6e 75 28 62 6c 6f 63 | stay .m|enu(bloc|
|00000b60| 6b 25 2b 33 32 29 0d 04 | 7e 05 e1 0d 04 88 04 0d |k%+32)..|~.......|
|00000b70| 04 92 17 dd 20 f2 64 61 | 74 61 6c 6f 61 64 28 62 |.... .da|taload(b|
|00000b80| 6c 6f 63 6b 25 29 0d 04 | 9c 13 e7 20 62 6c 6f 63 |lock%)..|... bloc|
|00000b90| 6b 25 21 31 32 3d 30 20 | 8c 0d 04 a6 1e 20 70 61 |k%!12=0 |..... pa|
|00000ba0| 74 68 24 3d a4 67 65 74 | 6e 61 6d 65 28 62 6c 6f |th$=.get|name(blo|
|00000bb0| 63 6b 25 2b 34 34 29 0d | 04 b0 04 0d 04 ba 24 20 |ck%+44).|......$ |
|00000bc0| c8 99 22 4f 53 5f 46 69 | 6c 65 22 2c 20 26 31 31 |.."OS_Fi|le", &11|
|00000bd0| 2c 20 70 61 74 68 24 20 | b8 20 74 79 70 65 25 0d |, path$ |. type%.|
|00000be0| 04 c4 0f 20 c8 8e 20 74 | 79 70 65 25 20 ca 0d 04 |... .. t|ype% ...|
|00000bf0| ce 7c 20 20 c9 20 30 3a | 21 65 72 72 6f 72 62 6c |.|  . 0:|!errorbl|
|00000c00| 6f 63 6b 25 3d 30 3a 24 | 28 65 72 72 6f 72 62 6c |ock%=0:$|(errorbl|
|00000c10| 6f 63 6b 25 2b 34 29 3d | 22 46 69 6c 65 20 4e 6f |ock%+4)=|"File No|
|00000c20| 74 20 46 6f 75 6e 64 22 | 3a 3f 28 65 72 72 6f 72 |t Found"|:?(error|
|00000c30| 62 6c 6f 63 6b 25 2b 31 | 38 29 3d 30 3a c8 99 22 |block%+1|8)=0:.."|
|00000c40| 57 69 6d 70 5f 52 65 70 | 6f 72 74 45 72 72 6f 72 |Wimp_Rep|ortError|
|00000c50| 22 2c 65 72 72 6f 72 62 | 6c 6f 63 6b 25 2c 20 33 |",errorb|lock%, 3|
|00000c60| 2c 20 22 41 63 63 65 73 | 73 22 0d 04 d8 26 20 20 |, "Acces|s"...&  |
|00000c70| c9 20 31 3a c8 99 22 4f | 53 5f 46 69 6c 65 22 2c |. 1:.."O|S_File",|
|00000c80| 34 2c 70 61 74 68 24 2c | 2c 2c 2c 6c 6f 63 6b 25 |4,path$,|,,,lock%|
|00000c90| 0d 04 e2 18 20 20 c9 20 | 32 3a f2 73 65 61 72 63 |....  . |2:.searc|
|00000ca0| 68 28 70 61 74 68 24 29 | 0d 04 ec 06 20 cb 0d 04 |h(path$)|.... ...|
|00000cb0| f6 05 cd 0d 05 00 05 e1 | 0d 05 0a 04 0d 05 14 14 |........|........|
|00000cc0| dd 20 a4 67 65 74 6e 61 | 6d 65 28 70 74 72 25 29 |. .getna|me(ptr%)|
|00000cd0| 0d 05 1e 09 70 24 3d 22 | 22 0d 05 28 11 c8 95 20 |....p$="|"..(... |
|00000ce0| 3f 70 74 72 25 20 3c 3e | 20 30 0d 05 32 13 20 70 |?ptr% <>| 0..2. p|
|00000cf0| 24 20 20 20 2b 3d 20 bd | 3f 70 74 72 25 0d 05 3c |$   += .|?ptr%..<|
|00000d00| 0e 20 70 74 72 25 20 2b | 3d 20 31 0d 05 46 05 ce |. ptr% +|= 1..F..|
|00000d10| 0d 05 50 08 3d 20 70 24 | 0d 05 5a 04 0d 05 64 14 |..P.= p$|..Z...d.|
|00000d20| dd 20 f2 73 65 61 72 63 | 68 28 70 61 74 68 24 29 |. .searc|h(path$)|
|00000d30| 0d 05 6e 04 0d 05 78 15 | 63 75 72 72 65 6e 74 24 |..n...x.|current$|
|00000d40| 3d 22 22 3a 6f 6b 25 3d | b9 0d 05 82 22 73 74 61 |="":ok%=|...."sta|
|00000d50| 72 74 25 3d 2d 31 3a 65 | 6e 64 25 3d 2d 31 3a 70 |rt%=-1:e|nd%=-1:p|
|00000d60| 72 65 76 69 6f 75 73 25 | 3d 2d 31 0d 05 8c 05 f5 |revious%|=-1.....|
|00000d70| 0d 05 96 0c 20 66 69 6c | 65 25 3d 30 0d 05 a0 06 |.... fil|e%=0....|
|00000d80| 20 f5 0d 05 aa 15 20 20 | e7 20 63 75 72 72 65 6e | .....  |. curren|
|00000d90| 74 24 3d 22 22 20 8c 0d | 05 b4 17 20 20 20 6e 61 |t$="" ..|...   na|
|00000da0| 6d 65 24 3d 70 61 74 68 | 24 20 2b 20 bd 30 0d 05 |me$=path|$ + .0..|
|00000db0| be 07 20 20 cc 0d 05 c8 | 22 20 20 20 6e 61 6d 65 |..  ....|"   name|
|00000dc0| 24 3d 70 61 74 68 24 2b | 22 2e 22 2b 63 75 72 72 |$=path$+|"."+curr|
|00000dd0| 65 6e 74 24 2b bd 30 0d | 05 d2 07 20 20 cd 0d 05 |ent$+.0.|...  ...|
|00000de0| dc 4a 20 20 c8 99 22 4f | 53 5f 47 42 50 42 22 2c |.J  .."O|S_GBPB",|
|00000df0| 20 31 30 2c 20 6e 61 6d | 65 24 2c 20 62 75 66 66 | 10, nam|e$, buff|
|00000e00| 65 72 25 2c 20 31 2c 20 | 66 69 6c 65 25 2c 20 34 |er%, 1, |file%, 4|
|00000e10| 30 2c 20 22 2a 22 20 b8 | 20 2c 2c 2c 72 65 61 64 |0, "*" .| ,,,read|
|00000e20| 25 2c 20 66 69 6c 65 25 | 0d 05 e6 15 20 20 e7 20 |%, file%|....  . |
|00000e30| 66 69 6c 65 25 20 3c 3e | 20 2d 31 20 8c 0d 05 f0 |file% <>| -1 ....|
|00000e40| 22 20 20 20 74 65 73 74 | 24 3d a4 67 65 74 6e 61 |"   test|$=.getna|
|00000e50| 6d 65 28 62 75 66 66 65 | 72 25 2b 26 31 34 29 0d |me(buffe|r%+&14).|
|00000e60| 05 fa 38 20 20 20 c8 99 | 22 4f 53 5f 46 69 6c 65 |..8   ..|"OS_File|
|00000e70| 22 2c 34 2c c0 6e 61 6d | 65 24 2c a9 6e 61 6d 65 |",4,.nam|e$,.name|
|00000e80| 24 2d 31 29 2b 22 2e 22 | 2b 74 65 73 74 24 2c 2c |$-1)+"."|+test$,,|
|00000e90| 2c 2c 6c 6f 63 6b 25 0d | 06 04 18 20 20 20 e7 20 |,,lock%.|...   . |
|00000ea0| 62 75 66 66 65 72 25 21 | 26 31 30 3d 32 20 8c 0d |buffer%!|&10=2 ..|
|00000eb0| 06 0e 48 20 20 20 20 e7 | 20 63 75 72 72 65 6e 74 |..H    .| current|
|00000ec0| 24 3d 22 22 20 8c 20 f2 | 70 75 74 28 74 65 73 74 |$="" . .|put(test|
|00000ed0| 24 2c 20 6f 6b 25 29 20 | 8b 20 f2 70 75 74 28 63 |$, ok%) |. .put(c|
|00000ee0| 75 72 72 65 6e 74 24 2b | 22 2e 22 2b 74 65 73 74 |urrent$+|"."+test|
|00000ef0| 24 2c 20 6f 6b 25 29 0d | 06 18 08 20 20 20 cd 0d |$, ok%).|...   ..|
|00000f00| 06 22 24 20 20 cc 20 c8 | 99 22 4f 53 5f 46 69 6c |."$  . .|."OS_Fil|
|00000f10| 65 22 2c 34 2c 70 61 74 | 68 24 2c 2c 2c 2c 6c 6f |e",4,pat|h$,,,,lo|
|00000f20| 63 6b 25 0d 06 2c 07 20 | 20 cd 0d 06 36 16 20 fd |ck%..,. | ...6. .|
|00000f30| 20 66 69 6c 65 25 3d 2d | 31 20 84 20 ac 6f 6b 25 | file%=-|1 . .ok%|
|00000f40| 0d 06 40 12 63 75 72 72 | 65 6e 74 24 3d a4 70 75 |..@.curr|ent$=.pu|
|00000f50| 6c 6c 0d 06 4a 18 fd 20 | 63 75 72 72 65 6e 74 24 |ll..J.. |current$|
|00000f60| 3d 22 22 20 84 20 ac 6f | 6b 25 0d 06 54 04 0d 06 |="" . .o|k%..T...|
|00000f70| 5e 0c e7 20 ac 6f 6b 25 | 20 8c 0d 06 68 40 21 65 |^.. .ok%| ...h@!e|
|00000f80| 72 72 6f 72 62 6c 6f 63 | 6b 25 3d 30 3a 24 28 65 |rrorbloc|k%=0:$(e|
|00000f90| 72 72 6f 72 62 6c 6f 63 | 6b 25 2b 34 29 3d 22 49 |rrorbloc|k%+4)="I|
|00000fa0| 6e 74 65 72 6e 61 6c 20 | 42 72 65 61 64 74 68 20 |nternal |Breadth |
|00000fb0| 48 65 61 70 20 46 55 4c | 4c 22 0d 06 72 31 c8 99 |Heap FUL|L"..r1..|
|00000fc0| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00000fd0| 72 22 2c 65 72 72 6f 72 | 62 6c 6f 63 6b 25 2c 20 |r",error|block%, |
|00000fe0| 33 2c 20 22 41 63 63 65 | 73 73 22 0d 06 7c 05 cd |3, "Acce|ss"..|..|
|00000ff0| 0d 06 86 04 0d 06 90 05 | e1 0d 06 9a 04 0d 06 a4 |........|........|
|00001000| 16 dd 20 f2 70 75 74 28 | 69 6e 24 2c 20 f8 20 6f |.. .put(|in$, . o|
|00001010| 6b 25 29 0d 06 ae 09 6f | 6b 25 3d b9 0d 06 b8 18 |k%)....o|k%=.....|
|00001020| 6c 65 6e 67 74 68 25 3d | a9 69 6e 24 20 2b 20 34 |length%=|.in$ + 4|
|00001030| 20 2b 20 31 0d 06 c2 2a | e7 20 73 74 61 72 74 25 | + 1...*|. start%|
|00001040| 3d 2d 31 20 84 20 65 6e | 64 25 3d 2d 31 20 84 20 |=-1 . en|d%=-1 . |
|00001050| 70 72 65 76 69 6f 75 73 | 25 3d 2d 31 20 8c 0d 06 |previous|%=-1 ...|
|00001060| cc 36 73 74 61 72 74 25 | 3d 68 65 61 70 25 3a 65 |.6start%|=heap%:e|
|00001070| 6e 64 25 3d 68 65 61 70 | 25 20 2b 20 6c 65 6e 67 |nd%=heap|% + leng|
|00001080| 74 68 25 3a 70 72 65 76 | 69 6f 75 73 25 3d 73 74 |th%:prev|ious%=st|
|00001090| 61 72 74 25 0d 06 d6 1e | 21 73 74 61 72 74 25 3d |art%....|!start%=|
|000010a0| 2d 31 3a 24 28 73 74 61 | 72 74 25 2b 34 29 3d 69 |-1:$(sta|rt%+4)=i|
|000010b0| 6e 24 0d 06 e0 22 e7 20 | 6c 65 6e 67 74 68 25 20 |n$...". |length% |
|000010c0| 3e 20 68 65 61 70 5f 73 | 69 7a 65 25 20 8c 20 6f |> heap_s|ize% . o|
|000010d0| 6b 25 3d a3 0d 06 ea 05 | cc 0d 06 f4 27 e7 20 65 |k%=.....|....'. e|
|000010e0| 6e 64 25 2b 6c 65 6e 67 | 74 68 25 20 3c 20 68 65 |nd%+leng|th% < he|
|000010f0| 61 70 25 2b 68 65 61 70 | 5f 73 69 7a 65 25 20 8c |ap%+heap|_size% .|
|00001100| 0d 06 fe 2a 21 70 72 65 | 76 69 6f 75 73 25 3d 65 |...*!pre|vious%=e|
|00001110| 6e 64 25 3a 21 65 6e 64 | 25 3d 2d 31 3a 24 28 65 |nd%:!end|%=-1:$(e|
|00001120| 6e 64 25 2b 34 29 3d 69 | 6e 24 0d 07 08 22 70 72 |nd%+4)=i|n$..."pr|
|00001130| 65 76 69 6f 75 73 25 3d | 65 6e 64 25 3a 65 6e 64 |evious%=|end%:end|
|00001140| 25 20 2b 3d 20 6c 65 6e | 67 74 68 25 0d 07 12 05 |% += len|gth%....|
|00001150| cc 0d 07 1c 09 6f 6b 25 | 3d a3 0d 07 26 05 cd 0d |.....ok%|=...&...|
|00001160| 07 30 05 cd 0d 07 3a 05 | e1 0d 07 44 04 0d 07 4e |.0....:.|...D...N|
|00001170| 0b dd 20 a4 70 75 6c 6c | 0d 07 58 0b 6f 75 74 24 |.. .pull|..X.out$|
|00001180| 3d 22 22 0d 07 62 14 e7 | 20 73 74 61 72 74 25 20 |=""..b..| start% |
|00001190| 3c 3e 20 2d 31 20 8c 0d | 07 6c 11 6e 65 78 74 25 |<> -1 ..|.l.next%|
|000011a0| 3d 21 73 74 61 72 74 25 | 0d 07 76 14 6f 75 74 24 |=!start%|..v.out$|
|000011b0| 3d 24 28 73 74 61 72 74 | 25 2b 34 29 0d 07 80 10 |=$(start|%+4)....|
|000011c0| 73 74 61 72 74 25 3d 6e | 65 78 74 25 0d 07 8a 05 |start%=n|ext%....|
|000011d0| cd 0d 07 94 09 3d 6f 75 | 74 24 0d 07 9e 04 0d 07 |.....=ou|t$......|
|000011e0| a8 0d dd f2 73 61 76 65 | 6f 70 74 0d 07 b2 1d 58 |....save|opt....X|
|000011f0| 3d ae 22 3c 41 63 63 65 | 73 73 24 44 69 72 3e 2e |=."<Acce|ss$Dir>.|
|00001200| 4f 70 74 69 6f 6e 73 22 | 0d 07 bc 1b e3 78 25 3d |Options"|.....x%=|
|00001210| 30 b8 34 3a f1 23 58 2c | 6c 6f 63 6b 25 28 78 25 |0.4:.#X,|lock%(x%|
|00001220| 29 3a ed 0d 07 c6 07 d9 | 23 58 0d 07 d0 05 e1 0d |):......|#X......|
|00001230| 07 da 04 0d 07 e4 0d dd | f2 6c 6f 61 64 6f 70 74 |........|.loadopt|
|00001240| 0d 07 ee 1d 58 3d 8e 22 | 3c 41 63 63 65 73 73 24 |....X=."|<Access$|
|00001250| 44 69 72 3e 2e 4f 70 74 | 69 6f 6e 73 22 0d 07 f8 |Dir>.Opt|ions"...|
|00001260| 1b e3 78 25 3d 30 b8 34 | 3a e8 23 58 2c 6c 6f 63 |..x%=0.4|:.#X,loc|
|00001270| 6b 25 28 78 25 29 3a ed | 0d 08 02 07 d9 23 58 0d |k%(x%):.|.....#X.|
|00001280| 08 0c 05 e1 0d 08 16 04 | 0d 08 20 0f dd f2 75 70 |........|.. ...up|
|00001290| 64 61 74 65 6f 70 74 0d | 08 2a 0b e3 78 25 3d 30 |dateopt.|.*..x%=0|
|000012a0| b8 34 0d 08 34 23 62 6c | 6f 63 6b 25 21 30 3d 6f |.4..4#bl|ock%!0=o|
|000012b0| 70 74 25 3a 62 6c 6f 63 | 6b 25 21 31 32 3d 28 31 |pt%:bloc|k%!12=(1|
|000012c0| 3c 3c 32 31 29 0d 08 3e | 2a 62 6c 6f 63 6b 25 21 |<<21)..>|*block%!|
|000012d0| 34 3d 78 25 2b 31 3a 62 | 6c 6f 63 6b 25 21 38 3d |4=x%+1:b|lock%!8=|
|000012e0| 28 6c 6f 63 6b 25 28 78 | 25 29 3c 3c 32 31 29 0d |(lock%(x|%)<<21).|
|000012f0| 08 48 21 c8 99 22 57 69 | 6d 70 5f 53 65 74 49 63 |.H!.."Wi|mp_SetIc|
|00001300| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |onState"|,,block%|
|00001310| 0d 08 52 05 ed 0d 08 5c | 1c 62 6c 6f 63 6b 25 21 |..R....\|.block%!|
|00001320| 30 3d 2d 31 3a 62 6c 6f | 63 6b 25 21 34 3d 69 62 |0=-1:blo|ck%!4=ib|
|00001330| 25 0d 08 66 2d 62 6c 6f | 63 6b 25 21 38 3d 28 6c |%..f-blo|ck%!8=(l|
|00001340| 6f 63 6b 25 28 30 29 3c | 3c 32 31 29 3a 62 6c 6f |ock%(0)<|<21):blo|
|00001350| 63 6b 25 21 31 32 3d 28 | 31 3c 3c 32 31 29 0d 08 |ck%!12=(|1<<21)..|
|00001360| 70 21 c8 99 22 57 69 6d | 70 5f 53 65 74 49 63 6f |p!.."Wim|p_SetIco|
|00001370| 6e 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |nState",|,block%.|
|00001380| 08 7a 05 e1 0d 08 84 04 | 0d 08 8e 0d dd f2 67 65 |.z......|......ge|
|00001390| 74 6c 6f 63 6b 0d 08 98 | 11 62 6c 6f 63 6b 25 21 |tlock...|.block%!|
|000013a0| 30 3d 6f 70 74 25 0d 08 | a2 0b e3 78 25 3d 30 b8 |0=opt%..|...x%=0.|
|000013b0| 34 0d 08 ac 11 62 6c 6f | 63 6b 25 21 34 3d 78 25 |4....blo|ck%!4=x%|
|000013c0| 2b 31 0d 08 b6 21 c8 99 | 22 57 69 6d 70 5f 47 65 |+1...!..|"Wimp_Ge|
|000013d0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|000013e0| 63 6b 25 0d 08 c0 21 6c | 6f 63 6b 25 28 78 25 29 |ck%...!l|ock%(x%)|
|000013f0| 3d 28 28 62 6c 6f 63 6b | 25 21 32 34 29 3e 3e 32 |=((block|%!24)>>2|
|00001400| 31 29 80 31 0d 08 ca 05 | ed 0d 08 d4 52 6c 6f 63 |1).1....|....Rloc|
|00001410| 6b 25 3d 28 6c 6f 63 6b | 25 28 30 29 3c 3c 33 29 |k%=(lock|%(0)<<3)|
|00001420| 20 2b 20 6c 6f 63 6b 25 | 28 31 29 20 2b 20 28 6c | + lock%|(1) + (l|
|00001430| 6f 63 6b 25 28 32 29 3c | 3c 31 29 20 2b 20 28 6c |ock%(2)<|<1) + (l|
|00001440| 6f 63 6b 25 28 33 29 3c | 3c 34 29 20 2b 20 28 6c |ock%(3)<|<4) + (l|
|00001450| 6f 63 6b 25 28 34 29 3c | 3c 35 29 0d 08 de 05 e1 |ock%(4)<|<5).....|
|00001460| 0d ff                   |                         |..      |        |
+--------+-------------------------+-------------------------+--------+--------+