home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1993-11-06 | 14.7 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.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 2a 7c 73 74 | 61 72 74 20 49 63 6f 6e |....*|st|art Icon|
|00000010| 0d 00 14 13 2a 7c 21 49 | 43 4f 4e 20 4c 69 62 72 |....*|!I|CON Libr|
|00000020| 61 72 79 0d 00 1e 07 2a | 7c 21 0d 00 28 44 2a 7c |ary....*||!..(D*||
|00000030| 21 56 65 72 73 69 6f 6e | 20 31 2e 32 38 20 2d 20 |!Version| 1.28 - |
|00000040| 28 43 29 20 49 61 6e 20 | 50 61 6c 6d 65 72 20 26 |(C) Ian |Palmer &|
|00000050| 20 54 6f 6d 20 48 75 67 | 68 65 73 2c 20 33 72 64 | Tom Hug|hes, 3rd|
|00000060| 20 4e 6f 76 65 6d 62 65 | 72 20 31 39 39 33 0d 00 | Novembe|r 1993..|
|00000070| 32 07 2a 7c 21 0d 00 3c | 4a 2a 7c 21 54 68 69 73 |2.*|!..<|J*|!This|
|00000080| 20 6c 69 62 72 61 72 79 | 20 63 6f 6e 74 61 69 6e | library| contain|
|00000090| 73 20 73 65 76 65 72 61 | 6c 20 72 6f 75 74 69 6e |s severa|l routin|
|000000a0| 65 73 20 74 6f 20 69 6e | 76 65 73 74 69 67 61 74 |es to in|vestigat|
|000000b0| 65 20 61 6e 64 20 61 6c | 74 65 72 20 74 68 65 0d |e and al|ter the.|
|000000c0| 00 46 46 2a 7c 21 70 72 | 6f 70 65 72 74 69 65 73 |.FF*|!pr|operties|
|000000d0| 20 6f 66 20 69 63 6f 6e | 73 2e 20 49 74 20 73 68 | of icon|s. It sh|
|000000e0| 6f 75 6c 64 20 62 65 20 | 6e 6f 74 65 64 20 74 68 |ould be |noted th|
|000000f0| 61 74 20 69 6e 20 41 4c | 4c 20 63 61 73 65 73 20 |at in AL|L cases |
|00000100| 77 68 65 72 65 0d 00 50 | 49 2a 7c 21 27 77 69 6e |where..P|I*|!'win|
|00000110| 64 6f 77 27 20 69 73 20 | 72 65 71 75 69 72 65 64 |dow' is |required|
|00000120| 20 61 73 20 61 20 70 61 | 72 61 6d 65 74 65 72 2c | as a pa|rameter,|
|00000130| 20 74 68 69 73 20 72 65 | 66 65 72 73 20 74 6f 20 | this re|fers to |
|00000140| 74 68 65 20 73 74 72 75 | 63 74 75 72 65 20 0d 00 |the stru|cture ..|
|00000150| 5a 3a 2a 7c 21 75 73 65 | 64 20 62 79 20 74 68 65 |Z:*|!use|d by the|
|00000160| 20 57 49 4e 44 4f 57 20 | 6c 69 62 72 61 72 79 20 | WINDOW |library |
|00000170| 61 6e 64 20 6e 6f 74 20 | 61 20 77 69 6e 64 6f 77 |and not |a window|
|00000180| 20 68 61 6e 64 6c 65 2e | 0d 00 64 07 2a 7c 21 0d | handle.|..d.*|!.|
|00000190| 00 6e 4a 2a 7c 21 4d 61 | 6e 79 20 6f 66 20 74 68 |.nJ*|!Ma|ny of th|
|000001a0| 65 20 70 72 6f 63 65 64 | 75 72 65 73 20 69 6e 20 |e proced|ures in |
|000001b0| 74 68 69 73 20 6c 69 62 | 72 61 72 79 20 77 69 6c |this lib|rary wil|
|000001c0| 6c 20 63 6f 72 72 75 70 | 74 20 74 68 65 20 63 6f |l corrup|t the co|
|000001d0| 6e 74 65 6e 74 73 20 6f | 66 0d 00 78 46 2a 7c 21 |ntents o|f..xF*|!|
|000001e0| 74 68 65 20 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |the _wim|p_buffer|
|000001f0| 25 20 62 6c 6f 63 6b 20 | 28 77 68 69 63 68 20 69 |% block |(which i|
|00000200| 73 20 75 73 65 64 20 61 | 73 20 74 68 65 20 77 69 |s used a|s the wi|
|00000210| 6d 70 20 70 6f 6c 6c 20 | 62 6c 6f 63 6b 29 2e 0d |mp poll |block)..|
|00000220| 00 82 04 0d 00 8c 0f 2a | 7c 73 74 6f 70 20 49 63 |.......*||stop Ic|
|00000230| 6f 6e 0d 00 96 1c 2a 7c | 73 74 61 72 74 20 50 52 |on....*||start PR|
|00000240| 4f 43 69 63 6f 6e 5f 75 | 6e 73 68 61 64 65 0d 00 |OCicon_u|nshade..|
|00000250| a0 28 2a 7c 21 50 52 4f | 43 69 63 6f 6e 5f 75 6e |.(*|!PRO|Cicon_un|
|00000260| 73 68 61 64 65 28 20 77 | 69 6e 64 6f 77 20 2c 20 |shade( w|indow , |
|00000270| 69 63 6f 6e 20 29 0d 00 | aa 07 2a 7c 21 0d 00 b4 |icon )..|..*|!...|
|00000280| 1f 2a 7c 21 55 6e 73 68 | 61 64 65 73 20 74 68 65 |.*|!Unsh|ades the|
|00000290| 20 67 69 76 65 6e 20 69 | 63 6f 6e 2e 0d 00 be 19 | given i|con.....|
|000002a0| dd f2 69 63 6f 6e 5f 75 | 6e 73 68 61 64 65 28 57 |..icon_u|nshade(W|
|000002b0| 25 2c 49 25 29 0d 00 c8 | 2d 21 5f 77 69 6d 70 5f |%,I%)...|-!_wimp_|
|000002c0| 62 75 66 66 65 72 25 3d | 21 28 57 25 2d 38 29 3a |buffer%=|!(W%-8):|
|000002d0| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 21 34 3d |_wimp_bu|ffer%!4=|
|000002e0| 49 25 0d 00 d2 2e 5f 77 | 69 6d 70 5f 62 75 66 66 |I%...._w|imp_buff|
|000002f0| 65 72 25 21 38 3d 30 3a | 5f 77 69 6d 70 5f 62 75 |er%!8=0:|_wimp_bu|
|00000300| 66 66 65 72 25 21 31 32 | 3d 26 34 30 30 30 30 30 |ffer%!12|=&400000|
|00000310| 0d 00 dc 1c c8 99 20 26 | 34 30 30 43 44 2c 2c 5f |...... &|400CD,,_|
|00000320| 77 69 6d 70 5f 62 75 66 | 66 65 72 25 0d 00 e6 05 |wimp_buf|fer%....|
|00000330| e1 0d 00 f0 04 0d 00 fa | 1b 2a 7c 73 74 6f 70 20 |........|.*|stop |
|00000340| 50 52 4f 43 69 63 6f 6e | 5f 75 6e 73 68 61 64 65 |PROCicon|_unshade|
|00000350| 0d 01 04 1a 2a 7c 73 74 | 61 72 74 20 50 52 4f 43 |....*|st|art PROC|
|00000360| 69 63 6f 6e 5f 73 68 61 | 64 65 0d 01 0e 26 2a 7c |icon_sha|de...&*||
|00000370| 21 50 52 4f 43 69 63 6f | 6e 5f 73 68 61 64 65 28 |!PROCico|n_shade(|
|00000380| 20 77 69 6e 64 6f 77 20 | 2c 20 69 63 6f 6e 20 29 | window |, icon )|
|00000390| 0d 01 18 07 2a 7c 21 0d | 01 22 21 2a 7c 21 53 68 |....*|!.|."!*|!Sh|
|000003a0| 61 64 65 73 20 6f 75 74 | 20 74 68 65 20 67 69 76 |ades out| the giv|
|000003b0| 65 6e 20 69 63 6f 6e 2e | 0d 01 2c 17 dd f2 69 63 |en icon.|..,...ic|
|000003c0| 6f 6e 5f 73 68 61 64 65 | 28 57 25 2c 49 25 29 0d |on_shade|(W%,I%).|
|000003d0| 01 36 2d 21 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |.6-!_wim|p_buffer|
|000003e0| 25 3d 21 28 57 25 2d 38 | 29 3a 5f 77 69 6d 70 5f |%=!(W%-8|):_wimp_|
|000003f0| 62 75 66 66 65 72 25 21 | 34 3d 49 25 0d 01 40 34 |buffer%!|4=I%..@4|
|00000400| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 21 38 3d |_wimp_bu|ffer%!8=|
|00000410| 26 34 30 30 30 30 30 3a | 5f 77 69 6d 70 5f 62 75 |&400000:|_wimp_bu|
|00000420| 66 66 65 72 25 21 31 32 | 3d 26 34 30 30 30 30 30 |ffer%!12|=&400000|
|00000430| 0d 01 4a 1c c8 99 20 26 | 34 30 30 43 44 2c 2c 5f |..J... &|400CD,,_|
|00000440| 77 69 6d 70 5f 62 75 66 | 66 65 72 25 0d 01 54 05 |wimp_buf|fer%..T.|
|00000450| e1 0d 01 5e 04 0d 01 68 | 19 2a 7c 73 74 6f 70 20 |...^...h|.*|stop |
|00000460| 50 52 4f 43 69 63 6f 6e | 5f 73 68 61 64 65 0d 01 |PROCicon|_shade..|
|00000470| 72 1d 2a 7c 73 74 61 72 | 74 20 50 52 4f 43 69 63 |r.*|star|t PROCic|
|00000480| 6f 6e 5f 64 65 73 65 6c | 65 63 74 0d 01 7c 29 2a |on_desel|ect..|)*|
|00000490| 7c 21 50 52 4f 43 69 63 | 6f 6e 5f 64 65 73 65 6c ||!PROCic|on_desel|
|000004a0| 65 63 74 28 20 77 69 6e | 64 6f 77 20 2c 20 69 63 |ect( win|dow , ic|
|000004b0| 6f 6e 20 29 0d 01 86 07 | 2a 7c 21 0d 01 90 20 2a |on )....|*|!... *|
|000004c0| 7c 21 44 65 73 65 6c 65 | 63 74 73 20 74 68 65 20 ||!Desele|cts the |
|000004d0| 67 69 76 65 6e 20 69 63 | 6f 6e 2e 0d 01 9a 1a dd |given ic|on......|
|000004e0| f2 69 63 6f 6e 5f 64 65 | 73 65 6c 65 63 74 28 57 |.icon_de|select(W|
|000004f0| 25 2c 49 25 29 0d 01 a4 | 2d 21 5f 77 69 6d 70 5f |%,I%)...|-!_wimp_|
|00000500| 62 75 66 66 65 72 25 3d | 21 28 57 25 2d 38 29 3a |buffer%=|!(W%-8):|
|00000510| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 21 34 3d |_wimp_bu|ffer%!4=|
|00000520| 49 25 0d 01 ae 2e 5f 77 | 69 6d 70 5f 62 75 66 66 |I%...._w|imp_buff|
|00000530| 65 72 25 21 38 3d 30 3a | 5f 77 69 6d 70 5f 62 75 |er%!8=0:|_wimp_bu|
|00000540| 66 66 65 72 25 21 31 32 | 3d 26 32 30 30 30 30 30 |ffer%!12|=&200000|
|00000550| 0d 01 b8 1c c8 99 20 26 | 34 30 30 43 44 2c 2c 5f |...... &|400CD,,_|
|00000560| 77 69 6d 70 5f 62 75 66 | 66 65 72 25 0d 01 c2 05 |wimp_buf|fer%....|
|00000570| e1 0d 01 cc 04 0d 01 d6 | 1c 2a 7c 73 74 6f 70 20 |........|.*|stop |
|00000580| 50 52 4f 43 69 63 6f 6e | 5f 64 65 73 65 6c 65 63 |PROCicon|_deselec|
|00000590| 74 0d 01 e0 1b 2a 7c 73 | 74 61 72 74 20 50 52 4f |t....*|s|tart PRO|
|000005a0| 43 69 63 6f 6e 5f 73 65 | 6c 65 63 74 0d 01 ea 27 |Cicon_se|lect...'|
|000005b0| 2a 7c 21 50 52 4f 43 69 | 63 6f 6e 5f 73 65 6c 65 |*|!PROCi|con_sele|
|000005c0| 63 74 28 20 77 69 6e 64 | 6f 77 20 2c 20 69 63 6f |ct( wind|ow , ico|
|000005d0| 6e 20 29 0d 01 f4 07 2a | 7c 21 0d 01 fe 41 2a 7c |n )....*||!...A*||
|000005e0| 21 53 65 6c 65 63 74 73 | 20 74 68 65 20 67 69 76 |!Selects| the giv|
|000005f0| 65 6e 20 69 63 6f 6e 2c | 20 64 6f 65 73 20 4e 4f |en icon,| does NO|
|00000600| 54 20 64 65 73 65 6c 65 | 63 74 20 6f 74 68 65 72 |T desele|ct other|
|00000610| 20 69 63 6f 6e 73 20 77 | 69 74 68 0d 02 08 10 2a | icons w|ith....*|
|00000620| 7c 21 73 61 6d 65 20 45 | 53 47 2e 0d 02 12 18 dd ||!same E|SG......|
|00000630| f2 69 63 6f 6e 5f 73 65 | 6c 65 63 74 28 57 25 2c |.icon_se|lect(W%,|
|00000640| 49 25 29 0d 02 1c 2d 21 | 5f 77 69 6d 70 5f 62 75 |I%)...-!|_wimp_bu|
|00000650| 66 66 65 72 25 3d 21 28 | 57 25 2d 38 29 3a 5f 77 |ffer%=!(|W%-8):_w|
|00000660| 69 6d 70 5f 62 75 66 66 | 65 72 25 21 34 3d 49 25 |imp_buff|er%!4=I%|
|00000670| 0d 02 26 34 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |..&4_wim|p_buffer|
|00000680| 25 21 38 3d 26 32 30 30 | 30 30 30 3a 5f 77 69 6d |%!8=&200|000:_wim|
|00000690| 70 5f 62 75 66 66 65 72 | 25 21 31 32 3d 26 32 30 |p_buffer|%!12=&20|
|000006a0| 30 30 30 30 0d 02 30 1c | c8 99 20 26 34 30 30 43 |0000..0.|.. &400C|
|000006b0| 44 2c 2c 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |D,,_wimp|_buffer%|
|000006c0| 0d 02 3a 05 e1 0d 02 44 | 04 0d 02 4e 1a 2a 7c 73 |..:....D|...N.*|s|
|000006d0| 74 6f 70 20 50 52 4f 43 | 69 63 6f 6e 5f 73 65 6c |top PROC|icon_sel|
|000006e0| 65 63 74 0d 02 58 1c 2a | 7c 73 74 61 72 74 20 46 |ect..X.*||start F|
|000006f0| 4e 69 63 6f 6e 5f 67 65 | 74 73 65 6c 65 63 74 0d |Nicon_ge|tselect.|
|00000700| 02 62 28 2a 7c 21 46 4e | 69 63 6f 6e 5f 67 65 74 |.b(*|!FN|icon_get|
|00000710| 73 65 6c 65 63 74 28 20 | 77 69 6e 64 6f 77 20 2c |select( |window ,|
|00000720| 20 69 63 6f 6e 20 29 0d | 02 6c 07 2a 7c 21 0d 02 | icon ).|.l.*|!..|
|00000730| 76 36 2a 7c 21 52 65 74 | 75 72 6e 73 20 54 52 55 |v6*|!Ret|urns TRU|
|00000740| 45 20 69 66 20 69 63 6f | 6e 20 69 73 20 73 65 6c |E if ico|n is sel|
|00000750| 65 63 74 65 64 2c 20 46 | 41 4c 53 45 20 69 66 20 |ected, F|ALSE if |
|00000760| 6e 6f 74 2e 0d 02 80 1b | dd a4 69 63 6f 6e 5f 67 |not.....|..icon_g|
|00000770| 65 74 73 65 6c 65 63 74 | 28 57 25 2c 49 25 29 0d |etselect|(W%,I%).|
|00000780| 02 8a 46 21 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |..F!_wim|p_buffer|
|00000790| 25 3d 21 28 57 25 2d 38 | 29 3a 5f 77 69 6d 70 5f |%=!(W%-8|):_wimp_|
|000007a0| 62 75 66 66 65 72 25 21 | 34 3d 49 25 3a c8 99 20 |buffer%!|4=I%:.. |
|000007b0| 26 34 30 30 43 45 2c 2c | 5f 77 69 6d 70 5f 62 75 |&400CE,,|_wimp_bu|
|000007c0| 66 66 65 72 25 0d 02 94 | 27 e7 20 28 5f 77 69 6d |ffer%...|'. (_wim|
|000007d0| 70 5f 62 75 66 66 65 72 | 25 21 32 34 20 80 20 26 |p_buffer|%!24 . &|
|000007e0| 32 30 30 30 30 30 29 20 | 8c 20 3d b9 0d 02 9e 06 |200000) |. =.....|
|000007f0| 3d a3 0d 02 a8 04 0d 02 | b2 1b 2a 7c 73 74 6f 70 |=.......|..*|stop|
|00000800| 20 46 4e 69 63 6f 6e 5f | 67 65 74 73 65 6c 65 63 | FNicon_|getselec|
|00000810| 74 0d 02 bc 19 2a 7c 73 | 74 61 72 74 20 46 4e 69 |t....*|s|tart FNi|
|00000820| 63 6f 6e 5f 67 65 74 65 | 73 67 0d 02 c6 25 2a 7c |con_gete|sg...%*||
|00000830| 21 46 4e 69 63 6f 6e 5f | 67 65 74 65 73 67 28 20 |!FNicon_|getesg( |
|00000840| 77 69 6e 64 6f 77 20 2c | 20 69 63 6f 6e 20 29 0d |window ,| icon ).|
|00000850| 02 d0 07 2a 7c 21 0d 02 | da 29 2a 7c 21 52 65 74 |...*|!..|.)*|!Ret|
|00000860| 75 72 6e 73 20 74 68 65 | 20 45 53 47 20 76 61 6c |urns the| ESG val|
|00000870| 75 65 20 66 6f 72 20 61 | 6e 20 69 63 6f 6e 2e 0d |ue for a|n icon..|
|00000880| 02 e4 18 dd a4 69 63 6f | 6e 5f 67 65 74 65 73 67 |.....ico|n_getesg|
|00000890| 28 57 25 2c 49 25 29 0d | 02 ee 46 21 5f 77 69 6d |(W%,I%).|..F!_wim|
|000008a0| 70 5f 62 75 66 66 65 72 | 25 3d 21 28 57 25 2d 38 |p_buffer|%=!(W%-8|
|000008b0| 29 3a 5f 77 69 6d 70 5f | 62 75 66 66 65 72 25 21 |):_wimp_|buffer%!|
|000008c0| 34 3d 49 25 3a c8 99 20 | 26 34 30 30 43 45 2c 2c |4=I%:.. |&400CE,,|
|000008d0| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 0d 02 f8 |_wimp_bu|ffer%...|
|000008e0| 23 3d 28 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |#=(_wimp|_buffer%|
|000008f0| 21 32 34 20 3e 3e 20 31 | 36 29 20 80 20 26 31 46 |!24 >> 1|6) . &1F|
|00000900| 0d 03 02 04 0d 03 0c 18 | 2a 7c 73 74 6f 70 20 46 |........|*|stop F|
|00000910| 4e 69 63 6f 6e 5f 67 65 | 74 65 73 67 0d 03 16 22 |Nicon_ge|tesg..."|
|00000920| 2a 7c 73 74 61 72 74 20 | 50 52 4f 43 69 63 6f 6e |*|start |PROCicon|
|00000930| 5f 67 72 6f 75 70 64 65 | 73 65 6c 65 63 74 0d 03 |_groupde|select..|
|00000940| 20 2d 2a 7c 21 50 52 4f | 43 69 63 6f 6e 5f 67 72 | -*|!PRO|Cicon_gr|
|00000950| 6f 75 70 64 65 73 65 6c | 65 63 74 28 20 77 69 6e |oupdesel|ect( win|
|00000960| 64 6f 77 20 2c 20 65 73 | 67 20 29 0d 03 2a 07 2a |dow , es|g )..*.*|
|00000970| 7c 21 0d 03 34 30 2a 7c | 21 44 65 73 65 6c 65 63 ||!..40*||!Deselec|
|00000980| 74 73 20 61 6c 6c 20 69 | 63 6f 6e 73 20 77 69 74 |ts all i|cons wit|
|00000990| 68 69 6e 20 74 68 65 20 | 67 69 76 65 6e 20 45 53 |hin the |given ES|
|000009a0| 47 2e 0d 03 3e 1f dd f2 | 69 63 6f 6e 5f 67 72 6f |G...>...|icon_gro|
|000009b0| 75 70 64 65 73 65 6c 65 | 63 74 28 57 25 2c 47 25 |updesele|ct(W%,G%|
|000009c0| 29 0d 03 48 48 ea 20 42 | 25 2c 4e 25 2c 41 25 2c |)..HH. B|%,N%,A%,|
|000009d0| 43 25 2c 53 25 3a 42 25 | 3d 5f 77 69 6d 70 5f 62 |C%,S%:B%|=_wimp_b|
|000009e0| 75 66 66 65 72 25 3a 21 | 42 25 3d 21 28 57 25 2d |uffer%:!|B%=!(W%-|
|000009f0| 38 29 3a c8 99 20 26 34 | 30 30 43 43 2c 2c 42 25 |8):.. &4|00CC,,B%|
|00000a00| 3a 4e 25 3d 42 25 21 38 | 38 0d 03 52 4e e3 20 41 |:N%=B%!8|8..RN. A|
|00000a10| 25 3d 30 20 b8 20 4e 25 | 2d 31 3a 43 25 3d 28 21 |%=0 . N%|-1:C%=(!|
|00000a20| 28 42 25 2b 31 30 38 2b | 33 32 2a 41 25 29 3e 3e |(B%+108+|32*A%)>>|
|00000a30| 31 36 29 20 80 20 26 31 | 46 3a 53 25 3d 28 21 28 |16) . &1|F:S%=(!(|
|00000a40| 42 25 2b 31 30 38 2b 33 | 32 2a 41 25 29 3e 3e 32 |B%+108+3|2*A%)>>2|
|00000a50| 31 29 20 80 20 26 31 0d | 03 5c 4b e7 20 43 25 3d |1) . &1.|.\K. C%=|
|00000a60| 47 25 20 80 20 53 25 3d | 31 20 8c 20 21 42 25 3d |G% . S%=|1 . !B%=|
|00000a70| 21 28 57 25 2d 38 29 3a | 42 25 21 34 3d 41 25 3a |!(W%-8):|B%!4=A%:|
|00000a80| 42 25 21 38 3d 30 3a 42 | 25 21 31 32 3d 26 32 30 |B%!8=0:B|%!12=&20|
|00000a90| 30 30 30 30 3a c8 99 20 | 26 34 30 30 43 44 2c 2c |0000:.. |&400CD,,|
|00000aa0| 42 25 0d 03 66 07 ed 3a | e1 0d 03 70 04 0d 03 7a |B%..f..:|...p...z|
|00000ab0| 21 2a 7c 73 74 6f 70 20 | 50 52 4f 43 69 63 6f 6e |!*|stop |PROCicon|
|00000ac0| 5f 67 72 6f 75 70 64 65 | 73 65 6c 65 63 74 0d 03 |_groupde|select..|
|00000ad0| 84 1a 2a 7c 73 74 61 72 | 74 20 46 4e 69 63 6f 6e |..*|star|t FNicon|
|00000ae0| 5f 67 65 74 74 65 78 74 | 0d 03 8e 26 2a 7c 21 46 |_gettext|...&*|!F|
|00000af0| 4e 69 63 6f 6e 5f 67 65 | 74 74 65 78 74 28 20 77 |Nicon_ge|ttext( w|
|00000b00| 69 6e 64 6f 77 20 2c 20 | 69 63 6f 6e 20 29 0d 03 |indow , |icon )..|
|00000b10| 98 07 2a 7c 21 0d 03 a2 | 45 2a 7c 21 52 65 74 75 |..*|!...|E*|!Retu|
|00000b20| 72 6e 73 20 74 68 65 20 | 74 65 78 74 20 63 6f 6e |rns the |text con|
|00000b30| 74 61 69 6e 65 64 20 77 | 69 74 68 69 6e 20 74 68 |tained w|ithin th|
|00000b40| 65 20 67 69 76 65 6e 20 | 28 69 6e 64 69 72 65 63 |e given |(indirec|
|00000b50| 74 65 64 29 20 69 63 6f | 6e 2e 0d 03 ac 19 dd a4 |ted) ico|n.......|
|00000b60| 69 63 6f 6e 5f 67 65 74 | 74 65 78 74 28 57 25 2c |icon_get|text(W%,|
|00000b70| 49 25 29 0d 03 b6 46 21 | 5f 77 69 6d 70 5f 62 75 |I%)...F!|_wimp_bu|
|00000b80| 66 66 65 72 25 3d 21 28 | 57 25 2d 38 29 3a 5f 77 |ffer%=!(|W%-8):_w|
|00000b90| 69 6d 70 5f 62 75 66 66 | 65 72 25 21 34 3d 49 25 |imp_buff|er%!4=I%|
|00000ba0| 3a c8 99 20 26 34 30 30 | 43 45 2c 2c 5f 77 69 6d |:.. &400|CE,,_wim|
|00000bb0| 70 5f 62 75 66 66 65 72 | 25 0d 03 c0 24 e7 20 28 |p_buffer|%...$. (|
|00000bc0| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 21 32 34 |_wimp_bu|ffer%!24|
|00000bd0| 20 80 20 31 29 3d 30 20 | 8c 20 3d 22 22 0d 03 ca | . 1)=0 |. =""...|
|00000be0| 41 e7 20 28 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |A. (_wim|p_buffer|
|00000bf0| 25 21 32 34 20 80 20 32 | 35 36 29 20 8c 20 3d a4 |%!24 . 2|56) . =.|
|00000c00| 6f 73 5f 67 65 74 73 74 | 72 69 6e 67 28 5f 77 69 |os_getst|ring(_wi|
|00000c10| 6d 70 5f 62 75 66 66 65 | 72 25 21 32 38 29 0d 03 |mp_buffe|r%!28)..|
|00000c20| d4 07 3d 22 22 0d 03 de | 04 0d 03 e8 19 2a 7c 73 |..=""...|.....*|s|
|00000c30| 74 6f 70 20 46 4e 69 63 | 6f 6e 5f 67 65 74 74 65 |top FNic|on_gette|
|00000c40| 78 74 0d 03 f2 1c 2a 7c | 73 74 61 72 74 20 50 52 |xt....*||start PR|
|00000c50| 4f 43 69 63 6f 6e 5f 73 | 65 74 74 65 78 74 0d 03 |OCicon_s|ettext..|
|00000c60| fc 36 2a 7c 21 50 52 4f | 43 69 63 6f 6e 5f 73 65 |.6*|!PRO|Cicon_se|
|00000c70| 74 74 65 78 74 28 20 77 | 69 6e 64 6f 77 20 2c 20 |ttext( w|indow , |
|00000c80| 69 63 6f 6e 20 2c 20 74 | 65 78 74 5f 73 74 72 69 |icon , t|ext_stri|
|00000c90| 6e 67 20 29 0d 04 06 07 | 2a 7c 21 0d 04 10 49 2a |ng )....|*|!...I*|
|00000ca0| 7c 21 53 65 74 73 20 74 | 68 65 20 67 69 76 65 6e ||!Sets t|he given|
|00000cb0| 20 28 69 6e 64 69 72 65 | 63 74 65 64 29 20 69 63 | (indire|cted) ic|
|00000cc0| 6f 6e 20 74 6f 20 63 6f | 6e 74 61 69 6e 20 74 68 |on to co|ntain th|
|00000cd0| 65 20 67 69 76 65 6e 20 | 74 65 78 74 5f 73 74 72 |e given |text_str|
|00000ce0| 69 6e 67 2e 0d 04 1a 1c | dd f2 69 63 6f 6e 5f 73 |ing.....|..icon_s|
|00000cf0| 65 74 74 65 78 74 28 57 | 25 2c 49 25 2c 54 24 29 |ettext(W|%,I%,T$)|
|00000d00| 0d 04 24 19 ea 20 63 77 | 25 2c 63 69 25 2c 63 78 |..$.. cw|%,ci%,cx|
|00000d10| 25 2c 63 79 25 2c 63 70 | 25 0d 04 2e 46 21 5f 77 |%,cy%,cp|%...F!_w|
|00000d20| 69 6d 70 5f 62 75 66 66 | 65 72 25 3d 21 28 57 25 |imp_buff|er%=!(W%|
|00000d30| 2d 38 29 3a 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |-8):_wim|p_buffer|
|00000d40| 25 21 34 3d 49 25 3a c8 | 99 20 26 34 30 30 43 45 |%!4=I%:.|. &400CE|
|00000d50| 2c 2c 5f 77 69 6d 70 5f | 62 75 66 66 65 72 25 0d |,,_wimp_|buffer%.|
|00000d60| 04 38 22 e7 20 28 5f 77 | 69 6d 70 5f 62 75 66 66 |.8". (_w|imp_buff|
|00000d70| 65 72 25 21 32 34 20 80 | 20 31 29 3d 30 20 8c 20 |er%!24 .| 1)=0 . |
|00000d80| e1 0d 04 42 56 e7 20 28 | 5f 77 69 6d 70 5f 62 75 |...BV. (|_wimp_bu|
|00000d90| 66 66 65 72 25 21 32 34 | 20 80 20 32 35 36 29 20 |ffer%!24| . 256) |
|00000da0| 8c 20 f2 6f 73 5f 70 75 | 74 73 74 72 69 6e 67 28 |. .os_pu|tstring(|
|00000db0| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 21 32 38 |_wimp_bu|ffer%!28|
|00000dc0| 2c c0 54 24 2c 5f 77 69 | 6d 70 5f 62 75 66 66 65 |,.T$,_wi|mp_buffe|
|00000dd0| 72 25 21 33 36 29 29 0d | 04 4c 20 c8 99 20 26 34 |r%!36)).|.L .. &4|
|00000de0| 30 30 44 33 2c 2c 5f 77 | 69 6d 70 5f 62 75 66 66 |00D3,,_w|imp_buff|
|00000df0| 65 72 25 2b 31 32 38 0d | 04 56 45 63 77 25 3d 5f |er%+128.|.VEcw%=_|
|00000e00| 77 69 6d 70 5f 62 75 66 | 66 65 72 25 21 31 32 38 |wimp_buf|fer%!128|
|00000e10| 3a 63 69 25 3d 5f 77 69 | 6d 70 5f 62 75 66 66 65 |:ci%=_wi|mp_buffe|
|00000e20| 72 25 21 31 33 32 3a 63 | 78 25 3d 5f 77 69 6d 70 |r%!132:c|x%=_wimp|
|00000e30| 5f 62 75 66 66 65 72 25 | 21 31 33 36 0d 04 60 2f |_buffer%|!136..`/|
|00000e40| 63 79 25 3d 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |cy%=_wim|p_buffer|
|00000e50| 25 21 31 34 30 3a 63 70 | 25 3d 5f 77 69 6d 70 5f |%!140:cp|%=_wimp_|
|00000e60| 62 75 66 66 65 72 25 21 | 31 34 38 0d 04 6a 1a e7 |buffer%!|148..j..|
|00000e70| 20 63 77 25 3d 57 25 21 | 2d 38 20 80 20 63 69 25 | cw%=W%!|-8 . ci%|
|00000e80| 3d 49 25 20 8c 0d 04 74 | 21 20 20 e7 20 63 70 25 |=I% ...t|! . cp%|
|00000e90| 20 3e 20 a9 28 53 24 29 | 20 8c 20 63 70 25 20 3d | > .(S$)| . cp% =|
|00000ea0| 20 a9 28 53 24 29 0d 04 | 7e 26 20 20 c8 99 20 26 | .(S$)..|~& .. &|
|00000eb0| 34 30 30 44 32 2c 63 77 | 25 2c 63 69 25 2c 63 78 |400D2,cw|%,ci%,cx|
|00000ec0| 25 2c 63 79 25 2c 2d 31 | 2c 63 70 25 0d 04 88 05 |%,cy%,-1|,cp%....|
|00000ed0| cd 0d 04 92 28 5f 77 69 | 6d 70 5f 62 75 66 66 65 |....(_wi|mp_buffe|
|00000ee0| 72 25 21 38 3d 30 3a 5f | 77 69 6d 70 5f 62 75 66 |r%!8=0:_|wimp_buf|
|00000ef0| 66 65 72 25 21 31 32 3d | 30 0d 04 9c 1c c8 99 20 |fer%!12=|0...... |
|00000f00| 26 34 30 30 43 44 2c 2c | 5f 77 69 6d 70 5f 62 75 |&400CD,,|_wimp_bu|
|00000f10| 66 66 65 72 25 0d 04 a6 | 05 e1 0d 04 b0 04 0d 04 |ffer%...|........|
|00000f20| ba 1b 2a 7c 73 74 6f 70 | 20 50 52 4f 43 69 63 6f |..*|stop| PROCico|
|00000f30| 6e 5f 73 65 74 74 65 78 | 74 0d 04 c4 1e 2a 7c 73 |n_settex|t....*|s|
|00000f40| 74 61 72 74 20 50 52 4f | 43 69 63 6f 6e 5f 73 65 |tart PRO|Cicon_se|
|00000f50| 74 73 70 72 69 74 65 0d | 04 ce 38 2a 7c 21 50 52 |tsprite.|..8*|!PR|
|00000f60| 4f 43 69 63 6f 6e 5f 73 | 65 74 73 70 72 69 74 65 |OCicon_s|etsprite|
|00000f70| 28 20 77 69 6e 64 6f 77 | 20 2c 20 69 63 6f 6e 20 |( window| , icon |
|00000f80| 2c 20 73 70 72 69 74 65 | 5f 6e 61 6d 65 20 29 0d |, sprite|_name ).|
|00000f90| 04 d8 07 2a 7c 21 0d 04 | e2 46 2a 7c 21 53 65 74 |...*|!..|.F*|!Set|
|00000fa0| 73 20 74 68 65 20 67 69 | 76 65 6e 20 69 6e 64 69 |s the gi|ven indi|
|00000fb0| 72 65 63 74 65 64 20 73 | 70 72 69 74 65 2d 6f 6e |rected s|prite-on|
|00000fc0| 6c 79 20 69 63 6f 6e 20 | 74 6f 20 63 6f 6e 74 61 |ly icon |to conta|
|00000fd0| 69 6e 20 74 68 65 20 67 | 69 76 65 6e 0d 04 ec 0e |in the g|iven....|
|00000fe0| 2a 7c 21 73 70 72 69 74 | 65 2e 0d 04 f6 1e dd f2 |*|!sprit|e.......|
|00000ff0| 69 63 6f 6e 5f 73 65 74 | 73 70 72 69 74 65 28 57 |icon_set|sprite(W|
|00001000| 25 2c 49 25 2c 53 24 29 | 0d 05 00 46 21 5f 77 69 |%,I%,S$)|...F!_wi|
|00001010| 6d 70 5f 62 75 66 66 65 | 72 25 3d 21 28 57 25 2d |mp_buffe|r%=!(W%-|
|00001020| 38 29 3a 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |8):_wimp|_buffer%|
|00001030| 21 34 3d 49 25 3a c8 99 | 20 26 34 30 30 43 45 2c |!4=I%:..| &400CE,|
|00001040| 2c 5f 77 69 6d 70 5f 62 | 75 66 66 65 72 25 0d 05 |,_wimp_b|uffer%..|
|00001050| 0a 23 e7 20 28 5f 77 69 | 6d 70 5f 62 75 66 66 65 |.#. (_wi|mp_buffe|
|00001060| 72 25 21 32 34 20 80 20 | 33 29 3c 3e 32 20 8c 20 |r%!24 . |3)<>2 . |
|00001070| e1 0d 05 14 56 e7 20 28 | 5f 77 69 6d 70 5f 62 75 |....V. (|_wimp_bu|
|00001080| 66 66 65 72 25 21 32 34 | 20 80 20 32 35 36 29 20 |ffer%!24| . 256) |
|00001090| 8c 20 f2 6f 73 5f 70 75 | 74 73 74 72 69 6e 67 28 |. .os_pu|tstring(|
|000010a0| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 21 32 38 |_wimp_bu|ffer%!28|
|000010b0| 2c c0 53 24 2c 5f 77 69 | 6d 70 5f 62 75 66 66 65 |,.S$,_wi|mp_buffe|
|000010c0| 72 25 21 33 36 29 29 0d | 05 1e 28 5f 77 69 6d 70 |r%!36)).|..(_wimp|
|000010d0| 5f 62 75 66 66 65 72 25 | 21 38 3d 30 3a 5f 77 69 |_buffer%|!8=0:_wi|
|000010e0| 6d 70 5f 62 75 66 66 65 | 72 25 21 31 32 3d 30 0d |mp_buffe|r%!12=0.|
|000010f0| 05 28 1c c8 99 20 26 34 | 30 30 43 44 2c 2c 5f 77 |.(... &4|00CD,,_w|
|00001100| 69 6d 70 5f 62 75 66 66 | 65 72 25 0d 05 32 05 e1 |imp_buff|er%..2..|
|00001110| 0d 05 3c 04 0d 05 46 1d | 2a 7c 73 74 6f 70 20 50 |..<...F.|*|stop P|
|00001120| 52 4f 43 69 63 6f 6e 5f | 73 65 74 73 70 72 69 74 |ROCicon_|setsprit|
|00001130| 65 0d 05 50 18 2a 7c 73 | 74 61 72 74 20 46 4e 69 |e..P.*|s|tart FNi|
|00001140| 63 6f 6e 5f 77 68 69 63 | 68 0d 05 5a 23 2a 7c 21 |con_whic|h..Z#*|!|
|00001150| 46 4e 69 63 6f 6e 5f 77 | 68 69 63 68 28 20 77 69 |FNicon_w|hich( wi|
|00001160| 6e 64 6f 77 20 2c 20 65 | 73 67 20 29 0d 05 64 07 |ndow , e|sg )..d.|
|00001170| 2a 7c 21 0d 05 6e 49 2a | 7c 21 52 65 74 75 72 6e |*|!..nI*||!Return|
|00001180| 73 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |s the nu|mber of |
|00001190| 74 68 65 20 73 65 6c 65 | 63 74 65 64 20 69 63 6f |the sele|cted ico|
|000011a0| 6e 20 69 6e 20 74 68 65 | 20 67 69 76 65 6e 20 45 |n in the| given E|
|000011b0| 53 47 2c 20 6f 72 20 2d | 31 20 69 66 0d 05 78 27 |SG, or -|1 if..x'|
|000011c0| 2a 7c 21 6e 6f 20 69 63 | 6f 6e 20 69 73 20 73 65 |*|!no ic|on is se|
|000011d0| 6c 65 63 74 65 64 20 69 | 6e 20 74 68 61 74 20 45 |lected i|n that E|
|000011e0| 53 47 2e 0d 05 82 18 dd | 20 a4 69 63 6f 6e 5f 77 |SG......| .icon_w|
|000011f0| 68 69 63 68 28 57 25 2c | 47 25 29 0d 05 8c 3e c8 |hich(W%,|G%)...>.|
|00001200| 99 20 26 34 30 30 44 36 | 2c 57 25 21 2d 38 2c 5f |. &400D6|,W%!-8,_|
|00001210| 77 69 6d 70 5f 62 75 66 | 66 65 72 25 2c 26 33 46 |wimp_buf|fer%,&3F|
|00001220| 30 30 30 30 2c 26 32 30 | 30 30 30 30 20 84 20 28 |0000,&20|0000 . (|
|00001230| 47 25 20 3c 3c 20 31 36 | 29 0d 05 96 13 3d 21 5f |G% << 16|)....=!_|
|00001240| 77 69 6d 70 5f 62 75 66 | 66 65 72 25 0d 05 a0 04 |wimp_buf|fer%....|
|00001250| 0d 05 aa 17 2a 7c 73 74 | 6f 70 20 46 4e 69 63 6f |....*|st|op FNico|
|00001260| 6e 5f 77 68 69 63 68 0d | 05 b4 1b 2a 7c 73 74 61 |n_which.|...*|sta|
|00001270| 72 74 20 50 52 4f 43 69 | 63 6f 6e 5f 64 65 6c 65 |rt PROCi|con_dele|
|00001280| 74 65 0d 05 be 27 2a 7c | 21 50 52 4f 43 69 63 6f |te...'*||!PROCico|
|00001290| 6e 5f 64 65 6c 65 74 65 | 28 20 77 69 6e 64 6f 77 |n_delete|( window|
|000012a0| 20 2c 20 69 63 6f 6e 20 | 29 0d 05 c8 07 2a 7c 21 | , icon |)....*|!|
|000012b0| 0d 05 d2 43 2a 7c 21 54 | 68 69 73 20 70 72 6f 63 |...C*|!T|his proc|
|000012c0| 65 64 75 72 65 20 64 65 | 6c 65 74 65 73 20 74 68 |edure de|letes th|
|000012d0| 65 20 67 69 76 65 6e 20 | 69 63 6f 6e 20 66 72 6f |e given |icon fro|
|000012e0| 6d 20 74 68 65 20 67 69 | 76 65 6e 20 77 69 6e 64 |m the gi|ven wind|
|000012f0| 6f 77 2e 0d 05 dc 18 dd | f2 69 63 6f 6e 5f 64 65 |ow......|.icon_de|
|00001300| 6c 65 74 65 28 57 25 2c | 49 25 29 0d 05 e6 19 ea |lete(W%,|I%).....|
|00001310| 20 42 25 3a 42 25 3d 5f | 77 69 6d 70 5f 62 75 66 | B%:B%=_|wimp_buf|
|00001320| 66 65 72 25 0d 05 f0 25 | 21 42 25 3d 21 28 57 25 |fer%...%|!B%=!(W%|
|00001330| 2d 38 29 3a 42 25 21 34 | 3d 49 25 3a c8 99 20 26 |-8):B%!4|=I%:.. &|
|00001340| 34 30 30 43 34 2c 2c 42 | 25 0d 05 fa 05 e1 0d 06 |400C4,,B|%.......|
|00001350| 04 04 0d 06 0e 1a 2a 7c | 73 74 6f 70 20 50 52 4f |......*||stop PRO|
|00001360| 43 69 63 6f 6e 5f 64 65 | 6c 65 74 65 0d 06 18 1b |Cicon_de|lete....|
|00001370| 2a 7c 73 74 61 72 74 20 | 50 52 4f 43 73 6c 69 64 |*|start |PROCslid|
|00001380| 65 72 5f 69 6e 69 74 0d | 06 22 16 2a 7c 21 50 52 |er_init.|.".*|!PR|
|00001390| 4f 43 73 6c 69 64 65 72 | 5f 69 6e 69 74 0d 06 2c |OCslider|_init..,|
|000013a0| 07 2a 7c 21 0d 06 36 51 | 2a 7c 21 49 6e 69 74 69 |.*|!..6Q|*|!Initi|
|000013b0| 61 6c 69 73 65 73 20 74 | 68 65 20 27 53 6c 69 64 |alises t|he 'Slid|
|000013c0| 65 72 27 20 72 6f 75 74 | 69 6e 65 73 20 74 6f 20 |er' rout|ines to |
|000013d0| 61 6c 6c 6f 77 20 73 6c | 69 64 65 72 20 69 63 6f |allow sl|ider ico|
|000013e0| 6e 73 2e 20 54 68 65 73 | 65 20 61 72 65 20 73 70 |ns. Thes|e are sp|
|000013f0| 65 63 69 61 6c 0d 06 40 | 4d 2a 7c 21 69 63 6f 6e |ecial..@|M*|!icon|
|00001400| 73 20 77 68 69 63 68 20 | 61 72 65 20 68 61 6e 64 |s which |are hand|
|00001410| 6c 65 64 20 62 79 20 74 | 68 65 20 6c 69 62 72 61 |led by t|he libra|
|00001420| 72 79 2c 20 61 6c 6c 20 | 79 6f 75 20 6e 65 65 64 |ry, all |you need|
|00001430| 20 74 6f 20 64 6f 20 69 | 73 20 72 65 67 69 73 74 | to do i|s regist|
|00001440| 65 72 0d 06 4a 48 2a 7c | 21 74 68 65 20 69 63 6f |er..JH*||!the ico|
|00001450| 6e 73 20 69 6e 20 71 75 | 65 73 74 69 6f 6e 20 77 |ns in qu|estion w|
|00001460| 69 74 68 20 74 68 65 20 | 6c 69 62 72 61 72 79 2e |ith the |library.|
|00001470| 20 49 66 20 79 6f 75 20 | 64 65 66 69 6e 65 20 61 | If you |define a|
|00001480| 20 70 72 6f 63 65 64 75 | 72 65 0d 06 54 4b 2a 7c | procedu|re..TK*||
|00001490| 21 50 52 4f 43 65 76 65 | 6e 74 5f 73 6c 69 64 65 |!PROCeve|nt_slide|
|000014a0| 72 20 74 68 69 73 20 77 | 69 6c 6c 20 62 65 20 63 |r this w|ill be c|
|000014b0| 61 6c 6c 65 64 20 65 76 | 65 72 79 20 74 69 6d 65 |alled ev|ery time|
|000014c0| 20 61 20 73 6c 69 64 65 | 72 20 69 73 20 75 70 64 | a slide|r is upd|
|000014d0| 61 74 65 64 2c 0d 06 5e | 47 2a 7c 21 67 69 76 69 |ated,..^|G*|!givi|
|000014e0| 6e 67 20 74 77 6f 20 70 | 61 72 61 6d 65 74 65 72 |ng two p|arameter|
|000014f0| 73 2c 20 74 68 65 20 73 | 6c 69 64 65 72 20 69 6e |s, the s|lider in|
|00001500| 20 71 75 65 73 74 69 6f | 6e 20 61 6e 64 20 74 68 | questio|n and th|
|00001510| 65 20 6e 65 77 20 76 61 | 6c 75 65 2e 0d 06 68 11 |e new va|lue...h.|
|00001520| dd f2 73 6c 69 64 65 72 | 5f 69 6e 69 74 0d 06 72 |..slider|_init..r|
|00001530| 20 5f 73 6c 69 64 65 72 | 5f 6c 69 73 74 25 3d 30 | _slider|_list%=0|
|00001540| 3a 5f 73 6c 69 64 65 72 | 5f 73 25 3d 30 0d 06 7c |:_slider|_s%=0..||
|00001550| 05 e1 0d 06 86 04 0d 06 | 90 16 dd a4 73 6c 69 64 |........|....slid|
|00001560| 65 72 5f 63 6c 69 63 6b | 28 42 25 29 0d 06 9a 1d |er_click|(B%)....|
|00001570| ea 20 57 25 2c 49 25 2c | 53 25 2c 46 25 2c 56 25 |. W%,I%,|S%,F%,V%|
|00001580| 2c 58 25 2c 79 25 2c 59 | 25 0d 06 a4 18 e7 20 28 |,X%,y%,Y|%..... (|
|00001590| 28 42 25 21 38 29 80 20 | 35 29 3d 30 20 8c 20 3d |(B%!8). |5)=0 . =|
|000015a0| 30 0d 06 ae 23 57 25 3d | a4 77 69 6e 5f 66 69 6e |0...#W%=|.win_fin|
|000015b0| 64 77 69 6e 28 42 25 21 | 31 32 29 3a 49 25 3d 42 |dwin(B%!|12):I%=B|
|000015c0| 25 21 31 36 0d 06 b8 19 | 53 25 3d 5f 73 6c 69 64 |%!16....|S%=_slid|
|000015d0| 65 72 5f 6c 69 73 74 25 | 3a 46 25 3d a3 0d 06 c2 |er_list%|:F%=....|
|000015e0| 09 c8 95 20 53 25 0d 06 | cc 31 e7 20 57 25 3d 53 |... S%..|.1. W%=S|
|000015f0| 25 21 34 20 80 20 28 49 | 25 3d 53 25 21 38 20 84 |%!4 . (I|%=S%!8 .|
|00001600| 20 49 25 3d 53 25 21 31 | 32 20 84 20 49 25 3d 53 | I%=S%!1|2 . I%=S|
|00001610| 25 21 34 30 29 20 8c 0d | 06 d6 34 20 20 46 25 3d |%!40) ..|..4 F%=|
|00001620| b9 3a 56 25 3d 21 42 25 | 3a 21 42 25 3d 42 25 21 |.:V%=!B%|:!B%=B%!|
|00001630| 31 32 3a c8 99 20 26 34 | 30 30 45 30 2c 2c 42 25 |12:.. &4|00E0,,B%|
|00001640| 3a 56 25 3d 56 25 2d 42 | 25 21 34 0d 06 e0 1f 20 |:V%=V%-B|%!4.... |
|00001650| 20 c8 99 20 26 34 30 30 | 43 42 2c 2c 42 25 3a 58 | .. &400|CB,,B%:X|
|00001660| 25 3d 56 25 2b 42 25 21 | 32 30 0d 06 ea 3c 20 20 |%=V%+B%!|20...< |
|00001670| 56 25 3d 2e 35 2b 28 28 | 53 25 21 32 30 2d 53 25 |V%=.5+((|S%!20-S%|
|00001680| 21 31 36 29 2a 28 58 25 | 2d 53 25 21 33 32 29 29 |!16)*(X%|-S%!32))|
|00001690| 2f 28 53 25 21 32 34 2a | 28 53 25 21 33 36 2d 53 |/(S%!24*|(S%!36-S|
|000016a0| 25 21 33 32 29 29 0d 06 | f4 2a 20 20 56 25 3d 53 |%!32))..|.* V%=S|
|000016b0| 25 21 31 36 2b 56 25 2a | 53 25 21 32 34 3a f2 73 |%!16+V%*|S%!24:.s|
|000016c0| 6c 69 64 65 72 5f 73 65 | 74 28 53 25 2c 56 25 29 |lider_se|t(S%,V%)|
|000016d0| 0d 06 fe 37 20 20 5f 73 | 6c 69 64 65 72 5f 73 25 |...7 _s|lider_s%|
|000016e0| 3d 53 25 3a 21 42 25 3d | 21 28 57 25 2d 38 29 3a |=S%:!B%=|!(W%-8):|
|000016f0| 42 25 21 34 3d 53 25 21 | 38 3a c8 99 20 26 34 30 |B%!4=S%!|8:.. &40|
|00001700| 30 43 45 2c 2c 42 25 0d | 07 08 43 20 20 58 25 3d |0CE,,B%.|..C X%=|
|00001710| 42 25 21 38 3a 56 25 3d | 42 25 21 31 36 3a 79 25 |B%!8:V%=|B%!16:y%|
|00001720| 3d 42 25 21 31 32 3a 59 | 25 3d 42 25 21 32 30 3a |=B%!12:Y|%=B%!20:|
|00001730| f2 63 6f 6f 72 64 5f 77 | 69 6e 74 6f 72 65 61 6c |.coord_w|intoreal|
|00001740| 28 57 25 2c 58 25 2c 79 | 25 29 0d 07 12 38 20 20 |(W%,X%,y|%)...8 |
|00001750| f2 63 6f 6f 72 64 5f 77 | 69 6e 74 6f 72 65 61 6c |.coord_w|intoreal|
|00001760| 28 57 25 2c 56 25 2c 59 | 25 29 3a c8 97 20 c8 93 |(W%,V%,Y|%):.. ..|
|00001770| 20 58 25 2c 79 25 2c 56 | 25 2d 58 25 2c 59 25 2d | X%,y%,V|%-X%,Y%-|
|00001780| 79 25 0d 07 1c 05 cd 0d | 07 26 0a 53 25 3d 21 53 |y%......|.&.S%=!S|
|00001790| 25 0d 07 30 05 ce 0d 07 | 3a 07 3d 46 25 0d 07 44 |%..0....|:.=F%..D|
|000017a0| 04 0d 07 4e 11 dd f2 73 | 6c 69 64 65 72 5f 64 72 |...N...s|lider_dr|
|000017b0| 61 67 0d 07 58 14 ea 20 | 57 25 2c 53 25 2c 56 25 |ag..X.. |W%,S%,V%|
|000017c0| 2c 58 25 2c 42 25 0d 07 | 62 11 53 25 3d 5f 73 6c |,X%,B%..|b.S%=_sl|
|000017d0| 69 64 65 72 5f 73 25 0d | 07 6c 2a 57 25 3d 53 25 |ider_s%.|.l*W%=S%|
|000017e0| 21 34 3a 42 25 3d 5f 77 | 69 6d 70 5f 62 75 66 66 |!4:B%=_w|imp_buff|
|000017f0| 65 72 25 3a c8 99 20 26 | 34 30 30 43 46 2c 2c 42 |er%:.. &|400CF,,B|
|00001800| 25 0d 07 76 4a e7 20 28 | 28 42 25 21 38 29 80 20 |%..vJ. (|(B%!8). |
|00001810| 35 29 3d 30 20 8c 20 5f | 73 6c 69 64 65 72 5f 73 |5)=0 . _|slider_s|
|00001820| 25 3d 30 3a f2 6f 73 5f | 73 63 72 65 65 6e 73 69 |%=0:.os_|screensi|
|00001830| 7a 65 28 58 25 2c 56 25 | 29 3a c8 97 20 c8 93 20 |ze(X%,V%|):.. .. |
|00001840| 30 2c 30 2c 58 25 2c 56 | 25 3a e1 0d 07 80 2f 56 |0,0,X%,V|%:..../V|
|00001850| 25 3d 21 42 25 3a 21 42 | 25 3d 21 28 57 25 2d 38 |%=!B%:!B|%=!(W%-8|
|00001860| 29 3a c8 99 20 26 34 30 | 30 45 30 2c 2c 42 25 3a |):.. &40|0E0,,B%:|
|00001870| 56 25 3d 56 25 2d 42 25 | 21 34 0d 07 8a 1d c8 99 |V%=V%-B%|!4......|
|00001880| 20 26 34 30 30 43 42 2c | 2c 42 25 3a 58 25 3d 56 | &400CB,|,B%:X%=V|
|00001890| 25 2b 42 25 21 32 30 0d | 07 94 3a 56 25 3d 2e 35 |%+B%!20.|..:V%=.5|
|000018a0| 2b 28 28 53 25 21 32 30 | 2d 53 25 21 31 36 29 2a |+((S%!20|-S%!16)*|
|000018b0| 28 58 25 2d 53 25 21 33 | 32 29 29 2f 28 53 25 21 |(X%-S%!3|2))/(S%!|
|000018c0| 32 34 2a 28 53 25 21 33 | 36 2d 53 25 21 33 32 29 |24*(S%!3|6-S%!32)|
|000018d0| 29 0d 07 9e 28 56 25 3d | 53 25 21 31 36 2b 56 25 |)...(V%=|S%!16+V%|
|000018e0| 2a 53 25 21 32 34 3a f2 | 73 6c 69 64 65 72 5f 73 |*S%!24:.|slider_s|
|000018f0| 65 74 28 53 25 2c 56 25 | 29 0d 07 a8 05 e1 0d 07 |et(S%,V%|).......|
|00001900| b2 04 0d 07 bc 1a 2a 7c | 73 74 6f 70 20 50 52 4f |......*||stop PRO|
|00001910| 43 73 6c 69 64 65 72 5f | 69 6e 69 74 0d 07 c6 18 |Cslider_|init....|
|00001920| 2a 7c 73 74 61 72 74 20 | 46 4e 73 6c 69 64 65 72 |*|start |FNslider|
|00001930| 5f 6e 65 77 0d 07 d0 5d | 2a 7c 21 46 4e 73 6c 69 |_new...]|*|!FNsli|
|00001940| 64 65 72 5f 6e 65 77 28 | 20 77 69 6e 64 6f 77 20 |der_new(| window |
|00001950| 2c 20 77 65 6c 6c 5f 69 | 63 6f 6e 2c 20 73 6c 69 |, well_i|con, sli|
|00001960| 64 65 72 5f 69 63 6f 6e | 2c 20 62 61 73 65 5f 69 |der_icon|, base_i|
|00001970| 63 6f 6e 2c 20 6d 69 6e | 5f 76 61 6c 75 65 2c 20 |con, min|_value, |
|00001980| 6d 61 78 5f 76 61 6c 75 | 65 2c 20 73 74 65 70 20 |max_valu|e, step |
|00001990| 29 0d 07 da 07 2a 7c 21 | 0d 07 e4 4f 2a 7c 21 52 |)....*|!|...O*|!R|
|000019a0| 65 67 69 73 74 65 72 73 | 20 74 68 65 20 69 63 6f |egisters| the ico|
|000019b0| 6e 20 74 72 69 70 6c 65 | 20 67 69 76 65 6e 20 61 |n triple| given a|
|000019c0| 73 20 61 20 73 6c 69 64 | 65 72 20 69 63 6f 6e 2e |s a slid|er icon.|
|000019d0| 20 54 68 65 20 69 63 6f | 6e 20 74 72 69 70 6c 65 | The ico|n triple|
|000019e0| 20 73 68 6f 75 6c 64 0d | 07 ee 4d 2a 7c 21 62 65 | should.|..M*|!be|
|000019f0| 20 61 20 77 65 6c 6c 20 | 69 63 6f 6e 20 28 65 67 | a well |icon (eg|
|00001a00| 2e 20 61 20 66 61 6e 63 | 79 20 62 6f 72 64 65 72 |. a fanc|y border|
|00001a10| 29 2c 20 61 6e 64 20 74 | 68 65 20 69 63 6f 6e 20 |), and t|he icon |
|00001a20| 74 6f 20 61 63 74 75 61 | 6c 6c 79 20 61 63 74 20 |to actua|lly act |
|00001a30| 61 73 20 61 0d 07 f8 43 | 2a 7c 21 73 6c 69 64 65 |as a...C|*|!slide|
|00001a40| 72 2c 20 61 6e 64 20 74 | 68 65 20 62 61 73 65 20 |r, and t|he base |
|00001a50| 69 63 6f 6e 20 28 73 65 | 65 20 74 68 65 20 53 74 |icon (se|e the St|
|00001a60| 79 6c 65 20 47 75 69 64 | 65 20 66 6f 72 20 64 65 |yle Guid|e for de|
|00001a70| 74 61 69 6c 73 29 2e 0d | 07 f9 46 2a 7c 21 41 6c |tails)..|..F*|!Al|
|00001a80| 6c 20 74 68 72 65 65 20 | 69 63 6f 6e 73 20 73 68 |l three |icons sh|
|00001a90| 6f 75 6c 64 20 62 65 20 | 64 65 66 69 6e 65 64 20 |ould be |defined |
|00001aa0| 61 73 20 74 79 70 65 20 | 27 43 6c 69 63 6b 27 20 |as type |'Click' |
|00001ab0| 28 6f 72 20 73 69 6d 69 | 6c 61 72 29 2c 0d 08 02 |(or simi|lar),...|
|00001ac0| 4b 2a 7c 21 61 6e 64 20 | 74 68 65 20 73 6c 69 64 |K*|!and |the slid|
|00001ad0| 65 72 20 69 63 6f 6e 20 | 73 68 6f 75 6c 64 20 62 |er icon |should b|
|00001ae0| 65 20 61 74 20 69 74 73 | 20 6d 61 78 69 6d 75 6d |e at its| maximum|
|00001af0| 20 73 69 7a 65 20 77 68 | 65 6e 20 74 68 69 73 20 | size wh|en this |
|00001b00| 66 75 6e 63 74 69 6f 6e | 0d 08 0c 4b 2a 7c 21 69 |function|...K*|!i|
|00001b10| 73 20 63 61 6c 6c 65 64 | 2e 20 54 68 65 20 6d 69 |s called|. The mi|
|00001b20| 6e 5f 76 61 6c 75 65 20 | 61 6e 64 20 6d 61 78 5f |n_value |and max_|
|00001b30| 76 61 6c 75 65 20 70 61 | 69 72 20 67 69 76 65 20 |value pa|ir give |
|00001b40| 74 68 65 20 72 61 6e 67 | 65 20 6f 66 20 76 61 6c |the rang|e of val|
|00001b50| 75 65 73 0d 08 16 4f 2a | 7c 21 74 68 65 20 73 6c |ues...O*||!the sl|
|00001b60| 69 64 65 72 20 63 61 6e | 20 74 61 6b 65 20 61 6e |ider can| take an|
|00001b70| 64 20 27 73 74 65 70 27 | 20 64 65 66 69 6e 65 73 |d 'step'| defines|
|00001b80| 20 74 68 65 20 6e 75 6d | 62 65 72 20 6f 66 20 69 | the num|ber of i|
|00001b90| 6e 74 65 72 6d 65 64 69 | 61 74 65 20 76 61 6c 75 |ntermedi|ate valu|
|00001ba0| 65 73 0d 08 20 48 2a 7c | 21 74 68 65 20 73 6c 69 |es.. H*||!the sli|
|00001bb0| 64 65 72 20 63 61 6e 20 | 61 73 73 75 6d 65 2e 20 |der can |assume. |
|00001bc0| 54 68 69 73 20 66 75 6e | 63 74 69 6f 6e 20 72 65 |This fun|ction re|
|00001bd0| 74 75 72 6e 73 20 61 20 | 70 6f 69 6e 74 65 72 20 |turns a |pointer |
|00001be0| 74 6f 20 61 20 62 6c 6f | 63 6b 0d 08 2a 20 2a 7c |to a blo|ck..* *||
|00001bf0| 21 77 68 69 63 68 20 64 | 65 66 69 6e 65 73 20 74 |!which d|efines t|
|00001c00| 68 65 20 73 6c 69 64 65 | 72 2e 0d 08 34 26 dd a4 |he slide|r...4&..|
|00001c10| 73 6c 69 64 65 72 5f 6e | 65 77 28 57 25 2c 42 25 |slider_n|ew(W%,B%|
|00001c20| 2c 53 25 2c 52 25 2c 4c | 25 2c 48 25 2c 4a 25 29 |,S%,R%,L|%,H%,J%)|
|00001c30| 0d 08 3e 1c ea 20 4e 25 | 2c 51 25 3a 51 25 3d 5f |..>.. N%|,Q%:Q%=_|
|00001c40| 77 69 6d 70 5f 62 75 66 | 66 65 72 25 0d 08 48 41 |wimp_buf|fer%..HA|
|00001c50| 4e 25 3d a4 6d 61 6c 6c | 6f 63 28 34 34 29 3a 21 |N%=.mall|oc(44):!|
|00001c60| 4e 25 3d 5f 73 6c 69 64 | 65 72 5f 6c 69 73 74 25 |N%=_slid|er_list%|
|00001c70| 3a 5f 73 6c 69 64 65 72 | 5f 6c 69 73 74 25 3d 4e |:_slider|_list%=N|
|00001c80| 25 3a e7 20 4a 25 3c 31 | 20 4a 25 3d 31 0d 08 52 |%:. J%<1| J%=1..R|
|00001c90| 40 4e 25 21 34 3d 57 25 | 3a 4e 25 21 38 3d 42 25 |@N%!4=W%|:N%!8=B%|
|00001ca0| 3a 4e 25 21 31 32 3d 53 | 25 3a 4e 25 21 31 36 3d |:N%!12=S|%:N%!16=|
|00001cb0| 4c 25 3a 4e 25 21 32 30 | 3d 48 25 3a 4e 25 21 32 |L%:N%!20|=H%:N%!2|
|00001cc0| 34 3d 4a 25 3a 4e 25 21 | 32 38 3d 48 25 0d 08 5c |4=J%:N%!|28=H%..\|
|00001cd0| 25 21 51 25 3d 21 28 57 | 25 2d 38 29 3a 51 25 21 |%!Q%=!(W|%-8):Q%!|
|00001ce0| 34 3d 53 25 3a c8 99 20 | 26 34 30 30 43 45 2c 2c |4=S%:.. |&400CE,,|
|00001cf0| 51 25 0d 08 66 23 4e 25 | 21 33 32 3d 51 25 21 38 |Q%..f#N%|!32=Q%!8|
|00001d00| 3a 4e 25 21 33 36 3d 51 | 25 21 31 36 3a 4e 25 21 |:N%!36=Q|%!16:N%!|
|00001d10| 34 30 3d 52 25 0d 08 70 | 07 3d 4e 25 0d 08 7a 04 |40=R%..p|.=N%..z.|
|00001d20| 0d 08 84 17 2a 7c 73 74 | 6f 70 20 46 4e 73 6c 69 |....*|st|op FNsli|
|00001d30| 64 65 72 5f 6e 65 77 0d | 08 8e 1a 2a 7c 73 74 61 |der_new.|...*|sta|
|00001d40| 72 74 20 50 52 4f 43 73 | 6c 69 64 65 72 5f 73 65 |rt PROCs|lider_se|
|00001d50| 74 0d 08 98 26 2a 7c 21 | 50 52 4f 43 73 6c 69 64 |t...&*|!|PROCslid|
|00001d60| 65 72 5f 73 65 74 28 20 | 73 6c 69 64 65 72 2c 20 |er_set( |slider, |
|00001d70| 76 61 6c 75 65 20 29 0d | 08 a2 07 2a 7c 21 0d 08 |value ).|...*|!..|
|00001d80| ac 4c 2a 7c 21 54 68 69 | 73 20 70 72 6f 63 65 64 |.L*|!Thi|s proced|
|00001d90| 75 72 65 20 75 70 64 61 | 74 65 73 20 61 20 73 6c |ure upda|tes a sl|
|00001da0| 69 64 65 72 20 69 63 6f | 6e 20 74 6f 20 63 6f 6e |ider ico|n to con|
|00001db0| 74 61 69 6e 20 61 6e 64 | 20 64 69 73 70 6c 61 79 |tain and| display|
|00001dc0| 20 74 68 65 20 76 61 6c | 75 65 0d 08 b6 4e 2a 7c | the val|ue...N*||
|00001dd0| 21 70 61 73 73 65 64 20 | 74 6f 20 69 74 2e 20 49 |!passed |to it. I|
|00001de0| 66 20 61 20 76 61 6c 75 | 65 20 69 73 20 70 61 73 |f a valu|e is pas|
|00001df0| 73 65 64 20 74 68 61 74 | 20 69 73 20 6f 75 74 73 |sed that| is outs|
|00001e00| 69 64 65 20 74 68 65 20 | 72 61 6e 67 65 20 67 69 |ide the |range gi|
|00001e10| 76 65 6e 20 77 68 65 6e | 0d 08 c0 50 2a 7c 21 74 |ven when|...P*|!t|
|00001e20| 68 65 20 73 6c 69 64 65 | 72 20 77 61 73 20 63 72 |he slide|r was cr|
|00001e30| 65 61 74 65 64 2c 20 74 | 68 65 6e 20 74 68 65 20 |eated, t|hen the |
|00001e40| 76 61 6c 75 65 20 77 69 | 6c 6c 20 62 65 20 73 65 |value wi|ll be se|
|00001e50| 74 20 74 6f 20 74 68 65 | 20 72 65 6c 65 76 61 6e |t to the| relevan|
|00001e60| 74 20 6c 69 6d 69 74 2e | 0d 08 ca 42 2a 7c 21 54 |t limit.|...B*|!T|
|00001e70| 68 69 73 20 70 72 6f 63 | 65 64 75 72 65 20 77 69 |his proc|edure wi|
|00001e80| 6c 6c 20 63 61 6c 6c 20 | 50 52 4f 43 65 76 65 6e |ll call |PROCeven|
|00001e90| 74 5f 73 6c 69 64 65 72 | 20 69 66 20 69 74 20 69 |t_slider| if it i|
|00001ea0| 73 20 64 65 66 69 6e 65 | 64 2e 0d 08 d4 17 dd f2 |s define|d.......|
|00001eb0| 73 6c 69 64 65 72 5f 73 | 65 74 28 53 25 2c 56 25 |slider_s|et(S%,V%|
|00001ec0| 29 0d 08 de 17 ea 20 42 | 25 2c 58 25 2c 46 25 2c |)..... B|%,X%,F%,|
|00001ed0| 54 25 2c 79 25 2c 59 25 | 0d 08 e8 2f e7 20 56 25 |T%,y%,Y%|.../. V%|
|00001ee0| 3c 53 25 21 31 36 20 8c | 20 56 25 3d 53 25 21 31 |<S%!16 .| V%=S%!1|
|00001ef0| 36 3a 8b 20 e7 20 56 25 | 3e 53 25 21 32 30 20 56 |6:. . V%|>S%!20 V|
|00001f00| 25 3d 53 25 21 32 30 0d | 08 f2 12 e7 20 56 25 3d |%=S%!20.|.... V%=|
|00001f10| 53 25 21 32 38 20 8c 20 | e1 0d 08 fc 38 53 25 21 |S%!28 . |....8S%!|
|00001f20| 32 38 3d 56 25 3a 42 25 | 3d 5f 77 69 6d 70 5f 62 |28=V%:B%|=_wimp_b|
|00001f30| 75 66 66 65 72 25 3a 21 | 42 25 3d 21 28 28 53 25 |uffer%:!|B%=!((S%|
|00001f40| 21 34 29 2d 38 29 3a 42 | 25 21 34 3d 53 25 21 31 |!4)-8):B|%!4=S%!1|
|00001f50| 32 0d 09 06 1f c8 99 20 | 26 34 30 30 43 45 2c 2c |2...... |&400CE,,|
|00001f60| 42 25 3a c8 99 20 26 34 | 30 30 43 34 2c 2c 42 25 |B%:.. &4|00C4,,B%|
|00001f70| 0d 09 10 1e 79 25 3d 42 | 25 21 31 32 3a 59 25 3d |....y%=B|%!12:Y%=|
|00001f80| 42 25 21 32 30 3a 46 25 | 3d 42 25 21 31 36 0d 09 |B%!20:F%|=B%!16..|
|00001f90| 1a 44 42 25 21 34 3d 21 | 42 25 3a 58 25 3d 28 28 |.DB%!4=!|B%:X%=((|
|00001fa0| 56 25 2d 53 25 21 31 36 | 29 2f 28 53 25 21 32 30 |V%-S%!16|)/(S%!20|
|00001fb0| 2d 53 25 21 31 36 29 29 | 2a 28 53 25 21 33 36 2d |-S%!16))|*(S%!36-|
|00001fc0| 53 25 21 33 32 29 3a e7 | 20 58 25 3c 30 20 58 25 |S%!32):.| X%<0 X%|
|00001fd0| 3d 30 0d 09 24 2c 58 25 | 2b 3d 53 25 21 33 32 3a |=0..$,X%|+=S%!32:|
|00001fe0| e7 20 58 25 3e 3d 46 25 | 20 8c 20 54 25 3d 58 25 |. X%>=F%| . T%=X%|
|00001ff0| 3a 8b 20 54 25 3d 46 25 | 3a 46 25 3d 58 25 0d 09 |:. T%=F%|:F%=X%..|
|00002000| 2e 2a 42 25 21 31 36 3d | 58 25 3a c8 99 20 26 34 |.*B%!16=|X%:.. &4|
|00002010| 30 30 43 32 2c 2c 42 25 | 2b 34 20 b8 20 58 25 3a |00C2,,B%|+4 . X%:|
|00002020| 53 25 21 31 32 3d 58 25 | 0d 09 38 10 e7 20 58 25 |S%!12=X%|..8.. X%|
|00002030| 3c 53 25 21 34 30 20 8c | 0d 09 42 42 20 20 42 25 |<S%!40 .|..BB B%|
|00002040| 21 34 3d 53 25 21 34 30 | 3a c8 99 20 26 34 30 30 |!4=S%!40|:.. &400|
|00002050| 43 45 2c 2c 42 25 3a 42 | 25 21 34 30 3d 21 42 25 |CE,,B%:B|%!40=!B%|
|00002060| 3a 42 25 21 34 34 3d 58 | 25 3a c8 99 20 26 34 30 |:B%!44=X|%:.. &40|
|00002070| 30 43 45 2c 2c 42 25 2b | 34 30 0d 09 4c 2c 20 20 |0CE,,B%+|40..L, |
|00002080| 42 25 21 34 3d 21 42 25 | 3a c8 99 20 26 34 30 30 |B%!4=!B%|:.. &400|
|00002090| 43 32 2c 2c 42 25 2b 34 | 20 b8 20 58 25 3a 53 25 |C2,,B%+4| . X%:S%|
|000020a0| 21 34 30 3d 58 25 0d 09 | 56 2e 20 20 42 25 21 34 |!40=X%..|V. B%!4|
|000020b0| 34 3d 21 42 25 3a c8 99 | 20 26 34 30 30 43 32 2c |4=!B%:..| &400C2,|
|000020c0| 2c 42 25 2b 34 34 20 b8 | 20 58 25 3a 53 25 21 31 |,B%+44 .| X%:S%!1|
|000020d0| 32 3d 58 25 0d 09 60 05 | cd 0d 09 6a 2d f4 20 42 |2=X%..`.|...j-. B|
|000020e0| 25 21 34 3d 53 25 21 38 | 3a 42 25 21 38 3d 30 3a |%!4=S%!8|:B%!8=0:|
|000020f0| 42 25 21 31 32 3d 30 3a | 53 59 53 20 26 34 30 30 |B%!12=0:|SYS &400|
|00002100| 43 44 2c 2c 42 25 0d 09 | 74 21 c8 99 20 26 34 30 |CD,,B%..|t!.. &40|
|00002110| 30 44 31 2c 21 42 25 2c | 46 25 2d 32 2c 79 25 2c |0D1,!B%,|F%-2,y%,|
|00002120| 54 25 2b 32 2c 59 25 0d | 09 7e 1c 2a 7c 69 66 64 |T%+2,Y%.|.~.*|ifd|
|00002130| 65 66 20 50 52 4f 43 65 | 76 65 6e 74 5f 73 6c 69 |ef PROCe|vent_sli|
|00002140| 64 65 72 0d 09 88 18 f2 | 65 76 65 6e 74 5f 73 6c |der.....|event_sl|
|00002150| 69 64 65 72 28 53 25 2c | 56 25 29 0d 09 92 0b 2a |ider(S%,|V%)....*|
|00002160| 7c 65 6e 64 69 66 0d 09 | 9c 05 e1 0d 09 a6 04 0d ||endif..|........|
|00002170| 09 b0 19 2a 7c 73 74 6f | 70 20 50 52 4f 43 73 6c |...*|sto|p PROCsl|
|00002180| 69 64 65 72 5f 73 65 74 | 0d 09 ba 18 2a 7c 73 74 |ider_set|....*|st|
|00002190| 61 72 74 20 46 4e 73 6c | 69 64 65 72 5f 76 61 6c |art FNsl|ider_val|
|000021a0| 0d 09 c4 1d 2a 7c 21 46 | 4e 73 6c 69 64 65 72 5f |....*|!F|Nslider_|
|000021b0| 76 61 6c 28 20 73 6c 69 | 64 65 72 20 29 0d 09 ce |val( sli|der )...|
|000021c0| 07 2a 7c 21 0d 09 d8 3f | 2a 7c 21 54 68 69 73 20 |.*|!...?|*|!This |
|000021d0| 66 75 6e 63 74 69 6f 6e | 20 72 65 74 75 72 6e 73 |function| returns|
|000021e0| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 73 65 74 | the cur|rent set|
|000021f0| 74 69 6e 67 20 6f 66 20 | 74 68 65 20 73 6c 69 64 |ting of |the slid|
|00002200| 65 72 2e 0d 09 e2 14 dd | a4 73 6c 69 64 65 72 5f |er......|.slider_|
|00002210| 76 61 6c 28 53 25 29 0d | 09 ec 0a 3d 53 25 21 32 |val(S%).|...=S%!2|
|00002220| 38 0d 09 f6 04 0d 0a 00 | 17 2a 7c 73 74 6f 70 20 |8.......|.*|stop |
|00002230| 46 4e 73 6c 69 64 65 72 | 5f 76 61 6c 0d 0a 0a 19 |FNslider|_val....|
|00002240| 2a 7c 73 74 61 72 74 20 | 46 4e 69 63 6f 6e 5f 63 |*|start |FNicon_c|
|00002250| 5f 74 65 78 74 0d 0a 14 | 4a 2a 7c 21 46 4e 69 63 |_text...|J*|!FNic|
|00002260| 6f 6e 5f 63 5f 74 65 78 | 74 28 77 69 6e 64 6f 77 |on_c_tex|t(window|
|00002270| 2c 6d 69 6e 58 2c 6d 69 | 6e 59 2c 6d 61 78 58 2c |,minX,mi|nY,maxX,|
|00002280| 6d 61 78 59 2c 42 63 6f | 6c 2c 46 63 6f 6c 2c 43 |maxY,Bco|l,Fcol,C|
|00002290| 6c 69 63 6b 2c 4d 61 73 | 6b 2c 54 65 78 74 29 0d |lick,Mas|k,Text).|
|000022a0| 0a 1e 07 2a 7c 21 0d 0a | 28 4d 2a 7c 21 54 68 69 |...*|!..|(M*|!Thi|
|000022b0| 73 20 66 75 6e 63 74 69 | 6f 6e 20 63 72 65 61 74 |s functi|on creat|
|000022c0| 65 73 20 61 20 70 6c 61 | 69 6e 20 74 65 78 74 20 |es a pla|in text |
|000022d0| 69 63 6f 6e 20 69 6e 20 | 74 68 65 20 67 69 76 65 |icon in |the give|
|000022e0| 6e 20 77 69 6e 64 6f 77 | 2c 20 72 65 74 75 72 6e |n window|, return|
|000022f0| 69 6e 67 0d 0a 32 48 2a | 7c 21 74 68 65 20 69 63 |ing..2H*||!the ic|
|00002300| 6f 6e 20 6e 75 6d 62 65 | 72 20 6f 66 20 74 68 65 |on numbe|r of the|
|00002310| 20 63 72 65 61 74 65 64 | 20 69 63 6f 6e 2e 20 42 | created| icon. B|
|00002320| 79 20 64 65 66 61 75 6c | 74 20 74 68 65 20 69 63 |y defaul|t the ic|
|00002330| 6f 6e 20 69 73 20 67 69 | 76 65 6e 0d 0a 3c 4b 2a |on is gi|ven..<K*|
|00002340| 7c 21 61 20 62 6f 72 64 | 65 72 20 61 6e 64 20 69 ||!a bord|er and i|
|00002350| 73 20 63 65 6e 74 72 61 | 6c 69 73 65 64 2c 20 65 |s centra|lised, e|
|00002360| 74 63 2e 20 54 6f 20 73 | 74 6f 70 20 61 6e 79 20 |tc. To s|top any |
|00002370| 6f 66 20 74 68 65 73 65 | 20 73 69 6d 70 6c 79 20 |of these| simply |
|00002380| 73 75 70 70 6c 79 0d 0a | 46 32 2a 7c 21 61 20 6d |supply..|F2*|!a m|
|00002390| 61 73 6b 20 63 6f 6e 74 | 61 69 6e 69 6e 67 20 74 |ask cont|aining t|
|000023a0| 68 65 20 4f 52 27 64 20 | 63 6f 6d 62 69 6e 61 74 |he OR'd |combinat|
|000023b0| 69 6f 6e 20 6f 66 20 3a | 0d 0a 50 07 2a 7c 21 0d |ion of :|..P.*|!.|
|000023c0| 0a 5a 18 2a 7c 21 20 20 | 20 20 34 20 2d 20 4e 6f |.Z.*|! | 4 - No|
|000023d0| 20 62 6f 72 64 65 72 0d | 0a 64 28 2a 7c 21 20 20 | border.|.d(*|! |
|000023e0| 20 20 38 20 2d 20 44 6f | 6e 27 74 20 68 6f 72 69 | 8 - Do|n't hori|
|000023f0| 7a 6f 6e 74 61 6c 6c 79 | 20 63 65 6e 74 65 72 0d |zontally| center.|
|00002400| 0a 6e 26 2a 7c 21 20 20 | 20 31 36 20 2d 20 44 6f |.n&*|! | 16 - Do|
|00002410| 6e 27 74 20 76 65 72 74 | 69 63 61 6c 6c 79 20 63 |n't vert|ically c|
|00002420| 65 6e 74 65 72 0d 0a 78 | 24 2a 7c 21 20 20 20 33 |enter..x|$*|! 3|
|00002430| 32 20 2d 20 44 6f 6e 27 | 74 20 66 69 6c 6c 20 62 |2 - Don'|t fill b|
|00002440| 61 63 6b 67 72 6f 75 6e | 64 0d 0a 82 07 2a 7c 21 |ackgroun|d....*|!|
|00002450| 0d 0a 8c 4b 2a 7c 21 54 | 68 65 20 76 61 6c 75 65 |...K*|!T|he value|
|00002460| 20 6f 66 20 27 43 6c 69 | 63 6b 27 20 64 65 66 69 | of 'Cli|ck' defi|
|00002470| 6e 65 64 20 74 68 65 20 | 62 75 74 74 6f 6e 20 74 |ned the |button t|
|00002480| 79 70 65 20 6f 66 20 74 | 68 65 20 69 63 6f 6e 20 |ype of t|he icon |
|00002490| 28 30 2d 31 35 29 20 73 | 6f 6d 65 0d 0a 96 1a 2a |(0-15) s|ome....*|
|000024a0| 7c 21 63 6f 6d 6d 6f 6e | 20 76 61 6c 75 65 73 20 ||!common| values |
|000024b0| 61 72 65 20 3a 0d 0a a0 | 07 2a 7c 21 0d 0a aa 15 |are :...|.*|!....|
|000024c0| 2a 7c 21 20 20 20 20 30 | 20 2d 20 49 67 6e 6f 72 |*|! 0| - Ignor|
|000024d0| 65 0d 0a b4 25 2a 7c 21 | 20 20 20 20 33 20 2d 20 |e...%*|!| 3 - |
|000024e0| 43 6c 69 63 6b 20 28 6e | 6f 20 61 75 74 6f 2d 72 |Click (n|o auto-r|
|000024f0| 65 70 65 61 74 29 0d 0a | be 18 2a 7c 21 20 20 20 |epeat)..|..*|! |
|00002500| 20 39 20 2d 20 4d 65 6e | 75 20 69 63 6f 6e 0d 0a | 9 - Men|u icon..|
|00002510| c8 17 2a 7c 21 20 20 20 | 31 35 20 2d 20 57 72 69 |..*|! |15 - Wri|
|00002520| 74 61 62 6c 65 0d 0a d2 | 07 2a 7c 21 0d 0a dc 4a |table...|.*|!...J|
|00002530| 2a 7c 21 4e 6f 74 65 3a | 20 54 68 65 20 74 65 78 |*|!Note:| The tex|
|00002540| 74 20 64 69 73 70 6c 61 | 79 65 64 20 69 6e 20 74 |t displa|yed in t|
|00002550| 68 69 73 20 69 63 6f 6e | 20 63 61 6e 20 62 65 20 |his icon| can be |
|00002560| 61 74 20 6d 6f 73 74 20 | 31 32 20 63 68 61 72 73 |at most |12 chars|
|00002570| 20 6c 6f 6e 67 2e 0d 0a | e6 30 dd a4 69 63 6f 6e | long...|.0..icon|
|00002580| 5f 63 5f 74 65 78 74 28 | 57 25 2c 78 25 2c 79 25 |_c_text(|W%,x%,y%|
|00002590| 2c 58 25 2c 59 25 2c 42 | 25 2c 46 25 2c 43 25 2c |,X%,Y%,B|%,F%,C%,|
|000025a0| 4d 25 2c 54 24 29 0d 0a | f0 1c ea 20 62 25 2c 49 |M%,T$)..|... b%,I|
|000025b0| 25 3a 62 25 3d 5f 77 69 | 6d 70 5f 62 75 66 66 65 |%:b%=_wi|mp_buffe|
|000025c0| 72 25 0d 0a fa 80 54 24 | 3d c0 54 24 2c 31 32 29 |r%....T$|=.T$,12)|
|000025d0| 3a 62 25 21 34 3d 78 25 | 3a 62 25 21 38 3d 79 25 |:b%!4=x%|:b%!8=y%|
|000025e0| 3a 62 25 21 31 32 3d 58 | 25 3a 62 25 21 31 36 3d |:b%!12=X|%:b%!16=|
|000025f0| 59 25 3a 62 25 21 32 30 | 3d 28 36 31 20 82 20 4d |Y%:b%!20|=(61 . M|
|00002600| 25 29 20 84 20 28 43 25 | 3c 3c 31 32 20 80 20 26 |%) . (C%|<<12 . &|
|00002610| 46 30 30 30 29 20 84 20 | 28 42 25 3c 3c 32 38 20 |F000) . |(B%<<28 |
|00002620| 80 20 26 46 30 30 30 30 | 30 30 30 29 20 84 20 28 |. &F0000|000) . (|
|00002630| 46 25 3c 3c 32 34 20 80 | 20 26 46 30 30 30 30 30 |F%<<24 .| &F00000|
|00002640| 30 29 0d 0b 04 3a f2 6f | 73 5f 70 75 74 73 74 72 |0)...:.o|s_putstr|
|00002650| 69 6e 67 28 62 25 2b 32 | 34 2c 54 24 29 3a 21 62 |ing(b%+2|4,T$):!b|
|00002660| 25 3d 21 28 57 25 2d 38 | 29 3a c8 99 20 26 34 30 |%=!(W%-8|):.. &40|
|00002670| 30 43 32 2c 2c 62 25 20 | b8 20 49 25 0d 0b 0e 07 |0C2,,b% |. I%....|
|00002680| 3d 49 25 0d 0b 18 04 0d | 0b 22 18 2a 7c 73 74 6f |=I%.....|.".*|sto|
|00002690| 70 20 46 4e 69 63 6f 6e | 5f 63 5f 74 65 78 74 0d |p FNicon|_c_text.|
|000026a0| 0b 2c 1b 2a 7c 73 74 61 | 72 74 20 46 4e 69 63 6f |.,.*|sta|rt FNico|
|000026b0| 6e 5f 63 5f 73 70 72 69 | 74 65 0d 0b 36 4e 2a 7c |n_c_spri|te..6N*||
|000026c0| 21 46 4e 69 63 6f 6e 5f | 63 5f 73 70 72 69 74 65 |!FNicon_|c_sprite|
|000026d0| 28 77 69 6e 64 6f 77 2c | 6d 69 6e 58 2c 6d 69 6e |(window,|minX,min|
|000026e0| 59 2c 6d 61 78 58 2c 6d | 61 78 59 2c 42 63 6f 6c |Y,maxX,m|axY,Bcol|
|000026f0| 2c 46 63 6f 6c 2c 43 6c | 69 63 6b 2c 4d 61 73 6b |,Fcol,Cl|ick,Mask|
|00002700| 2c 53 70 72 69 74 65 29 | 0d 0b 40 07 2a 7c 21 0d |,Sprite)|..@.*|!.|
|00002710| 0b 4a 4f 2a 7c 21 54 68 | 69 73 20 66 75 6e 63 74 |.JO*|!Th|is funct|
|00002720| 69 6f 6e 20 63 72 65 61 | 74 65 73 20 61 20 70 6c |ion crea|tes a pl|
|00002730| 61 69 6e 20 73 70 72 69 | 74 65 20 69 63 6f 6e 20 |ain spri|te icon |
|00002740| 69 6e 20 74 68 65 20 67 | 69 76 65 6e 20 77 69 6e |in the g|iven win|
|00002750| 64 6f 77 2c 20 72 65 74 | 75 72 6e 69 6e 67 0d 0b |dow, ret|urning..|
|00002760| 54 48 2a 7c 21 74 68 65 | 20 69 63 6f 6e 20 6e 75 |TH*|!the| icon nu|
|00002770| 6d 62 65 72 20 6f 66 20 | 74 68 65 20 63 72 65 61 |mber of |the crea|
|00002780| 74 65 64 20 69 63 6f 6e | 2e 20 42 79 20 64 65 66 |ted icon|. By def|
|00002790| 61 75 6c 74 20 74 68 65 | 20 69 63 6f 6e 20 69 73 |ault the| icon is|
|000027a0| 20 67 69 76 65 6e 0d 0b | 5e 4b 2a 7c 21 61 20 62 | given..|^K*|!a b|
|000027b0| 6f 72 64 65 72 20 61 6e | 64 20 69 73 20 63 65 6e |order an|d is cen|
|000027c0| 74 72 61 6c 69 73 65 64 | 2c 20 65 74 63 2e 20 54 |tralised|, etc. T|
|000027d0| 6f 20 73 74 6f 70 20 61 | 6e 79 20 6f 66 20 74 68 |o stop a|ny of th|
|000027e0| 65 73 65 20 73 69 6d 70 | 6c 79 20 73 75 70 70 6c |ese simp|ly suppl|
|000027f0| 79 0d 0b 68 32 2a 7c 21 | 61 20 6d 61 73 6b 20 63 |y..h2*|!|a mask c|
|00002800| 6f 6e 74 61 69 6e 69 6e | 67 20 74 68 65 20 4f 52 |ontainin|g the OR|
|00002810| 27 64 20 63 6f 6d 62 69 | 6e 61 74 69 6f 6e 20 6f |'d combi|nation o|
|00002820| 66 20 3a 0d 0b 72 07 2a | 7c 21 0d 0b 7c 18 2a 7c |f :..r.*||!..|.*||
|00002830| 21 20 20 20 20 34 20 2d | 20 4e 6f 20 62 6f 72 64 |! 4 -| No bord|
|00002840| 65 72 0d 0b 86 28 2a 7c | 21 20 20 20 20 38 20 2d |er...(*||! 8 -|
|00002850| 20 44 6f 6e 27 74 20 68 | 6f 72 69 7a 6f 6e 74 61 | Don't h|orizonta|
|00002860| 6c 6c 79 20 63 65 6e 74 | 65 72 0d 0b 90 26 2a 7c |lly cent|er...&*||
|00002870| 21 20 20 20 31 36 20 2d | 20 44 6f 6e 27 74 20 76 |! 16 -| Don't v|
|00002880| 65 72 74 69 63 61 6c 6c | 79 20 63 65 6e 74 65 72 |erticall|y center|
|00002890| 0d 0b 9a 24 2a 7c 21 20 | 20 20 33 32 20 2d 20 44 |...$*|! | 32 - D|
|000028a0| 6f 6e 27 74 20 66 69 6c | 6c 20 62 61 63 6b 67 72 |on't fil|l backgr|
|000028b0| 6f 75 6e 64 0d 0b a4 07 | 2a 7c 21 0d 0b ae 4b 2a |ound....|*|!...K*|
|000028c0| 7c 21 54 68 65 20 76 61 | 6c 75 65 20 6f 66 20 27 ||!The va|lue of '|
|000028d0| 43 6c 69 63 6b 27 20 64 | 65 66 69 6e 65 64 20 74 |Click' d|efined t|
|000028e0| 68 65 20 62 75 74 74 6f | 6e 20 74 79 70 65 20 6f |he butto|n type o|
|000028f0| 66 20 74 68 65 20 69 63 | 6f 6e 20 28 30 2d 31 35 |f the ic|on (0-15|
|00002900| 29 20 73 6f 6d 65 0d 0b | b8 1a 2a 7c 21 63 6f 6d |) some..|..*|!com|
|00002910| 6d 6f 6e 20 76 61 6c 75 | 65 73 20 61 72 65 20 3a |mon valu|es are :|
|00002920| 0d 0b c2 07 2a 7c 21 0d | 0b cc 15 2a 7c 21 20 20 |....*|!.|...*|! |
|00002930| 20 20 30 20 2d 20 49 67 | 6e 6f 72 65 0d 0b d6 25 | 0 - Ig|nore...%|
|00002940| 2a 7c 21 20 20 20 20 33 | 20 2d 20 43 6c 69 63 6b |*|! 3| - Click|
|00002950| 20 28 6e 6f 20 61 75 74 | 6f 2d 72 65 70 65 61 74 | (no aut|o-repeat|
|00002960| 29 0d 0b e0 18 2a 7c 21 | 20 20 20 20 39 20 2d 20 |)....*|!| 9 - |
|00002970| 4d 65 6e 75 20 69 63 6f | 6e 0d 0b ea 17 2a 7c 21 |Menu ico|n....*|!|
|00002980| 20 20 20 31 35 20 2d 20 | 57 72 69 74 61 62 6c 65 | 15 - |Writable|
|00002990| 0d 0b f4 32 dd a4 69 63 | 6f 6e 5f 63 5f 73 70 72 |...2..ic|on_c_spr|
|000029a0| 69 74 65 28 57 25 2c 78 | 25 2c 79 25 2c 58 25 2c |ite(W%,x|%,y%,X%,|
|000029b0| 59 25 2c 42 25 2c 46 25 | 2c 43 25 2c 4d 25 2c 54 |Y%,B%,F%|,C%,M%,T|
|000029c0| 24 29 0d 0b fe 1c ea 20 | 62 25 2c 49 25 3a 62 25 |$)..... |b%,I%:b%|
|000029d0| 3d 5f 77 69 6d 70 5f 62 | 75 66 66 65 72 25 0d 0c |=_wimp_b|uffer%..|
|000029e0| 08 75 62 25 21 34 3d 78 | 25 3a 62 25 21 38 3d 79 |.ub%!4=x|%:b%!8=y|
|000029f0| 25 3a 62 25 21 31 32 3d | 58 25 3a 62 25 21 31 36 |%:b%!12=|X%:b%!16|
|00002a00| 3d 59 25 3a 62 25 21 32 | 30 3d 28 36 32 20 82 20 |=Y%:b%!2|0=(62 . |
|00002a10| 4d 25 29 20 84 20 28 43 | 25 3c 3c 31 32 20 80 20 |M%) . (C|%<<12 . |
|00002a20| 26 46 30 30 30 29 20 84 | 20 28 42 25 3c 3c 32 38 |&F000) .| (B%<<28|
|00002a30| 20 80 20 26 46 30 30 30 | 30 30 30 30 29 20 84 20 | . &F000|0000) . |
|00002a40| 28 46 25 3c 3c 32 34 20 | 80 20 26 46 30 30 30 30 |(F%<<24 |. &F0000|
|00002a50| 30 30 29 0d 0c 12 3a f2 | 6f 73 5f 70 75 74 73 74 |00)...:.|os_putst|
|00002a60| 72 69 6e 67 28 62 25 2b | 32 34 2c 54 24 29 3a 21 |ring(b%+|24,T$):!|
|00002a70| 62 25 3d 21 28 57 25 2d | 38 29 3a c8 99 20 26 34 |b%=!(W%-|8):.. &4|
|00002a80| 30 30 43 32 2c 2c 62 25 | 20 b8 20 49 25 0d 0c 1c |00C2,,b%| . I%...|
|00002a90| 07 3d 49 25 0d 0c 26 04 | 0d 0c 30 1a 2a 7c 73 74 |.=I%..&.|..0.*|st|
|00002aa0| 6f 70 20 46 4e 69 63 6f | 6e 5f 63 5f 73 70 72 69 |op FNico|n_c_spri|
|00002ab0| 74 65 0d 0c 3a 1a 2a 7c | 73 74 61 72 74 20 46 4e |te..:.*||start FN|
|00002ac0| 69 63 6f 6e 5f 63 5f 69 | 74 65 78 74 0d 0c 44 46 |icon_c_i|text..DF|
|00002ad0| 2a 7c 21 46 4e 69 63 6f | 6e 5f 63 5f 69 74 65 78 |*|!FNico|n_c_itex|
|00002ae0| 74 28 77 69 6e 64 6f 77 | 2c 6d 69 6e 58 2c 6d 69 |t(window|,minX,mi|
|00002af0| 6e 59 2c 6d 61 78 58 2c | 6d 61 78 59 2c 42 63 6f |nY,maxX,|maxY,Bco|
|00002b00| 6c 2c 46 63 6f 6c 2c 43 | 6c 69 63 6b 2c 4d 61 73 |l,Fcol,C|lick,Mas|
|00002b10| 6b 2c 0d 0c 4e 3e 2a 7c | 21 20 20 20 20 20 20 20 |k,..N>*||! |
|00002b20| 20 20 20 20 20 20 20 20 | 62 75 66 66 65 72 5f 70 | |buffer_p|
|00002b30| 6f 69 6e 74 65 72 2c 76 | 61 6c 69 64 61 74 69 6f |ointer,v|alidatio|
|00002b40| 6e 2c 62 75 66 66 65 72 | 5f 6c 65 6e 67 74 68 29 |n,buffer|_length)|
|00002b50| 0d 0c 58 07 2a 7c 21 0d | 0c 62 53 2a 7c 21 54 68 |..X.*|!.|.bS*|!Th|
|00002b60| 69 73 20 66 75 6e 63 74 | 69 6f 6e 20 63 72 65 61 |is funct|ion crea|
|00002b70| 74 65 73 20 61 6e 20 69 | 6e 64 69 72 65 63 74 65 |tes an i|ndirecte|
|00002b80| 64 20 74 65 78 74 20 69 | 63 6f 6e 20 69 6e 20 74 |d text i|con in t|
|00002b90| 68 65 20 67 69 76 65 6e | 20 77 69 6e 64 6f 77 2c |he given| window,|
|00002ba0| 20 72 65 74 75 72 6e 69 | 6e 67 0d 0c 6c 48 2a 7c | returni|ng..lH*||
|00002bb0| 21 74 68 65 20 69 63 6f | 6e 20 6e 75 6d 62 65 72 |!the ico|n number|
|00002bc0| 20 6f 66 20 74 68 65 20 | 63 72 65 61 74 65 64 20 | of the |created |
|00002bd0| 69 63 6f 6e 2e 20 42 79 | 20 64 65 66 61 75 6c 74 |icon. By| default|
|00002be0| 20 74 68 65 20 69 63 6f | 6e 20 69 73 20 67 69 76 | the ico|n is giv|
|00002bf0| 65 6e 0d 0c 76 4b 2a 7c | 21 61 20 62 6f 72 64 65 |en..vK*||!a borde|
|00002c00| 72 20 61 6e 64 20 69 73 | 20 63 65 6e 74 72 61 6c |r and is| central|
|00002c10| 69 73 65 64 2c 20 65 74 | 63 2e 20 54 6f 20 73 74 |ised, et|c. To st|
|00002c20| 6f 70 20 61 6e 79 20 6f | 66 20 74 68 65 73 65 20 |op any o|f these |
|00002c30| 73 69 6d 70 6c 79 20 73 | 75 70 70 6c 79 0d 0c 80 |simply s|upply...|
|00002c40| 32 2a 7c 21 61 20 6d 61 | 73 6b 20 63 6f 6e 74 61 |2*|!a ma|sk conta|
|00002c50| 69 6e 69 6e 67 20 74 68 | 65 20 4f 52 27 64 20 63 |ining th|e OR'd c|
|00002c60| 6f 6d 62 69 6e 61 74 69 | 6f 6e 20 6f 66 20 3a 0d |ombinati|on of :.|
|00002c70| 0c 8a 07 2a 7c 21 0d 0c | 94 18 2a 7c 21 20 20 20 |...*|!..|..*|! |
|00002c80| 20 34 20 2d 20 4e 6f 20 | 62 6f 72 64 65 72 0d 0c | 4 - No |border..|
|00002c90| 9e 28 2a 7c 21 20 20 20 | 20 38 20 2d 20 44 6f 6e |.(*|! | 8 - Don|
|00002ca0| 27 74 20 68 6f 72 69 7a | 6f 6e 74 61 6c 6c 79 20 |'t horiz|ontally |
|00002cb0| 63 65 6e 74 65 72 0d 0c | a8 26 2a 7c 21 20 20 20 |center..|.&*|! |
|00002cc0| 31 36 20 2d 20 44 6f 6e | 27 74 20 76 65 72 74 69 |16 - Don|'t verti|
|00002cd0| 63 61 6c 6c 79 20 63 65 | 6e 74 65 72 0d 0c b2 24 |cally ce|nter...$|
|00002ce0| 2a 7c 21 20 20 20 33 32 | 20 2d 20 44 6f 6e 27 74 |*|! 32| - Don't|
|00002cf0| 20 66 69 6c 6c 20 62 61 | 63 6b 67 72 6f 75 6e 64 | fill ba|ckground|
|00002d00| 0d 0c bc 07 2a 7c 21 0d | 0c c6 4b 2a 7c 21 54 68 |....*|!.|..K*|!Th|
|00002d10| 65 20 76 61 6c 75 65 20 | 6f 66 20 27 43 6c 69 63 |e value |of 'Clic|
|00002d20| 6b 27 20 64 65 66 69 6e | 65 64 20 74 68 65 20 62 |k' defin|ed the b|
|00002d30| 75 74 74 6f 6e 20 74 79 | 70 65 20 6f 66 20 74 68 |utton ty|pe of th|
|00002d40| 65 20 69 63 6f 6e 20 28 | 30 2d 31 35 29 20 73 6f |e icon (|0-15) so|
|00002d50| 6d 65 0d 0c d0 1a 2a 7c | 21 63 6f 6d 6d 6f 6e 20 |me....*||!common |
|00002d60| 76 61 6c 75 65 73 20 61 | 72 65 20 3a 0d 0c da 07 |values a|re :....|
|00002d70| 2a 7c 21 0d 0c e4 15 2a | 7c 21 20 20 20 20 30 20 |*|!....*||! 0 |
|00002d80| 2d 20 49 67 6e 6f 72 65 | 0d 0c ee 25 2a 7c 21 20 |- Ignore|...%*|! |
|00002d90| 20 20 20 33 20 2d 20 43 | 6c 69 63 6b 20 28 6e 6f | 3 - C|lick (no|
|00002da0| 20 61 75 74 6f 2d 72 65 | 70 65 61 74 29 0d 0c f8 | auto-re|peat)...|
|00002db0| 18 2a 7c 21 20 20 20 20 | 39 20 2d 20 4d 65 6e 75 |.*|! |9 - Menu|
|00002dc0| 20 69 63 6f 6e 0d 0d 02 | 17 2a 7c 21 20 20 20 31 | icon...|.*|! 1|
|00002dd0| 35 20 2d 20 57 72 69 74 | 61 62 6c 65 0d 0d 0c 07 |5 - Writ|able....|
|00002de0| 2a 7c 21 0d 0d 16 37 dd | a4 69 63 6f 6e 5f 63 5f |*|!...7.|.icon_c_|
|00002df0| 69 74 65 78 74 28 57 25 | 2c 78 25 2c 79 25 2c 58 |itext(W%|,x%,y%,X|
|00002e00| 25 2c 59 25 2c 42 25 2c | 46 25 2c 43 25 2c 4d 25 |%,Y%,B%,|F%,C%,M%|
|00002e10| 2c 50 25 2c 56 25 2c 4c | 25 29 0d 0d 20 1c ea 20 |,P%,V%,L|%).. .. |
|00002e20| 62 25 2c 49 25 3a 62 25 | 3d 5f 77 69 6d 70 5f 62 |b%,I%:b%|=_wimp_b|
|00002e30| 75 66 66 65 72 25 0d 0d | 2a 86 54 24 3d c0 54 24 |uffer%..|*.T$=.T$|
|00002e40| 2c 31 32 29 3a 62 25 21 | 34 3d 78 25 3a 62 25 21 |,12):b%!|4=x%:b%!|
|00002e50| 38 3d 79 25 3a 62 25 21 | 31 32 3d 58 25 3a 62 25 |8=y%:b%!|12=X%:b%|
|00002e60| 21 31 36 3d 59 25 3a 62 | 25 21 32 30 3d 32 35 36 |!16=Y%:b|%!20=256|
|00002e70| 20 84 20 28 36 31 20 82 | 20 4d 25 29 20 84 20 28 | . (61 .| M%) . (|
|00002e80| 43 25 3c 3c 31 32 20 80 | 20 26 46 30 30 30 29 20 |C%<<12 .| &F000) |
|00002e90| 84 20 28 42 25 3c 3c 32 | 38 20 80 20 26 46 30 30 |. (B%<<2|8 . &F00|
|00002ea0| 30 30 30 30 30 29 20 84 | 20 28 46 25 3c 3c 32 34 |00000) .| (F%<<24|
|00002eb0| 20 80 20 26 46 30 30 30 | 30 30 30 29 0d 0d 34 3d | . &F000|000)..4=|
|00002ec0| 62 25 21 32 34 3d 50 25 | 3a 62 25 21 32 38 3d 56 |b%!24=P%|:b%!28=V|
|00002ed0| 25 3a 62 25 21 33 32 3d | 4c 25 3a 21 62 25 3d 21 |%:b%!32=|L%:!b%=!|
|00002ee0| 28 57 25 2d 38 29 3a c8 | 99 20 26 34 30 30 43 32 |(W%-8):.|. &400C2|
|00002ef0| 2c 2c 62 25 20 b8 20 49 | 25 0d 0d 3e 07 3d 49 25 |,,b% . I|%..>.=I%|
|00002f00| 0d 0d 48 04 0d 0d 52 19 | 2a 7c 73 74 6f 70 20 46 |..H...R.|*|stop F|
|00002f10| 4e 69 63 6f 6e 5f 63 5f | 69 74 65 78 74 0d 0d 5c |Nicon_c_|itext..\|
|00002f20| 1c 2a 7c 73 74 61 72 74 | 20 46 4e 69 63 6f 6e 5f |.*|start| FNicon_|
|00002f30| 63 5f 69 73 70 72 69 74 | 65 0d 0d 66 48 2a 7c 21 |c_isprit|e..fH*|!|
|00002f40| 46 4e 69 63 6f 6e 5f 63 | 5f 69 73 70 72 69 74 65 |FNicon_c|_isprite|
|00002f50| 28 77 69 6e 64 6f 77 2c | 6d 69 6e 58 2c 6d 69 6e |(window,|minX,min|
|00002f60| 59 2c 6d 61 78 58 2c 6d | 61 78 59 2c 42 63 6f 6c |Y,maxX,m|axY,Bcol|
|00002f70| 2c 46 63 6f 6c 2c 43 6c | 69 63 6b 2c 4d 61 73 6b |,Fcol,Cl|ick,Mask|
|00002f80| 2c 0d 0d 70 2f 2a 7c 21 | 20 20 20 20 20 20 20 20 |,..p/*|!| |
|00002f90| 20 20 20 20 20 20 20 20 | 20 73 70 72 69 74 65 5f | | sprite_|
|00002fa0| 70 74 72 2c 61 72 65 61 | 2c 6c 65 6e 67 74 68 29 |ptr,area|,length)|
|00002fb0| 0d 0d 7a 07 2a 7c 21 0d | 0d 84 4b 2a 7c 21 54 68 |..z.*|!.|..K*|!Th|
|00002fc0| 69 73 20 66 75 6e 63 74 | 69 6f 6e 20 63 72 65 61 |is funct|ion crea|
|00002fd0| 74 65 73 20 61 6e 20 69 | 6e 64 69 72 65 63 74 65 |tes an i|ndirecte|
|00002fe0| 64 20 73 70 72 69 74 65 | 20 69 63 6f 6e 20 69 6e |d sprite| icon in|
|00002ff0| 20 74 68 65 20 67 69 76 | 65 6e 20 77 69 6e 64 6f | the giv|en windo|
|00003000| 77 2c 0d 0d 8e 52 2a 7c | 21 72 65 74 75 72 6e 69 |w,...R*||!returni|
|00003010| 6e 67 20 74 68 65 20 69 | 63 6f 6e 20 6e 75 6d 62 |ng the i|con numb|
|00003020| 65 72 20 6f 66 20 74 68 | 65 20 63 72 65 61 74 65 |er of th|e create|
|00003030| 64 20 69 63 6f 6e 2e 20 | 42 79 20 64 65 66 61 75 |d icon. |By defau|
|00003040| 6c 74 20 74 68 65 20 69 | 63 6f 6e 20 69 73 20 67 |lt the i|con is g|
|00003050| 69 76 65 6e 0d 0d 98 4b | 2a 7c 21 61 20 62 6f 72 |iven...K|*|!a bor|
|00003060| 64 65 72 20 61 6e 64 20 | 69 73 20 63 65 6e 74 72 |der and |is centr|
|00003070| 61 6c 69 73 65 64 2c 20 | 65 74 63 2e 20 54 6f 20 |alised, |etc. To |
|00003080| 73 74 6f 70 20 61 6e 79 | 20 6f 66 20 74 68 65 73 |stop any| of thes|
|00003090| 65 20 73 69 6d 70 6c 79 | 20 73 75 70 70 6c 79 0d |e simply| supply.|
|000030a0| 0d a2 32 2a 7c 21 61 20 | 6d 61 73 6b 20 63 6f 6e |..2*|!a |mask con|
|000030b0| 74 61 69 6e 69 6e 67 20 | 74 68 65 20 4f 52 27 64 |taining |the OR'd|
|000030c0| 20 63 6f 6d 62 69 6e 61 | 74 69 6f 6e 20 6f 66 20 | combina|tion of |
|000030d0| 3a 0d 0d ac 07 2a 7c 21 | 0d 0d b6 18 2a 7c 21 20 |:....*|!|....*|! |
|000030e0| 20 20 20 34 20 2d 20 4e | 6f 20 62 6f 72 64 65 72 | 4 - N|o border|
|000030f0| 0d 0d c0 28 2a 7c 21 20 | 20 20 20 38 20 2d 20 44 |...(*|! | 8 - D|
|00003100| 6f 6e 27 74 20 68 6f 72 | 69 7a 6f 6e 74 61 6c 6c |on't hor|izontall|
|00003110| 79 20 63 65 6e 74 65 72 | 0d 0d ca 26 2a 7c 21 20 |y center|...&*|! |
|00003120| 20 20 31 36 20 2d 20 44 | 6f 6e 27 74 20 76 65 72 | 16 - D|on't ver|
|00003130| 74 69 63 61 6c 6c 79 20 | 63 65 6e 74 65 72 0d 0d |tically |center..|
|00003140| d4 24 2a 7c 21 20 20 20 | 33 32 20 2d 20 44 6f 6e |.$*|! |32 - Don|
|00003150| 27 74 20 66 69 6c 6c 20 | 62 61 63 6b 67 72 6f 75 |'t fill |backgrou|
|00003160| 6e 64 0d 0d de 07 2a 7c | 21 0d 0d e8 4b 2a 7c 21 |nd....*||!...K*|!|
|00003170| 54 68 65 20 76 61 6c 75 | 65 20 6f 66 20 27 43 6c |The valu|e of 'Cl|
|00003180| 69 63 6b 27 20 64 65 66 | 69 6e 65 64 20 74 68 65 |ick' def|ined the|
|00003190| 20 62 75 74 74 6f 6e 20 | 74 79 70 65 20 6f 66 20 | button |type of |
|000031a0| 74 68 65 20 69 63 6f 6e | 20 28 30 2d 31 35 29 20 |the icon| (0-15) |
|000031b0| 73 6f 6d 65 0d 0d f2 1a | 2a 7c 21 63 6f 6d 6d 6f |some....|*|!commo|
|000031c0| 6e 20 76 61 6c 75 65 73 | 20 61 72 65 20 3a 0d 0d |n values| are :..|
|000031d0| fc 07 2a 7c 21 0d 0e 06 | 15 2a 7c 21 20 20 20 20 |..*|!...|.*|! |
|000031e0| 30 20 2d 20 49 67 6e 6f | 72 65 0d 0e 10 25 2a 7c |0 - Igno|re...%*||
|000031f0| 21 20 20 20 20 33 20 2d | 20 43 6c 69 63 6b 20 28 |! 3 -| Click (|
|00003200| 6e 6f 20 61 75 74 6f 2d | 72 65 70 65 61 74 29 0d |no auto-|repeat).|
|00003210| 0e 1a 18 2a 7c 21 20 20 | 20 20 39 20 2d 20 4d 65 |...*|! | 9 - Me|
|00003220| 6e 75 20 69 63 6f 6e 0d | 0e 24 17 2a 7c 21 20 20 |nu icon.|.$.*|! |
|00003230| 20 31 35 20 2d 20 57 72 | 69 74 61 62 6c 65 0d 0e | 15 - Wr|itable..|
|00003240| 2e 07 2a 7c 21 0d 0e 38 | 4e 2a 7c 21 73 70 72 69 |..*|!..8|N*|!spri|
|00003250| 74 65 5f 70 74 72 20 73 | 68 6f 75 6c 64 20 62 65 |te_ptr s|hould be|
|00003260| 20 65 69 74 68 65 72 20 | 61 20 70 6f 69 6e 74 65 | either |a pointe|
|00003270| 72 20 74 6f 20 74 68 65 | 20 73 70 72 69 74 65 2c |r to the| sprite,|
|00003280| 20 6f 72 20 74 6f 20 74 | 68 65 20 73 70 72 69 74 | or to t|he sprit|
|00003290| 65 27 73 0d 0e 42 50 2a | 7c 21 6e 61 6d 65 2e 20 |e's..BP*||!name. |
|000032a0| 61 72 65 61 20 73 68 6f | 75 6c 64 20 70 6f 69 6e |area sho|uld poin|
|000032b0| 74 20 74 68 65 20 74 68 | 65 20 73 70 72 69 74 65 |t the th|e sprite|
|000032c0| 20 61 72 65 61 20 66 6f | 72 20 74 68 65 20 69 63 | area fo|r the ic|
|000032d0| 6f 6e 20 28 6f 72 20 31 | 20 66 6f 72 20 57 49 4d |on (or 1| for WIM|
|000032e0| 50 29 2c 0d 0e 4c 4f 2a | 7c 21 61 6e 64 20 6c 65 |P),..LO*||!and le|
|000032f0| 6e 67 74 68 20 73 68 6f | 75 6c 64 20 62 65 20 30 |ngth sho|uld be 0|
|00003300| 20 69 66 20 73 70 72 69 | 74 65 5f 70 74 72 20 70 | if spri|te_ptr p|
|00003310| 6f 69 6e 74 73 20 74 6f | 20 74 68 65 20 73 70 72 |oints to| the spr|
|00003320| 69 74 65 20 6f 72 20 63 | 6f 6e 74 61 69 6e 20 74 |ite or c|ontain t|
|00003330| 68 65 0d 0e 56 1c 2a 7c | 21 6c 65 6e 67 74 68 20 |he..V.*||!length |
|00003340| 6f 66 20 74 68 65 20 73 | 74 72 69 6e 67 2e 0d 0e |of the s|tring...|
|00003350| 60 39 dd a4 69 63 6f 6e | 5f 63 5f 69 73 70 72 69 |`9..icon|_c_ispri|
|00003360| 74 65 28 57 25 2c 78 25 | 2c 79 25 2c 58 25 2c 59 |te(W%,x%|,y%,X%,Y|
|00003370| 25 2c 42 25 2c 46 25 2c | 43 25 2c 4d 25 2c 50 25 |%,B%,F%,|C%,M%,P%|
|00003380| 2c 56 25 2c 4c 25 29 0d | 0e 6a 1c ea 20 62 25 2c |,V%,L%).|.j.. b%,|
|00003390| 49 25 3a 62 25 3d 5f 77 | 69 6d 70 5f 62 75 66 66 |I%:b%=_w|imp_buff|
|000033a0| 65 72 25 0d 0e 74 86 54 | 24 3d c0 54 24 2c 31 32 |er%..t.T|$=.T$,12|
|000033b0| 29 3a 62 25 21 34 3d 78 | 25 3a 62 25 21 38 3d 79 |):b%!4=x|%:b%!8=y|
|000033c0| 25 3a 62 25 21 31 32 3d | 58 25 3a 62 25 21 31 36 |%:b%!12=|X%:b%!16|
|000033d0| 3d 59 25 3a 62 25 21 32 | 30 3d 32 35 36 20 84 20 |=Y%:b%!2|0=256 . |
|000033e0| 28 36 32 20 82 20 4d 25 | 29 20 84 20 28 43 25 3c |(62 . M%|) . (C%<|
|000033f0| 3c 31 32 20 80 20 26 46 | 30 30 30 29 20 84 20 28 |<12 . &F|000) . (|
|00003400| 42 25 3c 3c 32 38 20 80 | 20 26 46 30 30 30 30 30 |B%<<28 .| &F00000|
|00003410| 30 30 29 20 84 20 28 46 | 25 3c 3c 32 34 20 80 20 |00) . (F|%<<24 . |
|00003420| 26 46 30 30 30 30 30 30 | 29 0d 0e 7e 3d 62 25 21 |&F000000|)..~=b%!|
|00003430| 32 34 3d 50 25 3a 62 25 | 21 32 38 3d 56 25 3a 62 |24=P%:b%|!28=V%:b|
|00003440| 25 21 33 32 3d 4c 25 3a | 21 62 25 3d 21 28 57 25 |%!32=L%:|!b%=!(W%|
|00003450| 2d 38 29 3a c8 99 20 26 | 34 30 30 43 32 2c 2c 62 |-8):.. &|400C2,,b|
|00003460| 25 20 b8 20 49 25 0d 0e | 88 07 3d 49 25 0d 0e 92 |% . I%..|..=I%...|
|00003470| 04 0d 0e 9c 1b 2a 7c 73 | 74 6f 70 20 46 4e 69 63 |.....*|s|top FNic|
|00003480| 6f 6e 5f 63 5f 69 73 70 | 72 69 74 65 0d 0e a6 1a |on_c_isp|rite....|
|00003490| 2a 7c 73 74 61 72 74 20 | 46 4e 69 63 6f 6e 5f 63 |*|start |FNicon_c|
|000034a0| 5f 69 62 6f 74 68 0d 0e | b0 46 2a 7c 21 46 4e 69 |_iboth..|.F*|!FNi|
|000034b0| 63 6f 6e 5f 63 5f 69 62 | 6f 74 68 28 77 69 6e 64 |con_c_ib|oth(wind|
|000034c0| 6f 77 2c 6d 69 6e 58 2c | 6d 69 6e 59 2c 6d 61 78 |ow,minX,|minY,max|
|000034d0| 58 2c 6d 61 78 59 2c 42 | 63 6f 6c 2c 46 63 6f 6c |X,maxY,B|col,Fcol|
|000034e0| 2c 43 6c 69 63 6b 2c 4d | 61 73 6b 2c 0d 0e ba 3e |,Click,M|ask,...>|
|000034f0| 2a 7c 21 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |*|! | |
|00003500| 20 20 74 65 78 74 5f 62 | 75 66 66 65 72 2c 20 76 | text_b|uffer, v|
|00003510| 61 6c 69 64 61 74 69 6f | 6e 2c 20 62 75 66 66 65 |alidatio|n, buffe|
|00003520| 72 5f 6c 65 6e 67 74 68 | 20 29 0d 0e c4 07 2a 7c |r_length| )....*||
|00003530| 21 0d 0e ce 53 2a 7c 21 | 54 68 69 73 20 66 75 6e |!...S*|!|This fun|
|00003540| 63 74 69 6f 6e 20 63 72 | 65 61 74 65 73 20 61 6e |ction cr|eates an|
|00003550| 20 69 6e 64 69 72 65 63 | 74 65 64 20 74 65 78 74 | indirec|ted text|
|00003560| 20 69 63 6f 6e 20 69 6e | 20 74 68 65 20 67 69 76 | icon in| the giv|
|00003570| 65 6e 20 77 69 6e 64 6f | 77 2c 20 72 65 74 75 72 |en windo|w, retur|
|00003580| 6e 69 6e 67 0d 0e d8 48 | 2a 7c 21 74 68 65 20 69 |ning...H|*|!the i|
|00003590| 63 6f 6e 20 6e 75 6d 62 | 65 72 20 6f 66 20 74 68 |con numb|er of th|
|000035a0| 65 20 63 72 65 61 74 65 | 64 20 69 63 6f 6e 2e 20 |e create|d icon. |
|000035b0| 42 79 20 64 65 66 61 75 | 6c 74 20 74 68 65 20 69 |By defau|lt the i|
|000035c0| 63 6f 6e 20 69 73 20 67 | 69 76 65 6e 0d 0e e2 4b |con is g|iven...K|
|000035d0| 2a 7c 21 61 20 62 6f 72 | 64 65 72 20 61 6e 64 20 |*|!a bor|der and |
|000035e0| 69 73 20 63 65 6e 74 72 | 61 6c 69 73 65 64 2c 20 |is centr|alised, |
|000035f0| 65 74 63 2e 20 54 6f 20 | 73 74 6f 70 20 61 6e 79 |etc. To |stop any|
|00003600| 20 6f 66 20 74 68 65 73 | 65 20 73 69 6d 70 6c 79 | of thes|e simply|
|00003610| 20 73 75 70 70 6c 79 0d | 0e ec 32 2a 7c 21 61 20 | supply.|..2*|!a |
|00003620| 6d 61 73 6b 20 63 6f 6e | 74 61 69 6e 69 6e 67 20 |mask con|taining |
|00003630| 74 68 65 20 4f 52 27 64 | 20 63 6f 6d 62 69 6e 61 |the OR'd| combina|
|00003640| 74 69 6f 6e 20 6f 66 20 | 3a 0d 0e f6 07 2a 7c 21 |tion of |:....*|!|
|00003650| 0d 0f 00 18 2a 7c 21 20 | 20 20 20 34 20 2d 20 4e |....*|! | 4 - N|
|00003660| 6f 20 62 6f 72 64 65 72 | 0d 0f 0a 28 2a 7c 21 20 |o border|...(*|! |
|00003670| 20 20 20 38 20 2d 20 44 | 6f 6e 27 74 20 68 6f 72 | 8 - D|on't hor|
|00003680| 69 7a 6f 6e 74 61 6c 6c | 79 20 63 65 6e 74 65 72 |izontall|y center|
|00003690| 0d 0f 14 26 2a 7c 21 20 | 20 20 31 36 20 2d 20 44 |...&*|! | 16 - D|
|000036a0| 6f 6e 27 74 20 76 65 72 | 74 69 63 61 6c 6c 79 20 |on't ver|tically |
|000036b0| 63 65 6e 74 65 72 0d 0f | 1e 24 2a 7c 21 20 20 20 |center..|.$*|! |
|000036c0| 33 32 20 2d 20 44 6f 6e | 27 74 20 66 69 6c 6c 20 |32 - Don|'t fill |
|000036d0| 62 61 63 6b 67 72 6f 75 | 6e 64 0d 0f 28 07 2a 7c |backgrou|nd..(.*||
|000036e0| 21 0d 0f 32 4b 2a 7c 21 | 54 68 65 20 76 61 6c 75 |!..2K*|!|The valu|
|000036f0| 65 20 6f 66 20 27 43 6c | 69 63 6b 27 20 64 65 66 |e of 'Cl|ick' def|
|00003700| 69 6e 65 64 20 74 68 65 | 20 62 75 74 74 6f 6e 20 |ined the| button |
|00003710| 74 79 70 65 20 6f 66 20 | 74 68 65 20 69 63 6f 6e |type of |the icon|
|00003720| 20 28 30 2d 31 35 29 20 | 73 6f 6d 65 0d 0f 3c 1a | (0-15) |some..<.|
|00003730| 2a 7c 21 63 6f 6d 6d 6f | 6e 20 76 61 6c 75 65 73 |*|!commo|n values|
|00003740| 20 61 72 65 20 3a 0d 0f | 46 07 2a 7c 21 0d 0f 50 | are :..|F.*|!..P|
|00003750| 15 2a 7c 21 20 20 20 20 | 30 20 2d 20 49 67 6e 6f |.*|! |0 - Igno|
|00003760| 72 65 0d 0f 5a 25 2a 7c | 21 20 20 20 20 33 20 2d |re..Z%*||! 3 -|
|00003770| 20 43 6c 69 63 6b 20 28 | 6e 6f 20 61 75 74 6f 2d | Click (|no auto-|
|00003780| 72 65 70 65 61 74 29 0d | 0f 64 18 2a 7c 21 20 20 |repeat).|.d.*|! |
|00003790| 20 20 39 20 2d 20 4d 65 | 6e 75 20 69 63 6f 6e 0d | 9 - Me|nu icon.|
|000037a0| 0f 6e 17 2a 7c 21 20 20 | 20 31 35 20 2d 20 57 72 |.n.*|! | 15 - Wr|
|000037b0| 69 74 61 62 6c 65 0d 0f | 78 07 2a 7c 21 0d 0f 82 |itable..|x.*|!...|
|000037c0| 37 dd a4 69 63 6f 6e 5f | 63 5f 69 62 6f 74 68 28 |7..icon_|c_iboth(|
|000037d0| 57 25 2c 78 25 2c 79 25 | 2c 58 25 2c 59 25 2c 42 |W%,x%,y%|,X%,Y%,B|
|000037e0| 25 2c 46 25 2c 43 25 2c | 4d 25 2c 50 25 2c 56 25 |%,F%,C%,|M%,P%,V%|
|000037f0| 2c 4c 25 29 0d 0f 8c 1c | ea 20 62 25 2c 49 25 3a |,L%)....|. b%,I%:|
|00003800| 62 25 3d 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |b%=_wimp|_buffer%|
|00003810| 0d 0f 96 86 54 24 3d c0 | 54 24 2c 31 32 29 3a 62 |....T$=.|T$,12):b|
|00003820| 25 21 34 3d 78 25 3a 62 | 25 21 38 3d 79 25 3a 62 |%!4=x%:b|%!8=y%:b|
|00003830| 25 21 31 32 3d 58 25 3a | 62 25 21 31 36 3d 59 25 |%!12=X%:|b%!16=Y%|
|00003840| 3a 62 25 21 32 30 3d 32 | 35 36 20 84 20 28 36 33 |:b%!20=2|56 . (63|
|00003850| 20 82 20 4d 25 29 20 84 | 20 28 43 25 3c 3c 31 32 | . M%) .| (C%<<12|
|00003860| 20 80 20 26 46 30 30 30 | 29 20 84 20 28 42 25 3c | . &F000|) . (B%<|
|00003870| 3c 32 38 20 80 20 26 46 | 30 30 30 30 30 30 30 29 |<28 . &F|0000000)|
|00003880| 20 84 20 28 46 25 3c 3c | 32 34 20 80 20 26 46 30 | . (F%<<|24 . &F0|
|00003890| 30 30 30 30 30 29 0d 0f | a0 3d 62 25 21 32 34 3d |00000)..|.=b%!24=|
|000038a0| 50 25 3a 62 25 21 32 38 | 3d 56 25 3a 62 25 21 33 |P%:b%!28|=V%:b%!3|
|000038b0| 32 3d 4c 25 3a 21 62 25 | 3d 21 28 57 25 2d 38 29 |2=L%:!b%|=!(W%-8)|
|000038c0| 3a c8 99 20 26 34 30 30 | 43 32 2c 2c 62 25 20 b8 |:.. &400|C2,,b% .|
|000038d0| 20 49 25 0d 0f aa 07 3d | 49 25 0d 0f b4 04 0d 0f | I%....=|I%......|
|000038e0| be 19 2a 7c 73 74 6f 70 | 20 46 4e 69 63 6f 6e 5f |..*|stop| FNicon_|
|000038f0| 63 5f 69 62 6f 74 68 0d | 0f c8 1d 2a 7c 73 74 61 |c_iboth.|...*|sta|
|00003900| 72 74 20 50 52 4f 43 69 | 63 6f 6e 5f 73 65 74 63 |rt PROCi|con_setc|
|00003910| 61 72 65 74 0d 0f d2 31 | 2a 7c 21 50 52 4f 43 69 |aret...1|*|!PROCi|
|00003920| 63 6f 6e 5f 73 65 74 63 | 61 72 65 74 28 20 77 69 |con_setc|aret( wi|
|00003930| 6e 64 6f 77 20 2c 20 69 | 63 6f 6e 20 2c 20 69 6e |ndow , i|con , in|
|00003940| 64 65 78 20 29 0d 0f dc | 07 2a 7c 21 0d 0f e6 4d |dex )...|.*|!...M|
|00003950| 2a 7c 21 50 6c 61 63 65 | 73 20 74 68 65 20 63 61 |*|!Place|s the ca|
|00003960| 72 65 74 20 69 6e 74 6f | 20 74 68 65 20 67 69 76 |ret into| the giv|
|00003970| 65 6e 20 69 63 6f 6e 20 | 69 6e 20 74 68 65 20 67 |en icon |in the g|
|00003980| 69 76 65 6e 20 77 69 6e | 64 6f 77 2e 20 54 68 65 |iven win|dow. The|
|00003990| 20 76 61 6c 75 65 20 6f | 66 0d 0f f0 51 2a 7c 21 | value o|f...Q*|!|
|000039a0| 27 69 6e 64 65 78 27 20 | 64 65 66 69 6e 65 64 20 |'index' |defined |
|000039b0| 77 68 65 72 65 20 69 6e | 20 74 68 65 20 73 74 72 |where in| the str|
|000039c0| 69 6e 67 20 69 6e 20 74 | 68 65 20 69 63 6f 6e 20 |ing in t|he icon |
|000039d0| 74 68 65 20 63 61 72 65 | 74 20 73 68 6f 75 6c 64 |the care|t should|
|000039e0| 20 62 65 20 70 6c 61 63 | 65 64 0d 0f fa 3d 2a 7c | be plac|ed...=*||
|000039f0| 21 28 67 69 76 69 6e 67 | 20 2d 31 20 70 6c 61 63 |!(giving| -1 plac|
|00003a00| 65 73 20 74 68 65 20 63 | 61 72 65 74 20 61 74 20 |es the c|aret at |
|00003a10| 74 68 65 20 65 6e 64 20 | 6f 66 20 74 68 65 20 73 |the end |of the s|
|00003a20| 74 72 69 6e 67 29 2e 0d | 10 04 1d dd f2 69 63 6f |tring)..|.....ico|
|00003a30| 6e 5f 73 65 74 63 61 72 | 65 74 28 57 25 2c 49 25 |n_setcar|et(W%,I%|
|00003a40| 2c 58 25 29 0d 10 0e 28 | e7 20 58 25 3d 2d 31 20 |,X%)...(|. X%=-1 |
|00003a50| 8c 20 58 25 3d a9 28 a4 | 69 63 6f 6e 5f 67 65 74 |. X%=.(.|icon_get|
|00003a60| 74 65 78 74 28 57 25 2c | 49 25 29 29 0d 10 18 22 |text(W%,|I%))..."|
|00003a70| c8 99 20 26 34 30 30 44 | 32 2c 21 28 57 25 2d 38 |.. &400D|2,!(W%-8|
|00003a80| 29 2c 49 25 2c 30 2c 30 | 2c 2d 31 2c 58 25 0d 10 |),I%,0,0|,-1,X%..|
|00003a90| 22 05 e1 0d 10 2c 04 0d | 10 36 1c 2a 7c 73 74 6f |"....,..|.6.*|sto|
|00003aa0| 70 20 50 52 4f 43 69 63 | 6f 6e 5f 73 65 74 63 61 |p PROCic|on_setca|
|00003ab0| 72 65 74 0d 10 40 04 0d | ff |ret..@..|. |
+--------+-------------------------+-------------------------+--------+--------+
