home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1992-12-28 | 7.1 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
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 01 04 0d 00 02 12 | 2a 7c 73 74 61 72 74 20 |........|*|start |
|00000010| 57 69 6e 64 6f 77 0d 00 | 03 15 2a 7c 21 57 69 6e |Window..|..*|!Win|
|00000020| 64 6f 77 20 4c 69 62 72 | 61 72 79 0d 00 04 07 2a |dow Libr|ary....*|
|00000030| 7c 21 0d 00 05 42 2a 7c | 21 54 68 69 73 20 6c 69 ||!...B*||!This li|
|00000040| 62 72 61 72 79 20 63 6f | 6e 74 61 69 6e 73 20 74 |brary co|ntains t|
|00000050| 68 65 20 67 65 6e 65 72 | 61 6c 20 72 6f 75 74 69 |he gener|al routi|
|00000060| 6e 65 73 20 66 6f 72 20 | 68 61 6e 64 6c 69 6e 67 |nes for |handling|
|00000070| 20 74 68 65 0d 00 06 42 | 2a 7c 21 27 77 69 6e 64 | the...B|*|!'wind|
|00000080| 6f 77 27 20 64 61 74 61 | 20 74 79 70 65 2e 20 41 |ow' data| type. A|
|00000090| 20 27 77 69 6e 64 6f 77 | 27 20 69 73 20 61 20 73 | 'window|' is a s|
|000000a0| 70 65 63 69 61 6c 20 73 | 74 72 75 63 74 75 72 65 |pecial s|tructure|
|000000b0| 20 77 68 69 63 68 0d 00 | 07 3d 2a 7c 21 61 6c 6c | which..|.=*|!all|
|000000c0| 6f 77 73 20 65 61 73 79 | 20 68 61 6e 64 6c 69 6e |ows easy| handlin|
|000000d0| 67 20 6f 66 20 77 69 6e | 64 6f 77 73 2c 20 61 6e |g of win|dows, an|
|000000e0| 64 20 61 6c 6c 6f 77 73 | 20 64 61 74 61 20 74 6f |d allows| data to|
|000000f0| 20 62 65 0d 00 08 46 2a | 7c 21 61 74 74 61 74 63 | be...F*||!attatc|
|00000100| 68 65 64 20 74 6f 20 61 | 20 77 69 6e 64 6f 77 2c |hed to a| window,|
|00000110| 20 61 6e 64 20 61 6c 73 | 6f 20 61 6c 6c 6f 77 73 | and als|o allows|
|00000120| 20 77 69 6e 64 6f 77 20 | 74 6f 20 68 61 76 65 20 | window |to have |
|00000130| 61 20 27 74 79 70 65 27 | 2e 0d 00 09 40 2a 7c 21 |a 'type'|....@*|!|
|00000140| 54 68 69 73 20 6c 69 62 | 72 61 72 79 20 63 6f 6e |This lib|rary con|
|00000150| 74 61 69 6e 73 20 72 6f | 75 74 69 6e 65 73 20 74 |tains ro|utines t|
|00000160| 68 61 74 20 61 6c 6c 6f | 77 20 79 6f 75 20 74 6f |hat allo|w you to|
|00000170| 20 63 72 65 61 74 65 20 | 61 0d 00 0a 47 2a 7c 21 | create |a...G*|!|
|00000180| 27 77 69 6e 64 6f 77 27 | 20 28 69 65 2e 20 74 65 |'window'| (ie. te|
|00000190| 6c 6c 20 74 68 65 20 57 | 49 4d 50 20 61 62 6f 75 |ll the W|IMP abou|
|000001a0| 74 20 69 74 29 2c 20 6f | 70 65 6e 20 61 6e 64 20 |t it), o|pen and |
|000001b0| 63 6c 6f 73 65 20 27 77 | 69 6e 64 6f 77 73 27 2c |close 'w|indows',|
|000001c0| 0d 00 0b 45 2a 7c 21 73 | 65 74 20 74 68 65 20 74 |...E*|!s|et the t|
|000001d0| 69 74 6c 65 2c 20 73 69 | 7a 65 2c 20 70 6f 73 69 |itle, si|ze, posi|
|000001e0| 74 69 6f 6e 2c 20 65 74 | 63 2e 20 61 6e 64 20 61 |tion, et|c. and a|
|000001f0| 6c 73 6f 20 66 69 6e 64 | 20 74 68 65 20 27 77 69 |lso find| the 'wi|
|00000200| 6e 64 6f 77 27 0d 00 0c | 44 2a 7c 21 66 72 6f 6d |ndow'...|D*|!from|
|00000210| 20 69 74 27 73 20 68 61 | 6e 64 6c 65 20 28 75 73 | it's ha|ndle (us|
|00000220| 65 66 75 6c 20 77 68 65 | 6e 20 74 68 65 20 77 69 |eful whe|n the wi|
|00000230| 6d 70 20 73 69 6d 70 6c | 79 20 72 65 74 75 72 6e |mp simpl|y return|
|00000240| 73 20 79 6f 75 20 74 68 | 65 0d 00 0d 43 2a 7c 21 |s you th|e...C*|!|
|00000250| 68 61 6e 64 6c 65 20 6f | 66 20 61 20 77 69 6e 64 |handle o|f a wind|
|00000260| 6f 77 29 20 61 6e 64 20 | 69 74 27 73 20 74 79 70 |ow) and |it's typ|
|00000270| 65 2e 20 42 79 20 64 65 | 66 61 75 6c 74 20 61 6c |e. By de|fault al|
|00000280| 6c 20 77 69 6e 64 6f 77 | 20 61 72 65 0d 00 0e 1e |l window| are....|
|00000290| 2a 7c 21 70 6c 61 69 6e | 20 77 69 6e 64 6f 77 73 |*|!plain| windows|
|000002a0| 20 28 74 79 70 65 20 30 | 29 2e 0d 00 0f 04 0d 00 | (type 0|).......|
|000002b0| 10 11 2a 7c 73 74 6f 70 | 20 57 69 6e 64 6f 77 0d |..*|stop| Window.|
|000002c0| 00 11 04 0d 00 12 04 0d | 00 13 18 2a 7c 73 74 61 |........|...*|sta|
|000002d0| 72 74 20 50 52 4f 43 77 | 69 6e 5f 69 6e 69 74 0d |rt PROCw|in_init.|
|000002e0| 00 14 1e 2a 7c 21 50 52 | 4f 43 77 69 6e 5f 69 6e |...*|!PR|OCwin_in|
|000002f0| 69 74 28 20 65 73 74 5f | 6e 75 6d 20 29 0d 00 15 |it( est_|num )...|
|00000300| 07 2a 7c 21 0d 00 16 46 | 2a 7c 21 49 6e 69 74 69 |.*|!...F|*|!Initi|
|00000310| 61 6c 69 73 65 73 20 74 | 68 65 20 27 77 69 6e 27 |alises t|he 'win'|
|00000320| 20 6c 69 62 72 61 72 79 | 2e 20 27 65 73 74 5f 6e | library|. 'est_n|
|00000330| 75 6d 27 20 73 68 6f 75 | 6c 64 20 62 65 20 61 6e |um' shou|ld be an|
|00000340| 20 65 73 74 69 6d 61 74 | 65 64 0d 00 17 44 2a 7c | estimat|ed...D*||
|00000350| 21 6e 75 6d 62 65 72 20 | 6f 66 20 6f 70 65 6e 20 |!number |of open |
|00000360| 77 69 6e 64 6f 77 73 20 | 79 6f 75 20 77 69 6c 6c |windows |you will|
|00000370| 20 72 65 71 75 69 72 65 | 20 61 74 20 61 6e 79 20 | require| at any |
|00000380| 6f 6e 65 20 74 69 6d 65 | 2e 20 54 68 69 73 0d 00 |one time|. This..|
|00000390| 18 44 2a 7c 21 65 73 74 | 69 6d 61 74 65 20 64 6f |.D*|!est|imate do|
|000003a0| 65 73 20 6e 6f 74 20 6e | 65 65 64 20 74 6f 20 62 |es not n|eed to b|
|000003b0| 65 20 63 6f 72 72 65 63 | 74 2c 20 62 75 74 20 6d |e correc|t, but m|
|000003c0| 75 73 74 20 62 65 20 61 | 74 20 6c 65 61 73 74 20 |ust be a|t least |
|000003d0| 31 2e 0d 00 19 12 dd f2 | 77 69 6e 5f 69 6e 69 74 |1.......|win_init|
|000003e0| 28 45 25 29 0d 00 1a 08 | ea 20 41 25 0d 00 1b 41 |(E%)....|. A%...A|
|000003f0| 5f 77 69 6e 5f 6c 69 73 | 74 25 3d a4 6d 61 6c 6c |_win_lis|t%=.mall|
|00000400| 6f 63 28 34 2a 45 25 29 | 3a e3 20 41 25 3d 30 20 |oc(4*E%)|:. A%=0 |
|00000410| b8 20 45 25 2d 31 3a 21 | 28 5f 77 69 6e 5f 6c 69 |. E%-1:!|(_win_li|
|00000420| 73 74 25 2b 41 25 2a 34 | 29 3d 30 3a ed 0d 00 1c |st%+A%*4|)=0:....|
|00000430| 05 e1 0d 00 1d 04 0d 00 | 1e 17 2a 7c 73 74 6f 70 |........|..*|stop|
|00000440| 20 50 52 4f 43 77 69 6e | 5f 69 6e 69 74 0d 00 1f | PROCwin|_init...|
|00000450| 04 0d 00 20 04 0d 00 21 | 1c 2a 7c 73 74 61 72 74 |... ...!|.*|start|
|00000460| 20 50 52 4f 43 77 69 6e | 5f 73 65 74 74 69 74 6c | PROCwin|_settitl|
|00000470| 65 0d 00 22 30 2a 7c 21 | 50 52 4f 43 77 69 6e 5f |e.."0*|!|PROCwin_|
|00000480| 73 65 74 74 69 74 6c 65 | 28 20 77 69 6e 64 6f 77 |settitle|( window|
|00000490| 20 2c 20 74 69 74 6c 65 | 5f 73 74 72 69 6e 67 20 | , title|_string |
|000004a0| 29 0d 00 23 07 2a 7c 21 | 0d 00 24 43 2a 7c 21 53 |)..#.*|!|..$C*|!S|
|000004b0| 65 74 73 20 74 68 65 20 | 74 69 74 6c 65 20 6f 66 |ets the |title of|
|000004c0| 20 74 68 65 20 67 69 76 | 65 6e 20 77 69 6e 64 6f | the giv|en windo|
|000004d0| 77 2e 20 54 68 65 20 74 | 69 74 6c 65 20 69 63 6f |w. The t|itle ico|
|000004e0| 6e 20 4d 55 53 54 20 68 | 61 76 65 0d 00 25 17 2a |n MUST h|ave..%.*|
|000004f0| 7c 21 69 6e 64 69 72 65 | 63 74 65 64 20 74 65 78 ||!indire|cted tex|
|00000500| 74 2e 0d 00 26 19 dd f2 | 77 69 6e 5f 73 65 74 74 |t...&...|win_sett|
|00000510| 69 74 6c 65 28 57 25 2c | 54 24 29 0d 00 27 0b ea |itle(W%,|T$)..'..|
|00000520| 20 42 25 2c 50 25 0d 00 | 28 2e 42 25 3d 5f 77 69 | B%,P%..|(.B%=_wi|
|00000530| 6d 70 5f 62 75 66 66 65 | 72 25 3a 21 42 25 3d 21 |mp_buffe|r%:!B%=!|
|00000540| 28 57 25 2d 38 29 3a c8 | 99 20 26 34 30 30 43 43 |(W%-8):.|. &400CC|
|00000550| 2c 2c 42 25 0d 00 29 33 | e7 20 42 25 21 36 30 20 |,,B%..)3|. B%!60 |
|00000560| 80 20 32 35 36 20 8c 20 | f2 6f 73 5f 70 75 74 73 |. 256 . |.os_puts|
|00000570| 74 72 69 6e 67 28 42 25 | 21 37 36 2c c0 54 24 2c |tring(B%|!76,.T$,|
|00000580| 42 25 21 38 34 29 29 0d | 00 2a 2f c8 99 20 26 34 |B%!84)).|.*/.. &4|
|00000590| 30 30 44 31 2c 2d 31 2c | 42 25 21 34 2c 28 42 25 |00D1,-1,|B%!4,(B%|
|000005a0| 21 31 36 29 2d 33 36 2c | 42 25 21 31 32 2c 42 25 |!16)-36,|B%!12,B%|
|000005b0| 21 31 36 2b 33 36 0d 00 | 2b 05 e1 0d 00 2c 04 0d |!16+36..|+....,..|
|000005c0| 00 2d 1b 2a 7c 73 74 6f | 70 20 50 52 4f 43 77 69 |.-.*|sto|p PROCwi|
|000005d0| 6e 5f 73 65 74 74 69 74 | 6c 65 0d 00 2e 04 0d 00 |n_settit|le......|
|000005e0| 2f 04 0d 00 30 1b 2a 7c | 73 74 61 72 74 20 46 4e |/...0.*||start FN|
|000005f0| 77 69 6e 5f 63 72 65 61 | 74 65 77 69 6e 0d 00 31 |win_crea|tewin..1|
|00000600| 27 2a 7c 21 46 4e 77 69 | 6e 5f 63 72 65 61 74 65 |'*|!FNwi|n_create|
|00000610| 77 69 6e 28 20 74 65 6d | 70 6c 61 74 65 5f 6e 61 |win( tem|plate_na|
|00000620| 6d 65 20 29 0d 00 32 07 | 2a 7c 21 0d 00 33 46 2a |me )..2.|*|!..3F*|
|00000630| 7c 21 43 72 65 61 74 65 | 73 20 61 20 77 69 6e 64 ||!Create|s a wind|
|00000640| 6f 77 20 77 69 74 68 20 | 6f 66 20 77 68 69 63 68 |ow with |of which|
|00000650| 20 69 73 20 61 20 63 6f | 70 79 20 6f 66 20 74 68 | is a co|py of th|
|00000660| 65 20 67 69 76 65 6e 20 | 74 65 6d 70 6c 61 74 65 |e given |template|
|00000670| 2e 0d 00 34 17 dd a4 77 | 69 6e 5f 63 72 65 61 74 |...4...w|in_creat|
|00000680| 65 77 69 6e 28 4e 24 29 | 0d 00 35 08 ea 20 44 25 |ewin(N$)|..5.. D%|
|00000690| 0d 00 36 28 44 25 3d a4 | 74 65 6d 70 5f 63 6f 70 |..6(D%=.|temp_cop|
|000006a0| 79 28 4e 24 29 3a f2 77 | 69 6e 5f 63 72 65 61 74 |y(N$):.w|in_creat|
|000006b0| 65 77 69 6e 28 44 25 29 | 0d 00 37 07 3d 44 25 0d |ewin(D%)|..7.=D%.|
|000006c0| 00 38 04 0d 00 39 1a 2a | 7c 73 74 6f 70 20 46 4e |.8...9.*||stop FN|
|000006d0| 77 69 6e 5f 63 72 65 61 | 74 65 77 69 6e 0d 00 3a |win_crea|tewin..:|
|000006e0| 04 0d 00 3b 04 0d 00 3c | 1c 2a 7c 73 74 61 72 74 |...;...<|.*|start|
|000006f0| 20 46 4e 77 69 6e 5f 63 | 72 65 61 74 65 66 77 69 | FNwin_c|reatefwi|
|00000700| 6e 0d 00 3d 28 2a 7c 21 | 46 4e 77 69 6e 5f 63 72 |n..=(*|!|FNwin_cr|
|00000710| 65 61 74 65 66 77 69 6e | 28 20 74 65 6d 70 6c 61 |eatefwin|( templa|
|00000720| 74 65 5f 6e 61 6d 65 20 | 29 0d 00 3e 07 2a 7c 21 |te_name |)..>.*|!|
|00000730| 0d 00 3f 4a 2a 7c 21 43 | 72 65 61 74 65 73 20 61 |..?J*|!C|reates a|
|00000740| 20 77 69 6e 64 6f 77 20 | 77 69 74 68 20 6f 66 20 | window |with of |
|00000750| 77 68 69 63 68 20 69 73 | 20 4e 4f 54 20 61 20 63 |which is| NOT a c|
|00000760| 6f 70 79 20 6f 66 20 74 | 68 65 20 67 69 76 65 6e |opy of t|he given|
|00000770| 20 74 65 6d 70 6c 61 74 | 65 2c 0d 00 40 30 2a 7c | templat|e,..@0*||
|00000780| 21 62 75 74 20 72 61 74 | 68 65 72 20 6d 61 64 65 |!but rat|her made|
|00000790| 20 66 72 6f 6d 20 74 68 | 65 20 74 65 6d 70 6c 61 | from th|e templa|
|000007a0| 74 65 20 69 74 73 65 6c | 66 2e 0d 00 41 18 dd a4 |te itsel|f...A...|
|000007b0| 77 69 6e 5f 63 72 65 61 | 74 65 66 77 69 6e 28 4e |win_crea|tefwin(N|
|000007c0| 24 29 0d 00 42 08 ea 20 | 44 25 0d 00 43 2a 44 25 |$)..B.. |D%..C*D%|
|000007d0| 3d a4 77 69 6e 5f 66 61 | 6b 65 77 69 6e 28 a4 74 |=.win_fa|kewin(.t|
|000007e0| 65 6d 70 5f 67 65 74 74 | 65 6d 70 6c 61 74 65 28 |emp_gett|emplate(|
|000007f0| 4e 24 29 29 0d 00 44 07 | 3d 44 25 0d 00 45 04 0d |N$))..D.|=D%..E..|
|00000800| 00 46 1b 2a 7c 73 74 6f | 70 20 46 4e 77 69 6e 5f |.F.*|sto|p FNwin_|
|00000810| 63 72 65 61 74 65 66 77 | 69 6e 0d 00 47 04 0d 00 |createfw|in..G...|
|00000820| 48 04 0d 00 49 1d 2a 7c | 73 74 61 72 74 20 50 52 |H...I.*||start PR|
|00000830| 4f 43 77 69 6e 5f 63 72 | 65 61 74 65 77 69 6e 0d |OCwin_cr|eatewin.|
|00000840| 00 4a 22 2a 7c 21 50 52 | 4f 43 77 69 6e 5f 63 72 |.J"*|!PR|OCwin_cr|
|00000850| 65 61 74 65 77 69 6e 28 | 20 77 69 6e 64 6f 77 20 |eatewin(| window |
|00000860| 29 0d 00 4b 07 2a 7c 21 | 0d 00 4c 46 2a 7c 21 43 |)..K.*|!|..LF*|!C|
|00000870| 72 65 61 74 65 73 20 61 | 20 77 69 6e 64 6f 77 20 |reates a| window |
|00000880| 66 72 6f 6d 20 61 20 77 | 69 6e 64 6f 77 20 64 65 |from a w|indow de|
|00000890| 66 69 6e 69 74 69 6f 6e | 20 28 65 67 2e 20 61 73 |finition| (eg. as|
|000008a0| 20 72 65 74 75 72 6e 65 | 64 20 66 72 6f 6d 0d 00 | returne|d from..|
|000008b0| 4d 15 2a 7c 21 27 46 4e | 74 65 6d 70 5f 63 6f 70 |M.*|!'FN|temp_cop|
|000008c0| 79 27 2e 0d 00 4e 17 dd | f2 77 69 6e 5f 63 72 65 |y'...N..|.win_cre|
|000008d0| 61 74 65 77 69 6e 28 44 | 25 29 0d 00 4f 11 ea 20 |atewin(D|%)..O.. |
|000008e0| 57 25 2c 41 25 2c 45 25 | 2c 46 25 0d 00 50 52 e7 |W%,A%,E%|,F%..PR.|
|000008f0| 20 21 28 44 25 2d 38 29 | 3c 3e 30 20 f2 77 69 6d | !(D%-8)|<>0 .wim|
|00000900| 70 5f 65 72 72 6f 72 28 | 31 2c 30 2c 22 54 72 79 |p_error(|1,0,"Try|
|00000910| 69 6e 67 20 74 6f 20 63 | 72 65 61 74 65 20 61 20 |ing to c|reate a |
|00000920| 77 69 6e 64 6f 77 20 74 | 68 61 74 27 73 20 61 6c |window t|hat's al|
|00000930| 72 65 61 64 79 20 74 68 | 65 72 65 22 29 0d 00 51 |ready th|ere")..Q|
|00000940| 22 c8 99 20 26 34 30 30 | 43 31 2c 2c 21 44 25 20 |".. &400|C1,,!D% |
|00000950| b8 20 57 25 3a 21 28 44 | 25 2d 38 29 3d 57 25 0d |. W%:!(D|%-8)=W%.|
|00000960| 00 52 4d 45 25 3d a4 73 | 69 7a 65 5f 6f 66 28 5f |.RME%=.s|ize_of(_|
|00000970| 77 69 6e 5f 6c 69 73 74 | 25 29 3a 46 25 3d 2d 31 |win_list|%):F%=-1|
|00000980| 3a e3 20 41 25 3d 30 20 | b8 20 45 25 2d 31 20 88 |:. A%=0 |. E%-1 .|
|00000990| 20 34 3a e7 20 5f 77 69 | 6e 5f 6c 69 73 74 25 21 | 4:. _wi|n_list%!|
|000009a0| 41 25 3d 30 20 8c 20 46 | 25 3d 41 25 0d 00 53 56 |A%=0 . F|%=A%..SV|
|000009b0| ed 3a e7 20 46 25 3d 2d | 31 20 8c 20 f2 72 65 61 |.:. F%=-|1 . .rea|
|000009c0| 6c 6c 6f 63 28 5f 77 69 | 6e 5f 6c 69 73 74 25 2c |lloc(_wi|n_list%,|
|000009d0| 45 25 2b 31 36 29 3a 46 | 25 3d 45 25 3a e3 20 41 |E%+16):F|%=E%:. A|
|000009e0| 25 3d 45 25 20 b8 20 45 | 25 2b 31 35 20 88 20 34 |%=E% . E|%+15 . 4|
|000009f0| 3a 5f 77 69 6e 5f 6c 69 | 73 74 25 21 41 25 3d 30 |:_win_li|st%!A%=0|
|00000a00| 3a ed 0d 00 54 14 5f 77 | 69 6e 5f 6c 69 73 74 25 |:...T._w|in_list%|
|00000a10| 21 46 25 3d 44 25 0d 00 | 55 05 e1 0d 00 56 04 0d |!F%=D%..|U....V..|
|00000a20| 00 57 1c 2a 7c 73 74 6f | 70 20 50 52 4f 43 77 69 |.W.*|sto|p PROCwi|
|00000a30| 6e 5f 63 72 65 61 74 65 | 77 69 6e 0d 00 58 04 0d |n_create|win..X..|
|00000a40| 00 59 04 0d 00 5a 18 2a | 7c 73 74 61 72 74 20 46 |.Y...Z.*||start F|
|00000a50| 4e 77 69 6e 5f 68 61 6e | 64 6c 65 0d 00 5b 1d 2a |Nwin_han|dle..[.*|
|00000a60| 7c 21 46 4e 77 69 6e 5f | 68 61 6e 64 6c 65 28 20 ||!FNwin_|handle( |
|00000a70| 77 69 6e 64 6f 77 20 29 | 0d 00 5c 07 2a 7c 21 0d |window )|..\.*|!.|
|00000a80| 00 5d 2e 2a 7c 21 52 65 | 74 75 72 6e 73 20 74 68 |.].*|!Re|turns th|
|00000a90| 65 20 68 61 6e 64 6c 65 | 20 6f 66 20 74 68 65 20 |e handle| of the |
|00000aa0| 67 69 76 65 6e 20 77 69 | 6e 64 6f 77 2e 0d 00 5e |given wi|ndow...^|
|00000ab0| 14 dd a4 77 69 6e 5f 68 | 61 6e 64 6c 65 28 57 25 |...win_h|andle(W%|
|00000ac0| 29 0d 00 5f 0c 3d 21 28 | 57 25 2d 38 29 0d 00 60 |).._.=!(|W%-8)..`|
|00000ad0| 04 0d 00 61 17 2a 7c 73 | 74 6f 70 20 46 4e 77 69 |...a.*|s|top FNwi|
|00000ae0| 6e 5f 68 61 6e 64 6c 65 | 0d 00 62 04 0d 00 63 04 |n_handle|..b...c.|
|00000af0| 0d 00 64 1d 2a 7c 73 74 | 61 72 74 20 50 52 4f 43 |..d.*|st|art PROC|
|00000b00| 77 69 6e 5f 64 65 6c 65 | 74 65 77 69 6e 0d 00 65 |win_dele|tewin..e|
|00000b10| 22 2a 7c 21 50 52 4f 43 | 77 69 6e 5f 64 65 6c 65 |"*|!PROC|win_dele|
|00000b20| 74 65 77 69 6e 28 20 77 | 69 6e 64 6f 77 20 29 0d |tewin( w|indow ).|
|00000b30| 00 66 07 2a 7c 21 0d 00 | 67 45 2a 7c 21 44 65 6c |.f.*|!..|gE*|!Del|
|00000b40| 65 74 65 73 20 74 68 65 | 20 67 69 76 65 6e 20 77 |etes the| given w|
|00000b50| 69 6e 64 6f 77 2e 20 27 | 77 69 6e 64 6f 77 27 20 |indow. '|window' |
|00000b60| 69 73 20 73 74 69 6c 6c | 20 61 20 76 61 6c 69 64 |is still| a valid|
|00000b70| 20 64 65 66 69 6e 69 74 | 69 6f 6e 0d 00 68 47 2a | definit|ion..hG*|
|00000b80| 7c 21 61 6e 64 20 63 61 | 6e 20 62 65 20 70 61 73 ||!and ca|n be pas|
|00000b90| 73 65 64 20 74 6f 20 50 | 52 4f 43 77 69 6e 5f 63 |sed to P|ROCwin_c|
|00000ba0| 72 65 61 74 65 77 69 6e | 2e 20 54 6f 20 72 65 6d |reatewin|. To rem|
|00000bb0| 6f 76 65 20 74 68 65 20 | 64 65 66 69 6e 69 74 69 |ove the |definiti|
|00000bc0| 6f 6e 0d 00 69 3b 2a 7c | 21 79 6f 75 20 6e 65 65 |on..i;*||!you nee|
|00000bd0| 64 20 74 6f 20 61 6c 73 | 6f 20 63 61 6c 6c 20 50 |d to als|o call P|
|00000be0| 52 4f 43 74 65 6d 70 5f | 64 65 6c 63 6f 70 79 20 |ROCtemp_|delcopy |
|00000bf0| 28 6f 72 20 73 69 6d 69 | 6c 61 72 29 2e 0d 00 6a |(or simi|lar)...j|
|00000c00| 17 dd f2 77 69 6e 5f 64 | 65 6c 65 74 65 77 69 6e |...win_d|eletewin|
|00000c10| 28 57 25 29 0d 00 6b 0b | ea 20 45 25 2c 41 25 0d |(W%)..k.|. E%,A%.|
|00000c20| 00 6c 5c e7 20 28 21 28 | 57 25 2d 31 36 29 20 80 |.l\. (!(|W%-16) .|
|00000c30| 20 26 46 46 46 46 30 30 | 30 30 29 3c 3e 26 37 36 | &FFFF00|00)<>&76|
|00000c40| 43 30 30 30 30 20 8c 20 | a4 77 69 6d 70 5f 65 72 |C0000 . |.wimp_er|
|00000c50| 72 6f 72 28 31 2c 30 2c | 22 41 74 74 65 6d 70 74 |ror(1,0,|"Attempt|
|00000c60| 20 74 6f 20 64 65 6c 65 | 74 65 20 69 6e 76 61 6c | to dele|te inval|
|00000c70| 69 64 20 77 69 6e 64 6f | 77 22 29 0d 00 6d 52 45 |id windo|w")..mRE|
|00000c80| 25 3d a4 73 69 7a 65 5f | 6f 66 28 5f 77 69 6e 5f |%=.size_|of(_win_|
|00000c90| 6c 69 73 74 25 29 3a e3 | 20 41 25 3d 30 20 b8 20 |list%):.| A%=0 . |
|00000ca0| 45 25 2d 31 20 88 20 34 | 3a e7 20 57 25 3d 5f 77 |E%-1 . 4|:. W%=_w|
|00000cb0| 69 6e 5f 6c 69 73 74 25 | 21 41 25 20 8c 20 5f 77 |in_list%|!A% . _w|
|00000cc0| 69 6e 5f 6c 69 73 74 25 | 21 41 25 3d 30 0d 00 6e |in_list%|!A%=0..n|
|00000cd0| 3f ed 3a 21 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |?.:!_wim|p_buffer|
|00000ce0| 25 3d 21 28 57 25 2d 38 | 29 3a c8 99 20 26 34 30 |%=!(W%-8|):.. &40|
|00000cf0| 30 43 33 2c 2c 5f 77 69 | 6d 70 5f 62 75 66 66 65 |0C3,,_wi|mp_buffe|
|00000d00| 72 25 3a 21 28 57 25 2d | 38 29 3d 30 0d 00 6f 05 |r%:!(W%-|8)=0..o.|
|00000d10| e1 0d 00 70 04 0d 00 71 | 1c 2a 7c 73 74 6f 70 20 |...p...q|.*|stop |
|00000d20| 50 52 4f 43 77 69 6e 5f | 64 65 6c 65 74 65 77 69 |PROCwin_|deletewi|
|00000d30| 6e 0d 00 72 04 0d 00 73 | 04 0d 00 74 1b 2a 7c 73 |n..r...s|...t.*|s|
|00000d40| 74 61 72 74 20 50 52 4f | 43 77 69 6e 5f 6d 6f 76 |tart PRO|Cwin_mov|
|00000d50| 65 77 69 6e 0d 00 75 28 | 2a 7c 21 50 52 4f 43 77 |ewin..u(|*|!PROCw|
|00000d60| 69 6e 5f 6d 6f 76 65 77 | 69 6e 28 20 77 69 6e 64 |in_movew|in( wind|
|00000d70| 6f 77 20 2c 20 78 20 2c | 20 79 20 29 0d 00 76 07 |ow , x ,| y )..v.|
|00000d80| 2a 7c 21 0d 00 77 43 2a | 7c 21 4d 6f 76 65 73 20 |*|!..wC*||!Moves |
|00000d90| 74 68 65 20 77 69 6e 64 | 6f 77 20 73 75 63 68 20 |the wind|ow such |
|00000da0| 74 68 61 74 20 69 74 27 | 73 20 6c 6f 77 65 72 20 |that it'|s lower |
|00000db0| 6c 65 66 74 20 63 6f 72 | 6e 65 72 20 69 73 20 61 |left cor|ner is a|
|00000dc0| 74 20 78 2c 79 2e 0d 00 | 78 1b dd f2 77 69 6e 5f |t x,y...|x...win_|
|00000dd0| 6d 6f 76 65 77 69 6e 28 | 57 25 2c 58 25 2c 59 25 |movewin(|W%,X%,Y%|
|00000de0| 29 0d 00 79 2b ea 20 78 | 25 2c 79 25 2c 42 25 3a |)..y+. x|%,y%,B%:|
|00000df0| 42 25 3d 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |B%=_wimp|_buffer%|
|00000e00| 3a 21 42 25 3d 21 28 57 | 25 2d 38 29 0d 00 7a 2d |:!B%=!(W|%-8)..z-|
|00000e10| c8 99 20 26 34 30 30 43 | 42 2c 2c 42 25 3a 78 25 |.. &400C|B,,B%:x%|
|00000e20| 3d 42 25 21 31 32 2d 42 | 25 21 34 3a 79 25 3d 42 |=B%!12-B|%!4:y%=B|
|00000e30| 25 21 31 36 2d 42 25 21 | 38 0d 00 7b 2b 42 25 21 |%!16-B%!|8..{+B%!|
|00000e40| 34 3d 58 25 3a 42 25 21 | 38 3d 59 25 3a 42 25 21 |4=X%:B%!|8=Y%:B%!|
|00000e50| 31 32 3d 58 25 2b 78 25 | 3a 42 25 21 31 36 3d 59 |12=X%+x%|:B%!16=Y|
|00000e60| 25 2b 79 25 0d 00 7c 11 | c8 99 20 26 34 30 30 43 |%+y%..|.|.. &400C|
|00000e70| 35 2c 2c 42 25 0d 00 7d | 05 e1 0d 00 7e 04 0d 00 |5,,B%..}|....~...|
|00000e80| 7f 1a 2a 7c 73 74 6f 70 | 20 50 52 4f 43 77 69 6e |..*|stop| PROCwin|
|00000e90| 5f 6d 6f 76 65 77 69 6e | 0d 00 80 04 0d 00 81 04 |_movewin|........|
|00000ea0| 0d 00 82 1a 2a 7c 73 74 | 61 72 74 20 50 52 4f 43 |....*|st|art PROC|
|00000eb0| 77 69 6e 5f 72 65 73 69 | 7a 65 0d 00 83 31 2a 7c |win_resi|ze...1*||
|00000ec0| 21 50 52 4f 43 77 69 6e | 5f 72 65 73 69 7a 65 28 |!PROCwin|_resize(|
|00000ed0| 20 77 69 6e 64 6f 77 20 | 2c 20 78 5f 73 69 7a 65 | window |, x_size|
|00000ee0| 20 2c 20 79 5f 73 69 7a | 65 20 29 0d 00 84 07 2a | , y_siz|e )....*|
|00000ef0| 7c 21 0d 00 85 20 2a 7c | 21 52 65 73 69 7a 65 73 ||!... *||!Resizes|
|00000f00| 20 74 68 65 20 67 69 76 | 65 6e 20 77 69 6e 64 6f | the giv|en windo|
|00000f10| 77 2e 0d 00 86 1a dd f2 | 77 69 6e 5f 72 65 73 69 |w.......|win_resi|
|00000f20| 7a 65 28 57 25 2c 58 25 | 2c 59 25 29 0d 00 87 25 |ze(W%,X%|,Y%)...%|
|00000f30| ea 20 42 25 3a 42 25 3d | 5f 77 69 6d 70 5f 62 75 |. B%:B%=|_wimp_bu|
|00000f40| 66 66 65 72 25 3a 21 42 | 25 3d 21 28 57 25 2d 38 |ffer%:!B|%=!(W%-8|
|00000f50| 29 0d 00 88 3b c8 99 20 | 26 34 30 30 43 42 2c 2c |)...;.. |&400CB,,|
|00000f60| 42 25 3a 42 25 21 31 32 | 3d 42 25 21 34 2b 58 25 |B%:B%!12|=B%!4+X%|
|00000f70| 3a 42 25 21 31 36 3d 42 | 25 21 38 2b 59 25 3a c8 |:B%!16=B|%!8+Y%:.|
|00000f80| 99 20 26 34 30 30 43 35 | 2c 2c 42 25 0d 00 89 05 |. &400C5|,,B%....|
|00000f90| e1 0d 00 8a 04 0d 00 8b | 19 2a 7c 73 74 6f 70 20 |........|.*|stop |
|00000fa0| 50 52 4f 43 77 69 6e 5f | 72 65 73 69 7a 65 0d 00 |PROCwin_|resize..|
|00000fb0| 8c 04 0d 00 8d 04 0d 00 | 8e 1b 2a 7c 73 74 61 72 |........|..*|star|
|00000fc0| 74 20 50 52 4f 43 77 69 | 6e 5f 67 65 74 73 69 7a |t PROCwi|n_getsiz|
|00000fd0| 65 0d 00 8f 32 2a 7c 21 | 50 52 4f 43 77 69 6e 5f |e...2*|!|PROCwin_|
|00000fe0| 67 65 74 73 69 7a 65 28 | 20 77 69 6e 64 6f 77 20 |getsize(| window |
|00000ff0| 2c 20 78 5f 73 69 7a 65 | 20 2c 20 79 5f 73 69 7a |, x_size| , y_siz|
|00001000| 65 20 29 0d 00 90 07 2a | 7c 21 0d 00 91 40 2a 7c |e )....*||!...@*||
|00001010| 21 50 6c 61 63 65 73 20 | 74 68 65 20 73 69 7a 65 |!Places |the size|
|00001020| 20 6f 66 20 74 68 65 20 | 67 69 76 65 6e 20 77 69 | of the |given wi|
|00001030| 6e 64 6f 77 20 69 6e 74 | 6f 20 74 68 65 20 74 79 |ndow int|o the ty|
|00001040| 70 65 20 49 4e 54 45 47 | 45 52 0d 00 92 11 2a 7c |pe INTEG|ER....*||
|00001050| 21 76 61 72 69 61 62 6c | 65 73 2e 0d 00 93 1f dd |!variabl|es......|
|00001060| f2 77 69 6e 5f 67 65 74 | 73 69 7a 65 28 57 25 2c |.win_get|size(W%,|
|00001070| f8 20 58 25 2c f8 20 59 | 25 29 0d 00 94 25 ea 20 |. X%,. Y|%)...%. |
|00001080| 42 25 3a 42 25 3d 5f 77 | 69 6d 70 5f 62 75 66 66 |B%:B%=_w|imp_buff|
|00001090| 65 72 25 3a 21 42 25 3d | 21 28 57 25 2d 38 29 0d |er%:!B%=|!(W%-8).|
|000010a0| 00 95 2d c8 99 20 26 34 | 30 30 43 42 2c 2c 42 25 |..-.. &4|00CB,,B%|
|000010b0| 3a 58 25 3d 42 25 21 31 | 32 2d 42 25 21 34 3a 59 |:X%=B%!1|2-B%!4:Y|
|000010c0| 25 3d 42 25 21 31 36 2d | 42 25 21 38 0d 00 96 05 |%=B%!16-|B%!8....|
|000010d0| e1 0d 00 97 04 0d 00 98 | 1a 2a 7c 73 74 6f 70 20 |........|.*|stop |
|000010e0| 50 52 4f 43 77 69 6e 5f | 67 65 74 73 69 7a 65 0d |PROCwin_|getsize.|
|000010f0| 00 99 04 0d 00 9a 04 0d | 00 9b 1d 2a 7c 73 74 61 |........|...*|sta|
|00001100| 72 74 20 50 52 4f 43 77 | 69 6e 5f 73 65 74 65 78 |rt PROCw|in_setex|
|00001110| 74 65 6e 74 0d 00 9c 42 | 2a 7c 21 50 52 4f 43 77 |tent...B|*|!PROCw|
|00001120| 69 6e 5f 73 65 74 65 78 | 74 65 6e 74 28 20 77 69 |in_setex|tent( wi|
|00001130| 6e 64 6f 77 20 2c 20 6d | 69 6e 5f 78 20 2c 20 6d |ndow , m|in_x , m|
|00001140| 69 6e 5f 79 20 2c 20 6d | 61 78 5f 78 20 2c 20 6d |in_y , m|ax_x , m|
|00001150| 61 78 5f 79 20 29 0d 00 | 9d 07 2a 7c 21 0d 00 9e |ax_y )..|..*|!...|
|00001160| 2e 2a 7c 21 53 65 74 73 | 20 74 68 65 20 77 6f 72 |.*|!Sets| the wor|
|00001170| 6b 61 72 65 61 20 66 6f | 72 20 74 68 65 20 67 69 |karea fo|r the gi|
|00001180| 76 65 6e 20 77 69 6e 64 | 6f 77 2e 0d 00 9f 23 dd |ven wind|ow....#.|
|00001190| f2 77 69 6e 5f 73 65 74 | 65 78 74 65 6e 74 28 57 |.win_set|extent(W|
|000011a0| 25 2c 78 25 2c 79 25 2c | 58 25 2c 59 25 29 0d 00 |%,x%,y%,|X%,Y%)..|
|000011b0| a0 19 ea 20 42 25 3a 42 | 25 3d 5f 77 69 6d 70 5f |... B%:B|%=_wimp_|
|000011c0| 62 75 66 66 65 72 25 0d | 00 a1 38 21 42 25 3d 78 |buffer%.|..8!B%=x|
|000011d0| 25 3a 42 25 21 34 3d 79 | 25 3a 42 25 21 38 3d 58 |%:B%!4=y|%:B%!8=X|
|000011e0| 25 3a 42 25 21 31 32 3d | 59 25 3a c8 99 20 26 34 |%:B%!12=|Y%:.. &4|
|000011f0| 30 30 44 37 2c 21 28 57 | 25 2d 38 29 2c 42 25 0d |00D7,!(W|%-8),B%.|
|00001200| 00 a2 05 e1 0d 00 a3 04 | 0d 00 a4 1c 2a 7c 73 74 |........|....*|st|
|00001210| 6f 70 20 50 52 4f 43 77 | 69 6e 5f 73 65 74 65 78 |op PROCw|in_setex|
|00001220| 74 65 6e 74 0d 00 a5 04 | 0d 00 a6 04 0d 00 a7 1d |tent....|........|
|00001230| 2a 7c 73 74 61 72 74 20 | 50 52 4f 43 77 69 6e 5f |*|start |PROCwin_|
|00001240| 67 65 74 65 78 74 65 6e | 74 0d 00 a8 42 2a 7c 21 |getexten|t...B*|!|
|00001250| 50 52 4f 43 77 69 6e 5f | 67 65 74 65 78 74 65 6e |PROCwin_|getexten|
|00001260| 74 28 20 77 69 6e 64 6f | 77 20 2c 20 6d 69 6e 5f |t( windo|w , min_|
|00001270| 78 20 2c 20 6d 69 6e 5f | 79 20 2c 20 6d 61 78 5f |x , min_|y , max_|
|00001280| 78 20 2c 20 6d 61 78 5f | 79 20 29 0d 00 a9 07 2a |x , max_|y )....*|
|00001290| 7c 21 0d 00 aa 41 2a 7c | 21 50 6c 61 63 65 73 20 ||!...A*||!Places |
|000012a0| 74 68 65 20 77 69 6e 64 | 6f 77 27 73 20 65 78 74 |the wind|ow's ext|
|000012b0| 65 6e 74 20 76 61 6c 75 | 65 73 20 69 6e 74 6f 20 |ent valu|es into |
|000012c0| 74 68 65 20 34 20 49 4e | 54 45 47 45 52 20 76 61 |the 4 IN|TEGER va|
|000012d0| 72 73 2e 0d 00 ab 2b dd | f2 77 69 6e 5f 67 65 74 |rs....+.|.win_get|
|000012e0| 65 78 74 65 6e 74 28 57 | 25 2c f8 20 78 25 2c f8 |extent(W|%,. x%,.|
|000012f0| 20 79 25 2c f8 20 58 25 | 2c f8 20 59 25 29 0d 00 | y%,. X%|,. Y%)..|
|00001300| ac 25 ea 20 42 25 3a 42 | 25 3d 5f 77 69 6d 70 5f |.%. B%:B|%=_wimp_|
|00001310| 62 75 66 66 65 72 25 3a | 21 42 25 3d 21 28 57 25 |buffer%:|!B%=!(W%|
|00001320| 2d 38 29 0d 00 ad 35 c8 | 99 20 26 34 30 30 43 43 |-8)...5.|. &400CC|
|00001330| 2c 2c 42 25 3a 78 25 3d | 42 25 21 34 34 3a 79 25 |,,B%:x%=|B%!44:y%|
|00001340| 3d 42 25 21 34 38 3a 58 | 25 3d 42 25 21 35 32 3a |=B%!48:X|%=B%!52:|
|00001350| 59 25 3d 42 25 21 35 36 | 0d 00 ae 05 e1 0d 00 af |Y%=B%!56|........|
|00001360| 04 0d 00 b0 1c 2a 7c 73 | 74 6f 70 20 50 52 4f 43 |.....*|s|top PROC|
|00001370| 77 69 6e 5f 67 65 74 65 | 78 74 65 6e 74 0d 00 b1 |win_gete|xtent...|
|00001380| 04 0d 00 b2 04 0d 00 b3 | 1a 2a 7c 73 74 61 72 74 |........|.*|start|
|00001390| 20 50 52 4f 43 77 69 6e | 5f 67 65 74 70 6f 73 0d | PROCwin|_getpos.|
|000013a0| 00 b4 27 2a 7c 21 50 52 | 4f 43 77 69 6e 5f 67 65 |..'*|!PR|OCwin_ge|
|000013b0| 74 70 6f 73 28 20 77 69 | 6e 64 6f 77 20 2c 20 78 |tpos( wi|ndow , x|
|000013c0| 20 2c 20 79 20 29 0d 00 | b5 07 2a 7c 21 0d 00 b6 | , y )..|..*|!...|
|000013d0| 43 2a 7c 21 50 6c 61 63 | 65 73 20 74 68 65 20 63 |C*|!Plac|es the c|
|000013e0| 6f 6f 72 64 69 6e 61 74 | 65 73 20 6f 66 20 74 68 |oordinat|es of th|
|000013f0| 65 20 6c 6f 77 65 72 20 | 6c 65 66 74 20 63 6f 72 |e lower |left cor|
|00001400| 6e 65 72 20 6f 66 20 74 | 68 65 20 67 69 76 65 6e |ner of t|he given|
|00001410| 0d 00 b7 31 2a 7c 21 77 | 69 6e 64 6f 77 20 69 6e |...1*|!w|indow in|
|00001420| 74 6f 20 74 68 65 20 78 | 20 61 6e 64 20 79 20 49 |to the x| and y I|
|00001430| 4e 54 45 47 45 52 20 76 | 61 72 69 61 62 6c 65 73 |NTEGER v|ariables|
|00001440| 2e 0d 00 b8 1e dd f2 77 | 69 6e 5f 67 65 74 70 6f |.......w|in_getpo|
|00001450| 73 28 57 25 2c f8 20 58 | 25 2c f8 20 59 25 29 0d |s(W%,. X|%,. Y%).|
|00001460| 00 b9 25 ea 20 42 25 3a | 42 25 3d 5f 77 69 6d 70 |..%. B%:|B%=_wimp|
|00001470| 5f 62 75 66 66 65 72 25 | 3a 21 42 25 3d 21 28 57 |_buffer%|:!B%=!(W|
|00001480| 25 2d 38 29 0d 00 ba 21 | c8 99 20 26 34 30 30 43 |%-8)...!|.. &400C|
|00001490| 42 2c 2c 42 25 3a 58 25 | 3d 42 25 21 34 3a 59 25 |B,,B%:X%|=B%!4:Y%|
|000014a0| 3d 42 25 21 38 0d 00 bb | 05 e1 0d 00 bc 04 0d 00 |=B%!8...|........|
|000014b0| bd 19 2a 7c 73 74 6f 70 | 20 50 52 4f 43 77 69 6e |..*|stop| PROCwin|
|000014c0| 5f 67 65 74 70 6f 73 0d | 00 be 04 0d 00 bf 04 0d |_getpos.|........|
|000014d0| 00 c0 1b 2a 7c 73 74 61 | 72 74 20 50 52 4f 43 77 |...*|sta|rt PROCw|
|000014e0| 69 6e 5f 6f 70 65 6e 77 | 69 6e 0d 00 c1 20 2a 7c |in_openw|in... *||
|000014f0| 21 50 52 4f 43 77 69 6e | 5f 6f 70 65 6e 77 69 6e |!PROCwin|_openwin|
|00001500| 28 20 77 69 6e 64 6f 77 | 20 29 0d 00 c2 07 2a 7c |( window| )....*||
|00001510| 21 0d 00 c3 1e 2a 7c 21 | 4f 70 65 6e 73 20 74 68 |!....*|!|Opens th|
|00001520| 65 20 67 69 76 65 6e 20 | 77 69 6e 64 6f 77 2e 0d |e given |window..|
|00001530| 00 c4 15 dd f2 77 69 6e | 5f 6f 70 65 6e 77 69 6e |.....win|_openwin|
|00001540| 28 57 25 29 0d 00 c5 25 | ea 20 42 25 3a 42 25 3d |(W%)...%|. B%:B%=|
|00001550| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 3a 21 42 |_wimp_bu|ffer%:!B|
|00001560| 25 3d 21 28 57 25 2d 38 | 29 0d 00 c6 1f c8 99 20 |%=!(W%-8|)...... |
|00001570| 26 34 30 30 43 42 2c 2c | 42 25 3a c8 99 20 26 34 |&400CB,,|B%:.. &4|
|00001580| 30 30 43 35 2c 2c 42 25 | 0d 00 c7 05 e1 0d 00 c8 |00C5,,B%|........|
|00001590| 04 0d 00 c9 1a 2a 7c 73 | 74 6f 70 20 50 52 4f 43 |.....*|s|top PROC|
|000015a0| 77 69 6e 5f 6f 70 65 6e | 77 69 6e 0d 00 ca 04 0d |win_open|win.....|
|000015b0| 00 cb 04 0d 00 cc 1c 2a | 7c 73 74 61 72 74 20 50 |.......*||start P|
|000015c0| 52 4f 43 77 69 6e 5f 63 | 6c 6f 73 65 77 69 6e 0d |ROCwin_c|losewin.|
|000015d0| 00 cd 21 2a 7c 21 50 52 | 4f 43 77 69 6e 5f 63 6c |..!*|!PR|OCwin_cl|
|000015e0| 6f 73 65 77 69 6e 28 20 | 77 69 6e 64 6f 77 20 29 |osewin( |window )|
|000015f0| 0d 00 ce 07 2a 7c 21 0d | 00 cf 1f 2a 7c 21 43 6c |....*|!.|...*|!Cl|
|00001600| 6f 73 65 73 20 74 68 65 | 20 67 69 76 65 6e 20 77 |oses the| given w|
|00001610| 69 6e 64 6f 77 2e 0d 00 | d0 16 dd f2 77 69 6e 5f |indow...|....win_|
|00001620| 63 6c 6f 73 65 77 69 6e | 28 57 25 29 0d 00 d1 33 |closewin|(W%)...3|
|00001630| 21 5f 77 69 6d 70 5f 62 | 75 66 66 65 72 25 3d 21 |!_wimp_b|uffer%=!|
|00001640| 28 57 25 2d 38 29 3a c8 | 99 20 26 34 30 30 43 36 |(W%-8):.|. &400C6|
|00001650| 2c 2c 5f 77 69 6d 70 5f | 62 75 66 66 65 72 25 0d |,,_wimp_|buffer%.|
|00001660| 00 d2 05 e1 0d 00 d3 04 | 0d 00 d4 1b 2a 7c 73 74 |........|....*|st|
|00001670| 6f 70 20 50 52 4f 43 77 | 69 6e 5f 63 6c 6f 73 65 |op PROCw|in_close|
|00001680| 77 69 6e 0d 00 d5 04 0d | 00 d6 04 0d 00 d7 19 2a |win.....|.......*|
|00001690| 7c 73 74 61 72 74 20 46 | 4e 77 69 6e 5f 66 69 6e ||start F|Nwin_fin|
|000016a0| 64 77 69 6e 0d 00 d8 1e | 2a 7c 21 46 4e 77 69 6e |dwin....|*|!FNwin|
|000016b0| 5f 66 69 6e 64 77 69 6e | 28 20 68 61 6e 64 6c 65 |_findwin|( handle|
|000016c0| 20 29 0d 00 d9 07 2a 7c | 21 0d 00 da 41 2a 7c 21 | )....*||!...A*|!|
|000016d0| 47 69 76 65 6e 20 61 20 | 68 61 6e 64 6c 65 20 74 |Given a |handle t|
|000016e0| 68 69 73 20 72 6f 75 74 | 69 6e 65 20 77 69 6c 6c |his rout|ine will|
|000016f0| 20 72 65 74 75 72 6e 20 | 74 68 65 20 27 77 69 6e | return |the 'win|
|00001700| 64 6f 77 27 20 77 68 69 | 63 68 0d 00 db 38 2a 7c |dow' whi|ch...8*||
|00001710| 21 68 61 73 20 74 68 61 | 74 20 68 61 6e 64 6c 65 |!has tha|t handle|
|00001720| 2e 20 52 65 74 75 72 6e | 73 20 2d 31 20 69 66 20 |. Return|s -1 if |
|00001730| 68 61 6e 64 6c 65 20 69 | 73 20 69 6e 76 61 6c 69 |handle i|s invali|
|00001740| 64 2e 0d 00 dc 15 dd a4 | 77 69 6e 5f 66 69 6e 64 |d.......|win_find|
|00001750| 77 69 6e 28 48 25 29 0d | 00 dd 11 ea 20 45 25 2c |win(H%).|.... E%,|
|00001760| 41 25 2c 46 25 2c 50 25 | 0d 00 de 44 45 25 3d a4 |A%,F%,P%|...DE%=.|
|00001770| 73 69 7a 65 5f 6f 66 28 | 5f 77 69 6e 5f 6c 69 73 |size_of(|_win_lis|
|00001780| 74 25 29 3a 46 25 3d 2d | 31 3a e3 20 41 25 3d 30 |t%):F%=-|1:. A%=0|
|00001790| 20 b8 20 45 25 2d 31 20 | 88 20 34 3a 50 25 3d 5f | . E%-1 |. 4:P%=_|
|000017a0| 77 69 6e 5f 6c 69 73 74 | 25 21 41 25 0d 00 df 22 |win_list|%!A%..."|
|000017b0| e7 20 50 25 3c 3e 30 20 | 8c 20 e7 20 21 28 50 25 |. P%<>0 |. . !(P%|
|000017c0| 2d 38 29 3d 48 25 20 8c | 20 46 25 3d 50 25 0d 00 |-8)=H% .| F%=P%..|
|000017d0| e0 09 ed 3a 3d 46 25 0d | 00 e1 04 0d 00 e2 18 2a |...:=F%.|.......*|
|000017e0| 7c 73 74 6f 70 20 46 4e | 77 69 6e 5f 66 69 6e 64 ||stop FN|win_find|
|000017f0| 77 69 6e 0d 00 e3 04 0d | 00 e4 04 0d 00 e5 1a 2a |win.....|.......*|
|00001800| 7c 73 74 61 72 74 20 46 | 4e 77 69 6e 5f 66 69 6e ||start F|Nwin_fin|
|00001810| 64 74 79 70 65 0d 00 e6 | 1f 2a 7c 21 46 4e 77 69 |dtype...|.*|!FNwi|
|00001820| 6e 5f 66 69 6e 64 74 79 | 70 65 28 20 77 69 6e 64 |n_findty|pe( wind|
|00001830| 6f 77 20 29 0d 00 e7 07 | 2a 7c 21 0d 00 e8 47 2a |ow )....|*|!...G*|
|00001840| 7c 21 52 65 74 75 72 6e | 73 20 74 68 65 20 77 69 ||!Return|s the wi|
|00001850| 6e 64 6f 77 20 74 79 70 | 65 20 69 64 65 6e 74 69 |ndow typ|e identi|
|00001860| 66 69 65 72 20 28 49 4e | 54 45 47 45 52 29 20 66 |fier (IN|TEGER) f|
|00001870| 6f 72 20 61 20 67 69 76 | 65 6e 20 77 69 6e 64 6f |or a giv|en windo|
|00001880| 77 2e 0d 00 e9 39 2a 7c | 21 52 65 74 75 72 6e 73 |w....9*||!Returns|
|00001890| 20 30 20 66 6f 72 20 70 | 6c 61 69 6e 20 77 69 6e | 0 for p|lain win|
|000018a0| 64 6f 77 2c 20 2d 31 20 | 66 6f 72 20 69 6e 76 61 |dow, -1 |for inva|
|000018b0| 6c 69 64 20 77 69 6e 64 | 6f 77 2e 0d 00 ea 16 dd |lid wind|ow......|
|000018c0| a4 77 69 6e 5f 66 69 6e | 64 74 79 70 65 28 57 25 |.win_fin|dtype(W%|
|000018d0| 29 0d 00 eb 2c e7 20 28 | 21 28 57 25 2d 31 36 29 |)...,. (|!(W%-16)|
|000018e0| 20 80 20 26 46 46 46 46 | 30 30 30 30 29 3c 3e 26 | . &FFFF|0000)<>&|
|000018f0| 37 36 43 30 30 30 30 20 | 8c 20 3d 2d 31 0d 00 ec |76C0000 |. =-1...|
|00001900| 17 3d 28 21 28 57 25 2d | 31 36 29 20 80 20 26 46 |.=(!(W%-|16) . &F|
|00001910| 46 46 46 29 0d 00 ed 04 | 0d 00 ee 19 2a 7c 73 74 |FFF)....|....*|st|
|00001920| 6f 70 20 46 4e 77 69 6e | 5f 66 69 6e 64 74 79 70 |op FNwin|_findtyp|
|00001930| 65 0d 00 ef 04 0d 00 f0 | 1b 2a 7c 73 74 61 72 74 |e.......|.*|start|
|00001940| 20 50 52 4f 43 77 69 6e | 5f 73 65 74 74 79 70 65 | PROCwin|_settype|
|00001950| 0d 00 f1 27 2a 7c 21 50 | 52 4f 43 77 69 6e 5f 73 |...'*|!P|ROCwin_s|
|00001960| 65 74 74 79 70 65 28 20 | 77 69 6e 64 6f 77 20 2c |ettype( |window ,|
|00001970| 20 74 79 70 65 20 29 0d | 00 f2 07 2a 7c 21 0d 00 | type ).|...*|!..|
|00001980| f3 24 2a 7c 21 53 65 74 | 73 20 74 68 65 20 67 69 |.$*|!Set|s the gi|
|00001990| 76 65 6e 20 77 69 6e 64 | 6f 77 27 73 20 74 79 70 |ven wind|ow's typ|
|000019a0| 65 2e 0d 00 f4 18 dd f2 | 77 69 6e 5f 73 65 74 74 |e.......|win_sett|
|000019b0| 79 70 65 28 57 25 2c 54 | 25 29 0d 00 f5 6e e7 20 |ype(W%,T|%)...n. |
|000019c0| 28 21 28 57 25 2d 31 36 | 29 20 80 20 26 46 46 46 |(!(W%-16|) . &FFF|
|000019d0| 46 30 30 30 30 29 3c 3e | 26 37 36 43 30 30 30 30 |F0000)<>|&76C0000|
|000019e0| 20 8c 20 f2 77 69 6d 70 | 5f 65 72 72 6f 72 28 31 | . .wimp|_error(1|
|000019f0| 2c 30 2c 22 41 74 74 65 | 6d 70 74 20 74 6f 20 73 |,0,"Atte|mpt to s|
|00001a00| 65 74 20 77 69 6e 64 6f | 77 20 74 79 70 65 20 74 |et windo|w type t|
|00001a10| 6f 20 62 61 64 20 77 69 | 6e 64 6f 77 20 73 74 72 |o bad wi|ndow str|
|00001a20| 75 63 74 75 72 65 22 29 | 0d 00 f6 24 21 28 57 25 |ucture")|...$!(W%|
|00001a30| 2d 31 36 29 3d 26 37 36 | 43 30 30 30 30 20 84 20 |-16)=&76|C0000 . |
|00001a40| 28 26 46 46 46 46 20 80 | 20 54 25 29 0d 00 f7 05 |(&FFFF .| T%)....|
|00001a50| e1 0d 00 f8 04 0d 00 f9 | 1a 2a 7c 73 74 6f 70 20 |........|.*|stop |
|00001a60| 50 52 4f 43 77 69 6e 5f | 73 65 74 74 79 70 65 0d |PROCwin_|settype.|
|00001a70| 00 fa 04 0d 00 fb 19 2a | 7c 73 74 61 72 74 20 46 |.......*||start F|
|00001a80| 4e 77 69 6e 5f 66 61 6b | 65 77 69 6e 0d 00 fc 21 |Nwin_fak|ewin...!|
|00001a90| 2a 7c 21 46 4e 77 69 6e | 5f 66 61 6b 65 77 69 6e |*|!FNwin|_fakewin|
|00001aa0| 28 20 64 65 66 69 6e 69 | 74 6f 6e 20 29 0d 00 fd |( defini|ton )...|
|00001ab0| 07 2a 7c 21 0d 00 fe 4a | 2a 7c 21 43 72 65 61 74 |.*|!...J|*|!Creat|
|00001ac0| 65 73 20 61 20 27 77 69 | 6e 64 6f 77 27 20 66 72 |es a 'wi|ndow' fr|
|00001ad0| 6f 6d 20 61 20 64 65 66 | 69 6e 69 74 69 6f 6e 2e |om a def|inition.|
|00001ae0| 20 54 68 65 20 72 65 74 | 75 72 6e 65 64 20 70 6f | The ret|urned po|
|00001af0| 69 6e 74 65 72 20 63 61 | 6e 20 74 68 65 6e 0d 00 |inter ca|n then..|
|00001b00| ff 50 2a 7c 21 62 65 20 | 70 61 73 73 65 64 20 61 |.P*|!be |passed a|
|00001b10| 73 20 61 20 6e 6f 72 6d | 61 6c 20 27 77 69 6e 64 |s a norm|al 'wind|
|00001b20| 6f 77 27 20 74 6f 20 6f | 74 68 65 72 20 72 6f 75 |ow' to o|ther rou|
|00001b30| 74 69 6e 65 73 20 28 65 | 67 2e 20 50 52 4f 43 77 |tines (e|g. PROCw|
|00001b40| 69 6e 5f 63 72 65 61 74 | 65 77 69 6e 29 2e 0d 01 |in_creat|ewin)...|
|00001b50| 00 48 2a 7c 21 54 68 69 | 73 20 66 75 6e 63 74 69 |.H*|!Thi|s functi|
|00001b60| 6f 6e 20 61 6c 6c 6f 77 | 73 20 79 6f 75 20 74 6f |on allow|s you to|
|00001b70| 20 63 72 65 61 74 65 20 | 77 69 6e 64 6f 77 73 20 | create |windows |
|00001b80| 64 69 72 65 63 74 6c 79 | 20 66 72 6f 6d 20 74 65 |directly| from te|
|00001b90| 6d 70 6c 61 74 65 0d 01 | 01 2f 2a 7c 21 65 6e 74 |mplate..|./*|!ent|
|00001ba0| 72 69 65 73 20 77 69 74 | 68 6f 75 74 20 68 61 76 |ries wit|hout hav|
|00001bb0| 69 6e 67 20 74 6f 20 63 | 72 65 61 74 65 20 63 6f |ing to c|reate co|
|00001bc0| 70 69 65 73 2e 0d 01 02 | 15 dd a4 77 69 6e 5f 66 |pies....|...win_f|
|00001bd0| 61 6b 65 77 69 6e 28 50 | 25 29 0d 01 03 08 ea 20 |akewin(P|%)..... |
|00001be0| 57 25 0d 01 04 3e 57 25 | 3d a4 6d 61 6c 6c 6f 63 |W%...>W%|=.malloc|
|00001bf0| 28 32 30 29 3a 21 57 25 | 3d 26 37 36 43 30 30 30 |(20):!W%|=&76C000|
|00001c00| 30 3a 57 25 21 34 3d 30 | 3a 57 25 21 38 3d 30 3a |0:W%!4=0|:W%!8=0:|
|00001c10| 57 25 21 31 32 3d 30 3a | 57 25 21 31 36 3d 50 25 |W%!12=0:|W%!16=P%|
|00001c20| 0d 01 05 0a 3d 57 25 2b | 31 36 0d 01 06 04 0d 01 |....=W%+|16......|
|00001c30| 07 18 2a 7c 73 74 6f 70 | 20 46 4e 77 69 6e 5f 66 |..*|stop| FNwin_f|
|00001c40| 61 6b 65 77 69 6e 0d ff | |akewin..| |
+--------+-------------------------+-------------------------+--------+--------+
