home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / a / archicpc / !ArchiCPC / !RunImage < prev    next >
Unknown  |  1995-07-20  |  11.6 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 20 20 9f e5 0c 30 4f e2 | 03 00 82 e0 0f 1c 80 e2 | ...0O.|........|
|00000010| 04 30 10 e4 04 30 01 e4 | 04 20 52 e2 fb ff ff 1a |.0...0..|. R.....|
|00000020| 28 c0 4f e2 39 0f 00 ea | 88 2e 00 00 0d 00 14 19 |(.O.9...|........|
|00000030| ee 85 f1 f6 24 3b 22 20 | 61 74 20 6c 69 6e 65 20 |....$;" |at line |
|00000040| 22 3b 9e 3a e0 0d 00 28 | 3e de 46 24 28 32 30 30 |";.:...(|>.F$(200|
|00000050| 29 2c 44 25 28 32 30 30 | 29 2c 6f 73 62 6c 6f 63 |),D%(200|),osbloc|
|00000060| 6b 25 36 34 2c 52 47 42 | 28 32 36 2c 32 29 2c 49 |k%64,RGB|(26,2),I|
|00000070| 4e 4b 28 33 31 29 2c 4d | 44 45 28 32 29 2c 53 43 |NK(31),M|DE(2),SC|
|00000080| 52 25 38 0d 00 32 18 de | 74 65 6d 70 6c 25 32 30 |R%8..2..|templ%20|
|00000090| 34 38 2c 77 69 6e 25 32 | 30 34 38 0d 00 3c 29 de |48,win%2|048..<).|
|000000a0| 41 4d 50 49 43 20 31 36 | 35 32 34 2c 41 52 43 50 |AMPIC 16|524,ARCP|
|000000b0| 49 43 25 34 31 31 34 34 | 2c 61 72 6d 63 6f 64 65 |IC%41144|,armcode|
|000000c0| 25 35 31 32 0d 00 46 0d | f2 41 53 53 45 4d 42 4c |%512..F.|.ASSEMBL|
|000000d0| 45 0d 00 50 23 e3 52 47 | 42 3d 30 b8 32 36 3a e3 |E..P#.RG|B=0.26:.|
|000000e0| 49 3d 30 b8 32 3a f3 52 | 47 42 28 52 47 42 2c 49 |I=0.2:.R|GB(RGB,I|
|000000f0| 29 3a ed 2c 0d 00 5a 15 | e3 49 3d 30 b8 33 31 3a |):.,..Z.|.I=0.31:|
|00000100| f3 49 4e 4b 28 49 29 3a | ed 0d 00 64 1f 4d 44 45 |.INK(I):|...d.MDE|
|00000110| 28 30 29 3d 31 35 3a 4d | 44 45 28 31 29 3d 33 3a |(0)=15:M|DE(1)=3:|
|00000120| 4d 44 45 28 32 29 3d 31 | 0d 00 78 16 f2 69 6e 69 |MDE(2)=1|..x..ini|
|00000130| 74 28 22 41 72 63 68 69 | 2d 43 50 43 22 29 0d 00 |t("Archi|-CPC")..|
|00000140| 8c 0c c8 95 ac 71 75 69 | 74 25 0d 00 96 0e f2 77 |.....qui|t%.....w|
|00000150| 69 6d 70 5f 70 6f 6c 6c | 0d 00 a0 05 ce 0d 00 aa |imp_poll|........|
|00000160| 20 e7 6c 6f 61 64 65 64 | 25 8c f2 72 65 6c 65 61 | .loaded|%..relea|
|00000170| 73 65 5f 6d 65 6d 28 63 | 6f 64 65 25 29 0d 00 b4 |se_mem(c|ode%)...|
|00000180| 16 c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 44 6f |..."Wimp|_CloseDo|
|00000190| 77 6e 22 0d 00 be 05 e0 | 0d 00 dc 12 dd f2 69 6e |wn".....|......in|
|000001a0| 69 74 28 74 69 74 6c 65 | 24 29 0d 00 e6 13 62 6c |it(title|$)....bl|
|000001b0| 6f 63 6b 5f 6c 65 6e 25 | 3d 32 30 34 38 0d 00 fa |ock_len%|=2048...|
|000001c0| 15 de 62 6c 6f 63 6b 25 | 62 6c 6f 63 6b 5f 6c 65 |..block%|block_le|
|000001d0| 6e 25 0d 01 04 0f de 70 | 77 25 32 38 2b 32 34 2a |n%.....p|w%28+24*|
|000001e0| 31 0d 01 18 18 de 69 63 | 6f 6e 62 61 72 6d 65 6e |1.....ic|onbarmen|
|000001f0| 75 25 32 38 2b 32 34 2a | 34 0d 01 40 0f 72 69 73 |u%28+24*|4..@.ris|
|00000200| 63 5f 76 65 72 25 3d 32 | 0d 01 4a 17 61 70 70 6c |c_ver%=2|..J.appl|
|00000210| 69 63 61 74 69 6f 6e 24 | 3d 74 69 74 6c 65 24 0d |ication$|=title$.|
|00000220| 01 54 0b 71 75 69 74 25 | 3d a3 0d 01 5e 0d 64 6f |.T.quit%|=...^.do|
|00000230| 70 61 73 73 25 3d a3 0d | 01 68 0f 6d 65 6e 75 73 |pass%=..|.h.menus|
|00000240| 61 76 65 25 3d a3 0d 01 | 72 0d 6c 6f 61 64 65 64 |ave%=...|r.loaded|
|00000250| 25 3d a3 0d 01 86 3c c8 | 99 22 57 69 6d 70 5f 49 |%=....<.|."Wimp_I|
|00000260| 6e 69 74 69 61 6c 69 73 | 65 22 2c 72 69 73 63 5f |nitialis|e",risc_|
|00000270| 76 65 72 25 2a 31 30 30 | 2c 26 34 42 35 33 34 31 |ver%*100|,&4B5341|
|00000280| 35 34 2c 61 70 70 6c 69 | 63 61 74 69 6f 6e 24 0d |54,appli|cation$.|
|00000290| 01 90 11 ee 85 f2 61 6e | 5f 65 72 72 6f 72 3a e0 |......an|_error:.|
|000002a0| 0d 01 a4 18 f2 73 65 74 | 75 70 5f 74 65 6d 70 6c |.....set|up_templ|
|000002b0| 61 74 65 73 28 31 30 29 | 0d 01 ae 2b 73 61 76 65 |ates(10)|...+save|
|000002c0| 74 65 78 74 25 3d a4 66 | 69 6e 64 74 65 78 74 61 |text%=.f|indtexta|
|000002d0| 64 64 72 28 73 61 76 65 | 5f 77 69 6e 64 6f 77 25 |ddr(save|_window%|
|000002e0| 2c 32 29 0d 01 c2 3e 69 | 63 6f 6e 62 61 72 69 63 |,2)...>i|conbaric|
|000002f0| 6f 6e 25 3d a4 63 72 65 | 61 74 65 5f 69 63 6f 6e |on%=.cre|ate_icon|
|00000300| 28 2d 31 2c 30 2c 30 2c | 36 38 2c 36 38 2c 26 33 |(-1,0,0,|68,68,&3|
|00000310| 30 30 32 2c 22 49 43 4f | 4e 22 2c 30 2c 30 2c 30 |002,"ICO|N",0,0,0|
|00000320| 29 0d 02 1c 6c 69 62 6d | 65 6e 75 5f 6c 65 6e 25 |)...libm|enu_len%|
|00000330| 3d a4 63 72 65 61 74 65 | 6d 65 6e 75 28 69 63 6f |=.create|menu(ico|
|00000340| 6e 62 61 72 6d 65 6e 75 | 25 2c 22 20 41 72 63 68 |nbarmenu|%," Arch|
|00000350| 69 2d 43 50 43 20 20 20 | 20 2c 33 2c 30 2c 69 6e |i-CPC | ,3,0,in|
|00000360| 66 6f 62 6f 78 25 2c 49 | 6e 66 6f 2c 30 2c 73 61 |fobox%,I|nfo,0,sa|
|00000370| 76 65 5f 77 69 6e 64 6f | 77 25 2c 53 61 76 65 2c |ve_windo|w%,Save,|
|00000380| 26 38 30 2c 2d 31 2c 51 | 75 69 74 22 29 0d 02 26 |&80,-1,Q|uit")..&|
|00000390| 1d f2 73 68 61 64 65 5f | 6f 6e 28 69 63 6f 6e 62 |..shade_|on(iconb|
|000003a0| 61 72 6d 65 6e 75 25 2c | 31 29 0d 02 3a 05 e1 0d |armenu%,|1)..:...|
|000003b0| 02 58 0f dd f2 77 69 6d | 70 5f 70 6f 6c 6c 0d 02 |.X...wim|p_poll..|
|000003c0| 62 22 c8 99 22 57 69 6d | 70 5f 50 6f 6c 6c 22 2c |b".."Wim|p_Poll",|
|000003d0| 30 2c 62 6c 6f 63 6b 25 | b8 72 65 61 73 6f 6e 25 |0,block%|.reason%|
|000003e0| 0d 02 6c 0e c8 8e 72 65 | 61 73 6f 6e 25 ca 0d 02 |..l...re|ason%...|
|000003f0| 76 17 c9 31 3a f2 72 65 | 64 72 61 77 28 21 62 6c |v..1:.re|draw(!bl|
|00000400| 6f 63 6b 25 29 0d 02 80 | 22 c9 32 3a c8 99 22 57 |ock%)...|".2:.."W|
|00000410| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00000420| 2c 62 6c 6f 63 6b 25 0d | 02 8a 1c c9 33 3a f2 63 |,block%.|....3:.c|
|00000430| 6c 6f 73 65 77 69 6e 64 | 6f 77 28 21 62 6c 6f 63 |losewind|ow(!bloc|
|00000440| 6b 25 29 0d 02 94 18 c9 | 36 3a f2 63 6c 69 63 6b |k%).....|6:.click|
|00000450| 28 62 6c 6f 63 6b 25 21 | 31 32 29 0d 02 9e 11 c9 |(block%!|12).....|
|00000460| 37 3a f2 73 74 61 72 74 | 73 61 76 65 0d 02 a8 23 |7:.start|save...#|
|00000470| c9 38 3a f2 6b 65 79 70 | 72 65 73 73 28 62 6c 6f |.8:.keyp|ress(blo|
|00000480| 63 6b 25 21 32 34 2c 21 | 62 6c 6f 63 6b 25 29 0d |ck%!24,!|block%).|
|00000490| 02 b2 12 c9 39 3a f2 6d | 65 6e 75 73 65 6c 65 63 |....9:.m|enuselec|
|000004a0| 74 0d 02 bc 13 c9 31 37 | 2c 31 38 3a f2 72 65 63 |t.....17|,18:.rec|
|000004b0| 65 69 76 65 0d 02 c6 07 | c9 31 39 0d 02 d0 05 cb |eive....|.19.....|
|000004c0| 0d 02 da 05 e1 0d 02 f8 | 13 dd f2 65 72 72 6f 72 |........|...error|
|000004d0| 28 65 72 72 6f 72 24 29 | 0d 03 02 1e 63 6c 69 63 |(error$)|....clic|
|000004e0| 6b 25 3d a4 65 72 72 6f | 72 62 6f 78 28 65 72 72 |k%=.erro|rbox(err|
|000004f0| 6f 72 24 2c 31 29 0d 03 | 0c 05 e1 0d 03 2a 1e dd |or$,1)..|.....*..|
|00000500| a4 65 72 72 6f 72 62 6f | 78 28 6d 65 73 73 61 67 |.errorbo|x(messag|
|00000510| 65 24 2c 66 6c 61 67 25 | 29 0d 03 34 1a 65 72 72 |e$,flag%|)..4.err|
|00000520| 5f 74 69 74 6c 65 24 3d | 22 41 72 63 68 69 2d 43 |_title$=|"Archi-C|
|00000530| 50 43 22 0d 03 3e 34 e7 | 66 6c 61 67 25 80 20 31 |PC"..>4.|flag%. 1|
|00000540| 36 8c 65 72 72 5f 74 69 | 74 6c 65 24 3d 22 4d 65 |6.err_ti|tle$="Me|
|00000550| 73 73 61 67 65 20 66 72 | 6f 6d 20 22 2b 65 72 72 |ssage fr|om "+err|
|00000560| 5f 74 69 74 6c 65 24 0d | 03 48 0f 21 62 6c 6f 63 |_title$.|.H.!bloc|
|00000570| 6b 25 3d 32 35 35 0d 03 | 52 1b 24 28 62 6c 6f 63 |k%=255..|R.$(bloc|
|00000580| 6b 25 2b 34 29 3d 6d 65 | 73 73 61 67 65 24 2b bd |k%+4)=me|ssage$+.|
|00000590| 30 0d 03 5c 3c c8 99 22 | 57 69 6d 70 5f 52 65 70 |0..\<.."|Wimp_Rep|
|000005a0| 6f 72 74 45 72 72 6f 72 | 22 2c 62 6c 6f 63 6b 25 |ortError|",block%|
|000005b0| 2c 66 6c 61 67 25 2c 65 | 72 72 5f 74 69 74 6c 65 |,flag%,e|rr_title|
|000005c0| 24 b8 2c 65 72 72 5f 63 | 6c 69 63 6b 25 0d 03 66 |$.,err_c|lick%..f|
|000005d0| 0f 3d 65 72 72 5f 63 6c | 69 63 6b 25 0d 03 84 0e |.=err_cl|ick%....|
|000005e0| dd f2 61 6e 5f 65 72 72 | 6f 72 0d 03 8e 19 ee 85 |..an_err|or......|
|000005f0| f1 f6 24 3b 22 20 61 74 | 20 6c 69 6e 65 20 22 3b |..$;" at| line ";|
|00000600| 9e 3a e0 0d 03 98 1d f2 | 65 72 72 6f 72 28 f6 24 |.:......|error(.$|
|00000610| 2b 22 20 61 74 20 6c 69 | 6e 65 20 22 2b c3 9e 29 |+" at li|ne "+..)|
|00000620| 0d 03 a2 20 e7 6c 6f 61 | 64 65 64 25 8c f2 72 65 |... .loa|ded%..re|
|00000630| 6c 65 61 73 65 5f 6d 65 | 6d 28 63 6f 64 65 25 29 |lease_me|m(code%)|
|00000640| 0d 03 ac 16 c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |......"W|imp_Clos|
|00000650| 65 44 6f 77 6e 22 0d 03 | b6 05 e1 0d 03 d4 57 dd |eDown"..|......W.|
|00000660| a4 63 72 65 61 74 65 5f | 69 63 6f 6e 28 77 68 61 |.create_|icon(wha|
|00000670| 6e 64 25 2c 69 63 6f 6e | 5f 78 25 2c 69 63 6f 6e |nd%,icon|_x%,icon|
|00000680| 5f 79 25 2c 69 63 6f 6e | 5f 77 25 2c 69 63 6f 6e |_y%,icon|_w%,icon|
|00000690| 5f 68 25 2c 66 6c 61 67 | 25 2c 74 65 78 74 24 2c |_h%,flag|%,text$,|
|000006a0| 70 74 72 31 25 2c 70 74 | 72 32 25 2c 70 74 72 33 |ptr1%,pt|r2%,ptr3|
|000006b0| 25 29 0d 03 de 12 21 62 | 6c 6f 63 6b 25 3d 77 68 |%)....!b|lock%=wh|
|000006c0| 61 6e 64 25 0d 03 e8 14 | 62 6c 6f 63 6b 25 21 34 |and%....|block%!4|
|000006d0| 3d 69 63 6f 6e 5f 78 25 | 0d 03 f2 14 62 6c 6f 63 |=icon_x%|....bloc|
|000006e0| 6b 25 21 38 3d 69 63 6f | 6e 5f 79 25 0d 03 fc 1d |k%!8=ico|n_y%....|
|000006f0| 62 6c 6f 63 6b 25 21 31 | 32 3d 69 63 6f 6e 5f 77 |block%!1|2=icon_w|
|00000700| 25 2b 69 63 6f 6e 5f 78 | 25 0d 04 06 1d 62 6c 6f |%+icon_x|%....blo|
|00000710| 63 6b 25 21 31 36 3d 69 | 63 6f 6e 5f 68 25 2b 69 |ck%!16=i|con_h%+i|
|00000720| 63 6f 6e 5f 79 25 0d 04 | 10 13 62 6c 6f 63 6b 25 |con_y%..|..block%|
|00000730| 21 32 30 3d 66 6c 61 67 | 25 0d 04 1a 0d e7 70 74 |!20=flag|%.....pt|
|00000740| 72 31 25 3d 30 8c 0d 04 | 24 16 24 28 62 6c 6f 63 |r1%=0...|$.$(bloc|
|00000750| 6b 25 2b 32 34 29 3d 74 | 65 78 74 24 0d 04 2e 05 |k%+24)=t|ext$....|
|00000760| cc 0d 04 38 13 62 6c 6f | 63 6b 25 21 32 34 3d 70 |...8.blo|ck%!24=p|
|00000770| 74 72 31 25 0d 04 42 13 | 62 6c 6f 63 6b 25 21 32 |tr1%..B.|block%!2|
|00000780| 38 3d 70 74 72 32 25 0d | 04 4c 13 62 6c 6f 63 6b |8=ptr2%.|.L.block|
|00000790| 25 21 33 32 3d 70 74 72 | 33 25 0d 04 56 05 cd 0d |%!32=ptr|3%..V...|
|000007a0| 04 60 28 c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |.`(.."Wi|mp_Creat|
|000007b0| 65 49 63 6f 6e 22 2c 2c | 62 6c 6f 63 6b 25 b8 69 |eIcon",,|block%.i|
|000007c0| 68 61 6e 64 6c 65 25 0d | 04 6a 0d 3d 69 68 61 6e |handle%.|.j.=ihan|
|000007d0| 64 6c 65 25 0d 04 88 15 | dd f2 72 65 64 72 61 77 |dle%....|..redraw|
|000007e0| 28 77 69 6e 64 6f 77 25 | 29 0d 04 92 0e c8 8e 77 |(window%|)......w|
|000007f0| 69 6e 64 6f 77 25 ca 0d | 04 9c 05 cb 0d 04 a6 05 |indow%..|........|
|00000800| e1 0d 04 c4 1c dd f2 6b | 65 79 70 72 65 73 73 28 |.......k|eypress(|
|00000810| 6b 65 79 25 2c 77 69 6e | 64 6f 77 25 29 0d 04 ce |key%,win|dow%)...|
|00000820| 0e c8 8e 77 69 6e 64 6f | 77 25 ca 0d 04 d8 30 c9 |...windo|w%....0.|
|00000830| 73 61 76 65 5f 77 69 6e | 64 6f 77 25 3a e7 6b 65 |save_win|dow%:.ke|
|00000840| 79 25 3d 31 33 f2 71 75 | 69 63 6b 73 61 76 65 3a |y%=13.qu|icksave:|
|00000850| f2 63 6c 6f 73 65 6d 65 | 6e 75 73 0d 04 e2 1e 7f |.closeme|nus.....|
|00000860| 3a c8 99 22 57 69 6d 70 | 5f 50 72 6f 63 65 73 73 |:.."Wimp|_Process|
|00000870| 4b 65 79 22 2c 6b 65 79 | 25 0d 04 ec 05 cb 0d 04 |Key",key|%.......|
|00000880| f6 05 e1 0d 05 14 12 dd | f2 63 6c 69 63 6b 28 77 |........|.click(w|
|00000890| 69 6e 64 25 29 0d 05 1e | 13 69 63 6f 6e 25 3d 62 |ind%)...|.icon%=b|
|000008a0| 6c 6f 63 6b 25 21 31 36 | 0d 05 28 15 62 75 74 74 |lock%!16|..(.butt|
|000008b0| 6f 6e 73 25 3d 62 6c 6f | 63 6b 25 21 38 0d 05 32 |ons%=blo|ck%!8..2|
|000008c0| 0c c8 8e 77 69 6e 64 25 | ca 0d 05 3c 1a c9 2d 32 |...wind%|...<..-2|
|000008d0| 3a f2 69 63 6f 6e 62 61 | 72 28 62 75 74 74 6f 6e |:.iconba|r(button|
|000008e0| 73 25 29 0d 05 46 1a c9 | 73 61 76 65 5f 77 69 6e |s%)..F..|save_win|
|000008f0| 64 6f 77 25 3a c8 8e 69 | 63 6f 6e 25 ca 0d 05 50 |dow%:..i|con%...P|
|00000900| 30 c9 33 3a e7 62 75 74 | 74 6f 6e 73 25 3d 28 34 |0.3:.but|tons%=(4|
|00000910| 3c 3c 34 29 84 62 75 74 | 74 6f 6e 73 25 3d 28 31 |<<4).but|tons%=(1|
|00000920| 3c 3c 34 29 8c f2 64 72 | 61 67 62 6f 78 0d 05 5a |<<4)..dr|agbox..Z|
|00000930| 40 c9 30 3a e7 62 75 74 | 74 6f 6e 73 25 3d 34 84 |@.0:.but|tons%=4.|
|00000940| 62 75 74 74 6f 6e 73 25 | 3d 31 8c f2 71 75 69 63 |buttons%|=1..quic|
|00000950| 6b 73 61 76 65 3a e7 62 | 75 74 74 6f 6e 73 25 3c |ksave:.b|uttons%<|
|00000960| 3e 31 f2 63 6c 6f 73 65 | 6d 65 6e 75 73 0d 05 64 |>1.close|menus..d|
|00000970| 05 cb 0d 05 6e 05 cb 0d | 05 78 05 e1 0d 05 96 0d |....n...|.x......|
|00000980| dd f2 64 72 61 67 62 6f | 78 0d 05 a0 18 21 62 6c |..dragbo|x....!bl|
|00000990| 6f 63 6b 25 3d 73 61 76 | 65 5f 77 69 6e 64 6f 77 |ock%=sav|e_window|
|000009a0| 25 0d 05 aa 23 c8 99 22 | 57 69 6d 70 5f 47 65 74 |%...#.."|Wimp_Get|
|000009b0| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 62 6c |WindowSt|ate",,bl|
|000009c0| 6f 63 6b 25 0d 05 b4 1a | 6f 78 25 3d 62 6c 6f 63 |ock%....|ox%=bloc|
|000009d0| 6b 25 21 34 2d 62 6c 6f | 63 6b 25 21 32 30 0d 05 |k%!4-blo|ck%!20..|
|000009e0| be 1b 6f 79 25 3d 62 6c | 6f 63 6b 25 21 31 36 2d |..oy%=bl|ock%!16-|
|000009f0| 62 6c 6f 63 6b 25 21 32 | 34 0d 05 c8 0e 62 6c 6f |block%!2|4....blo|
|00000a00| 63 6b 25 21 34 3d 33 0d | 05 d2 21 c8 99 22 57 69 |ck%!4=3.|..!.."Wi|
|00000a10| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00000a20| 2c 2c 62 6c 6f 63 6b 25 | 0d 05 dc 0e 62 6c 6f 63 |,,block%|....bloc|
|00000a30| 6b 25 21 34 3d 35 0d 05 | e6 1b 62 6c 6f 63 6b 25 |k%!4=5..|..block%|
|00000a40| 21 30 38 3d 6f 78 25 2b | 62 6c 6f 63 6b 25 21 30 |!08=ox%+|block%!0|
|00000a50| 38 0d 05 f0 1b 62 6c 6f | 63 6b 25 21 31 32 3d 6f |8....blo|ck%!12=o|
|00000a60| 79 25 2b 62 6c 6f 63 6b | 25 21 31 32 0d 05 fa 1b |y%+block|%!12....|
|00000a70| 62 6c 6f 63 6b 25 21 31 | 36 3d 6f 78 25 2b 62 6c |block%!1|6=ox%+bl|
|00000a80| 6f 63 6b 25 21 31 36 0d | 06 04 1b 62 6c 6f 63 6b |ock%!16.|...block|
|00000a90| 25 21 32 30 3d 6f 79 25 | 2b 62 6c 6f 63 6b 25 21 |%!20=oy%|+block%!|
|00000aa0| 32 30 0d 06 0e 1b 62 6c | 6f 63 6b 25 21 32 34 3d |20....bl|ock%!24=|
|00000ab0| 30 3a 62 6c 6f 63 6b 25 | 21 32 38 3d 30 0d 06 18 |0:block%|!28=0...|
|00000ac0| 17 62 6c 6f 63 6b 25 21 | 33 32 3d 26 37 46 46 46 |.block%!|32=&7FFF|
|00000ad0| 46 46 46 46 0d 06 22 17 | 62 6c 6f 63 6b 25 21 33 |FFFF..".|block%!3|
|00000ae0| 36 3d 26 37 46 46 46 46 | 46 46 46 0d 06 2c 1c c8 |6=&7FFFF|FFF..,..|
|00000af0| 99 22 57 69 6d 70 5f 44 | 72 61 67 42 6f 78 22 2c |."Wimp_D|ragBox",|
|00000b00| 2c 62 6c 6f 63 6b 25 0d | 06 36 05 e1 0d 06 54 16 |,block%.|.6....T.|
|00000b10| dd f2 69 63 6f 6e 62 61 | 72 28 62 75 74 74 6f 6e |..iconba|r(button|
|00000b20| 25 29 0d 06 5e 0e c8 8e | 62 75 74 74 6f 6e 25 ca |%)..^...|button%.|
|00000b30| 0d 06 68 38 c9 32 3a f2 | 73 68 6f 77 6d 65 6e 75 |..h8.2:.|showmenu|
|00000b40| 28 69 63 6f 6e 62 61 72 | 6d 65 6e 75 25 2c 21 62 |(iconbar|menu%,!b|
|00000b50| 6c 6f 63 6b 25 2d 36 34 | 2c 39 36 2b 69 62 6d 65 |lock%-64|,96+ibme|
|00000b60| 6e 75 5f 6c 65 6e 25 29 | 0d 06 72 05 cb 0d 06 7c |nu_len%)|..r....||
|00000b70| 05 e1 0d 06 9a 10 dd f2 | 63 6c 6f 73 65 6d 65 6e |........|closemen|
|00000b80| 75 73 0d 06 a4 1f c8 99 | 22 57 69 6d 70 5f 43 72 |us......|"Wimp_Cr|
|00000b90| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 2d 31 2c 30 2c |eateMenu|",,-1,0,|
|00000ba0| 30 0d 06 ae 05 e1 0d 06 | cc 25 dd f2 73 68 6f 77 |0.......|.%..show|
|00000bb0| 6d 65 6e 75 28 6d 65 6e | 75 25 2c 6d 65 6e 75 5f |menu(men|u%,menu_|
|00000bc0| 78 25 2c 6d 65 6e 75 5f | 79 25 29 0d 06 d6 13 6d |x%,menu_|y%)....m|
|00000bd0| 65 6e 75 6f 70 65 6e 25 | 3d 6d 65 6e 75 25 0d 06 |enuopen%|=menu%..|
|00000be0| e0 2e c8 99 22 57 69 6d | 70 5f 43 72 65 61 74 65 |...."Wim|p_Create|
|00000bf0| 4d 65 6e 75 22 2c 2c 6d | 65 6e 75 25 2c 6d 65 6e |Menu",,m|enu%,men|
|00000c00| 75 5f 78 25 2c 6d 65 6e | 75 5f 79 25 0d 06 ea 05 |u_x%,men|u_y%....|
|00000c10| e1 0d 07 08 21 dd a4 63 | 72 65 61 74 65 6d 65 6e |....!..c|reatemen|
|00000c20| 75 28 6d 65 6e 75 25 2c | 63 6f 6e 74 65 6e 74 73 |u(menu%,|contents|
|00000c30| 24 29 0d 07 12 1d ea 63 | 6f 75 6e 74 65 72 25 2c |$).....c|ounter%,|
|00000c40| 70 74 72 25 2c 74 65 6d | 70 77 69 64 74 68 25 0d |ptr%,tem|pwidth%.|
|00000c50| 07 1c 1a 63 6f 6e 74 65 | 6e 74 73 24 3d 63 6f 6e |...conte|nts$=con|
|00000c60| 74 65 6e 74 73 24 2b bd | 30 0d 07 26 0e 63 6f 75 |tents$+.|0..&.cou|
|00000c70| 6e 74 65 72 25 3d 30 0d | 07 30 30 f2 72 65 61 64 |nter%=0.|.00.read|
|00000c80| 73 74 72 28 63 6f 6e 74 | 65 6e 74 73 24 2c 63 6f |str(cont|ents$,co|
|00000c90| 75 6e 74 65 72 25 2c 74 | 69 74 6c 65 24 2c 63 6f |unter%,t|itle$,co|
|00000ca0| 75 6e 74 65 72 25 29 0d | 07 3a 37 f2 72 65 61 64 |unter%).|.:7.read|
|00000cb0| 6e 75 6d 28 63 6f 6e 74 | 65 6e 74 73 24 2c 63 6f |num(cont|ents$,co|
|00000cc0| 75 6e 74 65 72 25 2c 6e | 75 6d 5f 6f 66 5f 69 74 |unter%,n|um_of_it|
|00000cd0| 65 6d 73 25 2c 63 6f 75 | 6e 74 65 72 25 29 0d 07 |ems%,cou|nter%)..|
|00000ce0| 44 11 24 6d 65 6e 75 25 | 3d 74 69 74 6c 65 24 0d |D.$menu%|=title$.|
|00000cf0| 07 4e 1e 6d 61 78 77 69 | 64 74 68 25 3d 28 a9 28 |.N.maxwi|dth%=(.(|
|00000d00| 74 69 74 6c 65 24 29 2d | 32 29 2a 31 36 0d 07 58 |title$)-|2)*16..X|
|00000d10| 16 6d 65 6e 75 25 21 31 | 32 3d 26 30 30 30 37 30 |.menu%!1|2=&00070|
|00000d20| 32 30 37 0d 07 62 0f 6d | 65 6e 75 25 21 32 30 3d |207..b.m|enu%!20=|
|00000d30| 34 34 0d 07 6c 0e 6d 65 | 6e 75 25 21 32 34 3d 30 |44..l.me|nu%!24=0|
|00000d40| 0d 07 76 11 70 74 72 25 | 3d 6d 65 6e 75 25 2b 32 |..v.ptr%|=menu%+2|
|00000d50| 38 0d 07 80 0f 6d 65 6e | 75 5f 6c 65 6e 25 3d 30 |8....men|u_len%=0|
|00000d60| 0d 07 8a 1b e3 69 74 65 | 6d 73 25 3d 31 b8 6e 75 |.....ite|ms%=1.nu|
|00000d70| 6d 5f 6f 66 5f 69 74 65 | 6d 73 25 0d 07 94 35 f2 |m_of_ite|ms%...5.|
|00000d80| 72 65 61 64 6e 75 6d 28 | 63 6f 6e 74 65 6e 74 73 |readnum(|contents|
|00000d90| 24 2c 63 6f 75 6e 74 65 | 72 25 2c 6d 65 6e 75 5f |$,counte|r%,menu_|
|00000da0| 66 6c 61 67 73 25 2c 63 | 6f 75 6e 74 65 72 25 29 |flags%,c|ounter%)|
|00000db0| 0d 07 9e 31 f2 72 65 61 | 64 6e 75 6d 28 63 6f 6e |...1.rea|dnum(con|
|00000dc0| 74 65 6e 74 73 24 2c 63 | 6f 75 6e 74 65 72 25 2c |tents$,c|ounter%,|
|00000dd0| 73 75 62 70 74 72 25 2c | 63 6f 75 6e 74 65 72 25 |subptr%,|counter%|
|00000de0| 29 0d 07 a8 2f f2 72 65 | 61 64 73 74 72 28 63 6f |).../.re|adstr(co|
|00000df0| 6e 74 65 6e 74 73 24 2c | 63 6f 75 6e 74 65 72 25 |ntents$,|counter%|
|00000e00| 2c 69 74 65 6d 24 2c 63 | 6f 75 6e 74 65 72 25 29 |,item$,c|ounter%)|
|00000e10| 0d 07 b2 15 21 70 74 72 | 25 3d 6d 65 6e 75 5f 66 |....!ptr|%=menu_f|
|00000e20| 6c 61 67 73 25 0d 07 bc | 12 70 74 72 25 21 34 3d |lags%...|.ptr%!4=|
|00000e30| 73 75 62 70 74 72 25 0d | 07 c6 13 70 74 72 25 21 |subptr%.|...ptr%!|
|00000e40| 38 3d 26 37 30 30 30 30 | 32 31 0d 07 d0 14 24 28 |8=&70000|21....$(|
|00000e50| 70 74 72 25 2b 31 32 29 | 3d 69 74 65 6d 24 0d 07 |ptr%+12)|=item$..|
|00000e60| da 1e 74 65 6d 70 77 69 | 64 74 68 25 3d 28 a9 28 |..tempwi|dth%=(.(|
|00000e70| 69 74 65 6d 24 29 2b 31 | 29 2a 31 36 0d 07 e4 2e |item$)+1|)*16....|
|00000e80| e7 74 65 6d 70 77 69 64 | 74 68 25 3e 6d 61 78 77 |.tempwid|th%>maxw|
|00000e90| 69 64 74 68 25 8c 6d 61 | 78 77 69 64 74 68 25 3d |idth%.ma|xwidth%=|
|00000ea0| 74 65 6d 70 77 69 64 74 | 68 25 0d 07 ee 0c 70 74 |tempwidt|h%....pt|
|00000eb0| 72 25 2b 3d 32 34 0d 07 | f8 11 6d 65 6e 75 5f 6c |r%+=24..|..menu_l|
|00000ec0| 65 6e 25 2b 3d 34 34 0d | 08 02 05 ed 0d 08 0c 16 |en%+=44.|........|
|00000ed0| 6d 65 6e 75 25 21 31 36 | 3d 6d 61 78 77 69 64 74 |menu%!16|=maxwidt|
|00000ee0| 68 25 0d 08 16 0e 3d 6d | 65 6e 75 5f 6c 65 6e 25 |h%....=m|enu_len%|
|00000ef0| 0d 08 34 2a dd f2 72 65 | 61 64 73 74 72 28 73 65 |..4*..re|adstr(se|
|00000f00| 61 72 63 68 24 2c 70 6f | 73 25 2c f8 73 65 61 72 |arch$,po|s%,.sear|
|00000f10| 63 68 24 2c f8 70 6f 73 | 25 29 0d 08 3e 0c ea 6f |ch$,.pos|%)..>..o|
|00000f20| 6c 64 70 6f 73 25 0d 08 | 48 12 6f 6c 64 70 6f 73 |ldpos%..|H.oldpos|
|00000f30| 25 3d 70 6f 73 25 2b 31 | 0d 08 52 05 f5 0d 08 5c |%=pos%+1|..R....\|
|00000f40| 0b 70 6f 73 25 2b 3d 31 | 0d 08 66 2d fd c1 73 65 |.pos%+=1|..f-..se|
|00000f50| 61 72 63 68 24 2c 70 6f | 73 25 2c 31 29 3d 22 2c |arch$,po|s%,1)=",|
|00000f60| 22 84 c1 73 65 61 72 63 | 68 24 2c 70 6f 73 25 2c |"..searc|h$,pos%,|
|00000f70| 31 29 3d bd 30 0d 08 70 | 2c 73 65 61 72 63 68 24 |1)=.0..p|,search$|
|00000f80| 3d c1 73 65 61 72 63 68 | 24 2c 6f 6c 64 70 6f 73 |=.search|$,oldpos|
|00000f90| 25 2c 28 70 6f 73 25 2d | 6f 6c 64 70 6f 73 25 29 |%,(pos%-|oldpos%)|
|00000fa0| 29 0d 08 7a 05 e1 0d 08 | 98 29 dd f2 72 65 61 64 |)..z....|.)..read|
|00000fb0| 6e 75 6d 28 73 65 61 72 | 63 68 24 2c 70 6f 73 25 |num(sear|ch$,pos%|
|00000fc0| 2c f8 66 6f 75 6e 64 25 | 2c f8 70 6f 73 25 29 0d |,.found%|,.pos%).|
|00000fd0| 08 a2 0c ea 6f 6c 64 70 | 6f 73 25 0d 08 ac 12 6f |....oldp|os%....o|
|00000fe0| 6c 64 70 6f 73 25 3d 70 | 6f 73 25 2b 31 0d 08 b6 |ldpos%=p|os%+1...|
|00000ff0| 05 f5 0d 08 c0 0b 70 6f | 73 25 2b 3d 31 0d 08 ca |......po|s%+=1...|
|00001000| 2d fd c1 73 65 61 72 63 | 68 24 2c 70 6f 73 25 2c |-..searc|h$,pos%,|
|00001010| 31 29 3d 22 2c 22 84 c1 | 73 65 61 72 63 68 24 2c |1)=","..|search$,|
|00001020| 70 6f 73 25 2c 31 29 3d | bd 30 0d 08 d4 2c 73 65 |pos%,1)=|.0...,se|
|00001030| 61 72 63 68 24 3d c1 73 | 65 61 72 63 68 24 2c 6f |arch$=.s|earch$,o|
|00001040| 6c 64 70 6f 73 25 2c 28 | 70 6f 73 25 2d 6f 6c 64 |ldpos%,(|pos%-old|
|00001050| 70 6f 73 25 29 29 0d 08 | de 15 66 6f 75 6e 64 25 |pos%))..|..found%|
|00001060| 3d a0 28 73 65 61 72 63 | 68 24 29 0d 08 e8 05 e1 |=.(searc|h$).....|
|00001070| 0d 09 06 10 dd f2 6d 65 | 6e 75 73 65 6c 65 63 74 |......me|nuselect|
|00001080| 0d 09 10 20 73 65 6c 31 | 25 3d 21 62 6c 6f 63 6b |... sel1|%=!block|
|00001090| 25 3a 73 65 6c 32 25 3d | 62 6c 6f 63 6b 25 21 34 |%:sel2%=|block%!4|
|000010a0| 0d 09 1a 22 73 65 6c 33 | 25 3d 62 6c 6f 63 6b 25 |..."sel3|%=block%|
|000010b0| 21 38 3a 73 65 6c 34 25 | 3d 62 6c 6f 63 6b 25 21 |!8:sel4%|=block%!|
|000010c0| 31 32 0d 09 2e 23 c8 99 | 22 57 69 6d 70 5f 47 65 |12...#..|"Wimp_Ge|
|000010d0| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 22 2c 2c 62 |tPointer|Info",,b|
|000010e0| 6c 6f 63 6b 25 0d 09 38 | 14 62 75 74 74 6f 6e 25 |lock%..8|.button%|
|000010f0| 3d 62 6c 6f 63 6b 25 21 | 38 0d 09 4c 10 c8 8e 6d |=block%!|8..L...m|
|00001100| 65 6e 75 6f 70 65 6e 25 | ca 0d 09 56 1a c9 69 63 |enuopen%|...V..ic|
|00001110| 6f 6e 62 61 72 6d 65 6e | 75 25 3a c8 8e 73 65 6c |onbarmen|u%:..sel|
|00001120| 31 25 ca 0d 09 60 06 c9 | 30 0d 09 6a 1d c9 31 3a |1%...`..|0..j..1:|
|00001130| 6d 65 6e 75 73 61 76 65 | 25 3d b9 3a f2 71 75 69 |menusave|%=.:.qui|
|00001140| 63 6b 73 61 76 65 0d 09 | 74 0e c9 32 3a 71 75 69 |cksave..|t..2:qui|
|00001150| 74 25 3d b9 0d 09 7e 05 | cb 0d 09 88 05 cb 0d 09 |t%=...~.|........|
|00001160| 9c 27 e7 62 75 74 74 6f | 6e 25 3d 31 8c f2 73 68 |.'.butto|n%=1..sh|
|00001170| 6f 77 6d 65 6e 75 28 6d | 65 6e 75 6f 70 65 6e 25 |owmenu(m|enuopen%|
|00001180| 2c 30 2c 30 29 0d 09 a6 | 05 e1 0d 09 c4 38 dd f2 |,0,0)...|.....8..|
|00001190| 69 6e 64 69 72 65 63 74 | 28 6d 65 6e 75 25 2c 69 |indirect|(menu%,i|
|000011a0| 74 65 6d 25 2c 74 65 78 | 74 24 2c 69 6e 64 70 6f |tem%,tex|t$,indpo|
|000011b0| 73 25 2c 76 61 6c 69 64 | 25 2c 6c 65 6e 67 74 68 |s%,valid|%,length|
|000011c0| 25 29 0d 09 ce 12 24 69 | 6e 64 70 6f 73 25 3d 74 |%)....$i|ndpos%=t|
|000011d0| 65 78 74 24 0d 09 d8 11 | 70 74 72 25 3d 6d 65 6e |ext$....|ptr%=men|
|000011e0| 75 25 2b 32 38 0d 09 e2 | 16 70 74 72 25 3d 70 74 |u%+28...|.ptr%=pt|
|000011f0| 72 25 2b 32 34 2a 69 74 | 65 6d 25 0d 09 f6 13 70 |r%+24*it|em%....p|
|00001200| 74 72 25 21 31 32 3d 69 | 6e 64 70 6f 73 25 0d 0a |tr%!12=i|ndpos%..|
|00001210| 00 12 70 74 72 25 21 31 | 36 3d 76 61 6c 69 64 25 |..ptr%!1|6=valid%|
|00001220| 0d 0a 0a 13 70 74 72 25 | 21 32 30 3d 6c 65 6e 67 |....ptr%|!20=leng|
|00001230| 74 68 25 0d 0a 14 05 e1 | 0d 0a 32 1c dd f2 77 72 |th%.....|..2...wr|
|00001240| 69 74 65 61 62 6c 65 28 | 6d 65 6e 75 25 2c 69 74 |iteable(|menu%,it|
|00001250| 65 6d 25 29 0d 0a 3c 11 | 70 74 72 25 3d 6d 65 6e |em%)..<.|ptr%=men|
|00001260| 75 25 2b 32 38 0d 0a 46 | 16 70 74 72 25 3d 70 74 |u%+28..F|.ptr%=pt|
|00001270| 72 25 2b 32 34 2a 69 74 | 65 6d 25 0d 0a 50 14 3f |r%+24*it|em%..P.?|
|00001280| 70 74 72 25 3d 3f 70 74 | 72 25 84 25 31 30 30 0d |ptr%=?pt|r%.%100.|
|00001290| 0a 5a 05 e1 0d 0a 78 1a | dd f2 74 69 63 6b 5f 6f |.Z....x.|..tick_o|
|000012a0| 6e 28 6d 65 6e 75 25 2c | 69 74 65 6d 25 29 0d 0a |n(menu%,|item%)..|
|000012b0| 82 11 70 74 72 25 3d 6d | 65 6e 75 25 2b 32 38 0d |..ptr%=m|enu%+28.|
|000012c0| 0a 8c 16 70 74 72 25 3d | 70 74 72 25 2b 32 34 2a |...ptr%=|ptr%+24*|
|000012d0| 69 74 65 6d 25 0d 0a 96 | 11 3f 70 74 72 25 3d 3f |item%...|.?ptr%=?|
|000012e0| 70 74 72 25 84 31 0d 0a | a0 05 e1 0d 0a be 1b dd |ptr%.1..|........|
|000012f0| f2 74 69 63 6b 5f 6f 66 | 66 28 6d 65 6e 75 25 2c |.tick_of|f(menu%,|
|00001300| 69 74 65 6d 25 29 0d 0a | c8 11 70 74 72 25 3d 6d |item%)..|..ptr%=m|
|00001310| 65 6e 75 25 2b 32 38 0d | 0a d2 16 70 74 72 25 3d |enu%+28.|...ptr%=|
|00001320| 70 74 72 25 2b 32 34 2a | 69 74 65 6d 25 0d 0a dc |ptr%+24*|item%...|
|00001330| 19 3f 70 74 72 25 3d 3f | 70 74 72 25 80 25 31 31 |.?ptr%=?|ptr%.%11|
|00001340| 31 31 31 31 31 30 0d 0a | e6 05 e1 0d 0b 04 1b dd |111110..|........|
|00001350| f2 73 68 61 64 65 5f 6f | 6e 28 6d 65 6e 75 25 2c |.shade_o|n(menu%,|
|00001360| 69 74 65 6d 25 29 0d 0b | 0e 11 70 74 72 25 3d 6d |item%)..|..ptr%=m|
|00001370| 65 6e 75 25 2b 32 38 0d | 0b 18 16 70 74 72 25 3d |enu%+28.|...ptr%=|
|00001380| 70 74 72 25 2b 32 34 2a | 69 74 65 6d 25 0d 0b 22 |ptr%+24*|item%.."|
|00001390| 0c 70 74 72 25 2b 3d 31 | 30 0d 0b 2c 19 3f 70 74 |.ptr%+=1|0..,.?pt|
|000013a0| 72 25 3d 3f 70 74 72 25 | 84 25 30 31 30 30 30 30 |r%=?ptr%|.%010000|
|000013b0| 30 30 0d 0b 36 05 e1 0d | 0b 54 1c dd f2 73 68 61 |00..6...|.T...sha|
|000013c0| 64 65 5f 6f 66 66 28 6d | 65 6e 75 25 2c 69 74 65 |de_off(m|enu%,ite|
|000013d0| 6d 25 29 0d 0b 5e 11 70 | 74 72 25 3d 6d 65 6e 75 |m%)..^.p|tr%=menu|
|000013e0| 25 2b 32 38 0d 0b 68 16 | 70 74 72 25 3d 70 74 72 |%+28..h.|ptr%=ptr|
|000013f0| 25 2b 32 34 2a 69 74 65 | 6d 25 0d 0b 72 0c 70 74 |%+24*ite|m%..r.pt|
|00001400| 72 25 2b 3d 31 30 0d 0b | 7c 19 3f 70 74 72 25 3d |r%+=10..||.?ptr%=|
|00001410| 3f 70 74 72 25 80 25 31 | 30 31 31 31 31 31 31 0d |?ptr%.%1|0111111.|
|00001420| 0b 86 05 e1 0d 0b a4 1a | dd f2 63 6c 6f 73 65 77 |........|..closew|
|00001430| 69 6e 64 6f 77 28 77 69 | 6e 64 6f 77 25 29 0d 0b |indow(wi|ndow%)..|
|00001440| ae 0e c8 8e 77 69 6e 64 | 6f 77 25 ca 0d 0b b8 05 |....wind|ow%.....|
|00001450| cb 0d 0b cc 13 21 62 6c | 6f 63 6b 25 3d 77 69 6e |.....!bl|ock%=win|
|00001460| 64 6f 77 25 0d 0b d6 20 | c8 99 22 57 69 6d 70 5f |dow%... |.."Wimp_|
|00001470| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00001480| 6f 63 6b 25 0d 0b e0 05 | e1 0d 0b fe 1d dd f2 6f |ock%....|.......o|
|00001490| 70 65 6e 77 69 6e 64 6f | 77 28 77 69 6e 64 6f 77 |penwindo|w(window|
|000014a0| 25 2c 78 2c 79 29 0d 0c | 08 0e c8 8e 77 69 6e 64 |%,x,y)..|....wind|
|000014b0| 6f 77 25 ca 0d 0c 12 05 | cb 0d 0c 26 13 21 62 6c |ow%.....|...&.!bl|
|000014c0| 6f 63 6b 25 3d 77 69 6e | 64 6f 77 25 0d 0c 30 23 |ock%=win|dow%..0#|
|000014d0| c8 99 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |.."Wimp_|GetWindo|
|000014e0| 77 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |wState",|,block%.|
|000014f0| 0c 3a 10 62 6c 6f 63 6b | 25 21 32 38 3d 2d 31 0d |.:.block|%!28=-1.|
|00001500| 0c 44 1a 77 64 25 3d 62 | 6c 6f 63 6b 25 21 31 32 |.D.wd%=b|lock%!12|
|00001510| 2d 62 6c 6f 63 6b 25 21 | 34 0d 0c 4e 1a 68 69 25 |-block%!|4..N.hi%|
|00001520| 3d 62 6c 6f 63 6b 25 21 | 31 36 2d 62 6c 6f 63 6b |=block%!|16-block|
|00001530| 25 21 38 0d 0c 58 19 62 | 6c 6f 63 6b 25 21 34 3d |%!8..X.b|lock%!4=|
|00001540| 78 3a 62 6c 6f 63 6b 25 | 21 38 3d 79 0d 0c 62 13 |x:block%|!8=y..b.|
|00001550| 62 6c 6f 63 6b 25 21 31 | 32 3d 78 2b 77 64 25 0d |block%!1|2=x+wd%.|
|00001560| 0c 6c 13 62 6c 6f 63 6b | 25 21 31 36 3d 79 2b 68 |.l.block|%!16=y+h|
|00001570| 69 25 0d 0c 76 1f c8 99 | 22 57 69 6d 70 5f 4f 70 |i%..v...|"Wimp_Op|
|00001580| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|00001590| 25 0d 0c 80 05 e1 0d 0c | 9e 0d dd f2 72 65 63 65 |%.......|....rece|
|000015a0| 69 76 65 0d 0c a8 10 c8 | 8e 62 6c 6f 63 6b 25 21 |ive.....|.block%!|
|000015b0| 31 36 ca 0d 0c b2 0e c9 | 30 3a 71 75 69 74 25 3d |16......|0:quit%=|
|000015c0| b9 0d 0c bc 10 c9 32 3a | f2 64 61 74 61 73 61 76 |......2:|.datasav|
|000015d0| 65 0d 0c c6 1b c9 33 3a | f2 64 61 74 61 6c 6f 61 |e.....3:|.dataloa|
|000015e0| 64 28 62 6c 6f 63 6b 25 | 21 34 30 29 0d 0c d0 05 |d(block%|!40)....|
|000015f0| cb 0d 0c da 05 e1 0d 0c | f8 15 dd f2 64 61 74 61 |........|....data|
|00001600| 6c 6f 61 64 28 74 79 70 | 65 25 29 0d 0d 02 20 70 |load(typ|e%)... p|
|00001610| 61 74 68 6e 61 6d 65 24 | 3d a4 67 65 74 73 74 72 |athname$|=.getstr|
|00001620| 28 62 6c 6f 63 6b 25 2b | 34 34 29 0d 0d 0c 0c c8 |(block%+|44).....|
|00001630| 8e 74 79 70 65 25 ca 0d | 0d 16 20 c9 26 46 45 34 |.type%..|.. .&FE4|
|00001640| 3a f2 67 65 74 77 6f 72 | 6b 69 6e 67 28 70 61 74 |:.getwor|king(pat|
|00001650| 68 6e 61 6d 65 24 29 0d | 0d 20 05 cb 0d 0d 2a 05 |hname$).|. ....*.|
|00001660| e1 0d 0d 48 14 dd a4 67 | 65 74 73 74 72 28 73 74 |...H...g|etstr(st|
|00001670| 6f 72 65 25 29 0d 0d 52 | 09 ea 67 65 74 24 0d 0d |ore%)..R|..get$..|
|00001680| 5c 05 f5 0d 0d 66 14 67 | 65 74 24 2b 3d bd 28 3f |\....f.g|et$+=.(?|
|00001690| 73 74 6f 72 65 25 29 0d | 0d 70 0d 73 74 6f 72 65 |store%).|.p.store|
|000016a0| 25 2b 3d 31 0d 0d 7a 0e | fd 3f 73 74 6f 72 65 25 |%+=1..z.|.?store%|
|000016b0| 3d 30 0d 0d 84 09 3d 67 | 65 74 24 0d 0d a2 21 dd |=0....=g|et$...!.|
|000016c0| f2 73 65 74 75 70 5f 74 | 65 6d 70 6c 61 74 65 73 |.setup_t|emplates|
|000016d0| 28 6e 75 6d 5f 69 63 6f | 6e 73 25 29 0d 0d ac 25 |(num_ico|ns%)...%|
|000016e0| ea 69 64 25 2c 69 6e 64 | 5f 6c 65 6e 25 2c 69 6e |.id%,ind|_len%,in|
|000016f0| 66 6f 5f 6c 65 6e 25 2c | 73 61 76 65 5f 6c 65 6e |fo_len%,|save_len|
|00001700| 25 0d 0d c0 11 69 6e 66 | 6f 5f 6c 65 6e 25 3d 32 |%....inf|o_len%=2|
|00001710| 35 36 0d 0d ca 12 73 61 | 76 65 5f 6c 65 6e 25 3d |56....sa|ve_len%=|
|00001720| 31 30 32 34 0d 0d de 20 | 69 6e 64 5f 6c 65 6e 25 |1024... |ind_len%|
|00001730| 3d 69 6e 66 6f 5f 6c 65 | 6e 25 2b 73 61 76 65 5f |=info_le|n%+save_|
|00001740| 6c 65 6e 25 0d 0d e8 43 | e7 62 6c 6f 63 6b 5f 6c |len%...C|.block_l|
|00001750| 65 6e 25 3c 38 38 2b 33 | 32 2a 6e 75 6d 5f 69 63 |en%<88+3|2*num_ic|
|00001760| 6f 6e 73 25 2b 73 61 76 | 65 5f 6c 65 6e 25 85 32 |ons%+sav|e_len%.2|
|00001770| 35 35 2c 22 27 62 6c 6f | 63 6b 25 27 20 74 6f 6f |55,"'blo|ck%' too|
|00001780| 20 73 6d 61 6c 6c 22 0d | 0d f2 11 de 69 6e 64 25 | small".|....ind%|
|00001790| 69 6e 64 5f 6c 65 6e 25 | 0d 0d fc 0a de 69 64 25 |ind_len%|.....id%|
|000017a0| 31 32 0d 0e 10 35 c8 99 | 22 57 69 6d 70 5f 4f 70 |12...5..|"Wimp_Op|
|000017b0| 65 6e 54 65 6d 70 6c 61 | 74 65 22 2c 2c 22 3c 41 |enTempla|te",,"<A|
|000017c0| 72 63 68 69 43 50 43 24 | 44 69 72 3e 2e 54 65 6d |rchiCPC$|Dir>.Tem|
|000017d0| 70 6c 61 74 65 73 22 0d | 0e 1a 16 24 69 64 25 3d |plates".|...$id%=|
|000017e0| 22 53 61 76 65 5f 73 70 | 72 69 74 65 22 0d 0e 24 |"Save_sp|rite"..$|
|000017f0| 50 c8 99 22 57 69 6d 70 | 5f 4c 6f 61 64 54 65 6d |P.."Wimp|_LoadTem|
|00001800| 70 6c 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 2c 69 |plate",,|block%,i|
|00001810| 6e 64 25 2c 69 6e 64 25 | 2b 69 6e 64 5f 6c 65 6e |nd%,ind%|+ind_len|
|00001820| 25 2c 2d 31 2c 69 64 25 | 2c 30 b8 2c 2c 72 65 6d |%,-1,id%|,0.,,rem|
|00001830| 61 69 6e 25 2c 2c 2c 2c | 6e 65 78 74 25 0d 0e 38 |ain%,,,,|next%..8|
|00001840| 2e c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |..."Wimp|_CreateW|
|00001850| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 b8 73 |indow",,|block%.s|
|00001860| 61 76 65 5f 77 69 6e 64 | 6f 77 25 0d 0e 42 0f 24 |ave_wind|ow%..B.$|
|00001870| 69 64 25 3d 22 49 6e 66 | 6f 22 0d 0e 4c 57 c8 99 |id%="Inf|o"..LW..|
|00001880| 22 57 69 6d 70 5f 4c 6f | 61 64 54 65 6d 70 6c 61 |"Wimp_Lo|adTempla|
|00001890| 74 65 22 2c 2c 62 6c 6f | 63 6b 25 2c 72 65 6d 61 |te",,blo|ck%,rema|
|000018a0| 69 6e 25 2c 69 6e 64 25 | 2b 69 6e 64 5f 6c 65 6e |in%,ind%|+ind_len|
|000018b0| 25 2c 2d 31 2c 69 64 25 | 2c 6e 65 78 74 25 b8 2c |%,-1,id%|,next%.,|
|000018c0| 2c 72 65 6d 61 69 6e 25 | 2c 2c 2c 2c 6e 65 78 74 |,remain%|,,,,next|
|000018d0| 25 0d 0e 56 2a c8 99 22 | 57 69 6d 70 5f 43 72 65 |%..V*.."|Wimp_Cre|
|000018e0| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |ateWindo|w",,bloc|
|000018f0| 6b 25 b8 69 6e 66 6f 62 | 6f 78 25 0d 0e 60 1a c8 |k%.infob|ox%..`..|
|00001900| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 54 65 6d 70 |."Wimp_C|loseTemp|
|00001910| 6c 61 74 65 22 0d 0e 6a | 05 e1 0d 0e 88 0f dd f2 |late"..j|........|
|00001920| 73 74 61 72 74 73 61 76 | 65 0d 0e 92 23 c8 99 22 |startsav|e...#.."|
|00001930| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00001940| 6e 66 6f 22 2c 2c 62 6c | 6f 63 6b 25 0d 0e 9c 17 |nfo",,bl|ock%....|
|00001950| 62 6c 6f 63 6b 25 21 32 | 30 3d 62 6c 6f 63 6b 25 |block%!2|0=block%|
|00001960| 21 31 32 0d 0e a6 17 62 | 6c 6f 63 6b 25 21 32 34 |!12....b|lock%!24|
|00001970| 3d 62 6c 6f 63 6b 25 21 | 31 36 0d 0e b0 15 62 6c |=block%!|16....bl|
|00001980| 6f 63 6b 25 21 32 38 3d | 21 62 6c 6f 63 6b 25 0d |ock%!28=|!block%.|
|00001990| 0e ba 16 62 6c 6f 63 6b | 25 21 33 32 3d 62 6c 6f |...block|%!32=blo|
|000019a0| 63 6b 25 21 34 0d 0e c4 | 16 62 6c 6f 63 6b 25 21 |ck%!4...|.block%!|
|000019b0| 33 36 3d 70 72 6f 67 6c | 65 6e 25 0d 0e ce 0e 21 |36=progl|en%....!|
|000019c0| 62 6c 6f 63 6b 25 3d 36 | 34 0d 0e d8 0f 62 6c 6f |block%=6|4....blo|
|000019d0| 63 6b 25 21 31 32 3d 30 | 0d 0e e2 0f 62 6c 6f 63 |ck%!12=0|....bloc|
|000019e0| 6b 25 21 31 36 3d 31 0d | 0e ec 12 62 6c 6f 63 6b |k%!16=1.|...block|
|000019f0| 25 21 34 30 3d 26 46 46 | 38 0d 0e f6 29 24 28 62 |%!40=&FF|8...)$(b|
|00001a00| 6c 6f 63 6b 25 2b 34 34 | 29 3d a4 67 65 74 66 69 |lock%+44|)=.getfi|
|00001a10| 6c 65 6e 61 6d 65 28 24 | 73 61 76 65 74 65 78 74 |lename($|savetext|
|00001a20| 25 29 0d 0f 00 36 c8 99 | 22 57 69 6d 70 5f 53 65 |%)...6..|"Wimp_Se|
|00001a30| 6e 64 4d 65 73 73 61 67 | 65 22 2c 31 38 2c 62 6c |ndMessag|e",18,bl|
|00001a40| 6f 63 6b 25 2c 62 6c 6f | 63 6b 25 21 32 30 2c 62 |ock%,blo|ck%!20,b|
|00001a50| 6c 6f 63 6b 25 21 32 34 | 0d 0f 0a 05 e1 0d 0f 28 |lock%!24|.......(|
|00001a60| 18 dd a4 67 65 74 66 69 | 6c 65 6e 61 6d 65 28 70 |...getfi|lename(p|
|00001a70| 61 74 68 24 29 0d 0f 32 | 11 c8 95 a7 70 61 74 68 |ath$)..2|....path|
|00001a80| 24 2c 22 2e 22 29 0d 0f | 3c 1f 70 61 74 68 24 3d |$,".")..|<.path$=|
|00001a90| c1 70 61 74 68 24 2c a7 | 70 61 74 68 24 2c 22 2e |.path$,.|path$,".|
|00001aa0| 22 29 2b 31 29 0d 0f 46 | 05 ce 0d 0f 50 0d 3d 70 |")+1)..F|....P.=p|
|00001ab0| 61 74 68 24 2b bd 30 0d | 0f 6e 0e dd f2 64 61 74 |ath$+.0.|.n...dat|
|00001ac0| 61 73 61 76 65 0d 0f 78 | 21 24 73 61 76 65 74 65 |asave..x|!$savete|
|00001ad0| 78 74 25 3d a4 67 65 74 | 73 74 72 28 62 6c 6f 63 |xt%=.get|str(bloc|
|00001ae0| 6b 25 2b 34 34 29 0d 0f | 82 0e f2 64 6f 74 68 65 |k%+44)..|...dothe|
|00001af0| 73 61 76 65 0d 0f 8c 16 | 62 6c 6f 63 6b 25 21 31 |save....|block%!1|
|00001b00| 32 3d 62 6c 6f 63 6b 25 | 21 38 0d 0f 96 1b 62 6c |2=block%|!8....bl|
|00001b10| 6f 63 6b 25 21 31 36 3d | 33 3a 21 62 6c 6f 63 6b |ock%!16=|3:!block|
|00001b20| 25 3d 32 35 36 0d 0f a0 | 36 c8 99 22 57 69 6d 70 |%=256...|6.."Wimp|
|00001b30| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 38 |_SendMes|sage",18|
|00001b40| 2c 62 6c 6f 63 6b 25 2c | 62 6c 6f 63 6b 25 21 32 |,block%,|block%!2|
|00001b50| 30 2c 62 6c 6f 63 6b 25 | 21 32 34 0d 0f aa 15 e7 |0,block%|!24.....|
|00001b60| 62 75 74 74 6f 6e 73 25 | 3d 28 31 3c 3c 34 29 8c |buttons%|=(1<<4).|
|00001b70| 0d 0f b4 36 c8 99 22 57 | 69 6d 70 5f 46 6f 72 63 |...6.."W|imp_Forc|
|00001b80| 65 52 65 64 72 61 77 22 | 2c 73 61 76 65 5f 77 69 |eRedraw"|,save_wi|
|00001b90| 6e 64 6f 77 25 2c 31 30 | 2c 2d 31 35 36 2c 31 38 |ndow%,10|,-156,18|
|00001ba0| 34 2c 2d 31 32 30 0d 0f | be 05 cc 0d 0f c8 0f f2 |4,-120..|........|
|00001bb0| 63 6c 6f 73 65 6d 65 6e | 75 73 0d 0f d2 05 cd 0d |closemen|us......|
|00001bc0| 0f dc 05 e1 0d 0f fa 0f | dd f2 71 75 69 63 6b 73 |........|..quicks|
|00001bd0| 61 76 65 0d 10 04 16 e7 | a7 24 73 61 76 65 74 65 |ave.....|.$savete|
|00001be0| 78 74 25 2c 22 2e 22 29 | 8c 0d 10 0e 0e f2 64 6f |xt%,".")|......do|
|00001bf0| 74 68 65 73 61 76 65 0d | 10 18 05 cc 0d 10 22 0f |thesave.|......".|
|00001c00| e7 6d 65 6e 75 73 61 76 | 65 25 8c 0d 10 2c 23 c8 |.menusav|e%...,#.|
|00001c10| 99 22 57 69 6d 70 5f 47 | 65 74 50 6f 69 6e 74 65 |."Wimp_G|etPointe|
|00001c20| 72 49 6e 66 6f 22 2c 2c | 62 6c 6f 63 6b 25 0d 10 |rInfo",,|block%..|
|00001c30| 36 32 f2 73 68 6f 77 6d | 65 6e 75 28 73 61 76 65 |62.showm|enu(save|
|00001c40| 5f 77 69 6e 64 6f 77 25 | 2c 21 62 6c 6f 63 6b 25 |_window%|,!block%|
|00001c50| 2d 35 30 2c 62 6c 6f 63 | 6b 25 21 34 2b 35 30 29 |-50,bloc|k%!4+50)|
|00001c60| 0d 10 40 05 cc 0d 10 4a | 48 63 6c 69 63 6b 25 3d |..@....J|Hclick%=|
|00001c70| a4 65 72 72 6f 72 62 6f | 78 28 22 54 6f 20 73 61 |.errorbo|x("To sa|
|00001c80| 76 65 2c 20 64 72 61 67 | 20 74 68 65 20 69 63 6f |ve, drag| the ico|
|00001c90| 6e 20 74 6f 20 61 20 64 | 69 72 65 63 74 6f 72 79 |n to a d|irectory|
|00001ca0| 20 64 69 73 70 6c 61 79 | 22 2c 31 37 29 0d 10 54 | display|",17)..T|
|00001cb0| 05 cd 0d 10 5e 05 cd 0d | 10 68 0f 6d 65 6e 75 73 |....^...|.h.menus|
|00001cc0| 61 76 65 25 3d a3 0d 10 | 72 05 e1 0d 10 90 0f dd |ave%=...|r.......|
|00001cd0| f2 64 6f 74 68 65 73 61 | 76 65 0d 10 9a 2b c8 99 |.dothesa|ve...+..|
|00001ce0| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 26 31 |"OS_Spri|teOp",&1|
|00001cf0| 30 43 2c 41 52 43 50 49 | 43 25 2c 24 73 61 76 65 |0C,ARCPI|C%,$save|
|00001d00| 74 65 78 74 25 0d 10 a4 | 05 e1 0d 10 c2 21 dd a4 |text%...|.....!..|
|00001d10| 66 69 6e 64 74 65 78 74 | 61 64 64 72 28 77 69 6e |findtext|addr(win|
|00001d20| 64 6f 77 25 2c 69 63 6f | 6e 25 29 0d 10 cc 13 21 |dow%,ico|n%)....!|
|00001d30| 62 6c 6f 63 6b 25 3d 77 | 69 6e 64 6f 77 25 0d 10 |block%=w|indow%..|
|00001d40| d6 12 62 6c 6f 63 6b 25 | 21 34 3d 69 63 6f 6e 25 |..block%|!4=icon%|
|00001d50| 0d 10 e0 21 c8 99 22 57 | 69 6d 70 5f 47 65 74 49 |...!.."W|imp_GetI|
|00001d60| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |conState|",,block|
|00001d70| 25 0d 10 ea 0e 3d 62 6c | 6f 63 6b 25 21 32 38 0d |%....=bl|ock%!28.|
|00001d80| 11 08 17 dd f2 67 65 74 | 77 6f 72 6b 69 6e 67 28 |.....get|working(|
|00001d90| 66 69 6c 65 24 29 0d 11 | 12 14 c8 99 22 48 6f 75 |file$)..|...."Hou|
|00001da0| 72 67 6c 61 73 73 5f 4f | 6e 22 0d 11 1c 20 e7 6c |rglass_O|n"... .l|
|00001db0| 6f 61 64 65 64 25 8c f2 | 72 65 6c 65 61 73 65 5f |oaded%..|release_|
|00001dc0| 6d 65 6d 28 63 6f 64 65 | 25 29 0d 11 26 12 78 3d |mem(code|%)..&.x=|
|00001dd0| 8e 28 70 61 74 68 6e 61 | 6d 65 24 29 0d 11 30 10 |.(pathna|me$)..0.|
|00001de0| 70 72 6f 67 6c 65 6e 25 | 3d a2 23 78 0d 11 3a 07 |proglen%|=.#x..:.|
|00001df0| d9 23 78 0d 11 4e 16 63 | 6f 64 65 5f 6c 65 6e 25 |.#x..N.c|ode_len%|
|00001e00| 3d 70 72 6f 67 6c 65 6e | 25 0d 11 58 1f 63 6f 64 |=proglen|%..X.cod|
|00001e10| 65 25 3d a4 63 6c 61 69 | 6d 5f 6d 65 6d 28 63 6f |e%=.clai|m_mem(co|
|00001e20| 64 65 5f 6c 65 6e 25 29 | 0d 11 62 10 6c 65 6e 3d |de_len%)|..b.len=|
|00001e30| 70 72 6f 67 6c 65 6e 25 | 0d 11 76 19 f2 43 4f 4e |proglen%|..v..CON|
|00001e40| 56 28 70 61 74 68 6e 61 | 6d 65 24 2c 26 46 45 34 |V(pathna|me$,&FE4|
|00001e50| 29 0d 11 8a 14 e7 63 76 | 64 25 3d b9 6c 6f 61 64 |).....cv|d%=.load|
|00001e60| 65 64 25 3d b9 0d 11 94 | 25 e7 63 76 64 25 3d b9 |ed%=....|%.cvd%=.|
|00001e70| f2 73 68 61 64 65 5f 6f | 66 66 28 69 63 6f 6e 62 |.shade_o|ff(iconb|
|00001e80| 61 72 6d 65 6e 75 25 2c | 31 29 0d 11 b2 23 c8 99 |armenu%,|1)...#..|
|00001e90| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|00001ea0| 49 6e 66 6f 22 2c 2c 62 | 6c 6f 63 6b 25 0d 11 bc |Info",,b|lock%...|
|00001eb0| 18 24 73 61 76 65 74 65 | 78 74 25 3d 70 61 74 68 |.$savete|xt%=path|
|00001ec0| 6e 61 6d 65 24 0d 11 c6 | 39 e7 63 76 64 25 3d b9 |name$...|9.cvd%=.|
|00001ed0| f2 73 68 6f 77 6d 65 6e | 75 28 73 61 76 65 5f 77 |.showmen|u(save_w|
|00001ee0| 69 6e 64 6f 77 25 2c 21 | 62 6c 6f 63 6b 25 2d 35 |indow%,!|block%-5|
|00001ef0| 30 2c 62 6c 6f 63 6b 25 | 21 34 2b 35 30 29 0d 11 |0,block%|!4+50)..|
|00001f00| d0 15 c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 4f |...."Hou|rglass_O|
|00001f10| 66 66 22 0d 11 da 05 e1 | 0d 11 f8 0c dd f2 75 6e |ff".....|......un|
|00001f20| 6c 6f 61 64 0d 12 02 20 | e7 6c 6f 61 64 65 64 25 |load... |.loaded%|
|00001f30| 8c f2 72 65 6c 65 61 73 | 65 5f 6d 65 6d 28 63 6f |..releas|e_mem(co|
|00001f40| 64 65 25 29 0d 12 0c 0d | 6c 6f 61 64 65 64 25 3d |de%)....|loaded%=|
|00001f50| a3 0d 12 16 1d f2 73 68 | 61 64 65 5f 6f 6e 28 69 |......sh|ade_on(i|
|00001f60| 63 6f 6e 62 61 72 6d 65 | 6e 75 25 2c 32 29 0d 12 |conbarme|nu%,2)..|
|00001f70| 20 05 e1 0d 12 98 16 dd | a4 63 6c 61 69 6d 5f 6d | .......|.claim_m|
|00001f80| 65 6d 28 73 69 7a 65 25 | 29 0d 12 a2 22 c8 99 22 |em(size%|)...".."|
|00001f90| 4f 53 5f 4d 6f 64 75 6c | 65 22 2c 36 2c 2c 2c 73 |OS_Modul|e",6,,,s|
|00001fa0| 69 7a 65 25 b8 2c 2c 70 | 74 72 25 0d 12 ac 09 3d |ize%.,,p|tr%....=|
|00001fb0| 70 74 72 25 0d 12 ca 17 | dd f2 72 65 6c 65 61 73 |ptr%....|..releas|
|00001fc0| 65 5f 6d 65 6d 28 70 74 | 72 25 29 0d 12 d4 19 c8 |e_mem(pt|r%).....|
|00001fd0| 99 22 4f 53 5f 4d 6f 64 | 75 6c 65 22 2c 37 2c 2c |."OS_Mod|ule",7,,|
|00001fe0| 70 74 72 25 0d 12 de 05 | e1 0d 13 89 5b dd f2 43 |ptr%....|....[..C|
|00001ff0| 4f 4e 56 28 46 24 2c 46 | 54 29 3a 63 76 64 25 3d |ONV(F$,F|T):cvd%=|
|00002000| b9 3a e7 46 54 3d 26 46 | 46 39 8c f2 65 72 72 6f |.:.FT=&F|F9..erro|
|00002010| 72 28 22 54 68 69 73 20 | 76 65 72 73 69 6f 6e 20 |r("This |version |
|00002020| 63 61 6e 20 6f 6e 6c 79 | 20 63 6f 6e 76 65 72 74 |can only| convert|
|00002030| 20 66 72 6f 6d 20 43 50 | 43 22 29 3a 63 76 64 25 | from CP|C"):cvd%|
|00002040| 3d a3 3a e1 0d 13 92 4c | 46 3d 8e 28 46 24 29 3a |=.:....L|F=.(F$):|
|00002050| 4c 3d a2 23 46 3a e7 4c | 3c 3e 31 36 35 32 34 8c |L=.#F:.L|<>16524.|
|00002060| f2 65 72 72 6f 72 28 22 | 4d 75 6c 74 69 46 61 63 |.error("|MultiFac|
|00002070| 65 20 47 72 61 62 73 20 | 4f 6e 6c 79 20 2d 20 50 |e Grabs |Only - P|
|00002080| 6c 65 61 73 65 22 29 3a | 63 76 64 25 3d a3 3a e1 |lease"):|cvd%=.:.|
|00002090| 0d 13 9c 21 d9 23 46 3a | ff 28 22 4c 4f 41 44 20 |...!.#F:|.("LOAD |
|000020a0| 22 2b 46 24 2b 22 20 22 | 2b c3 7e 63 6f 64 65 25 |"+F$+" "|+.~code%|
|000020b0| 29 0d 13 a6 27 58 58 3d | 3f 28 63 6f 64 65 25 2b |)...'XX=|?(code%+|
|000020c0| 26 34 30 37 39 29 3a 59 | 59 3d 3f 28 63 6f 64 65 |&4079):Y|Y=?(code|
|000020d0| 25 2b 26 34 30 37 45 29 | 0d 13 b0 1b 4d 44 45 3d |%+&407E)|....MDE=|
|000020e0| 28 3f 28 63 6f 64 65 25 | 2b 26 34 30 38 38 29 29 |(?(code%|+&4088))|
|000020f0| 80 20 33 0d 13 bb 3c 21 | 41 52 43 50 49 43 25 3d |. 3...<!|ARCPIC%=|
|00002100| 34 31 34 34 34 3a 41 52 | 43 50 49 43 25 21 38 3d |41444:AR|CPIC%!8=|
|00002110| 31 36 3a c8 99 22 4f 53 | 5f 53 70 72 69 74 65 4f |16:.."OS|_SpriteO|
|00002120| 70 22 2c 26 31 30 39 2c | 41 52 43 50 49 43 25 0d |p",&109,|ARCPIC%.|
|00002130| 13 c4 1b 41 25 3d 63 6f | 64 65 25 3a 42 25 3d 63 |...A%=co|de%:B%=c|
|00002140| 6f 64 65 25 2b 31 36 33 | 38 34 0d 13 ce 18 e7 4d |ode%+163|84.....M|
|00002150| 44 45 3d 32 8c d6 73 77 | 61 70 32 3a 4d 55 4c 3d |DE=2..sw|ap2:MUL=|
|00002160| 31 36 0d 13 d8 17 e7 4d | 44 45 3d 31 8c d6 73 77 |16.....M|DE=1..sw|
|00002170| 61 70 31 3a 4d 55 4c 3d | 38 0d 13 e2 10 e7 4d 44 |ap1:MUL=|8.....MD|
|00002180| 45 3d 30 8c 4d 55 4c 3d | 34 0d 13 ec 3f c8 99 22 |E=0.MUL=|4...?.."|
|00002190| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 26 31 30 |OS_Sprit|eOp",&10|
|000021a0| 46 2c 41 52 43 50 49 43 | 25 2c 22 61 6d 73 63 72 |F,ARCPIC|%,"amscr|
|000021b0| 65 65 6e 22 2c 30 2c 58 | 58 2a 4d 55 4c 2c 59 59 |een",0,X|X*MUL,YY|
|000021c0| 2a 38 2c 32 2d 4d 44 45 | 0d 13 f6 34 53 50 52 25 |*8,2-MDE|...4SPR%|
|000021d0| 3d 41 52 43 50 49 43 25 | 2b 41 52 43 50 49 43 25 |=ARCPIC%|+ARCPIC%|
|000021e0| 21 38 3a 42 50 50 3d 32 | 5e 28 32 2d 4d 44 45 29 |!8:BPP=2|^(2-MDE)|
|000021f0| 3a 50 41 4c 3d 32 5e 42 | 50 50 2a 38 0d 14 00 0e |:PAL=2^B|PP*8....|
|00002200| 21 53 50 52 25 2b 3d 50 | 41 4c 0d 14 0a 1d 53 50 |!SPR%+=P|AL....SP|
|00002210| 52 25 21 33 32 2b 3d 50 | 41 4c 3a 53 50 52 25 21 |R%!32+=P|AL:SPR%!|
|00002220| 33 36 2b 3d 50 41 4c 0d | 14 14 13 41 52 43 50 49 |36+=PAL.|...ARCPI|
|00002230| 43 25 21 31 32 2b 3d 50 | 41 4c 0d 14 1e 20 70 75 |C%!12+=P|AL... pu|
|00002240| 74 69 74 68 65 72 65 3d | 53 50 52 25 21 33 32 2b |tithere=|SPR%!32+|
|00002250| 41 52 43 50 49 43 25 2b | 31 36 0d 14 28 18 e7 4d |ARCPIC%+|16..(..M|
|00002260| 44 45 3d 30 8c 64 3d 58 | 58 2a 34 8b 64 3d 58 58 |DE=0.d=X|X*4.d=XX|
|00002270| 2a 32 0d 14 32 13 f2 44 | 4f 43 4f 4c 4f 55 52 53 |*2..2..D|OCOLOURS|
|00002280| 3a 72 3d 2d 64 0d 14 3c | 11 e3 62 6c 6f 63 6b 3d |:r=-d..<|..block=|
|00002290| 30 b8 59 59 2d 31 0d 14 | 46 0f e3 72 61 73 74 65 |0.YY-1..|F..raste|
|000022a0| 72 3d 30 b8 37 0d 14 50 | 26 6f 66 66 73 65 74 3d |r=0.7..P|&offset=|
|000022b0| 72 61 73 74 65 72 2a 26 | 38 30 30 2b 62 6c 6f 63 |raster*&|800+bloc|
|000022c0| 6b 2a 58 58 2a 32 3a 72 | 2b 3d 64 0d 14 5a 2d 41 |k*XX*2:r|+=d..Z-A|
|000022d0| 25 3d 63 6f 64 65 25 2b | 6f 66 66 73 65 74 3a 42 |%=code%+|offset:B|
|000022e0| 25 3d 70 75 74 69 74 68 | 65 72 65 2b 72 3a 43 25 |%=putith|ere+r:C%|
|000022f0| 3d 41 25 2b 58 58 2a 32 | 0d 14 64 1b e7 4d 44 45 |=A%+XX*2|..d..MDE|
|00002300| 3d 30 8c d6 63 6f 70 79 | 69 74 30 8b d6 63 6f 70 |=0..copy|it0..cop|
|00002310| 79 69 74 0d 14 6e 06 ed | 2c 0d 14 78 05 e1 0d 14 |yit..n..|,..x....|
|00002320| 8c 0f dd f2 44 4f 43 4f | 4c 4f 55 52 53 0d 14 96 |....DOCO|LOURS...|
|00002330| 0e 4f 53 45 54 3d 26 34 | 30 36 38 0d 14 a0 11 e3 |.OSET=&4|068.....|
|00002340| 49 3d 30 b8 4d 44 45 28 | 4d 44 45 29 0d 14 aa 1b |I=0.MDE(|MDE)....|
|00002350| 41 3d 3f 28 63 6f 64 65 | 25 2b 4f 53 45 54 29 3a |A=?(code|%+OSET):|
|00002360| 4f 53 45 54 2b 3d 31 0d | 14 b4 0c 42 3d 49 4e 4b |OSET+=1.|...B=INK|
|00002370| 28 41 29 0d 14 be 14 3f | 28 53 50 52 25 2b 34 34 |(A)....?|(SPR%+44|
|00002380| 2b 38 2a 49 29 3d 30 0d | 14 c8 1b 3f 28 53 50 52 |+8*I)=0.|...?(SPR|
|00002390| 25 2b 34 35 2b 38 2a 49 | 29 3d 52 47 42 28 42 2c |%+45+8*I|)=RGB(B,|
|000023a0| 30 29 0d 14 d2 1b 3f 28 | 53 50 52 25 2b 34 36 2b |0)....?(|SPR%+46+|
|000023b0| 38 2a 49 29 3d 52 47 42 | 28 42 2c 31 29 0d 14 dc |8*I)=RGB|(B,1)...|
|000023c0| 1b 3f 28 53 50 52 25 2b | 34 37 2b 38 2a 49 29 3d |.?(SPR%+|47+8*I)=|
|000023d0| 52 47 42 28 42 2c 32 29 | 0d 14 e6 14 3f 28 53 50 |RGB(B,2)|....?(SP|
|000023e0| 52 25 2b 34 38 2b 38 2a | 49 29 3d 30 0d 14 f0 1b |R%+48+8*|I)=0....|
|000023f0| 3f 28 53 50 52 25 2b 34 | 39 2b 38 2a 49 29 3d 52 |?(SPR%+4|9+8*I)=R|
|00002400| 47 42 28 42 2c 30 29 0d | 14 fa 1b 3f 28 53 50 52 |GB(B,0).|...?(SPR|
|00002410| 25 2b 35 30 2b 38 2a 49 | 29 3d 52 47 42 28 42 2c |%+50+8*I|)=RGB(B,|
|00002420| 31 29 0d 15 04 1b 3f 28 | 53 50 52 25 2b 35 31 2b |1)....?(|SPR%+51+|
|00002430| 38 2a 49 29 3d 52 47 42 | 28 42 2c 32 29 0d 15 0e |8*I)=RGB|(B,2)...|
|00002440| 05 ed 0d 15 18 05 e1 0d | 15 2c 11 dd f2 73 61 76 |........|.,...sav|
|00002450| 65 28 66 69 6c 65 24 29 | 0d 15 36 26 c8 99 22 4f |e(file$)|..6&.."O|
|00002460| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 26 31 30 43 |S_Sprite|Op",&10C|
|00002470| 2c 41 52 43 50 49 43 25 | 2c 66 69 6c 65 24 0d 15 |,ARCPIC%|,file$..|
|00002480| 40 05 e1 0d 15 54 1e dd | f2 43 4f 4e 56 42 59 54 |@....T..|.CONVBYT|
|00002490| 45 28 4d 44 45 2c 42 59 | 54 45 2c 58 2c 59 2c 53 |E(MDE,BY|TE,X,Y,S|
|000024a0| 29 0d 15 5e 28 e7 4d 44 | 45 3d 32 8c 42 25 3d a4 |)..^(.MD|E=2.B%=.|
|000024b0| 4d 44 45 32 28 42 59 54 | 45 29 3a 3f 28 53 2b 58 |MDE2(BYT|E):?(S+X|
|000024c0| 2b 59 2a 38 30 29 3d 42 | 25 0d 15 68 28 e7 4d 44 |+Y*80)=B|%..h(.MD|
|000024d0| 45 3d 31 8c 42 25 3d a4 | 4d 44 45 31 28 42 59 54 |E=1.B%=.|MDE1(BYT|
|000024e0| 45 29 3a 3f 28 53 2b 58 | 2b 59 2a 38 30 29 3d 42 |E):?(S+X|+Y*80)=B|
|000024f0| 25 0d 15 72 5c e7 4d 44 | 45 3d 30 8c 43 25 3d a4 |%..r\.MD|E=0.C%=.|
|00002500| 4d 44 45 30 41 28 42 59 | 54 45 29 3a 42 25 3d a4 |MDE0A(BY|TE):B%=.|
|00002510| 4d 44 45 30 42 28 42 59 | 54 45 29 3a 3f 28 53 2b |MDE0B(BY|TE):?(S+|
|00002520| 58 2a 32 2b 59 2a 31 36 | 30 29 3d 42 25 2b 42 25 |X*2+Y*16|0)=B%+B%|
|00002530| 2a 31 36 3a 3f 28 53 2b | 58 2a 32 2b 59 2a 31 36 |*16:?(S+|X*2+Y*16|
|00002540| 30 2b 31 29 3d 43 25 2b | 43 25 2a 31 36 0d 15 7c |0+1)=C%+|C%*16..||
|00002550| 05 e1 0d 15 90 13 dd a4 | 47 45 54 4e 41 4d 45 28 |........|GETNAME(|
|00002560| 4e 41 4d 24 29 0d 15 9a | 13 e3 41 3d a9 28 4e 41 |NAM$)...|..A=.(NA|
|00002570| 4d 24 29 b8 31 88 2d 31 | 0d 15 a4 1b e7 c1 4e 41 |M$).1.-1|......NA|
|00002580| 4d 24 2c 41 2c 31 29 3d | 22 2e 22 8c 50 3d 41 3a |M$,A,1)=|".".P=A:|
|00002590| 41 3d 30 0d 15 ae 05 ed | 0d 15 b8 0f 3d c1 4e 41 |A=0.....|....=.NA|
|000025a0| 4d 24 2c 50 2b 31 29 0d | 15 e0 3e dc 20 30 2c 30 |M$,P+1).|..>. 0,0|
|000025b0| 2c 30 2c 31 31 37 2c 31 | 35 2c 31 38 35 2c 39 2c |,0,117,1|5,185,9,|
|000025c0| 39 39 2c 32 34 34 2c 31 | 31 36 2c 37 2c 34 31 2c |99,244,1|16,7,41,|
|000025d0| 31 31 36 2c 34 37 2c 31 | 38 33 2c 31 32 30 2c 34 |116,47,1|83,120,4|
|000025e0| 39 2c 32 33 31 0d 15 ea | 44 dc 20 32 34 30 2c 32 |9,231...|D. 240,2|
|000025f0| 33 2c 32 37 2c 32 35 35 | 2c 34 39 2c 31 37 31 2c |3,27,255|,49,171,|
|00002600| 32 35 35 2c 33 35 2c 31 | 39 36 2c 33 2c 31 34 35 |255,35,1|96,3,145|
|00002610| 2c 32 33 2c 37 37 2c 31 | 37 31 2c 31 38 39 2c 36 |,23,77,1|71,189,6|
|00002620| 30 2c 31 31 39 2c 31 39 | 32 0d 15 f4 48 dc 20 31 |0,119,19|2...H. 1|
|00002630| 35 34 2c 31 39 31 2c 30 | 2c 31 35 33 2c 31 35 33 |54,191,0|,153,153|
|00002640| 2c 31 35 33 2c 31 35 39 | 2c 31 36 38 2c 32 31 31 |,153,159|,168,211|
|00002650| 2c 32 35 35 2c 31 38 37 | 2c 30 2c 32 35 35 2c 31 |,255,187|,0,255,1|
|00002660| 38 33 2c 31 36 34 2c 32 | 35 35 2c 31 35 33 2c 35 |83,164,2|55,153,5|
|00002670| 34 0d 15 fe 47 dc 20 30 | 2c 32 35 35 2c 30 2c 39 |4...G. 0|,255,0,9|
|00002680| 39 2c 32 34 37 2c 31 32 | 39 2c 38 32 2c 32 34 37 |9,247,12|9,82,247|
|00002690| 2c 32 34 39 2c 31 37 31 | 2c 32 34 37 2c 31 32 33 |,249,171|,247,123|
|000026a0| 2c 31 39 30 2c 32 34 37 | 2c 31 38 33 2c 32 30 33 |,190,247|,183,203|
|000026b0| 2c 32 34 37 2c 32 34 34 | 0d 16 08 27 dc 20 32 33 |,247,244|...'. 23|
|000026c0| 37 2c 32 33 37 2c 30 2c | 32 33 37 2c 32 34 33 2c |7,237,0,|237,243,|
|000026d0| 31 34 37 2c 32 35 35 2c | 32 35 35 2c 32 35 35 0d |147,255,|255,255.|
|000026e0| 16 30 60 dc 20 31 33 2c | 26 66 66 2c 31 39 2c 32 |.0`. 13,|&ff,19,2|
|000026f0| 35 2c 31 2c 37 2c 31 30 | 2c 31 36 2c 26 66 66 2c |5,1,7,10|,16,&ff,|
|00002700| 26 66 66 2c 32 34 2c 32 | 36 2c 36 2c 38 2c 31 35 |&ff,24,2|6,6,8,15|
|00002710| 2c 31 37 2c 26 66 66 2c | 26 66 66 2c 31 38 2c 32 |,17,&ff,|&ff,18,2|
|00002720| 30 2c 30 2c 32 2c 39 2c | 31 31 2c 34 2c 32 32 2c |0,0,2,9,|11,4,22,|
|00002730| 32 31 2c 32 33 2c 33 2c | 35 2c 31 32 2c 31 34 0d |21,23,3,|5,12,14.|
|00002740| 16 44 0f dd a4 53 4f 53 | 28 53 43 52 25 29 0d 16 |.D...SOS|(SCR%)..|
|00002750| 4e 0d 21 53 43 52 25 3d | 31 34 39 0d 16 58 0d 53 |N.!SCR%=|149..X.S|
|00002760| 43 52 25 21 34 3d 2d 31 | 0d 16 62 2a c8 99 22 4f |CR%!4=-1|..b*.."O|
|00002770| 53 5f 52 65 61 64 56 64 | 75 56 61 72 69 61 62 6c |S_ReadVd|uVariabl|
|00002780| 65 73 22 2c 53 43 52 25 | 2c 53 43 52 25 b8 53 43 |es",SCR%|,SCR%.SC|
|00002790| 52 25 0d 16 6c 0a 3d 21 | 53 43 52 25 0d 16 80 0e |R%..l.=!|SCR%....|
|000027a0| dd f2 41 53 53 45 4d 42 | 4c 45 0d 16 8a 24 e3 6f |..ASSEMB|LE...$.o|
|000027b0| 70 74 25 3d 30 b8 32 88 | 32 3a 50 25 3d 61 72 6d |pt%=0.2.|2:P%=arm|
|000027c0| 63 6f 64 65 25 3a 5b 4f | 50 54 6f 70 74 25 0d 16 |code%:[O|PTopt%..|
|000027d0| 94 17 2e 73 77 61 70 32 | 20 6c 64 72 62 20 72 32 |...swap2| ldrb r2|
|000027e0| 2c 5b 72 30 5d 0d 16 9e | 2c 61 6e 64 20 72 33 2c |,[r0]...|,and r3,|
|000027f0| 72 32 2c 23 26 30 31 3a | 6d 6f 76 20 72 33 2c 72 |r2,#&01:|mov r3,r|
|00002800| 33 2c 6c 73 6c 23 37 3a | 6d 6f 76 20 72 34 2c 72 |3,lsl#7:|mov r4,r|
|00002810| 33 0d 16 a8 2f 61 6e 64 | 20 72 33 2c 72 32 2c 23 |3.../and| r3,r2,#|
|00002820| 26 30 32 3a 6d 6f 76 20 | 72 33 2c 72 33 2c 6c 73 |&02:mov |r3,r3,ls|
|00002830| 6c 23 35 3a 6f 72 72 20 | 72 34 2c 72 33 2c 72 34 |l#5:orr |r4,r3,r4|
|00002840| 0d 16 b2 2f 61 6e 64 20 | 72 33 2c 72 32 2c 23 26 |.../and |r3,r2,#&|
|00002850| 30 34 3a 6d 6f 76 20 72 | 33 2c 72 33 2c 6c 73 6c |04:mov r|3,r3,lsl|
|00002860| 23 33 3a 6f 72 72 20 72 | 34 2c 72 33 2c 72 34 0d |#3:orr r|4,r3,r4.|
|00002870| 16 bc 2f 61 6e 64 20 72 | 33 2c 72 32 2c 23 26 30 |../and r|3,r2,#&0|
|00002880| 38 3a 6d 6f 76 20 72 33 | 2c 72 33 2c 6c 73 6c 23 |8:mov r3|,r3,lsl#|
|00002890| 31 3a 6f 72 72 20 72 34 | 2c 72 33 2c 72 34 0d 16 |1:orr r4|,r3,r4..|
|000028a0| c6 2f 61 6e 64 20 72 33 | 2c 72 32 2c 23 26 31 30 |./and r3|,r2,#&10|
|000028b0| 3a 6d 6f 76 20 72 33 2c | 72 33 2c 6c 73 72 23 31 |:mov r3,|r3,lsr#1|
|000028c0| 3a 6f 72 72 20 72 34 2c | 72 33 2c 72 34 0d 16 d0 |:orr r4,|r3,r4...|
|000028d0| 2f 61 6e 64 20 72 33 2c | 72 32 2c 23 26 32 30 3a |/and r3,|r2,#&20:|
|000028e0| 6d 6f 76 20 72 33 2c 72 | 33 2c 6c 73 72 23 33 3a |mov r3,r|3,lsr#3:|
|000028f0| 6f 72 72 20 72 34 2c 72 | 33 2c 72 34 0d 16 da 2f |orr r4,r|3,r4.../|
|00002900| 61 6e 64 20 72 33 2c 72 | 32 2c 23 26 34 30 3a 6d |and r3,r|2,#&40:m|
|00002910| 6f 76 20 72 33 2c 72 33 | 2c 6c 73 72 23 35 3a 6f |ov r3,r3|,lsr#5:o|
|00002920| 72 72 20 72 34 2c 72 33 | 2c 72 34 0d 16 e4 2f 61 |rr r4,r3|,r4.../a|
|00002930| 6e 64 20 72 33 2c 72 32 | 2c 23 26 38 30 3a 6d 6f |nd r3,r2|,#&80:mo|
|00002940| 76 20 72 33 2c 72 33 2c | 6c 73 72 23 37 3a 6f 72 |v r3,r3,|lsr#7:or|
|00002950| 72 20 72 34 2c 72 33 2c | 72 34 0d 16 ee 13 73 74 |r r4,r3,|r4....st|
|00002960| 72 62 20 72 34 2c 5b 72 | 30 5d 2c 23 31 0d 16 f8 |rb r4,[r|0],#1...|
|00002970| 22 63 6d 70 20 72 30 2c | 72 31 3a 62 6c 74 20 73 |"cmp r0,|r1:blt s|
|00002980| 77 61 70 32 3a 6d 6f 76 | 20 70 63 2c 72 31 34 0d |wap2:mov| pc,r14.|
|00002990| 17 0c 17 2e 73 77 61 70 | 31 20 6c 64 72 62 20 72 |....swap|1 ldrb r|
|000029a0| 32 2c 5b 72 30 5d 0d 17 | 16 2c 61 6e 64 20 72 33 |2,[r0]..|.,and r3|
|000029b0| 2c 72 32 2c 23 26 30 31 | 3a 6d 6f 76 20 72 33 2c |,r2,#&01|:mov r3,|
|000029c0| 72 33 2c 6c 73 6c 23 37 | 3a 6d 6f 76 20 72 34 2c |r3,lsl#7|:mov r4,|
|000029d0| 72 33 0d 17 20 2f 61 6e | 64 20 72 33 2c 72 32 2c |r3.. /an|d r3,r2,|
|000029e0| 23 26 31 30 3a 6d 6f 76 | 20 72 33 2c 72 33 2c 6c |#&10:mov| r3,r3,l|
|000029f0| 73 6c 23 32 3a 6f 72 72 | 20 72 34 2c 72 33 2c 72 |sl#2:orr| r4,r3,r|
|00002a00| 34 0d 17 2a 2f 61 6e 64 | 20 72 33 2c 72 32 2c 23 |4..*/and| r3,r2,#|
|00002a10| 26 30 32 3a 6d 6f 76 20 | 72 33 2c 72 33 2c 6c 73 |&02:mov |r3,r3,ls|
|00002a20| 6c 23 34 3a 6f 72 72 20 | 72 34 2c 72 33 2c 72 34 |l#4:orr |r4,r3,r4|
|00002a30| 0d 17 34 2f 61 6e 64 20 | 72 33 2c 72 32 2c 23 26 |..4/and |r3,r2,#&|
|00002a40| 32 30 3a 6d 6f 76 20 72 | 33 2c 72 33 2c 6c 73 72 |20:mov r|3,r3,lsr|
|00002a50| 23 31 3a 6f 72 72 20 72 | 34 2c 72 33 2c 72 34 0d |#1:orr r|4,r3,r4.|
|00002a60| 17 3e 2f 61 6e 64 20 72 | 33 2c 72 32 2c 23 26 30 |.>/and r|3,r2,#&0|
|00002a70| 34 3a 6d 6f 76 20 72 33 | 2c 72 33 2c 6c 73 6c 23 |4:mov r3|,r3,lsl#|
|00002a80| 31 3a 6f 72 72 20 72 34 | 2c 72 33 2c 72 34 0d 17 |1:orr r4|,r3,r4..|
|00002a90| 48 2f 61 6e 64 20 72 33 | 2c 72 32 2c 23 26 34 30 |H/and r3|,r2,#&40|
|00002aa0| 3a 6d 6f 76 20 72 33 2c | 72 33 2c 6c 73 72 23 34 |:mov r3,|r3,lsr#4|
|00002ab0| 3a 6f 72 72 20 72 34 2c | 72 33 2c 72 34 0d 17 52 |:orr r4,|r3,r4..R|
|00002ac0| 2f 61 6e 64 20 72 33 2c | 72 32 2c 23 26 30 38 3a |/and r3,|r2,#&08:|
|00002ad0| 6d 6f 76 20 72 33 2c 72 | 33 2c 6c 73 72 23 32 3a |mov r3,r|3,lsr#2:|
|00002ae0| 6f 72 72 20 72 34 2c 72 | 33 2c 72 34 0d 17 5c 2f |orr r4,r|3,r4..\/|
|00002af0| 61 6e 64 20 72 33 2c 72 | 32 2c 23 26 38 30 3a 6d |and r3,r|2,#&80:m|
|00002b00| 6f 76 20 72 33 2c 72 33 | 2c 6c 73 72 23 37 3a 6f |ov r3,r3|,lsr#7:o|
|00002b10| 72 72 20 72 34 2c 72 33 | 2c 72 34 0d 17 66 13 73 |rr r4,r3|,r4..f.s|
|00002b20| 74 72 62 20 72 34 2c 5b | 72 30 5d 2c 23 31 0d 17 |trb r4,[|r0],#1..|
|00002b30| 70 22 63 6d 70 20 72 30 | 2c 72 31 3a 62 6c 74 20 |p"cmp r0|,r1:blt |
|00002b40| 73 77 61 70 31 3a 6d 6f | 76 20 70 63 2c 72 31 34 |swap1:mo|v pc,r14|
|00002b50| 0d 17 84 26 2e 63 6f 70 | 79 69 74 30 20 6c 64 72 |...&.cop|yit0 ldr|
|00002b60| 62 20 72 33 2c 5b 72 30 | 5d 3a 61 64 64 20 72 30 |b r3,[r0|]:add r0|
|00002b70| 2c 72 30 2c 23 31 0d 17 | 8e 32 61 6e 64 20 72 34 |,r0,#1..|.2and r4|
|00002b80| 2c 72 33 2c 23 25 30 30 | 30 30 30 30 31 30 3a 6d |,r3,#%00|000010:m|
|00002b90| 6f 76 20 72 34 2c 72 34 | 2c 6c 73 6c 23 32 3a 6d |ov r4,r4|,lsl#2:m|
|00002ba0| 6f 76 20 72 35 2c 72 34 | 0d 17 98 35 61 6e 64 20 |ov r5,r4|...5and |
|00002bb0| 72 34 2c 72 33 2c 23 25 | 30 30 30 30 31 30 30 30 |r4,r3,#%|00001000|
|00002bc0| 3a 6d 6f 76 20 72 34 2c | 72 34 2c 6c 73 72 23 32 |:mov r4,|r4,lsr#2|
|00002bd0| 3a 6f 72 72 20 72 35 2c | 72 34 2c 72 35 0d 17 a2 |:orr r5,|r4,r5...|
|00002be0| 35 61 6e 64 20 72 34 2c | 72 33 2c 23 25 30 30 31 |5and r4,|r3,#%001|
|00002bf0| 30 30 30 30 30 3a 6d 6f | 76 20 72 34 2c 72 34 2c |00000:mo|v r4,r4,|
|00002c00| 6c 73 72 23 33 3a 6f 72 | 72 20 72 35 2c 72 34 2c |lsr#3:or|r r5,r4,|
|00002c10| 72 35 0d 17 ac 35 61 6e | 64 20 72 34 2c 72 33 2c |r5...5an|d r4,r3,|
|00002c20| 23 25 31 30 30 30 30 30 | 30 30 3a 6d 6f 76 20 72 |#%100000|00:mov r|
|00002c30| 34 2c 72 34 2c 6c 73 72 | 23 37 3a 6f 72 72 20 72 |4,r4,lsr|#7:orr r|
|00002c40| 35 2c 72 34 2c 72 35 0d | 17 b6 20 6d 6f 76 20 72 |5,r4,r5.|.. mov r|
|00002c50| 34 2c 72 35 2c 6c 73 6c | 23 34 3a 6f 72 72 20 72 |4,r5,lsl|#4:orr r|
|00002c60| 34 2c 72 35 2c 72 34 0d | 17 c0 13 73 74 72 62 20 |4,r5,r4.|...strb |
|00002c70| 72 34 2c 5b 72 31 5d 2c | 23 31 0d 17 ca 32 61 6e |r4,[r1],|#1...2an|
|00002c80| 64 20 72 34 2c 72 33 2c | 23 25 30 30 30 30 30 30 |d r4,r3,|#%000000|
|00002c90| 30 31 3a 6d 6f 76 20 72 | 34 2c 72 34 2c 6c 73 6c |01:mov r|4,r4,lsl|
|00002ca0| 23 33 3a 6d 6f 76 20 72 | 35 2c 72 34 0d 17 d4 35 |#3:mov r|5,r4...5|
|00002cb0| 61 6e 64 20 72 34 2c 72 | 33 2c 23 25 30 30 30 30 |and r4,r|3,#%0000|
|00002cc0| 30 31 30 30 3a 6d 6f 76 | 20 72 34 2c 72 34 2c 6c |0100:mov| r4,r4,l|
|00002cd0| 73 72 23 31 3a 6f 72 72 | 20 72 35 2c 72 34 2c 72 |sr#1:orr| r5,r4,r|
|00002ce0| 35 0d 17 de 35 61 6e 64 | 20 72 34 2c 72 33 2c 23 |5...5and| r4,r3,#|
|00002cf0| 25 30 30 30 31 30 30 30 | 30 3a 6d 6f 76 20 72 34 |%0001000|0:mov r4|
|00002d00| 2c 72 34 2c 6c 73 72 23 | 32 3a 6f 72 72 20 72 35 |,r4,lsr#|2:orr r5|
|00002d10| 2c 72 34 2c 72 35 0d 17 | e8 35 61 6e 64 20 72 34 |,r4,r5..|.5and r4|
|00002d20| 2c 72 33 2c 23 25 30 31 | 30 30 30 30 30 30 3a 6d |,r3,#%01|000000:m|
|00002d30| 6f 76 20 72 34 2c 72 34 | 2c 6c 73 72 23 36 3a 6f |ov r4,r4|,lsr#6:o|
|00002d40| 72 72 20 72 35 2c 72 34 | 2c 72 35 0d 17 f2 20 6d |rr r5,r4|,r5... m|
|00002d50| 6f 76 20 72 34 2c 72 35 | 2c 6c 73 6c 23 34 3a 6f |ov r4,r5|,lsl#4:o|
|00002d60| 72 72 20 72 34 2c 72 35 | 2c 72 34 0d 17 fc 13 73 |rr r4,r5|,r4....s|
|00002d70| 74 72 62 20 72 34 2c 5b | 72 31 5d 2c 23 31 0d 18 |trb r4,[|r1],#1..|
|00002d80| 06 24 63 6d 70 20 72 30 | 2c 72 32 3a 62 6c 74 20 |.$cmp r0|,r2:blt |
|00002d90| 63 6f 70 79 69 74 30 3a | 6d 6f 76 20 70 63 2c 72 |copyit0:|mov pc,r|
|00002da0| 31 34 0d 18 1a 25 2e 63 | 6f 70 79 69 74 20 6c 64 |14...%.c|opyit ld|
|00002db0| 72 62 20 72 33 2c 5b 72 | 30 5d 3a 61 64 64 20 72 |rb r3,[r|0]:add r|
|00002dc0| 30 2c 72 30 2c 23 31 0d | 18 24 33 73 74 72 62 20 |0,r0,#1.|.$3strb |
|00002dd0| 72 33 2c 5b 72 31 5d 2c | 23 31 3a 63 6d 70 20 72 |r3,[r1],|#1:cmp r|
|00002de0| 30 2c 72 32 3a 62 6c 74 | 20 63 6f 70 79 69 74 3a |0,r2:blt| copyit:|
|00002df0| 6d 6f 76 20 70 63 2c 72 | 31 34 0d 18 2e 07 5d 3a |mov pc,r|14....]:|
|00002e00| ed 0d 18 56 05 e1 0d ff | 01 00 00 00 2c 0f 00 00 |...V....|....,...|
|00002e10| 0c 10 1f e5 0c 10 81 e0 | 14 10 0f e5 18 d0 4f e2 |........|......O.|
|00002e20| 00 40 2d e9 20 00 1f e5 | 43 10 8f e2 09 20 a0 e3 |.@-. ...|C.... ..|
|00002e30| d4 00 00 ef 24 00 9f e5 | 34 10 1f e5 01 00 80 e0 |....$...|4.......|
|00002e40| 34 10 8f e2 09 20 a0 e3 | d4 00 00 ef 2c 00 a0 e3 |4.... ..|....,...|
|00002e50| 23 00 cf e5 08 00 8f e2 | 05 00 00 ef 00 80 bd e8 |#.......|........|
|00002e60| dc 2d 00 00 2a 42 61 73 | 69 63 20 2d 71 75 69 74 |.-..*Bas|ic -quit|
|00002e70| 20 20 40 00 00 00 00 00 | 00 00 00 00 00 00 00 00 | @.....|........|
|00002e80| 00 00 00 00 00 00 00 00 | |........| |
+--------+-------------------------+-------------------------+--------+--------+