/ BBS in a Box 15 / BBS in a box XV-1.iso / Files / System 7 / Frontier / Frontier SDK 2.1.sit / Frontier SDK 2.1 / Toolkits / Applet Toolkit / appletmain.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 61 70 70 6c 65 74 | 6d 61 69 6e 2e 63 00 00 |..applet|main.c..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 00 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 01 3f 31 00 | 00 02 4e a8 3b d9 86 a8 |.....?1.|..N.;...|
|00000060| 3b d9 86 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |;.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 bd 60 00 00 |........|.....`..|
|00000080| 0d 2f 2a a9 20 43 6f 70 | 79 72 69 67 68 74 20 31 |./*. Cop|yright 1|
|00000090| 39 38 38 2d 31 39 39 32 | 20 55 73 65 72 4c 61 6e |988-1992| UserLan|
|000000a0| 64 20 53 6f 66 74 77 61 | 72 65 2c 20 49 6e 63 2e |d Softwa|re, Inc.|
|000000b0| 20 20 41 6c 6c 20 52 69 | 67 68 74 73 20 52 65 73 |  All Ri|ghts Res|
|000000c0| 65 72 76 65 64 2e 2a 2f | 0d 0d 0d 23 69 6e 63 6c |erved.*/|...#incl|
|000000d0| 75 64 65 20 3c 47 65 73 | 74 61 6c 74 45 71 75 2e |ude <Ges|taltEqu.|
|000000e0| 68 3e 0d 23 69 6e 63 6c | 75 64 65 20 3c 69 61 63 |h>.#incl|ude <iac|
|000000f0| 2e 68 3e 0d 23 69 6e 63 | 6c 75 64 65 20 3c 6d 65 |.h>.#inc|lude <me|
|00000100| 6e 75 73 68 61 72 69 6e | 67 2e 68 3e 0d 23 69 6e |nusharin|g.h>.#in|
|00000110| 63 6c 75 64 65 20 22 61 | 70 70 6c 65 74 69 6e 74 |clude "a|ppletint|
|00000120| 65 72 6e 61 6c 2e 68 22 | 0d 23 69 6e 63 6c 75 64 |ernal.h"|.#includ|
|00000130| 65 20 22 61 70 70 6c 65 | 74 6d 61 69 6e 2e 68 22 |e "apple|tmain.h"|
|00000140| 0d 23 69 6e 63 6c 75 64 | 65 20 22 61 70 70 6c 65 |.#includ|e "apple|
|00000150| 74 6d 65 6e 75 2e 68 22 | 0d 23 69 6e 63 6c 75 64 |tmenu.h"|.#includ|
|00000160| 65 20 22 61 70 70 6c 65 | 74 73 63 72 6f 6c 6c 62 |e "apple|tscrollb|
|00000170| 61 72 2e 68 22 0d 23 69 | 6e 63 6c 75 64 65 20 22 |ar.h".#i|nclude "|
|00000180| 61 70 70 6c 65 74 61 62 | 6f 75 74 2e 68 22 0d 23 |appletab|out.h".#|
|00000190| 69 6e 63 6c 75 64 65 20 | 22 61 70 70 6c 65 74 6d |include |"appletm|
|000001a0| 65 6e 75 6f 70 73 2e 68 | 22 0d 23 69 6e 63 6c 75 |enuops.h|".#inclu|
|000001b0| 64 65 20 22 61 70 70 6c | 65 74 72 65 73 6f 75 72 |de "appl|etresour|
|000001c0| 63 65 2e 68 22 0d 0d 0d | 2f 2a 0d 49 41 43 20 6d |ce.h"...|/*.IAC m|
|000001d0| 65 73 73 61 67 65 73 20 | 69 6d 70 6c 65 6d 65 6e |essages |implemen|
|000001e0| 74 65 64 20 62 79 20 74 | 68 65 20 41 70 70 6c 65 |ted by t|he Apple|
|000001f0| 74 20 54 6f 6f 6c 6b 69 | 74 20 6c 61 79 65 72 2e |t Toolki|t layer.|
|00000200| 0d 2a 2f 0d 09 23 64 65 | 66 69 6e 65 20 61 6c 65 |.*/..#de|fine ale|
|00000210| 72 74 64 69 61 6c 6f 67 | 74 6f 6b 65 6e 09 27 61 |rtdialog|token.'a|
|00000220| 6c 72 74 27 0d 09 23 64 | 65 66 69 6e 65 20 63 6f |lrt'..#d|efine co|
|00000230| 6e 66 69 72 6d 64 69 61 | 6c 6f 67 74 6f 6b 65 6e |nfirmdia|logtoken|
|00000240| 09 27 63 6e 66 6d 27 0d | 09 23 64 65 66 69 6e 65 |.'cnfm'.|.#define|
|00000250| 20 61 73 6b 64 69 61 6c | 6f 67 74 6f 6b 65 6e 09 | askdial|ogtoken.|
|00000260| 09 27 61 73 6b 64 27 0d | 09 09 0d 09 23 64 65 66 |.'askd'.|....#def|
|00000270| 69 6e 65 20 65 6e 61 62 | 6c 65 64 69 61 6c 6f 67 |ine enab|ledialog|
|00000280| 74 6f 6b 65 6e 09 27 65 | 6e 62 64 27 0d 09 23 64 |token.'e|nbd'..#d|
|00000290| 65 66 69 6e 65 20 67 65 | 74 65 72 72 6f 72 73 74 |efine ge|terrorst|
|000002a0| 72 69 6e 67 74 6f 6b 65 | 6e 09 27 67 65 72 73 27 |ringtoke|n.'gers'|
|000002b0| 0d 09 0d 09 23 64 65 66 | 69 6e 65 20 67 65 74 74 |....#def|ine gett|
|000002c0| 61 72 67 65 74 74 6f 6b | 65 6e 09 09 27 67 74 72 |argettok|en..'gtr|
|000002d0| 67 27 0d 09 23 64 65 66 | 69 6e 65 20 73 65 74 74 |g'..#def|ine sett|
|000002e0| 61 72 67 65 74 74 6f 6b | 65 6e 20 09 09 27 73 74 |argettok|en ..'st|
|000002f0| 72 67 27 0d 09 0d 09 23 | 64 65 66 69 6e 65 20 6e |rg'....#|define n|
|00000300| 65 77 77 69 6e 64 6f 77 | 74 6f 6b 65 6e 20 09 09 |ewwindow|token ..|
|00000310| 27 6e 77 69 6e 27 0d 09 | 23 64 65 66 69 6e 65 20 |'nwin'..|#define |
|00000320| 6f 70 65 6e 77 69 6e 64 | 6f 77 74 6f 6b 65 6e 09 |openwind|owtoken.|
|00000330| 09 27 6f 77 69 6e 27 0d | 09 23 64 65 66 69 6e 65 |.'owin'.|.#define|
|00000340| 20 63 6c 6f 73 65 77 69 | 6e 64 6f 77 74 6f 6b 65 | closewi|ndowtoke|
|00000350| 6e 09 27 63 77 69 6e 27 | 0d 09 23 64 65 66 69 6e |n.'cwin'|..#defin|
|00000360| 65 20 73 61 76 65 77 69 | 6e 64 6f 77 74 6f 6b 65 |e savewi|ndowtoke|
|00000370| 6e 09 09 27 73 77 69 6e | 27 0d 09 23 64 65 66 69 |n..'swin|'..#defi|
|00000380| 6e 65 20 72 65 76 65 72 | 74 77 69 6e 64 6f 77 74 |ne rever|twindowt|
|00000390| 6f 6b 65 6e 09 27 72 77 | 69 6e 27 0d 09 23 64 65 |oken.'rw|in'..#de|
|000003a0| 66 69 6e 65 20 6d 6f 76 | 65 77 69 6e 64 6f 77 74 |fine mov|ewindowt|
|000003b0| 6f 6b 65 6e 09 09 27 6d | 77 69 6e 27 0d 09 23 64 |oken..'m|win'..#d|
|000003c0| 65 66 69 6e 65 20 70 72 | 69 6e 74 77 69 6e 64 6f |efine pr|intwindo|
|000003d0| 77 74 6f 6b 65 6e 09 27 | 70 77 69 6e 27 0d 09 23 |wtoken.'|pwin'..#|
|000003e0| 64 65 66 69 6e 65 20 73 | 65 6c 65 63 74 77 69 6e |define s|electwin|
|000003f0| 64 6f 77 74 6f 6b 65 6e | 09 27 78 77 69 6e 27 0d |dowtoken|.'xwin'.|
|00000400| 09 23 64 65 66 69 6e 65 | 20 7a 6f 6f 6d 77 69 6e |.#define| zoomwin|
|00000410| 64 6f 77 74 6f 6b 65 6e | 09 09 27 7a 77 69 6e 27 |dowtoken|..'zwin'|
|00000420| 0d 09 0d 09 23 64 65 66 | 69 6e 65 20 67 65 74 66 |....#def|ine getf|
|00000430| 69 6c 65 70 61 74 68 74 | 6f 6b 65 6e 09 27 67 70 |ilepatht|oken.'gp|
|00000440| 74 68 27 0d 09 23 64 65 | 66 69 6e 65 20 67 65 74 |th'..#de|fine get|
|00000450| 77 69 6e 64 6f 77 70 6f | 73 74 6f 6b 65 6e 09 27 |windowpo|stoken.'|
|00000460| 67 77 70 73 27 0d 09 23 | 64 65 66 69 6e 65 20 6d |gwps'..#|define m|
|00000470| 61 64 65 63 68 61 6e 67 | 65 73 74 6f 6b 65 6e 09 |adechang|estoken.|
|00000480| 27 63 68 67 73 27 0d 0d | 09 23 64 65 66 69 6e 65 |'chgs'..|.#define|
|00000490| 20 67 65 74 70 69 63 74 | 74 6f 6b 65 6e 09 09 27 | getpict|token..'|
|000004a0| 67 70 69 63 27 0d 09 23 | 64 65 66 69 6e 65 20 67 |gpic'..#|define g|
|000004b0| 65 74 74 65 78 74 74 6f | 6b 65 6e 09 09 27 67 74 |ettextto|ken..'gt|
|000004c0| 65 78 27 0d 09 23 64 65 | 66 69 6e 65 20 70 75 74 |ex'..#de|fine put|
|000004d0| 70 69 63 74 74 6f 6b 65 | 6e 09 09 27 70 70 69 63 |picttoke|n..'ppic|
|000004e0| 27 0d 09 23 64 65 66 69 | 6e 65 20 70 75 74 74 65 |'..#defi|ne putte|
|000004f0| 78 74 74 6f 6b 65 6e 09 | 09 27 70 74 65 78 27 0d |xttoken.|.'ptex'.|
|00000500| 09 23 64 65 66 69 6e 65 | 20 73 65 6c 65 63 74 61 |.#define| selecta|
|00000510| 6c 6c 74 6f 6b 65 6e 09 | 09 27 73 65 6c 61 27 0d |lltoken.|.'sela'.|
|00000520| 09 23 64 65 66 69 6e 65 | 20 68 61 76 65 73 65 6c |.#define| havesel|
|00000530| 65 63 74 69 6f 6e 74 6f | 6b 65 6e 09 27 68 73 65 |ectionto|ken.'hse|
|00000540| 6c 27 0d 09 0d 09 23 64 | 65 66 69 6e 65 20 63 6f |l'....#d|efine co|
|00000550| 75 6e 74 77 69 6e 64 6f | 77 73 74 6f 6b 65 6e 09 |untwindo|wstoken.|
|00000560| 27 74 77 69 6e 27 0d 09 | 23 64 65 66 69 6e 65 20 |'twin'..|#define |
|00000570| 6e 74 68 77 69 6e 64 6f | 77 74 6f 6b 65 6e 09 09 |nthwindo|wtoken..|
|00000580| 27 6e 74 68 77 27 0d 09 | 23 64 65 66 69 6e 65 20 |'nthw'..|#define |
|00000590| 71 75 69 74 74 6f 6b 65 | 6e 09 09 09 27 71 75 69 |quittoke|n...'qui|
|000005a0| 74 27 0d 09 0d 09 23 64 | 65 66 69 6e 65 20 73 65 |t'....#d|efine se|
|000005b0| 74 66 6f 6e 74 74 6f 6b | 65 6e 09 09 27 73 66 6f |tfonttok|en..'sfo|
|000005c0| 6e 27 0d 09 23 64 65 66 | 69 6e 65 20 73 65 74 66 |n'..#def|ine setf|
|000005d0| 6f 6e 74 73 69 7a 65 74 | 6f 6b 65 6e 09 27 73 66 |ontsizet|oken.'sf|
|000005e0| 73 7a 27 0d 0d 2f 2a 0d | 6e 65 77 20 75 6e 64 6f |sz'../*.|new undo|
|000005f0| 63 75 6d 65 6e 74 65 64 | 20 76 65 72 62 73 0d 2a |cumented| verbs.*|
|00000600| 2f 0d 09 23 64 65 66 69 | 6e 65 20 67 65 74 70 61 |/..#defi|ne getpa|
|00000610| 67 65 72 65 63 74 74 6f | 6b 65 6e 09 27 67 70 72 |gerectto|ken.'gpr|
|00000620| 63 27 0d 09 23 64 65 66 | 69 6e 65 20 67 65 74 77 |c'..#def|ine getw|
|00000630| 69 6e 64 6f 77 72 65 63 | 74 74 6f 6b 65 6e 09 27 |indowrec|ttoken.'|
|00000640| 67 77 72 63 27 0d 09 23 | 64 65 66 69 6e 65 20 67 |gwrc'..#|define g|
|00000650| 65 74 62 69 6e 61 72 79 | 74 6f 6b 65 6e 09 09 27 |etbinary|token..'|
|00000660| 67 62 69 6e 27 0d 09 23 | 64 65 66 69 6e 65 20 70 |gbin'..#|define p|
|00000670| 75 74 62 69 6e 61 72 79 | 74 6f 6b 65 6e 09 09 27 |utbinary|token..'|
|00000680| 70 62 69 6e 27 0d 09 23 | 64 65 66 69 6e 65 20 73 |pbin'..#|define s|
|00000690| 63 72 6f 6c 6c 77 69 6e | 64 6f 77 74 6f 6b 65 6e |crollwin|dowtoken|
|000006a0| 09 27 6c 77 69 6e 27 0d | 09 23 64 65 66 69 6e 65 |.'lwin'.|.#define|
|000006b0| 20 70 65 72 66 74 65 73 | 74 74 6f 6b 65 6e 20 09 | perftes|ttoken .|
|000006c0| 09 27 70 65 72 66 27 0d | 0d 09 0d 09 0d 2f 2a 0d |.'perf'.|...../*.|
|000006d0| 66 6f 72 20 63 6f 6d 6d | 75 6e 69 63 61 74 69 6f |for comm|unicatio|
|000006e0| 6e 20 77 69 74 68 20 74 | 68 65 20 61 70 70 6c 65 |n with t|he apple|
|000006f0| 74 20 62 6f 64 79 20 63 | 6f 64 65 20 2d 2d 20 69 |t body c|ode -- i|
|00000700| 74 20 68 61 73 20 63 6f | 70 69 65 73 20 6f 66 20 |t has co|pies of |
|00000710| 61 6c 6c 20 74 68 65 20 | 67 6c 6f 62 61 6c 73 2c |all the |globals,|
|00000720| 0d 61 6e 64 20 70 6f 69 | 6e 74 65 72 73 20 74 6f |.and poi|nters to|
|00000730| 20 74 68 65 20 63 61 6c | 6c 62 61 63 6b 20 72 6f | the cal|lback ro|
|00000740| 75 74 69 6e 65 73 20 74 | 68 61 74 20 64 65 66 69 |utines t|hat defi|
|00000750| 6e 65 20 74 68 65 20 61 | 70 70 6c 65 74 2e 0d 2a |ne the a|pplet..*|
|00000760| 2f 0d 09 74 79 61 70 70 | 6c 65 74 72 65 63 6f 72 |/..tyapp|letrecor|
|00000770| 64 20 61 70 70 3b 0d 0d | 2f 2a 0d 67 6c 6f 62 61 |d app;..|/*.globa|
|00000780| 6c 73 20 75 73 65 64 20 | 62 79 20 74 68 65 20 77 |ls used |by the w|
|00000790| 69 6e 64 6f 77 20 76 69 | 73 69 74 65 72 2e 0d 2a |indow vi|siter..*|
|000007a0| 2f 0d 09 62 69 67 73 74 | 72 69 6e 67 20 62 73 76 |/..bigst|ring bsv|
|000007b0| 69 73 69 74 3b 0d 09 73 | 68 6f 72 74 20 76 6e 75 |isit;..s|hort vnu|
|000007c0| 6d 76 69 73 69 74 3b 0d | 09 73 68 6f 72 74 20 78 |mvisit;.|.short x|
|000007d0| 31 2c 20 78 32 3b 20 2f | 2a 74 77 6f 20 73 68 6f |1, x2; /|*two sho|
|000007e0| 72 74 20 72 65 67 69 73 | 74 65 72 73 20 66 6f 72 |rt regis|ters for|
|000007f0| 20 76 69 73 69 74 20 72 | 6f 75 74 69 6e 65 73 2a | visit r|outines*|
|00000800| 2f 0d 09 68 64 6c 61 70 | 70 77 69 6e 64 6f 77 20 |/..hdlap|pwindow |
|00000810| 6c 61 73 74 77 69 6e 64 | 6f 77 76 69 73 69 74 65 |lastwind|owvisite|
|00000820| 64 3b 0d 09 0d 09 0d 2f | 2a 0d 66 6c 61 67 20 74 |d;...../|*.flag t|
|00000830| 6f 20 63 6f 6e 74 72 6f | 6c 20 77 68 65 74 68 65 |o contro|l whethe|
|00000840| 72 20 74 68 65 20 75 73 | 65 72 20 69 73 20 69 6e |r the us|er is in|
|00000850| 74 65 72 61 63 74 69 6e | 67 2c 20 6f 72 20 77 65 |teractin|g, or we|
|00000860| 27 72 65 20 72 65 73 70 | 6f 6e 64 69 6e 67 20 74 |'re resp|onding t|
|00000870| 6f 20 61 6e 0d 69 6e 74 | 65 72 61 70 70 6c 69 63 |o an.int|erapplic|
|00000880| 61 74 69 6f 6e 20 6d 65 | 73 73 61 67 65 2e 20 74 |ation me|ssage. t|
|00000890| 68 65 20 65 72 72 6f 72 | 20 73 74 72 69 6e 67 20 |he error| string |
|000008a0| 69 73 20 73 61 76 65 64 | 20 2d 2d 20 74 6f 20 62 |is saved| -- to b|
|000008b0| 65 20 61 63 63 65 73 73 | 65 64 20 62 79 20 74 68 |e access|ed by th|
|000008c0| 65 0d 47 65 74 45 72 72 | 6f 72 53 74 72 69 6e 67 |e.GetErr|orString|
|000008d0| 20 76 65 72 62 2e 0d 2a | 2f 0d 09 62 6f 6f 6c 65 | verb..*|/..boole|
|000008e0| 61 6e 20 66 6c 64 69 61 | 6c 6f 67 73 65 6e 61 62 |an fldia|logsenab|
|000008f0| 6c 65 64 20 3d 20 74 72 | 75 65 3b 0d 09 62 69 67 |led = tr|ue;..big|
|00000900| 73 74 72 69 6e 67 20 62 | 73 65 72 72 6f 72 73 74 |string b|serrorst|
|00000910| 72 69 6e 67 3b 0d 09 0d | 0d 2f 2a 0d 73 65 74 20 |ring;...|./*.set |
|00000920| 74 72 75 65 20 69 66 20 | 74 68 65 20 6c 61 73 74 |true if |the last|
|00000930| 20 65 76 65 6e 74 20 77 | 61 73 20 61 20 6b 65 79 | event w|as a key|
|00000940| 73 74 72 6f 6b 65 20 61 | 6e 64 20 69 74 20 77 61 |stroke a|nd it wa|
|00000950| 73 20 63 6d 64 2d 70 65 | 72 69 6f 64 2e 0d 2a 2f |s cmd-pe|riod..*/|
|00000960| 0d 09 62 6f 6f 6c 65 61 | 6e 20 66 6c 63 6d 64 70 |..boolea|n flcmdp|
|00000970| 65 72 69 6f 64 20 3d 20 | 66 61 6c 73 65 3b 0d 09 |eriod = |false;..|
|00000980| 0d 0d 2f 2a 0d 66 6f 72 | 20 66 61 73 74 20 65 76 |../*.for| fast ev|
|00000990| 65 6e 74 73 2c 20 77 65 | 20 6e 65 65 64 20 74 6f |ents, we| need to|
|000009a0| 20 73 74 6f 72 65 20 61 | 20 70 6f 69 6e 74 65 72 | store a| pointer|
|000009b0| 20 74 6f 20 6f 75 72 20 | 61 70 70 6c 69 63 61 74 | to our |applicat|
|000009c0| 69 6f 6e 20 68 65 61 70 | 2c 20 73 6f 20 61 6e 79 |ion heap|, so any|
|000009d0| 0d 61 6c 6c 6f 63 61 74 | 69 6f 6e 73 20 77 65 20 |.allocat|ions we |
|000009e0| 64 6f 20 68 61 70 70 65 | 6e 20 69 6e 20 74 68 65 |do happe|n in the|
|000009f0| 20 72 69 67 68 74 20 68 | 65 61 70 2e 0d 2a 2f 0d | right h|eap..*/.|
|00000a00| 09 73 74 61 74 69 63 20 | 54 48 7a 20 61 70 70 6c |.static |THz appl|
|00000a10| 65 74 68 65 61 70 7a 6f | 6e 65 3b 0d 0d 0d 74 79 |etheapzo|ne;...ty|
|00000a20| 70 65 64 65 66 20 73 74 | 72 75 63 74 20 74 79 64 |pedef st|ruct tyd|
|00000a30| 69 73 6b 77 69 6e 64 6f | 77 69 6e 66 6f 20 7b 20 |iskwindo|winfo { |
|00000a40| 2f 2a 73 61 76 65 64 20 | 6f 6e 20 64 69 73 6b 20 |/*saved |on disk |
|00000a50| 61 66 74 65 72 20 74 68 | 65 20 61 70 70 6c 65 74 |after th|e applet|
|00000a60| 27 73 20 64 61 74 61 20 | 68 61 6e 64 6c 65 2a 2f |'s data |handle*/|
|00000a70| 0d 09 0d 09 73 68 6f 72 | 74 20 76 65 72 73 69 6f |....shor|t versio|
|00000a80| 6e 6e 75 6d 62 65 72 3b | 0d 09 0d 09 52 65 63 74 |nnumber;|....Rect|
|00000a90| 20 77 69 6e 64 6f 77 72 | 65 63 74 3b 0d 09 0d 09 | windowr|ect;....|
|00000aa0| 73 68 6f 72 74 20 76 65 | 72 74 6d 69 6e 2c 20 76 |short ve|rtmin, v|
|00000ab0| 65 72 74 6d 61 78 2c 20 | 76 65 72 74 63 75 72 72 |ertmax, |vertcurr|
|00000ac0| 65 6e 74 3b 0d 09 0d 09 | 73 68 6f 72 74 20 68 6f |ent;....|short ho|
|00000ad0| 72 69 7a 6d 69 6e 2c 20 | 68 6f 72 69 7a 6d 61 78 |rizmin, |horizmax|
|00000ae0| 2c 20 68 6f 72 69 7a 63 | 75 72 72 65 6e 74 3b 0d |, horizc|urrent;.|
|00000af0| 09 0d 09 64 69 73 6b 66 | 6f 6e 74 73 74 72 69 6e |...diskf|ontstrin|
|00000b00| 67 20 64 65 66 61 75 6c | 74 66 6f 6e 74 73 74 72 |g defaul|tfontstr|
|00000b10| 69 6e 67 3b 0d 09 0d 09 | 73 68 6f 72 74 20 64 65 |ing;....|short de|
|00000b20| 66 61 75 6c 74 73 69 7a | 65 3b 0d 09 0d 09 74 79 |faultsiz|e;....ty|
|00000b30| 6a 75 73 74 69 66 69 63 | 61 74 69 6f 6e 20 64 65 |justific|ation de|
|00000b40| 66 61 75 6c 74 6a 75 73 | 74 69 66 69 63 61 74 69 |faultjus|tificati|
|00000b50| 6f 6e 3b 0d 09 0d 09 63 | 68 61 72 20 77 61 73 74 |on;....c|har wast|
|00000b60| 65 20 5b 36 34 5d 3b 20 | 2f 2a 72 6f 6f 6d 20 74 |e [64]; |/*room t|
|00000b70| 6f 20 67 72 6f 77 2a 2f | 0d 09 7d 20 74 79 64 69 |o grow*/|..} tydi|
|00000b80| 73 6b 77 69 6e 64 6f 77 | 69 6e 66 6f 3b 0d 09 0d |skwindow|info;...|
|00000b90| 45 76 65 6e 74 52 65 63 | 6f 72 64 20 61 70 70 6c |EventRec|ord appl|
|00000ba0| 65 74 65 76 65 6e 74 3b | 20 2f 2a 74 68 65 20 6c |etevent;| /*the l|
|00000bb0| 61 73 74 20 65 76 65 6e | 74 20 72 65 63 65 69 76 |ast even|t receiv|
|00000bc0| 65 64 20 62 79 20 61 70 | 70 6c 65 74 6d 61 69 6e |ed by ap|pletmain|
|00000bd0| 2e 63 2a 2f 0d 09 0d 62 | 6f 6f 6c 65 61 6e 20 66 |.c*/...b|oolean f|
|00000be0| 6c 65 78 69 74 6d 61 69 | 6e 6c 6f 6f 70 20 3d 20 |lexitmai|nloop = |
|00000bf0| 66 61 6c 73 65 3b 0d 0d | 23 64 65 66 69 6e 65 20 |false;..|#define |
|00000c00| 6e 6f 77 69 6e 64 6f 77 | 65 72 72 6f 72 20 37 20 |nowindow|error 7 |
|00000c10| 2f 2a 69 6e 64 65 78 20 | 69 6e 74 6f 20 74 68 65 |/*index |into the|
|00000c20| 20 76 65 72 62 20 65 72 | 72 6f 72 20 53 54 52 23 | verb er|ror STR#|
|00000c30| 20 6c 69 73 74 2a 2f 0d | 23 64 65 66 69 6e 65 20 | list*/.|#define |
|00000c40| 77 69 6e 64 6f 77 6f 70 | 65 6e 65 72 72 6f 72 20 |windowop|enerror |
|00000c50| 38 0d 23 64 65 66 69 6e | 65 20 6e 6f 70 69 63 74 |8.#defin|e nopict|
|00000c60| 63 61 6c 6c 62 61 63 6b | 65 72 72 6f 72 20 39 0d |callback|error 9.|
|00000c70| 23 64 65 66 69 6e 65 20 | 6e 6f 74 65 78 74 63 61 |#define |notextca|
|00000c80| 6c 6c 62 61 63 6b 65 72 | 72 6f 72 20 31 30 0d 23 |llbacker|ror 10.#|
|00000c90| 64 65 66 69 6e 65 20 6e | 6f 70 75 74 74 65 78 74 |define n|oputtext|
|00000ca0| 63 61 6c 6c 62 61 63 6b | 65 72 72 6f 72 20 31 31 |callback|error 11|
|00000cb0| 0d 23 64 65 66 69 6e 65 | 20 6e 6f 70 75 74 70 69 |.#define| noputpi|
|00000cc0| 63 74 63 61 6c 6c 62 61 | 63 6b 65 72 72 6f 72 20 |ctcallba|ckerror |
|00000cd0| 31 32 0d 0d 0d 62 69 67 | 73 74 72 69 6e 67 20 62 |12...big|string b|
|00000ce0| 73 74 61 72 67 65 74 77 | 69 6e 64 6f 77 6e 61 6d |stargetw|indownam|
|00000cf0| 65 3b 20 2f 2a 74 69 74 | 6c 65 20 6f 66 20 77 69 |e; /*tit|le of wi|
|00000d00| 6e 64 6f 77 20 74 68 61 | 74 20 49 41 43 20 76 65 |ndow tha|t IAC ve|
|00000d10| 72 62 73 20 61 70 70 6c | 79 20 74 6f 2a 2f 0d 0d |rbs appl|y to*/..|
|00000d20| 73 74 61 74 69 63 20 62 | 6f 6f 6c 65 61 6e 20 66 |static b|oolean f|
|00000d30| 6c 63 75 72 72 65 6e 74 | 6c 79 61 63 74 69 76 65 |lcurrent|lyactive|
|00000d40| 20 3d 20 74 72 75 65 3b | 20 2f 2a 77 65 20 73 74 | = true;| /*we st|
|00000d50| 61 72 74 20 61 63 74 69 | 76 65 2c 20 74 68 65 6e |art acti|ve, then|
|00000d60| 20 67 65 74 20 6a 75 67 | 67 6c 65 64 2a 2f 0d 0d | get jug|gled*/..|
|00000d70| 0d 23 64 65 66 69 6e 65 | 20 6a 75 67 67 6c 65 72 |.#define| juggler|
|00000d80| 45 76 74 20 31 35 20 2f | 2a 61 20 73 75 73 70 65 |Evt 15 /|*a suspe|
|00000d90| 6e 64 2f 72 65 73 75 6d | 65 20 65 76 65 6e 74 20 |nd/resum|e event |
|00000da0| 66 72 6f 6d 20 74 68 65 | 20 4f 53 20 74 6f 20 75 |from the| OS to u|
|00000db0| 73 2a 2f 0d 0d 74 79 70 | 65 64 65 66 20 73 74 72 |s*/..typ|edef str|
|00000dc0| 75 63 74 20 74 79 6a 75 | 67 67 6c 65 72 6d 65 73 |uct tyju|gglermes|
|00000dd0| 73 61 67 65 20 7b 0d 09 | 0d 09 6c 6f 6e 67 20 65 |sage {..|..long e|
|00000de0| 76 65 6e 74 74 79 70 65 | 3a 20 38 3b 20 2f 2a 62 |venttype|: 8; /*b|
|00000df0| 69 74 73 20 32 34 20 2d | 2d 20 33 31 2a 2f 0d 09 |its 24 -|- 31*/..|
|00000e00| 0d 09 6c 6f 6e 67 20 72 | 65 73 65 72 76 65 64 62 |..long r|eservedb|
|00000e10| 69 74 73 3a 20 32 32 3b | 20 2f 2a 62 69 74 73 20 |its: 22;| /*bits |
|00000e20| 32 20 2d 2d 20 32 33 2a | 2f 0d 09 0d 09 6c 6f 6e |2 -- 23*|/....lon|
|00000e30| 67 20 66 6c 63 6f 6e 76 | 65 72 74 63 6c 69 70 62 |g flconv|ertclipb|
|00000e40| 6f 61 72 64 3a 20 31 3b | 20 2f 2a 62 69 74 20 31 |oard: 1;| /*bit 1|
|00000e50| 2a 2f 0d 09 0d 09 6c 6f | 6e 67 20 66 6c 72 65 73 |*/....lo|ng flres|
|00000e60| 75 6d 65 3a 20 31 3b 20 | 2f 2a 62 69 74 20 30 2a |ume: 1; |/*bit 0*|
|00000e70| 2f 0d 09 7d 20 74 79 6a | 75 67 67 6c 65 72 6d 65 |/..} tyj|ugglerme|
|00000e80| 73 73 61 67 65 3b 0d 09 | 0d 0d 23 64 65 66 69 6e |ssage;..|..#defin|
|00000e90| 65 20 64 69 73 70 6c 61 | 79 64 65 62 75 67 20 74 |e displa|ydebug t|
|00000ea0| 72 75 65 0d 0d 23 64 65 | 66 69 6e 65 20 6d 69 6e |rue..#de|fine min|
|00000eb0| 77 69 6e 64 6f 77 77 69 | 64 74 68 20 31 32 35 0d |windowwi|dth 125.|
|00000ec0| 23 64 65 66 69 6e 65 20 | 6d 69 6e 77 69 6e 64 6f |#define |minwindo|
|00000ed0| 77 68 65 69 67 68 74 20 | 31 30 30 0d 0d 0d 0d 73 |wheight |100....s|
|00000ee0| 74 61 74 69 63 20 76 6f | 69 64 20 64 65 62 75 67 |tatic vo|id debug|
|00000ef0| 72 65 63 74 20 28 52 65 | 63 74 20 72 29 20 7b 0d |rect (Re|ct r) {.|
|00000f00| 0d 09 69 66 20 28 64 69 | 73 70 6c 61 79 64 65 62 |..if (di|splaydeb|
|00000f10| 75 67 29 20 7b 0d 09 0d | 09 09 46 69 6c 6c 52 65 |ug) {...|..FillRe|
|00000f20| 63 74 20 28 26 72 2c 20 | 67 72 61 79 29 3b 0d 09 |ct (&r, |gray);..|
|00000f30| 09 0d 09 09 46 72 61 6d | 65 52 65 63 74 20 28 26 |....Fram|eRect (&|
|00000f40| 72 29 3b 0d 09 09 7d 0d | 09 7d 20 2f 2a 64 65 62 |r);...}.|.} /*deb|
|00000f50| 75 67 72 65 63 74 2a 2f | 0d 09 0d 09 0d 73 74 61 |ugrect*/|.....sta|
|00000f60| 74 69 63 20 76 6f 69 64 | 20 7a 7a 7a 20 28 76 6f |tic void| zzz (vo|
|00000f70| 69 64 29 20 7b 0d 09 0d | 09 62 69 67 73 74 72 69 |id) {...|.bigstri|
|00000f80| 6e 67 20 62 73 3b 0d 09 | 52 65 63 74 20 72 20 3d |ng bs;..|Rect r =|
|00000f90| 20 28 2a 2a 28 2a 2a 61 | 70 70 2e 61 70 70 77 69 | (**(**a|pp.appwi|
|00000fa0| 6e 64 6f 77 29 2e 68 70 | 61 6c 65 74 74 65 29 2e |ndow).hp|alette).|
|00000fb0| 72 3b 0d 09 0d 09 73 65 | 74 73 74 72 69 6e 67 6c |r;....se|tstringl|
|00000fc0| 65 6e 67 74 68 20 28 62 | 73 2c 20 30 29 3b 0d 09 |ength (b|s, 0);..|
|00000fd0| 0d 09 70 75 73 68 69 6e | 74 20 28 72 2e 74 6f 70 |..pushin|t (r.top|
|00000fe0| 2c 20 62 73 29 3b 20 70 | 75 73 68 73 74 72 69 6e |, bs); p|ushstrin|
|00000ff0| 67 20 28 22 5c 70 2c 20 | 22 2c 20 62 73 29 3b 0d |g ("\p, |", bs);.|
|00001000| 09 0d 09 70 75 73 68 69 | 6e 74 20 28 72 2e 6c 65 |...pushi|nt (r.le|
|00001010| 66 74 2c 20 62 73 29 3b | 20 70 75 73 68 73 74 72 |ft, bs);| pushstr|
|00001020| 69 6e 67 20 28 22 5c 70 | 2c 20 22 2c 20 62 73 29 |ing ("\p|, ", bs)|
|00001030| 3b 0d 09 0d 09 70 75 73 | 68 69 6e 74 20 28 72 2e |;....pus|hint (r.|
|00001040| 62 6f 74 74 6f 6d 2c 20 | 62 73 29 3b 20 70 75 73 |bottom, |bs); pus|
|00001050| 68 73 74 72 69 6e 67 20 | 28 22 5c 70 2c 20 22 2c |hstring |("\p, ",|
|00001060| 20 62 73 29 3b 0d 09 0d | 09 70 75 73 68 69 6e 74 | bs);...|.pushint|
|00001070| 20 28 72 2e 72 69 67 68 | 74 2c 20 62 73 29 3b 20 | (r.righ|t, bs); |
|00001080| 0d 09 0d 09 44 65 62 75 | 67 53 74 72 20 28 62 73 |....Debu|gStr (bs|
|00001090| 29 3b 0d 09 7d 20 2f 2a | 7a 7a 7a 2a 2f 0d 09 0d |);..} /*|zzz*/...|
|000010a0| 0d 76 6f 69 64 20 61 70 | 70 65 72 61 73 65 72 65 |.void ap|perasere|
|000010b0| 63 74 20 28 52 65 63 74 | 20 72 29 20 7b 0d 09 0d |ct (Rect| r) {...|
|000010c0| 09 70 75 73 68 63 6c 69 | 70 20 28 72 29 3b 0d 09 |.pushcli|p (r);..|
|000010d0| 0d 09 28 2a 61 70 70 2e | 65 72 61 73 65 72 65 63 |..(*app.|eraserec|
|000010e0| 74 63 61 6c 6c 62 61 63 | 6b 29 20 28 72 29 3b 0d |tcallbac|k) (r);.|
|000010f0| 09 0d 09 70 6f 70 63 6c | 69 70 20 28 29 3b 0d 09 |...popcl|ip ();..|
|00001100| 7d 20 2f 2a 61 70 70 65 | 72 61 73 65 72 65 63 74 |} /*appe|raserect|
|00001110| 2a 2f 0d 09 0d 09 0d 62 | 6f 6f 6c 65 61 6e 20 61 |*/.....b|oolean a|
|00001120| 70 70 61 6c 65 72 74 20 | 28 62 73 29 20 62 69 67 |ppalert |(bs) big|
|00001130| 73 74 72 69 6e 67 20 62 | 73 3b 20 7b 0d 09 0d 09 |string b|s; {....|
|00001140| 63 6f 70 79 73 74 72 69 | 6e 67 20 28 62 73 2c 20 |copystri|ng (bs, |
|00001150| 62 73 65 72 72 6f 72 73 | 74 72 69 6e 67 29 3b 0d |bserrors|tring);.|
|00001160| 09 0d 09 69 66 20 28 21 | 66 6c 64 69 61 6c 6f 67 |...if (!|fldialog|
|00001170| 73 65 6e 61 62 6c 65 64 | 29 0d 09 09 72 65 74 75 |senabled|)...retu|
|00001180| 72 6e 20 28 74 72 75 65 | 29 3b 0d 09 09 0d 09 72 |rn (true|);.....r|
|00001190| 65 74 75 72 6e 20 28 61 | 6c 65 72 74 64 69 61 6c |eturn (a|lertdial|
|000011a0| 6f 67 20 28 62 73 29 29 | 3b 0d 09 7d 20 2f 2a 61 |og (bs))|;..} /*a|
|000011b0| 70 70 61 6c 65 72 74 2a | 2f 0d 09 0d 09 0d 62 6f |ppalert*|/.....bo|
|000011c0| 6f 6c 65 61 6e 20 61 70 | 70 63 6f 6e 66 69 72 6d |olean ap|pconfirm|
|000011d0| 20 28 62 73 29 20 62 69 | 67 73 74 72 69 6e 67 20 | (bs) bi|gstring |
|000011e0| 62 73 3b 20 7b 0d 09 0d | 09 63 6f 70 79 73 74 72 |bs; {...|.copystr|
|000011f0| 69 6e 67 20 28 62 73 2c | 20 62 73 65 72 72 6f 72 |ing (bs,| bserror|
|00001200| 73 74 72 69 6e 67 29 3b | 0d 09 0d 09 69 66 20 28 |string);|....if (|
|00001210| 21 66 6c 64 69 61 6c 6f | 67 73 65 6e 61 62 6c 65 |!fldialo|gsenable|
|00001220| 64 29 0d 09 09 72 65 74 | 75 72 6e 20 28 74 72 75 |d)...ret|urn (tru|
|00001230| 65 29 3b 0d 09 09 0d 09 | 72 65 74 75 72 6e 20 28 |e);.....|return (|
|00001240| 63 6f 6e 66 69 72 6d 64 | 69 61 6c 6f 67 20 28 62 |confirmd|ialog (b|
|00001250| 73 29 29 3b 0d 09 7d 20 | 2f 2a 61 70 70 63 6f 6e |s));..} |/*appcon|
|00001260| 66 69 72 6d 2a 2f 0d 09 | 0d 09 0d 62 6f 6f 6c 65 |firm*/..|...boole|
|00001270| 61 6e 20 61 70 70 61 73 | 6b 20 28 62 69 67 73 74 |an appas|k (bigst|
|00001280| 72 69 6e 67 20 70 72 6f | 6d 70 74 2c 20 62 69 67 |ring pro|mpt, big|
|00001290| 73 74 72 69 6e 67 20 61 | 6e 73 77 65 72 29 20 7b |string a|nswer) {|
|000012a0| 0d 09 0d 09 63 6f 70 79 | 73 74 72 69 6e 67 20 28 |....copy|string (|
|000012b0| 70 72 6f 6d 70 74 2c 20 | 62 73 65 72 72 6f 72 73 |prompt, |bserrors|
|000012c0| 74 72 69 6e 67 29 3b 0d | 09 0d 09 69 66 20 28 21 |tring);.|...if (!|
|000012d0| 66 6c 64 69 61 6c 6f 67 | 73 65 6e 61 62 6c 65 64 |fldialog|senabled|
|000012e0| 29 0d 09 09 72 65 74 75 | 72 6e 20 28 74 72 75 65 |)...retu|rn (true|
|000012f0| 29 3b 0d 09 09 0d 09 72 | 65 74 75 72 6e 20 28 61 |);.....r|eturn (a|
|00001300| 73 6b 64 69 61 6c 6f 67 | 20 28 70 72 6f 6d 70 74 |skdialog| (prompt|
|00001310| 2c 20 61 6e 73 77 65 72 | 29 29 3b 0d 09 7d 20 2f |, answer|));..} /|
|00001320| 2a 61 70 70 61 73 6b 2a | 2f 0d 09 0d 09 0d 76 6f |*appask*|/.....vo|
|00001330| 69 64 20 73 65 74 73 65 | 6c 65 63 74 69 6f 6e 73 |id setse|lections|
|00001340| 74 79 6c 65 69 6e 66 6f | 20 28 74 79 73 65 6c 65 |tyleinfo| (tysele|
|00001350| 63 74 69 6f 6e 69 6e 66 | 6f 20 2a 70 73 65 6c 69 |ctioninf|o *pseli|
|00001360| 6e 66 6f 2c 20 62 6f 6f | 6c 65 61 6e 20 66 6c 70 |nfo, boo|lean flp|
|00001370| 61 63 6b 29 20 7b 0d 09 | 0d 09 75 6e 69 6f 6e 20 |ack) {..|..union |
|00001380| 7b 0d 09 09 0d 09 09 73 | 68 6f 72 74 20 66 6f 6e |{......s|hort fon|
|00001390| 74 73 74 79 6c 65 3b 0d | 09 09 0d 09 09 73 74 72 |tstyle;.|.....str|
|000013a0| 75 63 74 20 7b 0d 09 09 | 09 0d 09 09 09 69 6e 74 |uct {...|.....int|
|000013b0| 20 65 78 74 72 61 62 69 | 74 73 3a 20 37 3b 20 2f | extrabi|ts: 7; /|
|000013c0| 2a 68 69 67 68 65 73 74 | 2d 6f 72 64 65 72 20 37 |*highest|-order 7|
|000013d0| 20 62 69 74 73 20 61 72 | 65 20 75 6e 75 73 65 64 | bits ar|e unused|
|000013e0| 2a 2f 0d 09 09 09 0d 09 | 09 09 62 6f 6f 6c 65 61 |*/......|..boolea|
|000013f0| 6e 20 66 6c 73 75 62 73 | 63 72 69 70 74 3a 20 31 |n flsubs|cript: 1|
|00001400| 3b 0d 09 09 09 0d 09 09 | 09 62 6f 6f 6c 65 61 6e |;.......|.boolean|
|00001410| 20 66 6c 73 75 70 65 72 | 73 63 72 69 70 74 3a 20 | flsuper|script: |
|00001420| 31 3b 0d 09 09 09 0d 09 | 09 09 62 6f 6f 6c 65 61 |1;......|..boolea|
|00001430| 6e 20 66 6c 65 78 74 65 | 6e 64 65 64 3a 20 31 3b |n flexte|nded: 1;|
|00001440| 20 2f 2a 6e 6f 74 20 63 | 75 72 72 65 6e 74 6c 79 | /*not c|urrently|
|00001450| 20 75 73 65 64 2a 2f 0d | 09 09 09 0d 09 09 09 62 | used*/.|.......b|
|00001460| 6f 6f 6c 65 61 6e 20 66 | 6c 63 6f 6e 64 65 6e 73 |oolean f|lcondens|
|00001470| 65 64 3a 20 31 3b 0d 09 | 09 09 0d 09 09 09 62 6f |ed: 1;..|......bo|
|00001480| 6f 6c 65 61 6e 20 66 6c | 73 68 61 64 6f 77 3a 20 |olean fl|shadow: |
|00001490| 31 3b 0d 09 09 09 0d 09 | 09 09 62 6f 6f 6c 65 61 |1;......|..boolea|
|000014a0| 6e 20 66 6c 6f 75 74 6c | 69 6e 65 3a 20 31 3b 0d |n floutl|ine: 1;.|
|000014b0| 09 09 09 0d 09 09 09 62 | 6f 6f 6c 65 61 6e 20 66 |.......b|oolean f|
|000014c0| 6c 75 6e 64 65 72 6c 69 | 6e 65 3a 20 31 3b 0d 09 |lunderli|ne: 1;..|
|000014d0| 09 09 0d 09 09 09 62 6f | 6f 6c 65 61 6e 20 66 6c |......bo|olean fl|
|000014e0| 69 74 61 6c 69 63 3a 20 | 31 3b 0d 09 09 09 0d 09 |italic: |1;......|
|000014f0| 09 09 62 6f 6f 6c 65 61 | 6e 20 66 6c 62 6f 6c 64 |..boolea|n flbold|
|00001500| 3a 20 31 3b 0d 09 09 09 | 7d 20 73 74 79 6c 65 62 |: 1;....|} styleb|
|00001510| 69 74 73 3b 0d 09 09 7d | 20 75 3b 0d 09 0d 09 74 |its;...}| u;....t|
|00001520| 79 73 65 6c 65 63 74 69 | 6f 6e 69 6e 66 6f 20 78 |yselecti|oninfo x|
|00001530| 20 3d 20 2a 70 73 65 6c | 69 6e 66 6f 3b 0d 09 0d | = *psel|info;...|
|00001540| 09 69 66 20 28 66 6c 70 | 61 63 6b 29 20 7b 0d 09 |.if (flp|ack) {..|
|00001550| 09 0d 09 09 75 2e 66 6f | 6e 74 73 74 79 6c 65 20 |....u.fo|ntstyle |
|00001560| 3d 20 30 3b 20 2f 2a 63 | 6c 65 61 72 20 61 6c 6c |= 0; /*c|lear all|
|00001570| 20 62 69 74 73 2a 2f 0d | 09 09 0d 09 09 75 2e 73 | bits*/.|.....u.s|
|00001580| 74 79 6c 65 62 69 74 73 | 2e 66 6c 73 75 62 73 63 |tylebits|.flsubsc|
|00001590| 72 69 70 74 20 3d 20 78 | 2e 66 6c 73 75 62 73 63 |ript = x|.flsubsc|
|000015a0| 72 69 70 74 3b 0d 09 09 | 0d 09 09 75 2e 73 74 79 |ript;...|...u.sty|
|000015b0| 6c 65 62 69 74 73 2e 66 | 6c 73 75 70 65 72 73 63 |lebits.f|lsupersc|
|000015c0| 72 69 70 74 20 3d 20 78 | 2e 66 6c 73 75 70 65 72 |ript = x|.flsuper|
|000015d0| 73 63 72 69 70 74 3b 0d | 09 09 0d 09 09 75 2e 73 |script;.|.....u.s|
|000015e0| 74 79 6c 65 62 69 74 73 | 2e 66 6c 65 78 74 65 6e |tylebits|.flexten|
|000015f0| 64 65 64 20 3d 20 78 2e | 66 6c 65 78 74 65 6e 64 |ded = x.|flextend|
|00001600| 65 64 3b 0d 09 09 0d 09 | 09 75 2e 73 74 79 6c 65 |ed;.....|.u.style|
|00001610| 62 69 74 73 2e 66 6c 63 | 6f 6e 64 65 6e 73 65 64 |bits.flc|ondensed|
|00001620| 20 3d 20 78 2e 66 6c 63 | 6f 6e 64 65 6e 73 65 64 | = x.flc|ondensed|
|00001630| 3b 0d 09 09 0d 09 09 75 | 2e 73 74 79 6c 65 62 69 |;......u|.stylebi|
|00001640| 74 73 2e 66 6c 73 68 61 | 64 6f 77 20 3d 20 78 2e |ts.flsha|dow = x.|
|00001650| 66 6c 73 68 61 64 6f 77 | 3b 0d 09 09 0d 09 09 75 |flshadow|;......u|
|00001660| 2e 73 74 79 6c 65 62 69 | 74 73 2e 66 6c 6f 75 74 |.stylebi|ts.flout|
|00001670| 6c 69 6e 65 20 3d 20 78 | 2e 66 6c 6f 75 74 6c 69 |line = x|.floutli|
|00001680| 6e 65 3b 0d 09 09 0d 09 | 09 75 2e 73 74 79 6c 65 |ne;.....|.u.style|
|00001690| 62 69 74 73 2e 66 6c 75 | 6e 64 65 72 6c 69 6e 65 |bits.flu|nderline|
|000016a0| 20 3d 20 78 2e 66 6c 75 | 6e 64 65 72 6c 69 6e 65 | = x.flu|nderline|
|000016b0| 3b 0d 09 09 0d 09 09 75 | 2e 73 74 79 6c 65 62 69 |;......u|.stylebi|
|000016c0| 74 73 2e 66 6c 69 74 61 | 6c 69 63 20 3d 20 78 2e |ts.flita|lic = x.|
|000016d0| 66 6c 69 74 61 6c 69 63 | 3b 0d 09 09 0d 09 09 75 |flitalic|;......u|
|000016e0| 2e 73 74 79 6c 65 62 69 | 74 73 2e 66 6c 62 6f 6c |.stylebi|ts.flbol|
|000016f0| 64 20 3d 20 78 2e 66 6c | 62 6f 6c 64 3b 0d 09 09 |d = x.fl|bold;...|
|00001700| 0d 09 09 78 2e 66 6f 6e | 74 73 74 79 6c 65 20 3d |...x.fon|tstyle =|
|00001710| 20 75 2e 66 6f 6e 74 73 | 74 79 6c 65 3b 0d 09 09 | u.fonts|tyle;...|
|00001720| 7d 0d 09 65 6c 73 65 20 | 7b 0d 09 09 75 2e 66 6f |}..else |{...u.fo|
|00001730| 6e 74 73 74 79 6c 65 20 | 3d 20 78 2e 66 6f 6e 74 |ntstyle |= x.font|
|00001740| 73 74 79 6c 65 3b 0d 09 | 09 0d 09 09 78 2e 66 6c |style;..|....x.fl|
|00001750| 73 75 62 73 63 72 69 70 | 74 20 3d 20 62 69 74 62 |subscrip|t = bitb|
|00001760| 6f 6f 6c 65 61 6e 20 28 | 75 2e 73 74 79 6c 65 62 |oolean (|u.styleb|
|00001770| 69 74 73 2e 66 6c 73 75 | 62 73 63 72 69 70 74 29 |its.flsu|bscript)|
|00001780| 3b 0d 09 09 0d 09 09 78 | 2e 66 6c 73 75 70 65 72 |;......x|.flsuper|
|00001790| 73 63 72 69 70 74 20 3d | 20 62 69 74 62 6f 6f 6c |script =| bitbool|
|000017a0| 65 61 6e 20 28 75 2e 73 | 74 79 6c 65 62 69 74 73 |ean (u.s|tylebits|
|000017b0| 2e 66 6c 73 75 70 65 72 | 73 63 72 69 70 74 29 3b |.flsuper|script);|
|000017c0| 0d 09 09 0d 09 09 78 2e | 66 6c 65 78 74 65 6e 64 |......x.|flextend|
|000017d0| 65 64 20 3d 20 62 69 74 | 62 6f 6f 6c 65 61 6e 20 |ed = bit|boolean |
|000017e0| 28 75 2e 73 74 79 6c 65 | 62 69 74 73 2e 66 6c 65 |(u.style|bits.fle|
|000017f0| 78 74 65 6e 64 65 64 29 | 3b 0d 09 09 0d 09 09 78 |xtended)|;......x|
|00001800| 2e 66 6c 63 6f 6e 64 65 | 6e 73 65 64 20 3d 20 62 |.flconde|nsed = b|
|00001810| 69 74 62 6f 6f 6c 65 61 | 6e 20 28 75 2e 73 74 79 |itboolea|n (u.sty|
|00001820| 6c 65 62 69 74 73 2e 66 | 6c 63 6f 6e 64 65 6e 73 |lebits.f|lcondens|
|00001830| 65 64 29 3b 0d 09 09 0d | 09 09 78 2e 66 6c 73 68 |ed);....|..x.flsh|
|00001840| 61 64 6f 77 20 3d 20 62 | 69 74 62 6f 6f 6c 65 61 |adow = b|itboolea|
|00001850| 6e 20 28 75 2e 73 74 79 | 6c 65 62 69 74 73 2e 66 |n (u.sty|lebits.f|
|00001860| 6c 73 68 61 64 6f 77 29 | 3b 0d 09 09 0d 09 09 78 |lshadow)|;......x|
|00001870| 2e 66 6c 6f 75 74 6c 69 | 6e 65 20 3d 20 62 69 74 |.floutli|ne = bit|
|00001880| 62 6f 6f 6c 65 61 6e 20 | 28 75 2e 73 74 79 6c 65 |boolean |(u.style|
|00001890| 62 69 74 73 2e 66 6c 6f | 75 74 6c 69 6e 65 29 3b |bits.flo|utline);|
|000018a0| 0d 09 09 0d 09 09 78 2e | 66 6c 75 6e 64 65 72 6c |......x.|flunderl|
|000018b0| 69 6e 65 20 3d 20 62 69 | 74 62 6f 6f 6c 65 61 6e |ine = bi|tboolean|
|000018c0| 20 28 75 2e 73 74 79 6c | 65 62 69 74 73 2e 66 6c | (u.styl|ebits.fl|
|000018d0| 75 6e 64 65 72 6c 69 6e | 65 29 3b 0d 09 09 0d 09 |underlin|e);.....|
|000018e0| 09 78 2e 66 6c 69 74 61 | 6c 69 63 20 3d 20 62 69 |.x.flita|lic = bi|
|000018f0| 74 62 6f 6f 6c 65 61 6e | 20 28 75 2e 73 74 79 6c |tboolean| (u.styl|
|00001900| 65 62 69 74 73 2e 66 6c | 69 74 61 6c 69 63 29 3b |ebits.fl|italic);|
|00001910| 0d 09 09 0d 09 09 78 2e | 66 6c 62 6f 6c 64 20 3d |......x.|flbold =|
|00001920| 20 62 69 74 62 6f 6f 6c | 65 61 6e 20 28 75 2e 73 | bitbool|ean (u.s|
|00001930| 74 79 6c 65 62 69 74 73 | 2e 66 6c 62 6f 6c 64 29 |tylebits|.flbold)|
|00001940| 3b 09 09 0d 09 09 7d 0d | 09 0d 09 2a 70 73 65 6c |;.....}.|...*psel|
|00001950| 69 6e 66 6f 20 3d 20 78 | 3b 0d 09 7d 20 2f 2a 73 |info = x|;..} /*s|
|00001960| 65 74 73 65 6c 65 63 74 | 69 6f 6e 73 74 79 6c 65 |etselect|ionstyle|
|00001970| 69 6e 66 6f 2a 2f 0d 09 | 0d 09 09 0d 76 6f 69 64 |info*/..|....void|
|00001980| 20 64 72 61 77 61 70 70 | 67 72 6f 77 69 63 6f 6e | drawapp|growicon|
|00001990| 20 28 61 70 70 77 69 6e | 64 6f 77 29 20 68 64 6c | (appwin|dow) hdl|
|000019a0| 61 70 70 77 69 6e 64 6f | 77 20 61 70 70 77 69 6e |appwindo|w appwin|
|000019b0| 64 6f 77 3b 20 7b 0d 09 | 0d 09 72 65 67 69 73 74 |dow; {..|..regist|
|000019c0| 65 72 20 57 69 6e 64 6f | 77 50 74 72 20 77 20 3d |er Windo|wPtr w =|
|000019d0| 20 28 2a 2a 61 70 70 77 | 69 6e 64 6f 77 29 2e 6d | (**appw|indow).m|
|000019e0| 61 63 77 69 6e 64 6f 77 | 3b 0d 09 0d 09 69 66 20 |acwindow|;....if |
|000019f0| 28 28 2a 2a 61 70 70 77 | 69 6e 64 6f 77 29 2e 66 |((**appw|indow).f|
|00001a00| 6c 70 72 69 6e 74 69 6e | 67 29 0d 09 09 72 65 74 |lprintin|g)...ret|
|00001a10| 75 72 6e 3b 0d 09 0d 09 | 69 66 20 28 61 70 70 2e |urn;....|if (app.|
|00001a20| 76 65 72 74 73 63 72 6f | 6c 6c 20 26 26 20 61 70 |vertscro|ll && ap|
|00001a30| 70 2e 68 6f 72 69 7a 73 | 63 72 6f 6c 6c 29 20 7b |p.horizs|croll) {|
|00001a40| 0d 09 09 0d 09 09 44 72 | 61 77 47 72 6f 77 49 63 |......Dr|awGrowIc|
|00001a50| 6f 6e 20 28 77 29 3b 0d | 09 09 7d 0d 09 65 6c 73 |on (w);.|..}..els|
|00001a60| 65 20 7b 0d 09 09 72 65 | 67 69 73 74 65 72 20 73 |e {...re|gister s|
|00001a70| 68 6f 72 74 20 77 69 64 | 74 68 20 3d 20 31 35 3b |hort wid|th = 15;|
|00001a80| 0d 09 09 52 65 63 74 20 | 72 70 6f 72 74 20 3d 20 |...Rect |rport = |
|00001a90| 28 2a 77 29 2e 70 6f 72 | 74 52 65 63 74 3b 0d 09 |(*w).por|tRect;..|
|00001aa0| 09 52 65 63 74 20 72 63 | 6c 69 70 3b 0d 09 09 0d |.Rect rc|lip;....|
|00001ab0| 09 09 72 63 6c 69 70 20 | 3d 20 72 70 6f 72 74 3b |..rclip |= rport;|
|00001ac0| 0d 09 09 0d 09 09 72 63 | 6c 69 70 2e 6c 65 66 74 |......rc|lip.left|
|00001ad0| 20 3d 20 72 63 6c 69 70 | 2e 72 69 67 68 74 20 2d | = rclip|.right -|
|00001ae0| 20 77 69 64 74 68 3b 0d | 09 09 09 0d 09 09 72 63 | width;.|......rc|
|00001af0| 6c 69 70 2e 74 6f 70 20 | 3d 20 72 63 6c 69 70 2e |lip.top |= rclip.|
|00001b00| 62 6f 74 74 6f 6d 20 2d | 20 77 69 64 74 68 3b 0d |bottom -| width;.|
|00001b10| 09 09 0d 09 09 70 75 73 | 68 63 6c 69 70 20 28 72 |.....pus|hclip (r|
|00001b20| 63 6c 69 70 29 3b 0d 09 | 09 0d 09 09 44 72 61 77 |clip);..|....Draw|
|00001b30| 47 72 6f 77 49 63 6f 6e | 20 28 77 29 3b 0d 09 09 |GrowIcon| (w);...|
|00001b40| 0d 09 09 70 6f 70 63 6c | 69 70 20 28 29 3b 0d 09 |...popcl|ip ();..|
|00001b50| 09 7d 0d 09 7d 20 2f 2a | 64 72 61 77 61 70 70 67 |.}..} /*|drawappg|
|00001b60| 72 6f 77 69 63 6f 6e 2a | 2f 0d 09 0d 0d 62 6f 6f |rowicon*|/....boo|
|00001b70| 6c 65 61 6e 20 61 70 70 | 70 75 73 68 77 69 6e 64 |lean app|pushwind|
|00001b80| 6f 77 20 28 61 70 70 77 | 69 6e 64 6f 77 29 20 68 |ow (appw|indow) h|
|00001b90| 64 6c 61 70 70 77 69 6e | 64 6f 77 20 61 70 70 77 |dlappwin|dow appw|
|00001ba0| 69 6e 64 6f 77 3b 20 7b | 0d 09 0d 09 72 65 74 75 |indow; {|....retu|
|00001bb0| 72 6e 20 28 70 75 73 68 | 6d 61 63 70 6f 72 74 20 |rn (push|macport |
|00001bc0| 28 28 2a 2a 61 70 70 77 | 69 6e 64 6f 77 29 2e 6d |((**appw|indow).m|
|00001bd0| 61 63 77 69 6e 64 6f 77 | 29 29 3b 0d 09 7d 20 2f |acwindow|));..} /|
|00001be0| 2a 61 70 70 70 75 73 68 | 77 69 6e 64 6f 77 2a 2f |*apppush|window*/|
|00001bf0| 0d 09 0d 0d 62 6f 6f 6c | 65 61 6e 20 61 70 70 70 |....bool|ean appp|
|00001c00| 6f 70 77 69 6e 64 6f 77 | 20 28 76 6f 69 64 29 20 |opwindow| (void) |
|00001c10| 7b 0d 09 0d 09 72 65 74 | 75 72 6e 20 28 70 6f 70 |{....ret|urn (pop|
|00001c20| 6d 61 63 70 6f 72 74 20 | 28 29 29 3b 0d 09 7d 20 |macport |());..} |
|00001c30| 2f 2a 61 70 70 70 6f 70 | 77 69 6e 64 6f 77 2a 2f |/*apppop|window*/|
|00001c40| 0d 09 0d 09 0d 62 6f 6f | 6c 65 61 6e 20 61 70 70 |.....boo|lean app|
|00001c50| 70 75 73 68 6f 72 69 67 | 69 6e 20 28 76 6f 69 64 |pushorig|in (void|
|00001c60| 29 20 7b 0d 0d 09 68 64 | 6c 61 70 70 77 69 6e 64 |) {...hd|lappwind|
|00001c70| 6f 77 20 68 61 20 3d 20 | 61 70 70 2e 61 70 70 77 |ow ha = |app.appw|
|00001c80| 69 6e 64 6f 77 3b 0d 09 | 0d 09 69 66 20 28 68 61 |indow;..|..if (ha|
|00001c90| 20 21 3d 20 6e 69 6c 29 | 20 7b 0d 09 0d 09 09 28 | != nil)| {.....(|
|00001ca0| 2a 2a 68 61 29 2e 6f 72 | 69 67 69 6e 70 75 73 68 |**ha).or|iginpush|
|00001cb0| 64 65 70 74 68 2b 2b 3b | 0d 09 09 0d 09 09 69 66 |depth++;|......if|
|00001cc0| 20 28 28 2a 2a 68 61 29 | 2e 6f 72 69 67 69 6e 70 | ((**ha)|.originp|
|00001cd0| 75 73 68 64 65 70 74 68 | 20 3d 3d 20 31 29 20 7b |ushdepth| == 1) {|
|00001ce0| 20 0d 09 09 0d 09 09 09 | 53 65 74 4f 72 69 67 69 | .......|SetOrigi|
|00001cf0| 6e 20 28 28 2a 2a 68 61 | 29 2e 73 63 72 6f 6c 6c |n ((**ha|).scroll|
|00001d00| 6f 72 69 67 69 6e 2e 68 | 2c 20 28 2a 2a 68 61 29 |origin.h|, (**ha)|
|00001d10| 2e 73 63 72 6f 6c 6c 6f | 72 69 67 69 6e 2e 76 29 |.scrollo|rigin.v)|
|00001d20| 3b 0d 09 09 0d 09 09 09 | 4f 66 66 73 65 74 52 67 |;.......|OffsetRg|
|00001d30| 6e 20 28 28 2a 28 2a 2a | 68 61 29 2e 6d 61 63 77 |n ((*(**|ha).macw|
|00001d40| 69 6e 64 6f 77 29 2e 63 | 6c 69 70 52 67 6e 2c 20 |indow).c|lipRgn, |
|00001d50| 28 2a 2a 68 61 29 2e 73 | 63 72 6f 6c 6c 6f 72 69 |(**ha).s|crollori|
|00001d60| 67 69 6e 2e 68 2c 20 28 | 2a 2a 68 61 29 2e 73 63 |gin.h, (|**ha).sc|
|00001d70| 72 6f 6c 6c 6f 72 69 67 | 69 6e 2e 76 29 3b 0d 09 |rollorig|in.v);..|
|00001d80| 09 09 7d 0d 09 09 7d 0d | 09 7d 20 2f 2a 61 70 70 |..}...}.|.} /*app|
|00001d90| 70 75 73 68 6f 72 69 67 | 69 6e 2a 2f 0d 09 0d 09 |pushorig|in*/....|
|00001da0| 0d 62 6f 6f 6c 65 61 6e | 20 61 70 70 70 6f 70 6f |.boolean| apppopo|
|00001db0| 72 69 67 69 6e 20 28 76 | 6f 69 64 29 20 7b 0d 0d |rigin (v|oid) {..|
|00001dc0| 09 68 64 6c 61 70 70 77 | 69 6e 64 6f 77 20 68 61 |.hdlappw|indow ha|
|00001dd0| 20 3d 20 61 70 70 2e 61 | 70 70 77 69 6e 64 6f 77 | = app.a|ppwindow|
|00001de0| 3b 0d 09 0d 09 69 66 20 | 28 68 61 20 21 3d 20 6e |;....if |(ha != n|
|00001df0| 69 6c 29 20 7b 0d 09 0d | 09 09 28 2a 2a 68 61 29 |il) {...|..(**ha)|
|00001e00| 2e 6f 72 69 67 69 6e 70 | 75 73 68 64 65 70 74 68 |.originp|ushdepth|
|00001e10| 2d 2d 3b 0d 09 0d 09 09 | 69 66 20 28 28 2a 2a 68 |--;.....|if ((**h|
|00001e20| 61 29 2e 6f 72 69 67 69 | 6e 70 75 73 68 64 65 70 |a).origi|npushdep|
|00001e30| 74 68 20 3d 3d 20 30 29 | 20 7b 20 0d 09 09 0d 09 |th == 0)| { .....|
|00001e40| 09 09 4f 66 66 73 65 74 | 52 67 6e 20 28 28 2a 28 |..Offset|Rgn ((*(|
|00001e50| 2a 2a 68 61 29 2e 6d 61 | 63 77 69 6e 64 6f 77 29 |**ha).ma|cwindow)|
|00001e60| 2e 63 6c 69 70 52 67 6e | 2c 20 2d 28 2a 2a 68 61 |.clipRgn|, -(**ha|
|00001e70| 29 2e 73 63 72 6f 6c 6c | 6f 72 69 67 69 6e 2e 68 |).scroll|origin.h|
|00001e80| 2c 20 2d 28 2a 2a 68 61 | 29 2e 73 63 72 6f 6c 6c |, -(**ha|).scroll|
|00001e90| 6f 72 69 67 69 6e 2e 76 | 29 3b 0d 09 09 0d 09 09 |origin.v|);......|
|00001ea0| 09 53 65 74 4f 72 69 67 | 69 6e 20 28 30 2c 20 30 |.SetOrig|in (0, 0|
|00001eb0| 29 3b 0d 09 09 09 7d 0d | 09 09 7d 0d 09 7d 20 2f |);....}.|..}..} /|
|00001ec0| 2a 61 70 70 70 6f 70 6f | 72 69 67 69 6e 2a 2f 0d |*apppopo|rigin*/.|
|00001ed0| 09 0d 09 0d 62 6f 6f 6c | 65 61 6e 20 61 70 70 70 |....bool|ean appp|
|00001ee0| 75 73 68 63 6c 69 70 20 | 28 52 65 63 74 20 72 29 |ushclip |(Rect r)|
|00001ef0| 20 7b 0d 0d 09 2f 2a 0d | 09 74 68 69 73 20 66 72 | {.../*.|.this fr|
|00001f00| 6f 6e 74 2d 65 6e 64 20 | 66 6f 72 20 70 75 73 68 |ont-end |for push|
|00001f10| 63 6c 69 70 20 72 65 73 | 70 65 63 74 73 20 74 68 |clip res|pects th|
|00001f20| 65 20 63 75 72 72 65 6e | 74 20 73 65 74 74 69 6e |e curren|t settin|
|00001f30| 67 73 20 6f 66 20 74 68 | 65 20 6f 72 69 67 69 6e |gs of th|e origin|
|00001f40| 2e 20 61 70 70 6c 65 74 | 73 0d 09 73 68 6f 75 6c |. applet|s..shoul|
|00001f50| 64 20 63 61 6c 6c 20 74 | 68 69 73 20 72 6f 75 74 |d call t|his rout|
|00001f60| 69 6e 65 20 69 6e 73 74 | 65 61 64 20 6f 66 20 63 |ine inst|ead of c|
|00001f70| 61 6c 6c 69 6e 67 20 74 | 68 65 20 71 75 69 63 6b |alling t|he quick|
|00001f80| 64 72 61 77 2e 63 20 72 | 6f 75 74 69 6e 65 2e 0d |draw.c r|outine..|
|00001f90| 09 2a 2f 0d 09 0d 09 68 | 64 6c 61 70 70 77 69 6e |.*/....h|dlappwin|
|00001fa0| 64 6f 77 20 68 61 20 3d | 20 61 70 70 2e 61 70 70 |dow ha =| app.app|
|00001fb0| 77 69 6e 64 6f 77 3b 0d | 09 0d 09 70 75 73 68 63 |window;.|...pushc|
|00001fc0| 6c 69 70 20 28 72 29 3b | 0d 09 0d 09 69 66 20 28 |lip (r);|....if (|
|00001fd0| 28 2a 2a 68 61 29 2e 6f | 72 69 67 69 6e 70 75 73 |(**ha).o|riginpus|
|00001fe0| 68 64 65 70 74 68 20 3e | 20 30 29 20 0d 09 09 4f |hdepth >| 0) ...O|
|00001ff0| 66 66 73 65 74 52 67 6e | 20 28 28 2a 28 2a 2a 68 |ffsetRgn| ((*(**h|
|00002000| 61 29 2e 6d 61 63 77 69 | 6e 64 6f 77 29 2e 63 6c |a).macwi|ndow).cl|
|00002010| 69 70 52 67 6e 2c 20 2d | 28 2a 2a 68 61 29 2e 73 |ipRgn, -|(**ha).s|
|00002020| 63 72 6f 6c 6c 6f 72 69 | 67 69 6e 2e 68 2c 20 2d |crollori|gin.h, -|
|00002030| 28 2a 2a 68 61 29 2e 73 | 63 72 6f 6c 6c 6f 72 69 |(**ha).s|crollori|
|00002040| 67 69 6e 2e 76 29 3b 0d | 09 7d 20 2f 2a 61 70 70 |gin.v);.|.} /*app|
|00002050| 70 75 73 68 63 6c 69 70 | 2a 2f 0d 09 0d 09 0d 62 |pushclip|*/.....b|
|00002060| 6f 6f 6c 65 61 6e 20 61 | 70 70 70 6f 70 63 6c 69 |oolean a|pppopcli|
|00002070| 70 20 28 76 6f 69 64 29 | 20 7b 0d 0d 09 2f 2a 0d |p (void)| {.../*.|
|00002080| 09 74 68 69 73 20 66 72 | 6f 6e 74 2d 65 6e 64 20 |.this fr|ont-end |
|00002090| 66 6f 72 20 70 6f 70 63 | 6c 69 70 20 72 65 73 70 |for popc|lip resp|
|000020a0| 65 63 74 73 20 74 68 65 | 20 63 75 72 72 65 6e 74 |ects the| current|
|000020b0| 20 73 65 74 74 69 6e 67 | 73 20 6f 66 20 74 68 65 | setting|s of the|
|000020c0| 20 6f 72 69 67 69 6e 2e | 20 61 70 70 6c 65 74 73 | origin.| applets|
|000020d0| 0d 09 73 68 6f 75 6c 64 | 20 63 61 6c 6c 20 74 68 |..should| call th|
|000020e0| 69 73 20 72 6f 75 74 69 | 6e 65 20 69 6e 73 74 65 |is routi|ne inste|
|000020f0| 61 64 20 6f 66 20 63 61 | 6c 6c 69 6e 67 20 74 68 |ad of ca|lling th|
|00002100| 65 20 71 75 69 63 6b 64 | 72 61 77 2e 63 20 72 6f |e quickd|raw.c ro|
|00002110| 75 74 69 6e 65 2e 0d 09 | 2a 2f 0d 09 0d 09 68 64 |utine...|*/....hd|
|00002120| 6c 61 70 70 77 69 6e 64 | 6f 77 20 68 61 20 3d 20 |lappwind|ow ha = |
|00002130| 61 70 70 2e 61 70 70 77 | 69 6e 64 6f 77 3b 0d 09 |app.appw|indow;..|
|00002140| 0d 09 70 6f 70 63 6c 69 | 70 20 28 29 3b 0d 09 0d |..popcli|p ();...|
|00002150| 09 69 66 20 28 28 2a 2a | 68 61 29 2e 6f 72 69 67 |.if ((**|ha).orig|
|00002160| 69 6e 70 75 73 68 64 65 | 70 74 68 20 3e 20 30 29 |inpushde|pth > 0)|
|00002170| 20 0d 09 09 4f 66 66 73 | 65 74 52 67 6e 20 28 28 | ...Offs|etRgn ((|
|00002180| 2a 28 2a 2a 68 61 29 2e | 6d 61 63 77 69 6e 64 6f |*(**ha).|macwindo|
|00002190| 77 29 2e 63 6c 69 70 52 | 67 6e 2c 20 2d 28 2a 2a |w).clipR|gn, -(**|
|000021a0| 68 61 29 2e 73 63 72 6f | 6c 6c 6f 72 69 67 69 6e |ha).scro|llorigin|
|000021b0| 2e 68 2c 20 2d 28 2a 2a | 68 61 29 2e 73 63 72 6f |.h, -(**|ha).scro|
|000021c0| 6c 6c 6f 72 69 67 69 6e | 2e 76 29 3b 0d 09 7d 20 |llorigin|.v);..} |
|000021d0| 2f 2a 61 70 70 70 6f 70 | 63 6c 69 70 2a 2f 0d 09 |/*apppop|clip*/..|
|000021e0| 0d 09 0d 76 6f 69 64 20 | 61 70 70 70 72 65 63 61 |...void |apppreca|
|000021f0| 6c 6c 62 61 63 6b 20 28 | 76 6f 69 64 29 20 7b 0d |llback (|void) {.|
|00002200| 09 0d 09 68 64 6c 61 70 | 70 77 69 6e 64 6f 77 20 |...hdlap|pwindow |
|00002210| 68 61 20 3d 20 61 70 70 | 2e 61 70 70 77 69 6e 64 |ha = app|.appwind|
|00002220| 6f 77 3b 0d 09 0d 09 69 | 66 20 28 68 61 20 21 3d |ow;....i|f (ha !=|
|00002230| 20 6e 69 6c 29 20 7b 0d | 09 09 0d 09 09 70 75 73 | nil) {.|.....pus|
|00002240| 68 63 6c 69 70 20 28 28 | 2a 2a 68 61 29 2e 63 6f |hclip ((|**ha).co|
|00002250| 6e 74 65 6e 74 72 65 63 | 74 29 3b 0d 09 09 09 0d |ntentrec|t);.....|
|00002260| 09 09 61 70 70 70 75 73 | 68 6f 72 69 67 69 6e 20 |..apppus|horigin |
|00002270| 28 29 3b 0d 09 09 7d 0d | 09 0d 09 28 2a 61 70 70 |();...}.|...(*app|
|00002280| 2e 73 65 74 67 6c 6f 62 | 61 6c 73 63 61 6c 6c 62 |.setglob|alscallb|
|00002290| 61 63 6b 29 20 28 29 3b | 20 2f 2a 61 70 70 20 63 |ack) ();| /*app c|
|000022a0| 61 6e 20 63 6f 70 79 20 | 66 72 6f 6d 20 61 70 70 |an copy |from app|
|000022b0| 2e 61 70 70 64 61 74 61 | 2c 20 61 70 70 77 69 6e |.appdata|, appwin|
|000022c0| 64 6f 77 20 74 6f 20 69 | 74 73 20 6f 77 6e 20 67 |dow to i|ts own g|
|000022d0| 6c 6f 62 61 6c 73 2a 2f | 0d 09 7d 20 2f 2a 61 70 |lobals*/|..} /*ap|
|000022e0| 70 70 72 65 63 61 6c 6c | 62 61 63 6b 2a 2f 0d 09 |pprecall|back*/..|
|000022f0| 0d 09 0d 76 6f 69 64 20 | 61 70 70 70 6f 73 74 63 |...void |apppostc|
|00002300| 61 6c 6c 62 61 63 6b 20 | 28 76 6f 69 64 29 20 7b |allback |(void) {|
|00002310| 0d 09 0d 09 68 64 6c 61 | 70 70 77 69 6e 64 6f 77 |....hdla|ppwindow|
|00002320| 20 68 61 20 3d 20 61 70 | 70 2e 61 70 70 77 69 6e | ha = ap|p.appwin|
|00002330| 64 6f 77 3b 0d 09 09 0d | 09 69 66 20 28 68 61 20 |dow;....|.if (ha |
|00002340| 21 3d 20 6e 69 6c 29 20 | 7b 0d 09 0d 09 09 61 70 |!= nil) |{.....ap|
|00002350| 70 70 6f 70 6f 72 69 67 | 69 6e 20 28 29 3b 0d 09 |ppoporig|in ();..|
|00002360| 0d 09 09 70 6f 70 63 6c | 69 70 20 28 29 3b 0d 09 |...popcl|ip ();..|
|00002370| 09 7d 0d 09 7d 20 2f 2a | 61 70 70 70 6f 73 74 63 |.}..} /*|apppostc|
|00002380| 61 6c 6c 62 61 63 6b 2a | 2f 0d 09 0d 09 0d 62 6f |allback*|/.....bo|
|00002390| 6f 6c 65 61 6e 20 61 70 | 70 6f 70 65 6e 62 69 74 |olean ap|popenbit|
|000023a0| 6d 61 70 20 28 72 2c 20 | 61 70 70 77 69 6e 64 6f |map (r, |appwindo|
|000023b0| 77 29 20 52 65 63 74 20 | 72 3b 20 68 64 6c 61 70 |w) Rect |r; hdlap|
|000023c0| 70 77 69 6e 64 6f 77 20 | 61 70 70 77 69 6e 64 6f |pwindow |appwindo|
|000023d0| 77 3b 20 7b 0d 09 0d 09 | 72 65 74 75 72 6e 20 28 |w; {....|return (|
|000023e0| 6f 70 65 6e 62 69 74 6d | 61 70 20 28 72 2c 20 28 |openbitm|ap (r, (|
|000023f0| 2a 2a 61 70 70 77 69 6e | 64 6f 77 29 2e 6d 61 63 |**appwin|dow).mac|
|00002400| 77 69 6e 64 6f 77 29 29 | 3b 0d 09 7d 20 2f 2a 61 |window))|;..} /*a|
|00002410| 70 70 6f 70 65 6e 62 69 | 74 6d 61 70 2a 2f 0d 09 |ppopenbi|tmap*/..|
|00002420| 0d 0d 62 6f 6f 6c 65 61 | 6e 20 61 70 70 63 6c 6f |..boolea|n appclo|
|00002430| 73 65 62 69 74 6d 61 70 | 20 28 61 70 70 77 69 6e |sebitmap| (appwin|
|00002440| 64 6f 77 29 20 68 64 6c | 61 70 70 77 69 6e 64 6f |dow) hdl|appwindo|
|00002450| 77 20 61 70 70 77 69 6e | 64 6f 77 3b 20 7b 0d 09 |w appwin|dow; {..|
|00002460| 0d 09 63 6c 6f 73 65 62 | 69 74 6d 61 70 20 28 28 |..closeb|itmap ((|
|00002470| 2a 2a 61 70 70 77 69 6e | 64 6f 77 29 2e 6d 61 63 |**appwin|dow).mac|
|00002480| 77 69 6e 64 6f 77 29 3b | 0d 09 0d 09 72 65 74 75 |window);|....retu|
|00002490| 72 6e 20 28 74 72 75 65 | 29 3b 0d 09 7d 20 2f 2a |rn (true|);..} /*|
|000024a0| 61 70 70 63 6c 6f 73 65 | 62 69 74 6d 61 70 2a 2f |appclose|bitmap*/|
|000024b0| 0d 09 0d 0d 76 6f 69 64 | 20 67 65 74 61 70 70 64 |....void| getappd|
|000024c0| 61 74 61 20 28 77 2c 20 | 61 70 70 64 61 74 61 29 |ata (w, |appdata)|
|000024d0| 20 57 69 6e 64 6f 77 50 | 74 72 20 77 3b 20 48 61 | WindowP|tr w; Ha|
|000024e0| 6e 64 6c 65 20 2a 61 70 | 70 64 61 74 61 3b 20 7b |ndle *ap|pdata; {|
|000024f0| 0d 09 0d 09 2f 2a 0d 09 | 61 20 77 69 6e 64 6f 77 |..../*..|a window|
|00002500| 27 73 20 72 65 66 63 6f | 6e 20 66 69 65 6c 64 20 |'s refco|n field |
|00002510| 70 6f 69 6e 74 73 20 74 | 6f 20 74 68 65 20 61 70 |points t|o the ap|
|00002520| 70 77 69 6e 64 6f 77 20 | 72 65 63 6f 72 64 2c 20 |pwindow |record, |
|00002530| 77 68 69 63 68 20 69 6e | 20 74 75 72 6e 20 0d 09 |which in| turn ..|
|00002540| 70 6f 69 6e 74 73 20 74 | 6f 20 74 68 65 20 61 70 |points t|o the ap|
|00002550| 70 6c 65 74 27 73 20 64 | 61 74 61 20 69 6e 20 74 |plet's d|ata in t|
|00002560| 68 65 20 61 70 70 64 61 | 74 61 20 66 69 65 6c 64 |he appda|ta field|
|00002570| 2e 0d 09 2a 2f 0d 09 0d | 09 72 65 67 69 73 74 65 |...*/...|.registe|
|00002580| 72 20 68 64 6c 61 70 70 | 77 69 6e 64 6f 77 20 68 |r hdlapp|window h|
|00002590| 61 20 3d 20 28 68 64 6c | 61 70 70 77 69 6e 64 6f |a = (hdl|appwindo|
|000025a0| 77 29 20 28 2a 28 57 69 | 6e 64 6f 77 50 65 65 6b |w) (*(Wi|ndowPeek|
|000025b0| 29 20 77 29 2e 72 65 66 | 43 6f 6e 3b 0d 09 0d 09 |) w).ref|Con;....|
|000025c0| 69 66 20 28 68 61 20 3d | 3d 20 6e 69 6c 29 0d 09 |if (ha =|= nil)..|
|000025d0| 09 2a 61 70 70 64 61 74 | 61 20 3d 20 6e 69 6c 3b |.*appdat|a = nil;|
|000025e0| 0d 09 65 6c 73 65 0d 09 | 09 2a 61 70 70 64 61 74 |..else..|.*appdat|
|000025f0| 61 20 3d 20 28 2a 2a 68 | 61 29 2e 61 70 70 64 61 |a = (**h|a).appda|
|00002600| 74 61 3b 0d 09 7d 20 2f | 2a 67 65 74 61 70 70 64 |ta;..} /|*getappd|
|00002610| 61 74 61 2a 2f 0d 09 0d | 0d 73 74 61 74 69 63 20 |ata*/...|.static |
|00002620| 62 6f 6f 6c 65 61 6e 20 | 67 65 74 77 69 6e 64 6f |boolean |getwindo|
|00002630| 77 72 65 66 63 6f 6e 20 | 28 77 2c 20 72 65 66 63 |wrefcon |(w, refc|
|00002640| 6f 6e 29 20 57 69 6e 64 | 6f 77 50 74 72 20 77 3b |on) Wind|owPtr w;|
|00002650| 20 6c 6f 6e 67 20 2a 72 | 65 66 63 6f 6e 3b 20 7b | long *r|efcon; {|
|00002660| 0d 09 0d 09 2f 2a 0d 09 | 39 2f 33 30 2f 39 32 20 |..../*..|9/30/92 |
|00002670| 64 6d 62 3a 20 63 61 72 | 65 66 75 6c 6c 79 20 65 |dmb: car|efully e|
|00002680| 6e 73 75 72 65 20 74 68 | 61 74 20 74 68 65 20 77 |nsure th|at the w|
|00002690| 69 6e 64 6f 77 20 69 73 | 20 6f 6e 65 20 74 68 61 |indow is| one tha|
|000026a0| 74 20 69 73 20 62 65 69 | 6e 67 20 6d 61 6e 61 67 |t is bei|ng manag|
|000026b0| 65 64 20 0d 09 62 79 20 | 74 68 65 20 41 70 70 6c |ed ..by |the Appl|
|000026c0| 65 74 20 54 6f 6f 6c 6b | 69 74 20 2d 2d 20 75 73 |et Toolk|it -- us|
|000026d0| 65 20 61 20 68 65 75 72 | 69 73 74 69 63 20 74 68 |e a heur|istic th|
|000026e0| 61 74 20 6d 61 6b 65 73 | 20 73 65 6e 73 65 20 2d |at makes| sense -|
|000026f0| 2d 20 73 65 65 20 62 65 | 6c 6f 77 2e 0d 09 0d 09 |- see be|low.....|
|00002700| 72 65 74 75 72 6e 20 66 | 61 6c 73 65 20 69 66 20 |return f|alse if |
|00002710| 61 20 76 61 6c 69 64 20 | 72 65 66 6f 6e 20 69 73 |a valid |refon is|
|00002720| 6e 27 74 20 65 78 74 72 | 61 63 74 65 64 2e 0d 09 |n't extr|acted...|
|00002730| 2a 2f 0d 09 0d 09 72 65 | 67 69 73 74 65 72 20 6c |*/....re|gister l|
|00002740| 6f 6e 67 20 78 3b 0d 09 | 0d 09 2a 72 65 66 63 6f |ong x;..|..*refco|
|00002750| 6e 20 3d 20 30 3b 20 2f | 2a 64 65 66 61 75 6c 74 |n = 0; /|*default|
|00002760| 2a 2f 0d 09 0d 09 78 20 | 3d 20 28 2a 28 57 69 6e |*/....x |= (*(Win|
|00002770| 64 6f 77 50 65 65 6b 29 | 20 77 29 2e 72 65 66 43 |dowPeek)| w).refC|
|00002780| 6f 6e 3b 0d 09 0d 09 69 | 66 20 28 78 20 3d 3d 20 |on;....i|f (x == |
|00002790| 30 29 0d 09 09 72 65 74 | 75 72 6e 20 28 66 61 6c |0)...ret|urn (fal|
|000027a0| 73 65 29 3b 0d 09 0d 09 | 69 66 20 28 6f 64 64 20 |se);....|if (odd |
|000027b0| 28 78 29 29 0d 09 09 72 | 65 74 75 72 6e 20 28 66 |(x))...r|eturn (f|
|000027c0| 61 6c 73 65 29 3b 0d 09 | 0d 09 69 66 20 28 67 65 |alse);..|..if (ge|
|000027d0| 74 68 61 6e 64 6c 65 73 | 69 7a 65 20 28 28 48 61 |thandles|ize ((Ha|
|000027e0| 6e 64 6c 65 29 20 78 29 | 20 3c 20 73 69 7a 65 6f |ndle) x)| < sizeo|
|000027f0| 66 20 28 74 79 61 70 70 | 77 69 6e 64 6f 77 29 29 |f (tyapp|window))|
|00002800| 0d 09 09 72 65 74 75 72 | 6e 20 28 66 61 6c 73 65 |...retur|n (false|
|00002810| 29 3b 0d 09 0d 09 69 66 | 20 28 28 2a 2a 28 68 64 |);....if| ((**(hd|
|00002820| 6c 61 70 70 77 69 6e 64 | 6f 77 29 20 78 29 2e 6d |lappwind|ow) x).m|
|00002830| 61 63 77 69 6e 64 6f 77 | 20 21 3d 20 77 29 20 2f |acwindow| != w) /|
|00002840| 2a 73 65 6e 73 69 62 6c | 65 20 68 65 75 72 69 73 |*sensibl|e heuris|
|00002850| 74 69 63 20 74 6f 20 73 | 6b 69 70 20 6f 74 68 65 |tic to s|kip othe|
|00002860| 72 20 70 65 6f 70 6c 65 | 27 73 20 77 69 6e 64 6f |r people|'s windo|
|00002870| 77 73 2a 2f 0d 09 09 72 | 65 74 75 72 6e 20 28 66 |ws*/...r|eturn (f|
|00002880| 61 6c 73 65 29 3b 0d 09 | 0d 09 2a 72 65 66 63 6f |alse);..|..*refco|
|00002890| 6e 20 3d 20 78 3b 0d 09 | 0d 09 72 65 74 75 72 6e |n = x;..|..return|
|000028a0| 20 28 74 72 75 65 29 3b | 0d 09 7d 20 2f 2a 67 65 | (true);|..} /*ge|
|000028b0| 74 77 69 6e 64 6f 77 72 | 65 66 63 6f 6e 2a 2f 0d |twindowr|efcon*/.|
|000028c0| 0d 0d 76 6f 69 64 20 67 | 65 74 61 70 70 77 69 6e |..void g|etappwin|
|000028d0| 64 6f 77 74 69 74 6c 65 | 20 28 61 70 70 77 69 6e |dowtitle| (appwin|
|000028e0| 64 6f 77 2c 20 62 73 29 | 20 68 64 6c 61 70 70 77 |dow, bs)| hdlappw|
|000028f0| 69 6e 64 6f 77 20 61 70 | 70 77 69 6e 64 6f 77 3b |indow ap|pwindow;|
|00002900| 20 62 69 67 73 74 72 69 | 6e 67 20 62 73 3b 20 7b | bigstri|ng bs; {|
|00002910| 0d 09 0d 09 69 66 20 28 | 61 70 70 77 69 6e 64 6f |....if (|appwindo|
|00002920| 77 20 3d 3d 20 6e 69 6c | 29 0d 09 09 73 65 74 73 |w == nil|)...sets|
|00002930| 74 72 69 6e 67 6c 65 6e | 67 74 68 20 28 62 73 2c |tringlen|gth (bs,|
|00002940| 20 30 29 3b 0d 09 65 6c | 73 65 0d 09 09 47 65 74 | 0);..el|se...Get|
|00002950| 57 54 69 74 6c 65 20 28 | 28 2a 2a 61 70 70 77 69 |WTitle (|(**appwi|
|00002960| 6e 64 6f 77 29 2e 6d 61 | 63 77 69 6e 64 6f 77 2c |ndow).ma|cwindow,|
|00002970| 20 62 73 29 3b 0d 09 7d | 20 2f 2a 73 65 6c 65 63 | bs);..}| /*selec|
|00002980| 74 61 70 70 77 69 6e 64 | 6f 77 2a 2f 0d 09 0d 09 |tappwind|ow*/....|
|00002990| 0d 76 6f 69 64 20 73 65 | 74 61 70 70 77 69 6e 64 |.void se|tappwind|
|000029a0| 6f 77 74 69 74 6c 65 20 | 28 61 70 70 77 69 6e 64 |owtitle |(appwind|
|000029b0| 6f 77 2c 20 62 73 29 20 | 68 64 6c 61 70 70 77 69 |ow, bs) |hdlappwi|
|000029c0| 6e 64 6f 77 20 61 70 70 | 77 69 6e 64 6f 77 3b 20 |ndow app|window; |
|000029d0| 62 69 67 73 74 72 69 6e | 67 20 62 73 3b 20 7b 0d |bigstrin|g bs; {.|
|000029e0| 09 0d 09 53 65 74 57 54 | 69 74 6c 65 20 28 28 2a |...SetWT|itle ((*|
|000029f0| 2a 61 70 70 77 69 6e 64 | 6f 77 29 2e 6d 61 63 77 |*appwind|ow).macw|
|00002a00| 69 6e 64 6f 77 2c 20 62 | 73 29 3b 0d 09 7d 20 2f |indow, b|s);..} /|
|00002a10| 2a 73 65 74 61 70 70 77 | 69 6e 64 6f 77 74 69 74 |*setappw|indowtit|
|00002a20| 6c 65 2a 2f 0d 09 0d 0d | 76 6f 69 64 20 73 68 6f |le*/....|void sho|
|00002a30| 77 61 70 70 77 69 6e 64 | 6f 77 20 28 61 70 70 77 |wappwind|ow (appw|
|00002a40| 69 6e 64 6f 77 29 20 68 | 64 6c 61 70 70 77 69 6e |indow) h|dlappwin|
|00002a50| 64 6f 77 20 61 70 70 77 | 69 6e 64 6f 77 3b 20 7b |dow appw|indow; {|
|00002a60| 0d 09 0d 09 53 68 6f 77 | 57 69 6e 64 6f 77 20 28 |....Show|Window (|
|00002a70| 28 2a 2a 61 70 70 77 69 | 6e 64 6f 77 29 2e 6d 61 |(**appwi|ndow).ma|
|00002a80| 63 77 69 6e 64 6f 77 29 | 3b 0d 09 7d 20 2f 2a 73 |cwindow)|;..} /*s|
|00002a90| 68 6f 77 61 70 70 77 69 | 6e 64 6f 77 2a 2f 0d 09 |howappwi|ndow*/..|
|00002aa0| 0d 09 0d 76 6f 69 64 20 | 73 65 6c 65 63 74 61 70 |...void |selectap|
|00002ab0| 70 77 69 6e 64 6f 77 20 | 28 61 70 70 77 69 6e 64 |pwindow |(appwind|
|00002ac0| 6f 77 29 20 68 64 6c 61 | 70 70 77 69 6e 64 6f 77 |ow) hdla|ppwindow|
|00002ad0| 20 61 70 70 77 69 6e 64 | 6f 77 3b 20 7b 0d 0d 09 | appwind|ow; {...|
|00002ae0| 53 65 6c 65 63 74 57 69 | 6e 64 6f 77 20 28 28 2a |SelectWi|ndow ((*|
|00002af0| 2a 61 70 70 77 69 6e 64 | 6f 77 29 2e 6d 61 63 77 |*appwind|ow).macw|
|00002b00| 69 6e 64 6f 77 29 3b 0d | 09 7d 20 2f 2a 73 65 6c |indow);.|.} /*sel|
|00002b10| 65 63 74 61 70 70 77 69 | 6e 64 6f 77 2a 2f 0d 09 |ectappwi|ndow*/..|
|00002b20| 0d 09 0d 76 6f 69 64 20 | 69 6e 76 61 6c 61 70 70 |...void |invalapp|
|00002b30| 77 69 6e 64 6f 77 20 28 | 61 70 70 77 69 6e 64 6f |window (|appwindo|
|00002b40| 77 2c 20 66 6c 65 72 61 | 73 65 29 20 68 64 6c 61 |w, flera|se) hdla|
|00002b50| 70 70 77 69 6e 64 6f 77 | 20 61 70 70 77 69 6e 64 |ppwindow| appwind|
|00002b60| 6f 77 3b 20 62 6f 6f 6c | 65 61 6e 20 66 6c 65 72 |ow; bool|ean fler|
|00002b70| 61 73 65 3b 20 7b 0d 09 | 0d 09 52 65 63 74 20 72 |ase; {..|..Rect r|
|00002b80| 3b 0d 09 0d 09 70 75 73 | 68 6d 61 63 70 6f 72 74 |;....pus|hmacport|
|00002b90| 20 28 28 2a 2a 61 70 70 | 77 69 6e 64 6f 77 29 2e | ((**app|window).|
|00002ba0| 6d 61 63 77 69 6e 64 6f | 77 29 3b 20 0d 09 0d 09 |macwindo|w); ....|
|00002bb0| 72 20 3d 20 28 2a 2a 61 | 70 70 77 69 6e 64 6f 77 |r = (**a|ppwindow|
|00002bc0| 29 2e 77 69 6e 64 6f 77 | 72 65 63 74 3b 0d 09 0d |).window|rect;...|
|00002bd0| 09 69 6e 76 61 6c 72 65 | 63 74 20 28 72 29 3b 0d |.invalre|ct (r);.|
|00002be0| 09 0d 09 69 66 20 28 66 | 6c 65 72 61 73 65 29 20 |...if (f|lerase) |
|00002bf0| 0d 09 09 61 70 70 65 72 | 61 73 65 72 65 63 74 20 |...apper|aserect |
|00002c00| 28 72 29 3b 0d 09 09 0d | 09 70 6f 70 6d 61 63 70 |(r);....|.popmacp|
|00002c10| 6f 72 74 20 28 29 3b 0d | 09 7d 20 2f 2a 69 6e 76 |ort ();.|.} /*inv|
|00002c20| 61 6c 61 70 70 77 69 6e | 64 6f 77 2a 2f 0d 09 0d |alappwin|dow*/...|
|00002c30| 09 0d 76 6f 69 64 20 73 | 65 74 61 70 70 77 69 6e |..void s|etappwin|
|00002c40| 64 6f 77 20 28 61 70 70 | 77 69 6e 64 6f 77 29 20 |dow (app|window) |
|00002c50| 68 64 6c 61 70 70 77 69 | 6e 64 6f 77 20 61 70 70 |hdlappwi|ndow app|
|00002c60| 77 69 6e 64 6f 77 3b 20 | 7b 0d 09 0d 09 72 65 67 |window; |{....reg|
|00002c70| 69 73 74 65 72 20 68 64 | 6c 61 70 70 77 69 6e 64 |ister hd|lappwind|
|00002c80| 6f 77 20 68 61 20 3d 20 | 61 70 70 77 69 6e 64 6f |ow ha = |appwindo|
|00002c90| 77 3b 0d 09 0d 09 61 70 | 70 2e 61 70 70 77 69 6e |w;....ap|p.appwin|
|00002ca0| 64 6f 77 20 3d 20 68 61 | 3b 0d 09 09 0d 09 69 66 |dow = ha|;.....if|
|00002cb0| 20 28 68 61 20 3d 3d 20 | 6e 69 6c 29 20 7b 0d 09 | (ha == |nil) {..|
|00002cc0| 09 0d 09 09 61 70 70 2e | 61 70 70 64 61 74 61 20 |....app.|appdata |
|00002cd0| 3d 20 6e 69 6c 3b 0d 09 | 09 7d 0d 09 65 6c 73 65 |= nil;..|.}..else|
|00002ce0| 20 7b 0d 09 09 61 70 70 | 2e 61 70 70 64 61 74 61 | {...app|.appdata|
|00002cf0| 20 3d 20 28 2a 2a 68 61 | 29 2e 61 70 70 64 61 74 | = (**ha|).appdat|
|00002d00| 61 3b 0d 09 09 0d 09 09 | 28 2a 61 70 70 2e 73 65 |a;......|(*app.se|
|00002d10| 74 67 6c 6f 62 61 6c 73 | 63 61 6c 6c 62 61 63 6b |tglobals|callback|
|00002d20| 29 20 28 29 3b 20 2f 2a | 61 70 70 20 63 61 6e 20 |) (); /*|app can |
|00002d30| 63 6f 70 79 20 66 72 6f | 6d 20 61 70 70 2e 61 70 |copy fro|m app.ap|
|00002d40| 70 64 61 74 61 20 74 6f | 20 69 74 73 20 6f 77 6e |pdata to| its own|
|00002d50| 20 67 6c 6f 62 61 6c 73 | 2a 2f 0d 09 09 0d 09 09 | globals|*/......|
|00002d60| 53 65 74 50 6f 72 74 20 | 28 28 2a 2a 68 61 29 2e |SetPort |((**ha).|
|00002d70| 6d 61 63 77 69 6e 64 6f | 77 29 3b 0d 09 09 0d 09 |macwindo|w);.....|
|00002d80| 09 43 6c 69 70 52 65 63 | 74 20 28 26 28 2a 2a 68 |.ClipRec|t (&(**h|
|00002d90| 61 29 2e 63 6f 6e 74 65 | 6e 74 72 65 63 74 29 3b |a).conte|ntrect);|
|00002da0| 0d 09 09 7d 0d 09 7d 20 | 2f 2a 73 65 74 61 70 70 |...}..} |/*setapp|
|00002db0| 77 69 6e 64 6f 77 2a 2f | 0d 09 0d 09 0d 62 6f 6f |window*/|.....boo|
|00002dc0| 6c 65 61 6e 20 61 70 70 | 72 65 63 74 6e 65 65 64 |lean app|rectneed|
|00002dd0| 73 75 70 64 61 74 65 20 | 28 52 65 63 74 20 72 29 |supdate |(Rect r)|
|00002de0| 20 7b 0d 09 0d 09 72 65 | 67 69 73 74 65 72 20 57 | {....re|gister W|
|00002df0| 69 6e 64 6f 77 50 74 72 | 20 77 20 3d 20 28 2a 2a |indowPtr| w = (**|
|00002e00| 61 70 70 2e 61 70 70 77 | 69 6e 64 6f 77 29 2e 6d |app.appw|indow).m|
|00002e10| 61 63 77 69 6e 64 6f 77 | 3b 0d 09 0d 09 72 65 74 |acwindow|;....ret|
|00002e20| 75 72 6e 20 28 52 65 63 | 74 49 6e 52 67 6e 20 28 |urn (Rec|tInRgn (|
|00002e30| 26 72 2c 20 28 2a 77 29 | 2e 76 69 73 52 67 6e 29 |&r, (*w)|.visRgn)|
|00002e40| 29 3b 0d 09 7d 20 2f 2a | 61 70 70 72 65 63 74 6e |);..} /*|apprectn|
|00002e50| 65 65 64 73 75 70 64 61 | 74 65 2a 2f 0d 09 0d 09 |eedsupda|te*/....|
|00002e60| 0d 76 6f 69 64 20 61 70 | 70 69 6e 76 61 6c 73 74 |.void ap|pinvalst|
|00002e70| 61 74 75 73 73 65 70 61 | 72 61 74 6f 72 20 28 76 |atussepa|rator (v|
|00002e80| 6f 69 64 29 20 7b 0d 09 | 0d 09 52 65 63 74 20 72 |oid) {..|..Rect r|
|00002e90| 20 3d 20 28 2a 2a 61 70 | 70 2e 61 70 70 77 69 6e | = (**ap|p.appwin|
|00002ea0| 64 6f 77 29 2e 73 74 61 | 74 75 73 72 65 63 74 3b |dow).sta|tusrect;|
|00002eb0| 0d 09 0d 09 72 2e 74 6f | 70 20 3d 20 72 2e 62 6f |....r.to|p = r.bo|
|00002ec0| 74 74 6f 6d 3b 0d 09 0d | 09 72 2e 62 6f 74 74 6f |ttom;...|.r.botto|
|00002ed0| 6d 20 2b 3d 20 32 3b 0d | 09 0d 09 49 6e 76 61 6c |m += 2;.|...Inval|
|00002ee0| 52 65 63 74 20 28 26 72 | 29 3b 0d 09 7d 20 2f 2a |Rect (&r|);..} /*|
|00002ef0| 61 70 70 69 6e 76 61 6c | 73 74 61 74 75 73 73 65 |appinval|statusse|
|00002f00| 70 61 72 61 74 6f 72 2a | 2f 0d 09 0d 09 0d 76 6f |parator*|/.....vo|
|00002f10| 69 64 20 75 70 64 61 74 | 65 61 70 70 77 69 6e 64 |id updat|eappwind|
|00002f20| 6f 77 20 28 61 70 70 77 | 69 6e 64 6f 77 29 20 68 |ow (appw|indow) h|
|00002f30| 64 6c 61 70 70 77 69 6e | 64 6f 77 20 61 70 70 77 |dlappwin|dow appw|
|00002f40| 69 6e 64 6f 77 3b 20 7b | 0d 09 0d 09 2f 2a 0d 09 |indow; {|..../*..|
|00002f50| 44 57 20 34 2f 32 34 2f | 39 32 3a 20 72 65 6f 72 |DW 4/24/|92: reor|
|00002f60| 64 65 72 65 64 20 74 68 | 69 6e 67 73 20 66 6f 72 |dered th|ings for|
|00002f70| 20 49 4f 57 41 2e 0d 09 | 0d 09 44 57 20 34 2f 32 | IOWA...|..DW 4/2|
|00002f80| 35 2f 39 32 3a 20 61 64 | 64 65 64 20 75 70 64 61 |5/92: ad|ded upda|
|00002f90| 74 69 6e 67 20 6f 66 20 | 70 61 6c 65 74 74 65 2e |ting of |palette.|
|00002fa0| 0d 09 0d 09 44 57 20 34 | 2f 33 30 2f 39 32 3a 20 |....DW 4|/30/92: |
|00002fb0| 61 64 64 65 64 20 70 72 | 65 2d 75 70 64 61 74 65 |added pr|e-update|
|00002fc0| 20 63 61 6c 6c 62 61 63 | 6b 20 74 6f 20 61 6c 6c | callbac|k to all|
|00002fd0| 6f 77 20 49 4f 57 41 20 | 74 6f 20 69 6e 76 61 6c |ow IOWA |to inval|
|00002fe0| 20 61 6c 6c 20 64 69 72 | 74 79 20 6f 62 6a 65 63 | all dir|ty objec|
|00002ff0| 74 73 2e 0d 09 2a 2f 0d | 09 0d 09 72 65 67 69 73 |ts...*/.|...regis|
|00003000| 74 65 72 20 68 64 6c 61 | 70 70 77 69 6e 64 6f 77 |ter hdla|ppwindow|
|00003010| 20 68 61 20 3d 20 61 70 | 70 77 69 6e 64 6f 77 3b | ha = ap|pwindow;|
|00003020| 0d 09 72 65 67 69 73 74 | 65 72 20 57 69 6e 64 6f |..regist|er Windo|
|00003030| 77 50 74 72 20 77 20 3d | 20 28 2a 2a 68 61 29 2e |wPtr w =| (**ha).|
|00003040| 6d 61 63 77 69 6e 64 6f | 77 3b 0d 09 52 65 63 74 |macwindo|w;..Rect|
|00003050| 20 72 77 69 6e 64 6f 77 | 20 3d 20 28 2a 77 29 2e | rwindow| = (*w).|
|00003060| 70 6f 72 74 52 65 63 74 | 3b 0d 09 52 65 63 74 20 |portRect|;..Rect |
|00003070| 72 73 74 61 74 75 73 20 | 3d 20 28 2a 2a 68 61 29 |rstatus |= (**ha)|
|00003080| 2e 73 74 61 74 75 73 72 | 65 63 74 3b 0d 09 0d 09 |.statusr|ect;....|
|00003090| 61 70 70 70 72 65 63 61 | 6c 6c 62 61 63 6b 20 28 |apppreca|llback (|
|000030a0| 29 3b 0d 09 0d 09 28 2a | 61 70 70 2e 70 72 65 75 |);....(*|app.preu|
|000030b0| 70 64 61 74 65 63 61 6c | 6c 62 61 63 6b 29 20 28 |pdatecal|lback) (|
|000030c0| 29 3b 0d 09 0d 09 61 70 | 70 70 6f 73 74 63 61 6c |);....ap|ppostcal|
|000030d0| 6c 62 61 63 6b 20 28 29 | 3b 0d 09 09 0d 09 42 65 |lback ()|;.....Be|
|000030e0| 67 69 6e 55 70 64 61 74 | 65 20 28 77 29 3b 0d 09 |ginUpdat|e (w);..|
|000030f0| 0d 09 73 65 74 61 70 70 | 77 69 6e 64 6f 77 20 28 |..setapp|window (|
|00003100| 68 61 29 3b 0d 09 0d 09 | 2f 2a 75 70 64 61 74 65 |ha);....|/*update|
|00003110| 20 74 68 65 20 70 61 6c | 65 74 74 65 2a 2f 20 7b | the pal|ette*/ {|
|00003120| 0d 09 09 0d 09 09 69 66 | 20 28 61 70 70 2e 68 61 |......if| (app.ha|
|00003130| 73 70 61 6c 65 74 74 65 | 29 20 7b 0d 09 09 0d 09 |spalette|) {.....|
|00003140| 09 09 69 66 20 28 61 70 | 70 72 65 63 74 6e 65 65 |..if (ap|prectnee|
|00003150| 64 73 75 70 64 61 74 65 | 20 28 28 2a 2a 28 2a 2a |dsupdate| ((**(**|
|00003160| 68 61 29 2e 68 70 61 6c | 65 74 74 65 29 2e 72 29 |ha).hpal|ette).r)|
|00003170| 29 20 7b 0d 09 09 09 0d | 09 09 09 09 70 75 73 68 |) {.....|....push|
|00003180| 63 6c 69 70 20 28 72 77 | 69 6e 64 6f 77 29 3b 0d |clip (rw|indow);.|
|00003190| 09 09 09 0d 09 09 09 09 | 70 61 6c 65 74 74 65 75 |........|paletteu|
|000031a0| 70 64 61 74 65 20 28 28 | 2a 2a 68 61 29 2e 68 70 |pdate ((|**ha).hp|
|000031b0| 61 6c 65 74 74 65 29 3b | 0d 09 09 0d 09 09 09 09 |alette);|........|
|000031c0| 70 6f 70 63 6c 69 70 20 | 28 29 3b 0d 09 09 09 09 |popclip |();.....|
|000031d0| 7d 0d 09 09 09 7d 0d 09 | 09 7d 0d 09 09 0d 09 2f |}....}..|.}...../|
|000031e0| 2a 75 70 64 61 74 65 20 | 74 68 65 20 73 74 61 74 |*update |the stat|
|000031f0| 75 73 20 61 72 65 61 2a | 2f 20 7b 0d 09 09 0d 09 |us area*|/ {.....|
|00003200| 09 69 66 20 28 61 70 70 | 2e 73 74 61 74 75 73 70 |.if (app|.statusp|
|00003210| 69 78 65 6c 73 20 3e 20 | 30 29 20 7b 20 2f 2a 68 |ixels > |0) { /*h|
|00003220| 61 73 20 61 20 73 74 61 | 74 75 73 20 61 72 65 61 |as a sta|tus area|
|00003230| 2a 2f 0d 09 09 09 0d 09 | 09 09 52 65 63 74 20 72 |*/......|..Rect r|
|00003240| 20 3d 20 72 73 74 61 74 | 75 73 3b 0d 09 09 09 0d | = rstat|us;.....|
|00003250| 09 09 09 72 2e 74 6f 70 | 20 3d 20 72 2e 62 6f 74 |...r.top| = r.bot|
|00003260| 74 6f 6d 3b 0d 09 09 09 | 0d 09 09 09 72 2e 62 6f |tom;....|....r.bo|
|00003270| 74 74 6f 6d 20 2b 3d 20 | 34 3b 0d 09 09 09 0d 09 |ttom += |4;......|
|00003280| 09 09 69 66 20 28 61 70 | 70 72 65 63 74 6e 65 65 |..if (ap|prectnee|
|00003290| 64 73 75 70 64 61 74 65 | 20 28 72 29 29 20 7b 20 |dsupdate| (r)) { |
|000032a0| 2f 2a 64 72 61 77 20 74 | 68 65 20 64 6f 75 62 6c |/*draw t|he doubl|
|000032b0| 65 20 73 65 70 61 72 61 | 74 6f 72 20 6c 69 6e 65 |e separa|tor line|
|000032c0| 2a 2f 0d 09 09 09 09 0d | 09 09 09 09 72 2e 62 6f |*/......|....r.bo|
|000032d0| 74 74 6f 6d 20 2d 3d 20 | 32 3b 0d 09 09 09 09 0d |ttom -= |2;......|
|000032e0| 09 09 09 09 70 75 73 68 | 63 6c 69 70 20 28 72 77 |....push|clip (rw|
|000032f0| 69 6e 64 6f 77 29 3b 0d | 09 09 09 09 0d 09 09 09 |indow);.|........|
|00003300| 09 64 65 62 75 67 72 65 | 63 74 20 28 72 29 3b 0d |.debugre|ct (r);.|
|00003310| 09 09 09 09 0d 09 09 09 | 09 61 70 70 65 72 61 73 |........|.apperas|
|00003320| 65 72 65 63 74 20 28 72 | 29 3b 0d 09 09 09 09 0d |erect (r|);......|
|00003330| 09 09 09 09 4d 6f 76 65 | 54 6f 20 28 72 2e 6c 65 |....Move|To (r.le|
|00003340| 66 74 2c 20 72 2e 74 6f | 70 29 3b 0d 09 09 0d 09 |ft, r.to|p);.....|
|00003350| 09 09 09 4c 69 6e 65 54 | 6f 20 28 72 2e 72 69 67 |...LineT|o (r.rig|
|00003360| 68 74 2c 20 72 2e 74 6f | 70 29 3b 0d 09 09 09 09 |ht, r.to|p);.....|
|00003370| 0d 09 09 09 09 4d 6f 76 | 65 54 6f 20 28 72 2e 6c |.....Mov|eTo (r.l|
|00003380| 65 66 74 2c 20 72 2e 62 | 6f 74 74 6f 6d 29 3b 0d |eft, r.b|ottom);.|
|00003390| 09 09 0d 09 09 09 09 4c | 69 6e 65 54 6f 20 28 72 |.......L|ineTo (r|
|000033a0| 2e 72 69 67 68 74 2c 20 | 72 2e 62 6f 74 74 6f 6d |.right, |r.bottom|
|000033b0| 29 3b 0d 09 09 09 09 0d | 09 09 09 09 70 6f 70 63 |);......|....popc|
|000033c0| 6c 69 70 20 28 29 3b 0d | 09 09 09 09 7d 0d 09 09 |lip ();.|....}...|
|000033d0| 09 09 0d 09 09 09 69 66 | 20 28 61 70 70 72 65 63 |......if| (apprec|
|000033e0| 74 6e 65 65 64 73 75 70 | 64 61 74 65 20 28 72 73 |tneedsup|date (rs|
|000033f0| 74 61 74 75 73 29 29 20 | 7b 0d 09 09 09 0d 09 09 |tatus)) |{.......|
|00003400| 09 09 70 75 73 68 63 6c | 69 70 20 28 72 73 74 61 |..pushcl|ip (rsta|
|00003410| 74 75 73 29 3b 0d 09 09 | 09 0d 09 09 09 09 28 2a |tus);...|......(*|
|00003420| 61 70 70 2e 75 70 64 61 | 74 65 73 74 61 74 75 73 |app.upda|testatus|
|00003430| 63 61 6c 6c 62 61 63 6b | 29 20 28 29 3b 0d 09 09 |callback|) ();...|
|00003440| 09 0d 09 09 09 09 70 6f | 70 63 6c 69 70 20 28 29 |......po|pclip ()|
|00003450| 3b 0d 09 09 09 09 7d 0d | 09 09 09 7d 0d 09 09 7d |;.....}.|...}...}|
|00003460| 0d 09 09 0d 09 2f 2a 6c | 65 74 20 74 68 65 20 61 |...../*l|et the a|
|00003470| 70 70 6c 65 74 20 75 70 | 64 61 74 65 20 68 69 73 |pplet up|date his|
|00003480| 20 73 74 75 66 66 2a 2f | 20 7b 0d 09 09 0d 09 09 | stuff*/| {......|
|00003490| 52 65 63 74 20 72 63 6f | 6e 74 65 6e 74 20 3d 20 |Rect rco|ntent = |
|000034a0| 28 2a 2a 68 61 29 2e 63 | 6f 6e 74 65 6e 74 72 65 |(**ha).c|ontentre|
|000034b0| 63 74 3b 0d 09 09 0d 09 | 09 69 66 20 28 61 70 70 |ct;.....|.if (app|
|000034c0| 72 65 63 74 6e 65 65 64 | 73 75 70 64 61 74 65 20 |rectneed|supdate |
|000034d0| 28 72 63 6f 6e 74 65 6e | 74 29 29 20 7b 0d 09 09 |(rconten|t)) {...|
|000034e0| 09 0d 09 09 09 61 70 70 | 70 72 65 63 61 6c 6c 62 |.....app|precallb|
|000034f0| 61 63 6b 20 28 29 3b 0d | 09 09 09 0d 09 09 09 28 |ack ();.|.......(|
|00003500| 2a 2a 68 61 29 2e 75 70 | 64 61 74 65 72 65 63 74 |**ha).up|daterect|
|00003510| 20 3d 20 28 2a 2a 28 2a | 77 29 2e 76 69 73 52 67 | = (**(*|w).visRg|
|00003520| 6e 29 2e 72 67 6e 42 42 | 6f 78 3b 0d 09 09 09 0d |n).rgnBB|ox;.....|
|00003530| 09 09 09 28 2a 61 70 70 | 2e 73 65 74 67 6c 6f 62 |...(*app|.setglob|
|00003540| 61 6c 73 63 61 6c 6c 62 | 61 63 6b 29 20 28 29 3b |alscallb|ack) ();|
|00003550| 20 2f 2a 61 70 70 20 63 | 61 6e 20 63 6f 70 79 20 | /*app c|an copy |
|00003560| 66 72 6f 6d 20 61 70 70 | 2e 61 70 70 64 61 74 61 |from app|.appdata|
|00003570| 20 74 6f 20 69 74 73 20 | 6f 77 6e 20 67 6c 6f 62 | to its |own glob|
|00003580| 61 6c 73 2a 2f 0d 09 09 | 09 0d 09 09 09 28 2a 61 |als*/...|.....(*a|
|00003590| 70 70 2e 75 70 64 61 74 | 65 63 61 6c 6c 62 61 63 |pp.updat|ecallbac|
|000035a0| 6b 29 20 28 29 3b 0d 09 | 09 09 0d 09 09 09 61 70 |k) ();..|......ap|
|000035b0| 70 70 6f 73 74 63 61 6c | 6c 62 61 63 6b 20 28 29 |ppostcal|lback ()|
|000035c0| 3b 0d 09 09 09 7d 0d 09 | 09 7d 0d 09 09 0d 09 2f |;....}..|.}...../|
|000035d0| 2a 75 70 64 61 74 65 20 | 74 68 65 20 67 72 6f 77 |*update |the grow|
|000035e0| 20 69 63 6f 6e 2c 20 73 | 63 72 6f 6c 6c 62 61 72 | icon, s|crollbar|
|000035f0| 73 2a 2f 20 7b 0d 09 0d | 09 09 70 75 73 68 63 6c |s*/ {...|..pushcl|
|00003600| 69 70 20 28 72 77 69 6e | 64 6f 77 29 3b 0d 09 09 |ip (rwin|dow);...|
|00003610| 0d 09 09 64 72 61 77 61 | 70 70 67 72 6f 77 69 63 |...drawa|ppgrowic|
|00003620| 6f 6e 20 28 68 61 29 3b | 0d 0d 09 09 75 70 64 61 |on (ha);|....upda|
|00003630| 74 65 61 70 70 73 63 72 | 6f 6c 6c 62 61 72 73 20 |teappscr|ollbars |
|00003640| 28 68 61 29 3b 0d 09 09 | 0d 09 09 70 6f 70 63 6c |(ha);...|...popcl|
|00003650| 69 70 20 28 29 3b 0d 09 | 09 7d 0d 09 09 0d 09 45 |ip ();..|.}.....E|
|00003660| 6e 64 55 70 64 61 74 65 | 20 28 77 29 3b 0d 09 7d |ndUpdate| (w);..}|
|00003670| 20 2f 2a 75 70 64 61 74 | 65 61 70 70 77 69 6e 64 | /*updat|eappwind|
|00003680| 6f 77 2a 2f 0d 09 0d 09 | 0d 76 6f 69 64 20 63 6f |ow*/....|.void co|
|00003690| 6d 70 75 74 65 77 69 6e | 64 6f 77 69 6e 66 6f 20 |mputewin|dowinfo |
|000036a0| 28 6d 61 63 77 69 6e 64 | 6f 77 2c 20 61 70 70 77 |(macwind|ow, appw|
|000036b0| 69 6e 64 6f 77 29 20 57 | 69 6e 64 6f 77 50 74 72 |indow) W|indowPtr|
|000036c0| 20 6d 61 63 77 69 6e 64 | 6f 77 3b 20 68 64 6c 61 | macwind|ow; hdla|
|000036d0| 70 70 77 69 6e 64 6f 77 | 20 61 70 70 77 69 6e 64 |ppwindow| appwind|
|000036e0| 6f 77 3b 20 7b 0d 09 0d | 09 72 65 67 69 73 74 65 |ow; {...|.registe|
|000036f0| 72 20 57 69 6e 64 6f 77 | 50 74 72 20 77 20 3d 20 |r Window|Ptr w = |
|00003700| 6d 61 63 77 69 6e 64 6f | 77 3b 0d 09 72 65 67 69 |macwindo|w;..regi|
|00003710| 73 74 65 72 20 68 64 6c | 61 70 70 77 69 6e 64 6f |ster hdl|appwindo|
|00003720| 77 20 68 61 20 3d 20 61 | 70 70 77 69 6e 64 6f 77 |w ha = a|ppwindow|
|00003730| 3b 0d 09 68 64 6c 70 61 | 6c 65 74 74 65 72 65 63 |;..hdlpa|letterec|
|00003740| 6f 72 64 20 68 70 61 6c | 20 3d 20 28 68 64 6c 70 |ord hpal| = (hdlp|
|00003750| 61 6c 65 74 74 65 72 65 | 63 6f 72 64 29 20 28 2a |alettere|cord) (*|
|00003760| 2a 61 70 70 77 69 6e 64 | 6f 77 29 2e 68 70 61 6c |*appwind|ow).hpal|
|00003770| 65 74 74 65 3b 0d 09 52 | 65 63 74 20 72 2c 20 72 |ette;..R|ect r, r|
|00003780| 63 6f 6e 74 65 6e 74 2c | 20 72 73 74 61 74 75 73 |content,| rstatus|
|00003790| 2c 20 72 70 61 6c 65 74 | 74 65 3b 0d 09 0d 09 28 |, rpalet|te;....(|
|000037a0| 2a 2a 68 61 29 2e 77 69 | 6e 64 6f 77 72 65 63 74 |**ha).wi|ndowrect|
|000037b0| 20 3d 20 72 20 3d 20 28 | 2a 77 29 2e 70 6f 72 74 | = r = (|*w).port|
|000037c0| 52 65 63 74 3b 0d 09 0d | 09 72 63 6f 6e 74 65 6e |Rect;...|.rconten|
|000037d0| 74 20 3d 20 72 3b 0d 09 | 0d 09 2f 2a 74 61 6b 65 |t = r;..|../*take|
|000037e0| 20 6f 75 74 20 66 6f 72 | 20 73 63 72 6f 6c 6c 62 | out for| scrollb|
|000037f0| 61 72 73 2a 2f 20 7b 0d | 09 09 0d 09 09 72 65 67 |ars*/ {.|.....reg|
|00003800| 69 73 74 65 72 20 73 68 | 6f 72 74 20 73 63 72 6f |ister sh|ort scro|
|00003810| 6c 6c 62 61 72 77 69 64 | 74 68 20 3d 20 67 65 74 |llbarwid|th = get|
|00003820| 73 63 72 6f 6c 6c 62 61 | 72 77 69 64 74 68 20 28 |scrollba|rwidth (|
|00003830| 29 3b 0d 09 09 0d 09 09 | 69 66 20 28 61 70 70 2e |);......|if (app.|
|00003840| 76 65 72 74 73 63 72 6f | 6c 6c 29 0d 09 09 09 72 |vertscro|ll)....r|
|00003850| 63 6f 6e 74 65 6e 74 2e | 72 69 67 68 74 20 2d 3d |content.|right -=|
|00003860| 20 73 63 72 6f 6c 6c 62 | 61 72 77 69 64 74 68 20 | scrollb|arwidth |
|00003870| 2d 20 31 3b 0d 09 09 0d | 09 09 69 66 20 28 61 70 |- 1;....|..if (ap|
|00003880| 70 2e 68 6f 72 69 7a 73 | 63 72 6f 6c 6c 29 0d 09 |p.horizs|croll)..|
|00003890| 09 09 72 63 6f 6e 74 65 | 6e 74 2e 62 6f 74 74 6f |..rconte|nt.botto|
|000038a0| 6d 20 2d 3d 20 73 63 72 | 6f 6c 6c 62 61 72 77 69 |m -= scr|ollbarwi|
|000038b0| 64 74 68 20 2d 20 31 3b | 0d 09 09 7d 0d 09 0d 09 |dth - 1;|...}....|
|000038c0| 69 66 20 28 61 70 70 2e | 73 74 61 74 75 73 70 69 |if (app.|statuspi|
|000038d0| 78 65 6c 73 20 3e 20 30 | 29 20 2f 2a 68 61 73 20 |xels > 0|) /*has |
|000038e0| 61 20 73 74 61 74 75 73 | 20 61 72 65 61 2a 2f 0d |a status| area*/.|
|000038f0| 09 09 72 63 6f 6e 74 65 | 6e 74 2e 74 6f 70 20 2b |..rconte|nt.top +|
|00003900| 3d 20 61 70 70 2e 73 74 | 61 74 75 73 70 69 78 65 |= app.st|atuspixe|
|00003910| 6c 73 20 2b 20 33 3b 20 | 2f 2a 61 20 33 2d 70 69 |ls + 3; |/*a 3-pi|
|00003920| 78 65 6c 20 6c 69 6e 65 | 20 73 65 70 61 72 61 74 |xel line| separat|
|00003930| 65 73 20 73 74 61 74 75 | 73 20 26 20 63 6f 6e 74 |es statu|s & cont|
|00003940| 65 6e 74 2a 2f 0d 09 0d | 09 69 66 20 28 61 70 70 |ent*/...|.if (app|
|00003950| 2e 68 61 73 70 61 6c 65 | 74 74 65 29 20 7b 20 2f |.haspale|tte) { /|
|00003960| 2a 68 61 73 20 61 6e 20 | 69 63 6f 6e 20 70 61 6c |*has an |icon pal|
|00003970| 65 74 74 65 2a 2f 0d 09 | 09 0d 09 09 72 70 61 6c |ette*/..|....rpal|
|00003980| 65 74 74 65 20 3d 20 72 | 63 6f 6e 74 65 6e 74 3b |ette = r|content;|
|00003990| 0d 09 09 0d 09 09 72 63 | 6f 6e 74 65 6e 74 2e 6c |......rc|ontent.l|
|000039a0| 65 66 74 20 2b 3d 20 28 | 2a 2a 68 70 61 6c 29 2e |eft += (|**hpal).|
|000039b0| 70 61 6c 65 74 74 65 77 | 69 64 74 68 3b 0d 09 09 |palettew|idth;...|
|000039c0| 0d 09 09 72 70 61 6c 65 | 74 74 65 2e 72 69 67 68 |...rpale|tte.righ|
|000039d0| 74 20 3d 20 72 63 6f 6e | 74 65 6e 74 2e 6c 65 66 |t = rcon|tent.lef|
|000039e0| 74 3b 0d 09 09 7d 0d 09 | 65 6c 73 65 0d 09 09 7a |t;...}..|else...z|
|000039f0| 65 72 6f 72 65 63 74 20 | 28 26 72 70 61 6c 65 74 |erorect |(&rpalet|
|00003a00| 74 65 29 3b 09 0d 09 0d | 09 28 2a 2a 68 61 29 2e |te);....|.(**ha).|
|00003a10| 6f 6c 64 63 6f 6e 74 65 | 6e 74 72 65 63 74 20 3d |oldconte|ntrect =|
|00003a20| 20 28 2a 2a 68 61 29 2e | 63 6f 6e 74 65 6e 74 72 | (**ha).|contentr|
|00003a30| 65 63 74 3b 0d 09 09 0d | 09 28 2a 2a 68 61 29 2e |ect;....|.(**ha).|
|00003a40| 63 6f 6e 74 65 6e 74 72 | 65 63 74 20 3d 20 72 63 |contentr|ect = rc|
|00003a50| 6f 6e 74 65 6e 74 3b 0d | 09 0d 09 69 66 20 28 61 |ontent;.|...if (a|
|00003a60| 70 70 2e 68 61 73 70 61 | 6c 65 74 74 65 29 20 0d |pp.haspa|lette) .|
|00003a70| 09 09 28 2a 2a 28 2a 2a | 68 61 29 2e 68 70 61 6c |..(**(**|ha).hpal|
|00003a80| 65 74 74 65 29 2e 72 20 | 3d 20 72 70 61 6c 65 74 |ette).r |= rpalet|
|00003a90| 74 65 3b 0d 09 0d 09 72 | 73 74 61 74 75 73 20 3d |te;....r|status =|
|00003aa0| 20 72 3b 20 2f 2a 63 6f | 70 79 20 6c 65 66 74 2c | r; /*co|py left,|
|00003ab0| 20 72 69 67 68 74 2c 20 | 74 6f 70 2a 2f 0d 09 0d | right, |top*/...|
|00003ac0| 09 72 73 74 61 74 75 73 | 2e 62 6f 74 74 6f 6d 20 |.rstatus|.bottom |
|00003ad0| 3d 20 72 73 74 61 74 75 | 73 2e 74 6f 70 20 2b 20 |= rstatu|s.top + |
|00003ae0| 61 70 70 2e 73 74 61 74 | 75 73 70 69 78 65 6c 73 |app.stat|uspixels|
|00003af0| 3b 0d 09 0d 09 28 2a 2a | 68 61 29 2e 73 74 61 74 |;....(**|ha).stat|
|00003b00| 75 73 72 65 63 74 20 3d | 20 72 73 74 61 74 75 73 |usrect =| rstatus|
|00003b10| 3b 0d 09 0d 09 28 2a 2a | 68 61 29 2e 77 69 6e 64 |;....(**|ha).wind|
|00003b20| 6f 77 76 65 72 74 70 69 | 78 65 6c 73 20 3d 20 72 |owvertpi|xels = r|
|00003b30| 2e 62 6f 74 74 6f 6d 20 | 2d 20 72 2e 74 6f 70 3b |.bottom |- r.top;|
|00003b40| 0d 09 0d 09 28 2a 2a 68 | 61 29 2e 77 69 6e 64 6f |....(**h|a).windo|
|00003b50| 77 68 6f 72 69 7a 70 69 | 78 65 6c 73 20 3d 20 72 |whorizpi|xels = r|
|00003b60| 2e 72 69 67 68 74 20 2d | 20 72 2e 6c 65 66 74 3b |.right -| r.left;|
|00003b70| 0d 09 0d 09 28 2a 2a 68 | 61 29 2e 64 65 66 61 75 |....(**h|a).defau|
|00003b80| 6c 74 66 6f 6e 74 20 3d | 20 61 70 70 2e 64 65 66 |ltfont =| app.def|
|00003b90| 61 75 6c 74 66 6f 6e 74 | 3b 0d 09 0d 09 28 2a 2a |aultfont|;....(**|
|00003ba0| 68 61 29 2e 64 65 66 61 | 75 6c 74 73 69 7a 65 20 |ha).defa|ultsize |
|00003bb0| 3d 20 61 70 70 2e 64 65 | 66 61 75 6c 74 73 69 7a |= app.de|faultsiz|
|00003bc0| 65 3b 0d 09 0d 09 28 2a | 2a 68 61 29 2e 64 65 66 |e;....(*|*ha).def|
|00003bd0| 61 75 6c 74 73 74 79 6c | 65 20 3d 20 61 70 70 2e |aultstyl|e = app.|
|00003be0| 64 65 66 61 75 6c 74 73 | 74 79 6c 65 3b 0d 09 0d |defaults|tyle;...|
|00003bf0| 09 28 2a 2a 68 61 29 2e | 64 65 66 61 75 6c 74 6a |.(**ha).|defaultj|
|00003c00| 75 73 74 69 66 69 63 61 | 74 69 6f 6e 20 3d 20 6c |ustifica|tion = l|
|00003c10| 65 66 74 6a 75 73 74 69 | 66 69 65 64 3b 0d 09 0d |eftjusti|fied;...|
|00003c20| 09 70 75 73 68 6d 61 63 | 70 6f 72 74 20 28 77 29 |.pushmac|port (w)|
|00003c30| 3b 0d 09 0d 09 70 75 73 | 68 73 74 79 6c 65 20 28 |;....pus|hstyle (|
|00003c40| 28 2a 2a 68 61 29 2e 64 | 65 66 61 75 6c 74 66 6f |(**ha).d|efaultfo|
|00003c50| 6e 74 2c 20 28 2a 2a 68 | 61 29 2e 64 65 66 61 75 |nt, (**h|a).defau|
|00003c60| 6c 74 73 69 7a 65 2c 20 | 28 2a 2a 68 61 29 2e 64 |ltsize, |(**ha).d|
|00003c70| 65 66 61 75 6c 74 73 74 | 79 6c 65 29 3b 0d 09 0d |efaultst|yle);...|
|00003c80| 09 28 2a 2a 68 61 29 2e | 66 6f 6e 74 68 65 69 67 |.(**ha).|fontheig|
|00003c90| 68 74 20 3d 20 67 6c 6f | 62 61 6c 66 6f 6e 74 69 |ht = glo|balfonti|
|00003ca0| 6e 66 6f 2e 61 73 63 65 | 6e 74 20 2b 20 67 6c 6f |nfo.asce|nt + glo|
|00003cb0| 62 61 6c 66 6f 6e 74 69 | 6e 66 6f 2e 64 65 73 63 |balfonti|nfo.desc|
|00003cc0| 65 6e 74 3b 0d 09 0d 09 | 70 6f 70 73 74 79 6c 65 |ent;....|popstyle|
|00003cd0| 20 28 29 3b 0d 09 0d 09 | 70 6f 70 6d 61 63 70 6f | ();....|popmacpo|
|00003ce0| 72 74 20 28 29 3b 0d 09 | 0d 09 28 2a 2a 68 61 29 |rt ();..|..(**ha)|
|00003cf0| 2e 6d 61 63 77 69 6e 64 | 6f 77 20 3d 20 77 3b 0d |.macwind|ow = w;.|
|00003d00| 09 7d 20 2f 2a 63 6f 6d | 70 75 74 65 77 69 6e 64 |.} /*com|putewind|
|00003d10| 6f 77 69 6e 66 6f 2a 2f | 0d 09 0d 0d 76 6f 69 64 |owinfo*/|....void|
|00003d20| 20 67 65 74 64 65 73 6b | 74 6f 70 72 65 63 74 20 | getdesk|toprect |
|00003d30| 28 68 64 6c 61 70 70 77 | 69 6e 64 6f 77 20 61 70 |(hdlappw|indow ap|
|00003d40| 70 77 69 6e 64 6f 77 2c | 20 52 65 63 74 20 2a 72 |pwindow,| Rect *r|
|00003d50| 77 69 6e 64 6f 77 29 20 | 7b 0d 09 0d 09 72 65 67 |window) |{....reg|
|00003d60| 69 73 74 65 72 20 57 69 | 6e 64 6f 77 50 74 72 20 |ister Wi|ndowPtr |
|00003d70| 77 20 3d 20 28 2a 2a 61 | 70 70 77 69 6e 64 6f 77 |w = (**a|ppwindow|
|00003d80| 29 2e 6d 61 63 77 69 6e | 64 6f 77 3b 0d 09 0d 09 |).macwin|dow;....|
|00003d90| 2a 72 77 69 6e 64 6f 77 | 20 3d 20 28 2a 77 29 2e |*rwindow| = (*w).|
|00003da0| 70 6f 72 74 52 65 63 74 | 3b 0d 09 0d 09 70 75 73 |portRect|;....pus|
|00003db0| 68 6d 61 63 70 6f 72 74 | 20 28 77 29 3b 0d 09 09 |hmacport| (w);...|
|00003dc0| 09 0d 09 6c 6f 63 61 6c | 74 6f 67 6c 6f 62 61 6c |...local|toglobal|
|00003dd0| 72 65 63 74 20 28 72 77 | 69 6e 64 6f 77 29 3b 0d |rect (rw|indow);.|
|00003de0| 09 09 09 0d 09 70 6f 70 | 6d 61 63 70 6f 72 74 20 |.....pop|macport |
|00003df0| 28 29 3b 0d 09 7d 20 2f | 2a 67 65 74 64 65 73 6b |();..} /|*getdesk|
|00003e00| 74 6f 70 72 65 63 74 2a | 2f 0d 09 0d 09 0d 76 6f |toprect*|/.....vo|
|00003e10| 69 64 20 64 69 73 70 6f | 73 65 61 70 70 77 69 6e |id dispo|seappwin|
|00003e20| 64 6f 77 20 28 61 70 70 | 77 69 6e 64 6f 77 29 20 |dow (app|window) |
|00003e30| 68 64 6c 61 70 70 77 69 | 6e 64 6f 77 20 61 70 70 |hdlappwi|ndow app|
|00003e40| 77 69 6e 64 6f 77 3b 20 | 7b 0d 0d 09 72 65 67 69 |window; |{...regi|
|00003e50| 73 74 65 72 20 68 64 6c | 61 70 70 77 69 6e 64 6f |ster hdl|appwindo|
|00003e60| 77 20 68 61 20 3d 20 61 | 70 70 2e 61 70 70 77 69 |w ha = a|pp.appwi|
|00003e70| 6e 64 6f 77 3b 0d 09 0d | 09 28 2a 61 70 70 2e 64 |ndow;...|.(*app.d|
|00003e80| 69 73 70 6f 73 65 72 65 | 63 6f 72 64 63 61 6c 6c |isposere|cordcall|
|00003e90| 62 61 63 6b 29 20 28 29 | 3b 0d 09 0d 09 69 66 20 |back) ()|;....if |
|00003ea0| 28 61 70 70 2e 68 61 73 | 70 61 6c 65 74 74 65 29 |(app.has|palette)|
|00003eb0| 20 0d 09 09 64 69 73 70 | 6f 73 65 70 61 6c 65 74 | ...disp|osepalet|
|00003ec0| 74 65 20 28 28 68 64 6c | 70 61 6c 65 74 74 65 72 |te ((hdl|paletter|
|00003ed0| 65 63 6f 72 64 29 20 28 | 2a 2a 68 61 29 2e 68 70 |ecord) (|**ha).hp|
|00003ee0| 61 6c 65 74 74 65 29 3b | 0d 09 0d 09 64 69 73 70 |alette);|....disp|
|00003ef0| 6f 73 65 73 63 72 6f 6c | 6c 62 61 72 20 28 28 2a |osescrol|lbar ((*|
|00003f00| 2a 68 61 29 2e 76 65 72 | 74 62 61 72 29 3b 0d 09 |*ha).ver|tbar);..|
|00003f10| 0d 09 64 69 73 70 6f 73 | 65 73 63 72 6f 6c 6c 62 |..dispos|escrollb|
|00003f20| 61 72 20 28 28 2a 2a 68 | 61 29 2e 68 6f 72 69 7a |ar ((**h|a).horiz|
|00003f30| 62 61 72 29 3b 0d 09 0d | 09 44 69 73 70 6f 73 65 |bar);...|.Dispose|
|00003f40| 57 69 6e 64 6f 77 20 28 | 28 2a 2a 68 61 29 2e 6d |Window (|(**ha).m|
|00003f50| 61 63 77 69 6e 64 6f 77 | 29 3b 0d 09 0d 09 64 69 |acwindow|);....di|
|00003f60| 73 70 6f 73 65 68 61 6e | 64 6c 65 20 28 28 48 61 |sposehan|dle ((Ha|
|00003f70| 6e 64 6c 65 29 20 68 61 | 29 3b 0d 09 0d 09 73 65 |ndle) ha|);....se|
|00003f80| 74 66 72 6f 6e 74 67 6c | 6f 62 61 6c 73 20 28 29 |tfrontgl|obals ()|
|00003f90| 3b 0d 09 7d 20 2f 2a 64 | 69 73 70 6f 73 65 61 70 |;..} /*d|isposeap|
|00003fa0| 70 77 69 6e 64 6f 77 2a | 2f 0d 09 0d 0d 74 79 70 |pwindow*|/....typ|
|00003fb0| 65 64 65 66 20 62 6f 6f | 6c 65 61 6e 20 28 2a 74 |edef boo|lean (*t|
|00003fc0| 79 76 69 73 69 74 61 70 | 70 72 6f 75 74 69 6e 65 |yvisitap|proutine|
|00003fd0| 29 20 28 68 64 6c 61 70 | 70 77 69 6e 64 6f 77 29 |) (hdlap|pwindow)|
|00003fe0| 3b 0d 0d 0d 62 6f 6f 6c | 65 61 6e 20 76 69 73 69 |;...bool|ean visi|
|00003ff0| 74 61 70 70 77 69 6e 64 | 6f 77 73 20 28 76 69 73 |tappwind|ows (vis|
|00004000| 69 74 70 72 6f 63 29 20 | 74 79 76 69 73 69 74 61 |itproc) |tyvisita|
|00004010| 70 70 72 6f 75 74 69 6e | 65 20 76 69 73 69 74 70 |pproutin|e visitp|
|00004020| 72 6f 63 3b 20 7b 0d 09 | 0d 09 2f 2a 0d 09 76 69 |roc; {..|../*..vi|
|00004030| 73 69 74 20 61 6c 6c 20 | 74 68 65 20 77 69 6e 64 |sit all |the wind|
|00004040| 6f 77 73 20 66 72 6f 6d | 20 66 72 6f 6e 74 20 74 |ows from| front t|
|00004050| 6f 20 62 61 63 6b 2e 20 | 20 63 61 6c 6c 20 74 68 |o back. | call th|
|00004060| 65 20 76 69 73 69 74 70 | 72 6f 63 20 66 6f 72 20 |e visitp|roc for |
|00004070| 65 61 63 68 20 77 69 6e | 64 6f 77 2c 20 0d 09 69 |each win|dow, ..i|
|00004080| 66 20 69 74 20 72 65 74 | 75 72 6e 73 20 66 61 6c |f it ret|urns fal|
|00004090| 73 65 20 77 65 20 73 74 | 6f 70 20 74 68 65 20 74 |se we st|op the t|
|000040a0| 72 61 76 65 72 73 61 6c | 20 61 6e 64 20 72 65 74 |raversal| and ret|
|000040b0| 75 72 6e 20 66 61 6c 73 | 65 2e 0d 09 0d 09 74 68 |urn fals|e.....th|
|000040c0| 65 20 76 69 73 69 74 70 | 72 6f 63 20 74 61 6b 65 |e visitp|roc take|
|000040d0| 73 20 6f 6e 65 20 70 61 | 72 61 6d 65 74 65 72 20 |s one pa|rameter |
|000040e0| 2d 2d 20 61 20 77 69 6e | 64 6f 77 20 70 6f 69 6e |-- a win|dow poin|
|000040f0| 74 65 72 2c 20 69 6e 64 | 69 63 61 74 69 6e 67 20 |ter, ind|icating |
|00004100| 74 68 65 20 77 69 6e 64 | 6f 77 0d 09 74 6f 20 62 |the wind|ow..to b|
|00004110| 65 20 76 69 73 69 74 65 | 64 2e 0d 09 0d 09 72 65 |e visite|d.....re|
|00004120| 74 75 72 6e 20 74 72 75 | 65 20 69 66 20 61 6c 6c |turn tru|e if all|
|00004130| 20 74 68 65 20 76 69 73 | 69 74 73 20 72 65 74 75 | the vis|its retu|
|00004140| 72 6e 65 64 20 74 72 75 | 65 2e 0d 09 0d 09 39 2f |rned tru|e.....9/|
|00004150| 34 2f 39 31 20 44 57 3a | 20 61 64 64 20 6c 61 73 |4/91 DW:| add las|
|00004160| 74 77 69 6e 64 6f 77 76 | 69 73 69 74 65 64 20 2d |twindowv|isited -|
|00004170| 2d 20 72 65 74 75 72 6e | 73 20 6e 69 6c 20 69 66 |- return|s nil if|
|00004180| 20 6e 6f 20 6d 61 74 63 | 68 20 66 6f 75 6e 64 2c | no matc|h found,|
|00004190| 20 72 65 74 75 72 6e 73 | 0d 09 70 6f 69 6e 74 69 | returns|..pointi|
|000041a0| 6e 67 20 74 6f 20 74 68 | 65 20 61 70 70 77 69 6e |ng to th|e appwin|
|000041b0| 64 6f 77 20 72 65 63 6f | 72 64 20 66 6f 72 20 74 |dow reco|rd for t|
|000041c0| 68 65 20 77 69 6e 64 6f | 77 20 74 68 61 74 20 6d |he windo|w that m|
|000041d0| 61 74 63 68 65 64 20 74 | 68 65 20 76 69 73 69 74 |atched t|he visit|
|000041e0| 70 72 6f 63 27 73 0d 09 | 63 72 69 74 65 72 69 61 |proc's..|criteria|
|000041f0| 2e 0d 09 0d 09 35 2f 32 | 34 2f 39 32 20 44 57 3a |.....5/2|4/92 DW:|
|00004200| 20 73 6b 69 70 20 77 69 | 6e 64 6f 77 73 20 74 68 | skip wi|ndows th|
|00004210| 61 74 20 6f 62 76 69 6f | 75 73 6c 79 20 61 72 65 |at obvio|usly are|
|00004220| 6e 27 74 20 62 65 69 6e | 67 20 6d 61 6e 61 67 65 |n't bein|g manage|
|00004230| 64 20 62 79 20 74 68 65 | 20 41 70 70 6c 65 74 0d |d by the| Applet.|
|00004240| 09 54 6f 6f 6c 6b 69 74 | 20 2d 2d 20 75 73 65 20 |.Toolkit| -- use |
|00004250| 61 20 68 65 75 72 69 73 | 74 69 63 20 74 68 61 74 |a heuris|tic that|
|00004260| 20 6d 61 6b 65 73 20 73 | 65 6e 73 65 20 2d 2d 20 | makes s|ense -- |
|00004270| 73 65 65 20 67 65 74 77 | 69 6e 64 6f 77 72 65 66 |see getw|indowref|
|00004280| 63 6f 6e 2e 0d 09 2a 2f | 0d 09 0d 09 72 65 67 69 |con...*/|....regi|
|00004290| 73 74 65 72 20 57 69 6e | 64 6f 77 50 74 72 20 77 |ster Win|dowPtr w|
|000042a0| 20 3d 20 46 72 6f 6e 74 | 57 69 6e 64 6f 77 20 28 | = Front|Window (|
|000042b0| 29 3b 0d 09 68 64 6c 61 | 70 70 77 69 6e 64 6f 77 |);..hdla|ppwindow|
|000042c0| 20 61 70 70 77 69 6e 64 | 6f 77 3b 0d 09 0d 09 6c | appwind|ow;....l|
|000042d0| 61 73 74 77 69 6e 64 6f | 77 76 69 73 69 74 65 64 |astwindo|wvisited|
|000042e0| 20 3d 20 6e 69 6c 3b 0d | 09 0d 09 77 68 69 6c 65 | = nil;.|...while|
|000042f0| 20 28 77 20 21 3d 20 6e | 69 6c 29 20 7b 0d 09 09 | (w != n|il) {...|
|00004300| 0d 09 09 69 66 20 28 21 | 67 65 74 77 69 6e 64 6f |...if (!|getwindo|
|00004310| 77 72 65 66 63 6f 6e 20 | 28 77 2c 20 28 6c 6f 6e |wrefcon |(w, (lon|
|00004320| 67 20 2a 29 20 26 61 70 | 70 77 69 6e 64 6f 77 29 |g *) &ap|pwindow)|
|00004330| 29 0d 09 09 09 67 6f 74 | 6f 20 6e 65 78 74 3b 0d |)....got|o next;.|
|00004340| 09 09 0d 09 09 69 66 20 | 28 21 28 2a 76 69 73 69 |.....if |(!(*visi|
|00004350| 74 70 72 6f 63 29 20 28 | 61 70 70 77 69 6e 64 6f |tproc) (|appwindo|
|00004360| 77 29 29 20 7b 20 2f 2a | 73 74 6f 70 20 74 68 65 |w)) { /*|stop the|
|00004370| 20 74 72 61 76 65 72 73 | 61 6c 2a 2f 0d 09 09 0d | travers|al*/....|
|00004380| 09 09 09 6c 61 73 74 77 | 69 6e 64 6f 77 76 69 73 |...lastw|indowvis|
|00004390| 69 74 65 64 20 3d 20 61 | 70 70 77 69 6e 64 6f 77 |ited = a|ppwindow|
|000043a0| 3b 20 2f 2a 73 65 74 20 | 67 6c 6f 62 61 6c 2a 2f |; /*set |global*/|
|000043b0| 0d 09 09 09 0d 09 09 09 | 72 65 74 75 72 6e 20 28 |........|return (|
|000043c0| 66 61 6c 73 65 29 3b 0d | 09 09 09 7d 0d 09 09 0d |false);.|...}....|
|000043d0| 09 09 6e 65 78 74 3a 0d | 09 09 0d 09 09 77 20 3d |..next:.|.....w =|
|000043e0| 20 28 57 69 6e 64 6f 77 | 50 74 72 29 20 28 2a 28 | (Window|Ptr) (*(|
|000043f0| 57 69 6e 64 6f 77 50 65 | 65 6b 29 20 77 29 2e 6e |WindowPe|ek) w).n|
|00004400| 65 78 74 57 69 6e 64 6f | 77 3b 20 0d 09 09 7d 20 |extWindo|w; ...} |
|00004410| 2f 2a 77 68 69 6c 65 2a | 2f 0d 09 09 0d 09 72 65 |/*while*|/.....re|
|00004420| 74 75 72 6e 20 28 74 72 | 75 65 29 3b 20 2f 2a 63 |turn (tr|ue); /*c|
|00004430| 6f 6d 70 6c 65 74 65 64 | 20 74 68 65 20 74 72 61 |ompleted| the tra|
|00004440| 76 65 72 73 61 6c 2a 2f | 0d 09 7d 20 2f 2a 76 69 |versal*/|..} /*vi|
|00004450| 73 69 74 61 70 70 77 69 | 6e 64 6f 77 73 2a 2f 0d |sitappwi|ndows*/.|
|00004460| 09 0d 0d 62 6f 6f 6c 65 | 61 6e 20 73 65 6c 65 63 |...boole|an selec|
|00004470| 74 76 69 73 69 74 20 28 | 61 70 70 77 69 6e 64 6f |tvisit (|appwindo|
|00004480| 77 29 20 68 64 6c 61 70 | 70 77 69 6e 64 6f 77 20 |w) hdlap|pwindow |
|00004490| 61 70 70 77 69 6e 64 6f | 77 3b 20 7b 0d 09 0d 09 |appwindo|w; {....|
|000044a0| 62 69 67 73 74 72 69 6e | 67 20 62 73 3b 0d 09 0d |bigstrin|g bs;...|
|000044b0| 09 67 65 74 61 70 70 77 | 69 6e 64 6f 77 74 69 74 |.getappw|indowtit|
|000044c0| 6c 65 20 28 61 70 70 77 | 69 6e 64 6f 77 2c 20 62 |le (appw|indow, b|
|000044d0| 73 29 3b 0d 09 0d 09 69 | 66 20 28 21 65 71 75 61 |s);....i|f (!equa|
|000044e0| 6c 73 74 72 69 6e 67 73 | 20 28 62 73 76 69 73 69 |lstrings| (bsvisi|
|000044f0| 74 2c 20 62 73 29 29 20 | 2f 2a 6e 6f 20 6d 61 74 |t, bs)) |/*no mat|
|00004500| 63 68 20 2d 2d 20 6b 65 | 65 70 20 74 72 61 76 65 |ch -- ke|ep trave|
|00004510| 72 73 69 6e 67 2a 2f 0d | 09 09 72 65 74 75 72 6e |rsing*/.|..return|
|00004520| 20 28 74 72 75 65 29 3b | 0d 09 0d 09 2f 2a 66 6f | (true);|..../*fo|
|00004530| 75 6e 64 20 61 20 6d 61 | 74 63 68 2c 20 73 65 6c |und a ma|tch, sel|
|00004540| 65 63 74 20 74 68 65 20 | 77 69 6e 64 6f 77 2c 20 |ect the |window, |
|00004550| 73 74 6f 70 20 74 68 65 | 20 74 72 61 76 65 72 73 |stop the| travers|
|00004560| 61 6c 2a 2f 0d 09 0d 09 | 73 65 6c 65 63 74 61 70 |al*/....|selectap|
|00004570| 70 77 69 6e 64 6f 77 20 | 28 61 70 70 77 69 6e 64 |pwindow |(appwind|
|00004580| 6f 77 29 3b 0d 09 09 0d | 09 72 65 74 75 72 6e 20 |ow);....|.return |
|00004590| 28 66 61 6c 73 65 29 3b | 20 2f 2a 73 74 6f 70 20 |(false);| /*stop |
|000045a0| 74 68 65 20 74 72 61 76 | 65 72 73 61 6c 2a 2f 0d |the trav|ersal*/.|
|000045b0| 09 7d 20 2f 2a 73 65 6c | 65 63 74 76 69 73 69 74 |.} /*sel|ectvisit|
|000045c0| 2a 2f 0d 09 0d 09 0d 62 | 6f 6f 6c 65 61 6e 20 73 |*/.....b|oolean s|
|000045d0| 65 6c 65 63 74 77 69 6e | 64 6f 77 62 79 74 69 74 |electwin|dowbytit|
|000045e0| 6c 65 20 28 62 73 29 20 | 62 69 67 73 74 72 69 6e |le (bs) |bigstrin|
|000045f0| 67 20 62 73 3b 20 7b 0d | 0d 09 2f 2a 0d 09 76 69 |g bs; {.|../*..vi|
|00004600| 73 69 74 20 61 6c 6c 20 | 74 68 65 20 77 69 6e 64 |sit all |the wind|
|00004610| 6f 77 73 20 66 72 6f 6d | 20 66 72 6f 6e 74 20 74 |ows from| front t|
|00004620| 6f 20 62 61 63 6b 2e 20 | 20 77 68 65 6e 20 77 65 |o back. | when we|
|00004630| 20 65 6e 63 6f 75 6e 74 | 65 72 20 6f 6e 65 20 6f | encount|er one o|
|00004640| 66 20 74 68 65 20 0d 09 | 61 70 70 27 73 20 77 69 |f the ..|app's wi|
|00004650| 6e 64 6f 77 73 20 63 68 | 65 63 6b 20 74 68 65 20 |ndows ch|eck the |
|00004660| 77 69 6e 64 6f 77 20 74 | 69 74 6c 65 2e 20 20 69 |window t|itle.  i|
|00004670| 66 20 69 74 20 65 71 75 | 61 6c 73 20 62 73 2c 20 |f it equ|als bs, |
|00004680| 74 68 65 6e 20 73 65 6c | 65 63 74 20 74 68 65 20 |then sel|ect the |
|00004690| 0d 09 77 69 6e 64 6f 77 | 20 61 6e 64 20 73 65 74 |..window| and set|
|000046a0| 20 74 68 65 20 67 6c 6f | 62 61 6c 73 20 61 63 63 | the glo|bals acc|
|000046b0| 6f 72 64 69 6e 67 6c 79 | 2e 0d 09 0d 09 72 65 74 |ordingly|.....ret|
|000046c0| 75 72 6e 20 66 61 6c 73 | 65 20 69 66 20 74 68 65 |urn fals|e if the|
|000046d0| 72 65 20 69 73 20 6e 6f | 20 61 70 70 20 77 69 6e |re is no| app win|
|000046e0| 64 6f 77 20 77 69 74 68 | 20 74 68 61 74 20 6e 61 |dow with| that na|
|000046f0| 6d 65 2e 0d 09 2a 2f 0d | 09 0d 09 63 6f 70 79 73 |me...*/.|...copys|
|00004700| 74 72 69 6e 67 20 28 62 | 73 2c 20 62 73 76 69 73 |tring (b|s, bsvis|
|00004710| 69 74 29 3b 20 2f 2a 63 | 6f 70 79 20 69 6e 74 6f |it); /*c|opy into|
|00004720| 20 67 6c 6f 62 61 6c 20 | 73 6f 20 76 69 73 69 74 | global |so visit|
|00004730| 20 72 6f 75 74 69 6e 65 | 20 63 61 6e 20 61 63 63 | routine| can acc|
|00004740| 65 73 73 2a 2f 0d 09 0d | 09 72 65 74 75 72 6e 20 |ess*/...|.return |
|00004750| 28 21 76 69 73 69 74 61 | 70 70 77 69 6e 64 6f 77 |(!visita|ppwindow|
|00004760| 73 20 28 26 73 65 6c 65 | 63 74 76 69 73 69 74 29 |s (&sele|ctvisit)|
|00004770| 29 3b 0d 09 7d 20 2f 2a | 73 65 6c 65 63 74 77 69 |);..} /*|selectwi|
|00004780| 6e 64 6f 77 62 79 74 69 | 74 6c 65 2a 2f 09 0d 09 |ndowbyti|tle*/...|
|00004790| 0d 09 0d 62 6f 6f 6c 65 | 61 6e 20 66 69 6e 64 62 |...boole|an findb|
|000047a0| 79 74 69 74 6c 65 76 69 | 73 69 74 20 28 61 70 70 |ytitlevi|sit (app|
|000047b0| 77 69 6e 64 6f 77 29 20 | 68 64 6c 61 70 70 77 69 |window) |hdlappwi|
|000047c0| 6e 64 6f 77 20 61 70 70 | 77 69 6e 64 6f 77 3b 20 |ndow app|window; |
|000047d0| 7b 0d 09 0d 09 62 69 67 | 73 74 72 69 6e 67 20 62 |{....big|string b|
|000047e0| 73 3b 0d 09 0d 09 67 65 | 74 61 70 70 77 69 6e 64 |s;....ge|tappwind|
|000047f0| 6f 77 74 69 74 6c 65 20 | 28 61 70 70 77 69 6e 64 |owtitle |(appwind|
|00004800| 6f 77 2c 20 62 73 29 3b | 0d 09 0d 09 69 66 20 28 |ow, bs);|....if (|
|00004810| 21 65 71 75 61 6c 73 74 | 72 69 6e 67 73 20 28 62 |!equalst|rings (b|
|00004820| 73 76 69 73 69 74 2c 20 | 62 73 29 29 20 2f 2a 6e |svisit, |bs)) /*n|
|00004830| 6f 20 6d 61 74 63 68 20 | 2d 2d 20 6b 65 65 70 20 |o match |-- keep |
|00004840| 74 72 61 76 65 72 73 69 | 6e 67 2a 2f 0d 09 09 72 |traversi|ng*/...r|
|00004850| 65 74 75 72 6e 20 28 74 | 72 75 65 29 3b 0d 09 0d |eturn (t|rue);...|
|00004860| 09 72 65 74 75 72 6e 20 | 28 66 61 6c 73 65 29 3b |.return |(false);|
|00004870| 20 2f 2a 73 74 6f 70 20 | 74 68 65 20 74 72 61 76 | /*stop |the trav|
|00004880| 65 72 73 61 6c 2a 2f 0d | 09 7d 20 2f 2a 66 69 6e |ersal*/.|.} /*fin|
|00004890| 64 62 79 74 69 74 6c 65 | 76 69 73 69 74 2a 2f 0d |dbytitle|visit*/.|
|000048a0| 09 0d 09 0d 62 6f 6f 6c | 65 61 6e 20 66 69 6e 64 |....bool|ean find|
|000048b0| 62 79 77 69 6e 64 6f 77 | 74 69 74 6c 65 20 28 62 |bywindow|title (b|
|000048c0| 73 74 69 74 6c 65 2c 20 | 61 70 70 77 69 6e 64 6f |stitle, |appwindo|
|000048d0| 77 29 20 62 69 67 73 74 | 72 69 6e 67 20 62 73 74 |w) bigst|ring bst|
|000048e0| 69 74 6c 65 3b 20 68 64 | 6c 61 70 70 77 69 6e 64 |itle; hd|lappwind|
|000048f0| 6f 77 20 2a 61 70 70 77 | 69 6e 64 6f 77 3b 20 7b |ow *appw|indow; {|
|00004900| 0d 0d 09 63 6f 70 79 73 | 74 72 69 6e 67 20 28 62 |...copys|tring (b|
|00004910| 73 74 69 74 6c 65 2c 20 | 62 73 76 69 73 69 74 29 |stitle, |bsvisit)|
|00004920| 3b 20 2f 2a 63 6f 70 79 | 20 69 6e 74 6f 20 67 6c |; /*copy| into gl|
|00004930| 6f 62 61 6c 20 73 6f 20 | 76 69 73 69 74 20 72 6f |obal so |visit ro|
|00004940| 75 74 69 6e 65 20 63 61 | 6e 20 61 63 63 65 73 73 |utine ca|n access|
|00004950| 2a 2f 0d 09 0d 09 76 69 | 73 69 74 61 70 70 77 69 |*/....vi|sitappwi|
|00004960| 6e 64 6f 77 73 20 28 26 | 66 69 6e 64 62 79 74 69 |ndows (&|findbyti|
|00004970| 74 6c 65 76 69 73 69 74 | 29 3b 0d 09 0d 09 69 66 |tlevisit|);....if|
|00004980| 20 28 6c 61 73 74 77 69 | 6e 64 6f 77 76 69 73 69 | (lastwi|ndowvisi|
|00004990| 74 65 64 20 3d 3d 20 6e | 69 6c 29 0d 09 09 72 65 |ted == n|il)...re|
|000049a0| 74 75 72 6e 20 28 66 61 | 6c 73 65 29 3b 0d 09 09 |turn (fa|lse);...|
|000049b0| 0d 09 2a 61 70 70 77 69 | 6e 64 6f 77 20 3d 20 6c |..*appwi|ndow = l|
|000049c0| 61 73 74 77 69 6e 64 6f | 77 76 69 73 69 74 65 64 |astwindo|wvisited|
|000049d0| 3b 0d 09 0d 09 72 65 74 | 75 72 6e 20 28 74 72 75 |;....ret|urn (tru|
|000049e0| 65 29 3b 0d 09 7d 20 2f | 2a 66 69 6e 64 62 79 77 |e);..} /|*findbyw|
|000049f0| 69 6e 64 6f 77 74 69 74 | 6c 65 2a 2f 0d 09 0d 09 |indowtit|le*/....|
|00004a00| 0d 62 6f 6f 6c 65 61 6e | 20 66 69 6e 64 6e 74 68 |.boolean| findnth|
|00004a10| 76 69 73 69 74 20 28 61 | 70 70 77 69 6e 64 6f 77 |visit (a|ppwindow|
|00004a20| 29 20 68 64 6c 61 70 70 | 77 69 6e 64 6f 77 20 61 |) hdlapp|window a|
|00004a30| 70 70 77 69 6e 64 6f 77 | 3b 20 7b 0d 09 0d 09 72 |ppwindow|; {....r|
|00004a40| 65 74 75 72 6e 20 28 2b | 2b 78 32 20 3c 20 78 31 |eturn (+|+x2 < x1|
|00004a50| 29 3b 20 2f 2a 76 69 73 | 69 74 20 75 6e 74 69 6c |); /*vis|it until|
|00004a60| 20 74 68 65 79 27 72 65 | 20 65 71 75 61 6c 2a 2f | they're| equal*/|
|00004a70| 0d 09 7d 20 2f 2a 66 69 | 6e 64 6e 74 68 76 69 73 |..} /*fi|ndnthvis|
|00004a80| 69 74 2a 2f 0d 09 0d 09 | 0d 62 6f 6f 6c 65 61 6e |it*/....|.boolean|
|00004a90| 20 66 69 6e 64 6e 74 68 | 77 69 6e 64 6f 77 20 28 | findnth|window (|
|00004aa0| 6e 2c 20 61 70 70 77 69 | 6e 64 6f 77 29 20 73 68 |n, appwi|ndow) sh|
|00004ab0| 6f 72 74 20 6e 3b 20 68 | 64 6c 61 70 70 77 69 6e |ort n; h|dlappwin|
|00004ac0| 64 6f 77 20 2a 61 70 70 | 77 69 6e 64 6f 77 3b 20 |dow *app|window; |
|00004ad0| 7b 0d 09 0d 09 78 31 20 | 3d 20 6e 3b 20 2f 2a 63 |{....x1 |= n; /*c|
|00004ae0| 6f 70 79 20 69 6e 74 6f | 20 61 20 22 72 65 67 69 |opy into| a "regi|
|00004af0| 73 74 65 72 22 20 66 6f | 72 20 76 69 73 69 74 20 |ster" fo|r visit |
|00004b00| 72 6f 75 74 69 6e 65 2a | 2f 0d 09 0d 09 78 32 20 |routine*|/....x2 |
|00004b10| 3d 20 30 3b 20 2f 2a 61 | 6e 6f 74 68 65 72 20 72 |= 0; /*a|nother r|
|00004b20| 65 67 69 73 74 65 72 2a | 2f 0d 09 0d 09 76 69 73 |egister*|/....vis|
|00004b30| 69 74 61 70 70 77 69 6e | 64 6f 77 73 20 28 26 66 |itappwin|dows (&f|
|00004b40| 69 6e 64 6e 74 68 76 69 | 73 69 74 29 3b 0d 09 0d |indnthvi|sit);...|
|00004b50| 09 2a 61 70 70 77 69 6e | 64 6f 77 20 3d 20 6c 61 |.*appwin|dow = la|
|00004b60| 73 74 77 69 6e 64 6f 77 | 76 69 73 69 74 65 64 3b |stwindow|visited;|
|00004b70| 0d 09 0d 09 72 65 74 75 | 72 6e 20 28 6c 61 73 74 |....retu|rn (last|
|00004b80| 77 69 6e 64 6f 77 76 69 | 73 69 74 65 64 20 21 3d |windowvi|sited !=|
|00004b90| 20 6e 69 6c 29 3b 0d 09 | 7d 20 2f 2a 66 69 6e 64 | nil);..|} /*find|
|00004ba0| 62 79 77 69 6e 64 6f 77 | 74 69 74 6c 65 2a 2f 0d |bywindow|title*/.|
|00004bb0| 09 0d 09 0d 62 6f 6f 6c | 65 61 6e 20 63 6f 75 6e |....bool|ean coun|
|00004bc0| 74 77 69 6e 64 6f 77 73 | 76 69 73 69 74 20 28 61 |twindows|visit (a|
|00004bd0| 70 70 77 69 6e 64 6f 77 | 29 20 68 64 6c 61 70 70 |ppwindow|) hdlapp|
|00004be0| 77 69 6e 64 6f 77 20 61 | 70 70 77 69 6e 64 6f 77 |window a|ppwindow|
|00004bf0| 3b 20 7b 0d 09 0d 09 78 | 31 2b 2b 3b 0d 09 0d 09 |; {....x|1++;....|
|00004c00| 72 65 74 75 72 6e 20 28 | 74 72 75 65 29 3b 20 2f |return (|true); /|
|00004c10| 2a 6b 65 65 70 20 67 6f | 69 6e 67 2a 2f 0d 09 7d |*keep go|ing*/..}|
|00004c20| 20 2f 2a 63 6f 75 6e 74 | 77 69 6e 64 6f 77 73 76 | /*count|windowsv|
|00004c30| 69 73 69 74 2a 2f 0d 09 | 0d 09 0d 73 68 6f 72 74 |isit*/..|...short|
|00004c40| 20 63 6f 75 6e 74 77 69 | 6e 64 6f 77 73 20 28 76 | countwi|ndows (v|
|00004c50| 6f 69 64 29 20 7b 0d 09 | 0d 09 78 31 20 3d 20 30 |oid) {..|..x1 = 0|
|00004c60| 3b 20 2f 2a 63 6f 70 79 | 20 69 6e 74 6f 20 61 20 |; /*copy| into a |
|00004c70| 22 72 65 67 69 73 74 65 | 72 22 20 66 6f 72 20 76 |"registe|r" for v|
|00004c80| 69 73 69 74 20 72 6f 75 | 74 69 6e 65 2a 2f 0d 09 |isit rou|tine*/..|
|00004c90| 0d 09 76 69 73 69 74 61 | 70 70 77 69 6e 64 6f 77 |..visita|ppwindow|
|00004ca0| 73 20 28 26 63 6f 75 6e | 74 77 69 6e 64 6f 77 73 |s (&coun|twindows|
|00004cb0| 76 69 73 69 74 29 3b 0d | 09 0d 09 72 65 74 75 72 |visit);.|...retur|
|00004cc0| 6e 20 28 78 31 29 3b 0d | 09 7d 20 2f 2a 63 6f 75 |n (x1);.|.} /*cou|
|00004cd0| 6e 74 77 69 6e 64 6f 77 | 73 2a 2f 0d 09 0d 09 0d |ntwindow|s*/.....|
|00004ce0| 62 6f 6f 6c 65 61 6e 20 | 72 65 73 65 74 64 69 72 |boolean |resetdir|
|00004cf0| 74 79 73 63 72 6f 6c 6c | 62 61 72 73 76 69 73 69 |tyscroll|barsvisi|
|00004d00| 74 20 28 61 70 70 77 69 | 6e 64 6f 77 29 20 68 64 |t (appwi|ndow) hd|
|00004d10| 6c 61 70 70 77 69 6e 64 | 6f 77 20 61 70 70 77 69 |lappwind|ow appwi|
|00004d20| 6e 64 6f 77 3b 20 7b 0d | 09 0d 09 72 65 67 69 73 |ndow; {.|...regis|
|00004d30| 74 65 72 20 68 64 6c 61 | 70 70 77 69 6e 64 6f 77 |ter hdla|ppwindow|
|00004d40| 20 68 61 20 3d 20 61 70 | 70 77 69 6e 64 6f 77 3b | ha = ap|pwindow;|
|00004d50| 0d 09 0d 09 73 65 74 61 | 70 70 77 69 6e 64 6f 77 |....seta|ppwindow|
|00004d60| 20 28 68 61 29 3b 0d 09 | 0d 09 69 66 20 28 28 2a | (ha);..|..if ((*|
|00004d70| 2a 68 61 29 2e 66 6c 72 | 65 73 65 74 73 63 72 6f |*ha).flr|esetscro|
|00004d80| 6c 6c 62 61 72 73 29 20 | 7b 0d 09 09 0d 09 09 72 |llbars) |{......r|
|00004d90| 65 73 65 74 61 70 70 73 | 63 72 6f 6c 6c 62 61 72 |esetapps|crollbar|
|00004da0| 73 20 28 68 61 29 3b 0d | 09 09 0d 09 09 28 2a 2a |s (ha);.|.....(**|
|00004db0| 68 61 29 2e 66 6c 72 65 | 73 65 74 73 63 72 6f 6c |ha).flre|setscrol|
|00004dc0| 6c 62 61 72 73 20 3d 20 | 66 61 6c 73 65 3b 20 2f |lbars = |false; /|
|00004dd0| 2a 63 6f 6e 73 75 6d 65 | 20 69 74 2a 2f 0d 09 09 |*consume| it*/...|
|00004de0| 7d 0d 09 0d 09 72 65 74 | 75 72 6e 20 28 74 72 75 |}....ret|urn (tru|
|00004df0| 65 29 3b 20 2f 2a 76 69 | 73 69 74 20 61 6c 6c 20 |e); /*vi|sit all |
|00004e00| 6f 70 65 6e 20 77 69 6e | 64 6f 77 73 2a 2f 0d 09 |open win|dows*/..|
|00004e10| 7d 20 2f 2a 72 65 73 65 | 74 64 69 72 74 79 73 63 |} /*rese|tdirtysc|
|00004e20| 72 6f 6c 6c 62 61 72 73 | 76 69 73 69 74 2a 2f 0d |rollbars|visit*/.|
|00004e30| 09 0d 09 0d 62 6f 6f 6c | 65 61 6e 20 72 65 73 65 |....bool|ean rese|
|00004e40| 74 64 69 72 74 79 73 63 | 72 6f 6c 6c 62 61 72 73 |tdirtysc|rollbars|
|00004e50| 20 28 76 6f 69 64 29 20 | 7b 0d 0d 09 76 69 73 69 | (void) |{...visi|
|00004e60| 74 61 70 70 77 69 6e 64 | 6f 77 73 20 28 26 72 65 |tappwind|ows (&re|
|00004e70| 73 65 74 64 69 72 74 79 | 73 63 72 6f 6c 6c 62 61 |setdirty|scrollba|
|00004e80| 72 73 76 69 73 69 74 29 | 3b 0d 09 7d 20 2f 2a 72 |rsvisit)|;..} /*r|
|00004e90| 65 73 65 74 64 69 72 74 | 79 73 63 72 6f 6c 6c 62 |esetdirt|yscrollb|
|00004ea0| 61 72 73 2a 2f 0d 09 0d | 09 0d 62 6f 6f 6c 65 61 |ars*/...|..boolea|
|00004eb0| 6e 20 67 65 74 75 6e 74 | 69 74 6c 65 64 74 69 74 |n getunt|itledtit|
|00004ec0| 6c 65 20 28 62 73 29 20 | 62 69 67 73 74 72 69 6e |le (bs) |bigstrin|
|00004ed0| 67 20 62 73 3b 20 7b 0d | 09 0d 09 72 65 67 69 73 |g bs; {.|...regis|
|00004ee0| 74 65 72 20 6c 6f 6e 67 | 20 63 74 20 3d 20 31 3b |ter long| ct = 1;|
|00004ef0| 0d 09 68 64 6c 61 70 70 | 77 69 6e 64 6f 77 20 61 |..hdlapp|window a|
|00004f00| 70 70 77 69 6e 64 6f 77 | 3b 0d 09 0d 09 77 68 69 |ppwindow|;....whi|
|00004f10| 6c 65 20 28 74 72 75 65 | 29 20 7b 0d 09 09 0d 09 |le (true|) {.....|
|00004f20| 09 63 6f 70 79 73 74 72 | 69 6e 67 20 28 22 5c 70 |.copystr|ing ("\p|
|00004f30| 55 6e 74 69 74 6c 65 64 | 20 22 2c 20 62 73 29 3b |Untitled| ", bs);|
|00004f40| 0d 09 09 0d 09 09 70 75 | 73 68 6c 6f 6e 67 20 28 |......pu|shlong (|
|00004f50| 63 74 2b 2b 2c 20 62 73 | 29 3b 0d 09 09 0d 09 09 |ct++, bs|);......|
|00004f60| 69 66 20 28 21 66 69 6e | 64 62 79 77 69 6e 64 6f |if (!fin|dbywindo|
|00004f70| 77 74 69 74 6c 65 20 28 | 62 73 2c 20 26 61 70 70 |wtitle (|bs, &app|
|00004f80| 77 69 6e 64 6f 77 29 29 | 0d 09 09 09 72 65 74 75 |window))|....retu|
|00004f90| 72 6e 20 28 74 72 75 65 | 29 3b 0d 09 09 7d 20 2f |rn (true|);...} /|
|00004fa0| 2a 77 68 69 6c 65 2a 2f | 0d 09 7d 20 2f 2a 67 65 |*while*/|..} /*ge|
|00004fb0| 74 75 6e 74 69 74 6c 65 | 64 74 69 74 6c 65 2a 2f |tuntitle|dtitle*/|
|00004fc0| 0d 09 0d 0d 62 6f 6f 6c | 65 61 6e 20 66 69 6e 64 |....bool|ean find|
|00004fd0| 62 79 66 69 6c 65 76 69 | 73 69 74 20 28 61 70 70 |byfilevi|sit (app|
|00004fe0| 77 69 6e 64 6f 77 29 20 | 68 64 6c 61 70 70 77 69 |window) |hdlappwi|
|00004ff0| 6e 64 6f 77 20 61 70 70 | 77 69 6e 64 6f 77 3b 20 |ndow app|window; |
|00005000| 7b 0d 09 0d 09 69 66 20 | 28 28 2a 2a 61 70 70 77 |{....if |((**appw|
|00005010| 69 6e 64 6f 77 29 2e 76 | 6e 75 6d 20 3d 20 76 6e |indow).v|num = vn|
|00005020| 75 6d 76 69 73 69 74 29 | 20 7b 0d 09 0d 09 09 69 |umvisit)| {.....i|
|00005030| 66 20 28 65 71 75 61 6c | 73 74 72 69 6e 67 73 20 |f (equal|strings |
|00005040| 28 28 2a 2a 61 70 70 77 | 69 6e 64 6f 77 29 2e 66 |((**appw|indow).f|
|00005050| 6e 61 6d 65 2c 20 62 73 | 76 69 73 69 74 29 29 20 |name, bs|visit)) |
|00005060| 0d 09 09 09 72 65 74 75 | 72 6e 20 28 66 61 6c 73 |....retu|rn (fals|
|00005070| 65 29 3b 0d 09 09 7d 0d | 09 09 09 0d 09 72 65 74 |e);...}.|.....ret|
|00005080| 75 72 6e 20 28 74 72 75 | 65 29 3b 20 2f 2a 6b 65 |urn (tru|e); /*ke|
|00005090| 65 70 20 76 69 73 69 74 | 69 6e 67 2a 2f 0d 09 7d |ep visit|ing*/..}|
|000050a0| 20 2f 2a 66 69 6e 64 62 | 79 66 69 6c 65 76 69 73 | /*findb|yfilevis|
|000050b0| 69 74 2a 2f 0d 09 0d 09 | 0d 62 6f 6f 6c 65 61 6e |it*/....|.boolean|
|000050c0| 20 66 69 6e 64 62 79 66 | 69 6c 65 20 28 62 69 67 | findbyf|ile (big|
|000050d0| 73 74 72 69 6e 67 20 66 | 6e 61 6d 65 2c 20 73 68 |string f|name, sh|
|000050e0| 6f 72 74 20 76 6e 75 6d | 2c 20 68 64 6c 61 70 70 |ort vnum|, hdlapp|
|000050f0| 77 69 6e 64 6f 77 20 2a | 61 70 70 77 69 6e 64 6f |window *|appwindo|
|00005100| 77 29 20 7b 0d 0d 09 63 | 6f 70 79 73 74 72 69 6e |w) {...c|opystrin|
|00005110| 67 20 28 66 6e 61 6d 65 | 2c 20 62 73 76 69 73 69 |g (fname|, bsvisi|
|00005120| 74 29 3b 20 2f 2a 63 6f | 70 79 20 69 6e 74 6f 20 |t); /*co|py into |
|00005130| 67 6c 6f 62 61 6c 20 73 | 6f 20 76 69 73 69 74 20 |global s|o visit |
|00005140| 72 6f 75 74 69 6e 65 20 | 63 61 6e 20 61 63 63 65 |routine |can acce|
|00005150| 73 73 2a 2f 0d 09 0d 09 | 76 6e 75 6d 76 69 73 69 |ss*/....|vnumvisi|
|00005160| 74 20 3d 20 76 6e 75 6d | 3b 20 2f 2a 63 6f 70 79 |t = vnum|; /*copy|
|00005170| 20 69 6e 74 6f 20 67 6c | 6f 62 61 6c 2a 2f 0d 09 | into gl|obal*/..|
|00005180| 0d 09 76 69 73 69 74 61 | 70 70 77 69 6e 64 6f 77 |..visita|ppwindow|
|00005190| 73 20 28 26 66 69 6e 64 | 62 79 66 69 6c 65 76 69 |s (&find|byfilevi|
|000051a0| 73 69 74 29 3b 0d 09 0d | 09 69 66 20 28 6c 61 73 |sit);...|.if (las|
|000051b0| 74 77 69 6e 64 6f 77 76 | 69 73 69 74 65 64 20 3d |twindowv|isited =|
|000051c0| 3d 20 6e 69 6c 29 0d 09 | 09 72 65 74 75 72 6e 20 |= nil)..|.return |
|000051d0| 28 66 61 6c 73 65 29 3b | 0d 09 09 0d 09 2a 61 70 |(false);|.....*ap|
|000051e0| 70 77 69 6e 64 6f 77 20 | 3d 20 6c 61 73 74 77 69 |pwindow |= lastwi|
|000051f0| 6e 64 6f 77 76 69 73 69 | 74 65 64 3b 0d 09 0d 09 |ndowvisi|ted;....|
|00005200| 72 65 74 75 72 6e 20 28 | 74 72 75 65 29 3b 0d 09 |return (|true);..|
|00005210| 7d 20 2f 2a 66 69 6e 64 | 62 79 66 69 6c 65 2a 2f |} /*find|byfile*/|
|00005220| 0d 09 0d 09 0d 62 6f 6f | 6c 65 61 6e 20 73 65 74 |.....boo|lean set|
|00005230| 74 61 72 67 65 74 76 69 | 73 69 74 20 28 61 70 70 |targetvi|sit (app|
|00005240| 77 69 6e 64 6f 77 29 20 | 68 64 6c 61 70 70 77 69 |window) |hdlappwi|
|00005250| 6e 64 6f 77 20 61 70 70 | 77 69 6e 64 6f 77 3b 20 |ndow app|window; |
|00005260| 7b 0d 09 0d 09 62 69 67 | 73 74 72 69 6e 67 20 62 |{....big|string b|
|00005270| 73 3b 0d 09 0d 09 67 65 | 74 61 70 70 77 69 6e 64 |s;....ge|tappwind|
|00005280| 6f 77 74 69 74 6c 65 20 | 28 61 70 70 77 69 6e 64 |owtitle |(appwind|
|00005290| 6f 77 2c 20 62 73 29 3b | 0d 09 0d 09 69 66 20 28 |ow, bs);|....if (|
|000052a0| 21 65 71 75 61 6c 73 74 | 72 69 6e 67 73 20 28 62 |!equalst|rings (b|
|000052b0| 73 76 69 73 69 74 2c 20 | 62 73 29 29 20 2f 2a 6e |svisit, |bs)) /*n|
|000052c0| 6f 20 6d 61 74 63 68 20 | 2d 2d 20 6b 65 65 70 20 |o match |-- keep |
|000052d0| 74 72 61 76 65 72 73 69 | 6e 67 2a 2f 0d 09 09 72 |traversi|ng*/...r|
|000052e0| 65 74 75 72 6e 20 28 74 | 72 75 65 29 3b 0d 09 0d |eturn (t|rue);...|
|000052f0| 09 2f 2a 66 6f 75 6e 64 | 20 61 20 6d 61 74 63 68 |./*found| a match|
|00005300| 2c 20 73 74 6f 70 20 74 | 68 65 20 74 72 61 76 65 |, stop t|he trave|
|00005310| 72 73 61 6c 2a 2f 0d 09 | 0d 09 73 65 74 61 70 70 |rsal*/..|..setapp|
|00005320| 77 69 6e 64 6f 77 20 28 | 61 70 70 77 69 6e 64 6f |window (|appwindo|
|00005330| 77 29 3b 0d 09 0d 09 72 | 65 74 75 72 6e 20 28 66 |w);....r|eturn (f|
|00005340| 61 6c 73 65 29 3b 20 2f | 2a 73 74 6f 70 20 74 68 |alse); /|*stop th|
|00005350| 65 20 74 72 61 76 65 72 | 73 61 6c 2a 2f 0d 09 7d |e traver|sal*/..}|
|00005360| 20 2f 2a 73 65 74 74 61 | 72 67 65 74 76 69 73 69 | /*setta|rgetvisi|
|00005370| 74 2a 2f 0d 09 0d 09 0d | 62 6f 6f 6c 65 61 6e 20 |t*/.....|boolean |
|00005380| 73 65 74 61 70 70 74 61 | 72 67 65 74 20 28 62 73 |setappta|rget (bs|
|00005390| 29 20 62 69 67 73 74 72 | 69 6e 67 20 62 73 3b 20 |) bigstr|ing bs; |
|000053a0| 7b 0d 09 0d 09 2f 2a 0d | 09 73 65 74 20 74 68 65 |{..../*.|.set the|
|000053b0| 20 67 6c 6f 62 61 6c 73 | 20 66 6f 72 20 74 68 65 | globals| for the|
|000053c0| 20 77 69 6e 64 6f 77 20 | 77 69 74 68 20 74 68 65 | window |with the|
|000053d0| 20 69 6e 64 69 63 61 74 | 65 64 20 6e 61 6d 65 20 | indicat|ed name |
|000053e0| 77 69 74 68 6f 75 74 20 | 62 72 69 6e 67 69 6e 67 |without |bringing|
|000053f0| 0d 09 74 68 65 20 77 69 | 6e 64 6f 77 20 74 6f 20 |..the wi|ndow to |
|00005400| 74 68 65 20 66 72 6f 6e | 74 2e 0d 09 2a 2f 0d 09 |the fron|t...*/..|
|00005410| 0d 09 73 65 74 61 70 70 | 77 69 6e 64 6f 77 20 28 |..setapp|window (|
|00005420| 6e 69 6c 29 3b 0d 09 0d | 09 63 6f 70 79 73 74 72 |nil);...|.copystr|
|00005430| 69 6e 67 20 28 62 73 2c | 20 62 73 76 69 73 69 74 |ing (bs,| bsvisit|
|00005440| 29 3b 20 2f 2a 63 6f 70 | 79 20 69 6e 74 6f 20 67 |); /*cop|y into g|
|00005450| 6c 6f 62 61 6c 20 73 6f | 20 76 69 73 69 74 20 72 |lobal so| visit r|
|00005460| 6f 75 74 69 6e 65 20 63 | 61 6e 20 61 63 63 65 73 |outine c|an acces|
|00005470| 73 2a 2f 0d 09 0d 09 76 | 69 73 69 74 61 70 70 77 |s*/....v|isitappw|
|00005480| 69 6e 64 6f 77 73 20 28 | 26 73 65 74 74 61 72 67 |indows (|&settarg|
|00005490| 65 74 76 69 73 69 74 29 | 3b 0d 09 0d 09 72 65 74 |etvisit)|;....ret|
|000054a0| 75 72 6e 20 28 61 70 70 | 2e 61 70 70 77 69 6e 64 |urn (app|.appwind|
|000054b0| 6f 77 20 21 3d 20 6e 69 | 6c 29 3b 0d 09 7d 20 2f |ow != ni|l);..} /|
|000054c0| 2a 73 65 74 61 70 70 74 | 61 72 67 65 74 2a 2f 09 |*setappt|arget*/.|
|000054d0| 0d 09 0d 0d 62 6f 6f 6c | 65 61 6e 20 73 65 74 66 |....bool|ean setf|
|000054e0| 72 6f 6e 74 67 6c 6f 62 | 61 6c 73 76 69 73 69 74 |rontglob|alsvisit|
|000054f0| 20 28 61 70 70 77 69 6e | 64 6f 77 29 20 68 64 6c | (appwin|dow) hdl|
|00005500| 61 70 70 77 69 6e 64 6f | 77 20 61 70 70 77 69 6e |appwindo|w appwin|
|00005510| 64 6f 77 3b 20 7b 0d 09 | 0d 09 73 65 74 61 70 70 |dow; {..|..setapp|
|00005520| 77 69 6e 64 6f 77 20 28 | 61 70 70 77 69 6e 64 6f |window (|appwindo|
|00005530| 77 29 3b 0d 09 0d 09 72 | 65 74 75 72 6e 20 28 66 |w);....r|eturn (f|
|00005540| 61 6c 73 65 29 3b 20 2f | 2a 73 74 6f 70 20 74 68 |alse); /|*stop th|
|00005550| 65 20 74 72 61 76 65 72 | 73 61 6c 2a 2f 0d 09 7d |e traver|sal*/..}|
|00005560| 20 2f 2a 73 65 74 66 72 | 6f 6e 74 67 6c 6f 62 61 | /*setfr|ontgloba|
|00005570| 6c 73 76 69 73 69 74 2a | 2f 0d 09 0d 09 0d 62 6f |lsvisit*|/.....bo|
|00005580| 6f 6c 65 61 6e 20 73 65 | 74 66 72 6f 6e 74 67 6c |olean se|tfrontgl|
|00005590| 6f 62 61 6c 73 20 28 76 | 6f 69 64 29 20 7b 0d 09 |obals (v|oid) {..|
|000055a0| 0d 09 73 65 74 61 70 70 | 77 69 6e 64 6f 77 20 28 |..setapp|window (|
|000055b0| 6e 69 6c 29 3b 0d 09 0d | 09 76 69 73 69 74 61 70 |nil);...|.visitap|
|000055c0| 70 77 69 6e 64 6f 77 73 | 20 28 26 73 65 74 66 72 |pwindows| (&setfr|
|000055d0| 6f 6e 74 67 6c 6f 62 61 | 6c 73 76 69 73 69 74 29 |ontgloba|lsvisit)|
|000055e0| 3b 0d 09 0d 09 72 65 74 | 75 72 6e 20 28 61 70 70 |;....ret|urn (app|
|000055f0| 2e 61 70 70 77 69 6e 64 | 6f 77 20 21 3d 20 6e 69 |.appwind|ow != ni|
|00005600| 6c 29 3b 0d 09 7d 20 2f | 2a 73 65 74 66 72 6f 6e |l);..} /|*setfron|
|00005610| 74 67 6c 6f 62 61 6c 73 | 2a 2f 0d 0d 0d 76 6f 69 |tglobals|*/...voi|
|00005620| 64 20 6d 6f 76 65 61 70 | 70 77 69 6e 64 6f 77 20 |d moveap|pwindow |
|00005630| 28 68 64 6c 61 70 70 77 | 69 6e 64 6f 77 20 61 70 |(hdlappw|indow ap|
|00005640| 70 77 69 6e 64 6f 77 2c | 20 52 65 63 74 20 72 29 |pwindow,| Rect r)|
|00005650| 20 7b 0d 09 0d 09 72 65 | 67 69 73 74 65 72 20 57 | {....re|gister W|
|00005660| 69 6e 64 6f 77 50 74 72 | 20 77 20 3d 20 28 2a 2a |indowPtr| w = (**|
|00005670| 61 70 70 77 69 6e 64 6f | 77 29 2e 6d 61 63 77 69 |appwindo|w).macwi|
|00005680| 6e 64 6f 77 3b 0d 09 09 | 0d 09 63 6f 6e 73 74 72 |ndow;...|..constr|
|00005690| 61 69 6e 74 6f 64 65 73 | 6b 74 6f 70 20 28 26 72 |aintodes|ktop (&r|
|000056a0| 29 3b 0d 09 0d 09 53 69 | 7a 65 57 69 6e 64 6f 77 |);....Si|zeWindow|
|000056b0| 20 28 77 2c 20 72 2e 72 | 69 67 68 74 20 2d 20 72 | (w, r.r|ight - r|
|000056c0| 2e 6c 65 66 74 2c 20 72 | 2e 62 6f 74 74 6f 6d 20 |.left, r|.bottom |
|000056d0| 2d 20 72 2e 74 6f 70 2c | 20 74 72 75 65 29 3b 0d |- r.top,| true);.|
|000056e0| 09 0d 09 4d 6f 76 65 57 | 69 6e 64 6f 77 20 28 77 |...MoveW|indow (w|
|000056f0| 2c 20 72 2e 6c 65 66 74 | 2c 20 72 2e 74 6f 70 2c |, r.left|, r.top,|
|00005700| 20 66 61 6c 73 65 29 3b | 0d 09 0d 09 63 6f 6d 70 | false);|....comp|
|00005710| 75 74 65 77 69 6e 64 6f | 77 69 6e 66 6f 20 28 77 |utewindo|winfo (w|
|00005720| 2c 20 61 70 70 77 69 6e | 64 6f 77 29 3b 0d 09 0d |, appwin|dow);...|
|00005730| 09 72 65 73 69 7a 65 61 | 70 70 73 63 72 6f 6c 6c |.resizea|ppscroll|
|00005740| 62 61 72 73 20 28 61 70 | 70 77 69 6e 64 6f 77 29 |bars (ap|pwindow)|
|00005750| 3b 0d 09 0d 09 72 65 73 | 65 74 61 70 70 73 63 72 |;....res|etappscr|
|00005760| 6f 6c 6c 62 61 72 73 20 | 28 61 70 70 77 69 6e 64 |ollbars |(appwind|
|00005770| 6f 77 29 3b 0d 09 7d 20 | 2f 2a 6d 6f 76 65 61 70 |ow);..} |/*moveap|
|00005780| 70 77 69 6e 64 6f 77 2a | 2f 0d 09 0d 0d 73 74 61 |pwindow*|/....sta|
|00005790| 74 69 63 20 76 6f 69 64 | 20 73 61 76 65 61 70 70 |tic void| saveapp|
|000057a0| 77 69 6e 64 6f 77 69 6e | 66 6f 20 28 68 64 6c 61 |windowin|fo (hdla|
|000057b0| 70 70 77 69 6e 64 6f 77 | 20 61 70 70 77 69 6e 64 |ppwindow| appwind|
|000057c0| 6f 77 2c 20 74 79 64 69 | 73 6b 77 69 6e 64 6f 77 |ow, tydi|skwindow|
|000057d0| 69 6e 66 6f 20 2a 61 70 | 70 77 69 6e 64 6f 77 69 |info *ap|pwindowi|
|000057e0| 6e 66 6f 29 20 7b 0d 09 | 0d 09 72 65 67 69 73 74 |nfo) {..|..regist|
|000057f0| 65 72 20 68 64 6c 61 70 | 70 77 69 6e 64 6f 77 20 |er hdlap|pwindow |
|00005800| 68 61 20 3d 20 61 70 70 | 77 69 6e 64 6f 77 3b 0d |ha = app|window;.|
|00005810| 09 74 79 64 69 73 6b 77 | 69 6e 64 6f 77 69 6e 66 |.tydiskw|indowinf|
|00005820| 6f 20 78 3b 0d 09 52 65 | 63 74 20 72 3b 0d 09 0d |o x;..Re|ct r;...|
|00005830| 09 63 6c 65 61 72 62 79 | 74 65 73 20 28 26 78 2c |.clearby|tes (&x,|
|00005840| 20 6c 6f 6e 67 73 69 7a | 65 6f 66 20 28 78 29 29 | longsiz|eof (x))|
|00005850| 3b 0d 09 0d 09 78 2e 76 | 65 72 73 69 6f 6e 6e 75 |;....x.v|ersionnu|
|00005860| 6d 62 65 72 20 3d 20 31 | 3b 0d 09 0d 09 67 65 74 |mber = 1|;....get|
|00005870| 64 65 73 6b 74 6f 70 72 | 65 63 74 20 28 68 61 2c |desktopr|ect (ha,|
|00005880| 20 26 78 2e 77 69 6e 64 | 6f 77 72 65 63 74 29 3b | &x.wind|owrect);|
|00005890| 0d 09 0d 09 67 65 74 73 | 63 72 6f 6c 6c 62 61 72 |....gets|crollbar|
|000058a0| 69 6e 66 6f 20 28 28 2a | 2a 68 61 29 2e 76 65 72 |info ((*|*ha).ver|
|000058b0| 74 62 61 72 2c 20 26 78 | 2e 76 65 72 74 6d 69 6e |tbar, &x|.vertmin|
|000058c0| 2c 20 26 78 2e 76 65 72 | 74 6d 61 78 2c 20 26 78 |, &x.ver|tmax, &x|
|000058d0| 2e 76 65 72 74 63 75 72 | 72 65 6e 74 29 3b 0d 09 |.vertcur|rent);..|
|000058e0| 0d 09 67 65 74 73 63 72 | 6f 6c 6c 62 61 72 69 6e |..getscr|ollbarin|
|000058f0| 66 6f 20 28 28 2a 2a 68 | 61 29 2e 68 6f 72 69 7a |fo ((**h|a).horiz|
|00005900| 62 61 72 2c 20 26 78 2e | 68 6f 72 69 7a 6d 69 6e |bar, &x.|horizmin|
|00005910| 2c 20 26 78 2e 68 6f 72 | 69 7a 6d 61 78 2c 20 26 |, &x.hor|izmax, &|
|00005920| 78 2e 68 6f 72 69 7a 63 | 75 72 72 65 6e 74 29 3b |x.horizc|urrent);|
|00005930| 0d 09 0d 09 78 2e 64 65 | 66 61 75 6c 74 73 69 7a |....x.de|faultsiz|
|00005940| 65 20 3d 20 28 2a 2a 68 | 61 29 2e 64 65 66 61 75 |e = (**h|a).defau|
|00005950| 6c 74 73 69 7a 65 3b 0d | 09 0d 09 78 2e 64 65 66 |ltsize;.|...x.def|
|00005960| 61 75 6c 74 6a 75 73 74 | 69 66 69 63 61 74 69 6f |aultjust|ificatio|
|00005970| 6e 20 3d 20 28 2a 2a 68 | 61 29 2e 64 65 66 61 75 |n = (**h|a).defau|
|00005980| 6c 74 6a 75 73 74 69 66 | 69 63 61 74 69 6f 6e 3b |ltjustif|ication;|
|00005990| 0d 09 0d 09 64 69 73 6b | 67 65 74 66 6f 6e 74 6e |....disk|getfontn|
|000059a0| 61 6d 65 20 28 28 2a 2a | 68 61 29 2e 64 65 66 61 |ame ((**|ha).defa|
|000059b0| 75 6c 74 66 6f 6e 74 2c | 20 78 2e 64 65 66 61 75 |ultfont,| x.defau|
|000059c0| 6c 74 66 6f 6e 74 73 74 | 72 69 6e 67 29 3b 0d 09 |ltfontst|ring);..|
|000059d0| 0d 09 2a 61 70 70 77 69 | 6e 64 6f 77 69 6e 66 6f |..*appwi|ndowinfo|
|000059e0| 20 3d 20 78 3b 0d 09 7d | 20 2f 2a 73 61 76 65 61 | = x;..}| /*savea|
|000059f0| 70 70 77 69 6e 64 6f 77 | 69 6e 66 6f 2a 2f 0d 09 |ppwindow|info*/..|
|00005a00| 0d 0d 73 74 61 74 69 63 | 20 76 6f 69 64 20 6c 6f |..static| void lo|
|00005a10| 61 64 61 70 70 77 69 6e | 64 6f 77 69 6e 66 6f 20 |adappwin|dowinfo |
|00005a20| 28 68 64 6c 61 70 70 77 | 69 6e 64 6f 77 20 61 70 |(hdlappw|indow ap|
|00005a30| 70 77 69 6e 64 6f 77 2c | 20 74 79 64 69 73 6b 77 |pwindow,| tydiskw|
|00005a40| 69 6e 64 6f 77 69 6e 66 | 6f 20 61 70 70 77 69 6e |indowinf|o appwin|
|00005a50| 64 6f 77 69 6e 66 6f 29 | 20 7b 0d 09 0d 09 72 65 |dowinfo)| {....re|
|00005a60| 67 69 73 74 65 72 20 68 | 64 6c 61 70 70 77 69 6e |gister h|dlappwin|
|00005a70| 64 6f 77 20 68 61 20 3d | 20 61 70 70 77 69 6e 64 |dow ha =| appwind|
|00005a80| 6f 77 3b 0d 09 74 79 64 | 69 73 6b 77 69 6e 64 6f |ow;..tyd|iskwindo|
|00005a90| 77 69 6e 66 6f 20 78 20 | 3d 20 61 70 70 77 69 6e |winfo x |= appwin|
|00005aa0| 64 6f 77 69 6e 66 6f 3b | 0d 09 73 68 6f 72 74 20 |dowinfo;|..short |
|00005ab0| 66 6f 6e 74 6e 75 6d 3b | 0d 09 0d 09 6d 6f 76 65 |fontnum;|....move|
|00005ac0| 61 70 70 77 69 6e 64 6f | 77 20 28 68 61 2c 20 78 |appwindo|w (ha, x|
|00005ad0| 2e 77 69 6e 64 6f 77 72 | 65 63 74 29 3b 0d 09 0d |.windowr|ect);...|
|00005ae0| 09 73 65 74 73 63 72 6f | 6c 6c 62 61 72 69 6e 66 |.setscro|llbarinf|
|00005af0| 6f 20 28 28 2a 2a 68 61 | 29 2e 76 65 72 74 62 61 |o ((**ha|).vertba|
|00005b00| 72 2c 20 78 2e 76 65 72 | 74 6d 69 6e 2c 20 78 2e |r, x.ver|tmin, x.|
|00005b10| 76 65 72 74 6d 61 78 2c | 20 78 2e 76 65 72 74 63 |vertmax,| x.vertc|
|00005b20| 75 72 72 65 6e 74 29 3b | 0d 09 0d 09 73 65 74 73 |urrent);|....sets|
|00005b30| 63 72 6f 6c 6c 62 61 72 | 69 6e 66 6f 20 28 28 2a |crollbar|info ((*|
|00005b40| 2a 68 61 29 2e 68 6f 72 | 69 7a 62 61 72 2c 20 78 |*ha).hor|izbar, x|
|00005b50| 2e 68 6f 72 69 7a 6d 69 | 6e 2c 20 78 2e 68 6f 72 |.horizmi|n, x.hor|
|00005b60| 69 7a 6d 61 78 2c 20 78 | 2e 68 6f 72 69 7a 63 75 |izmax, x|.horizcu|
|00005b70| 72 72 65 6e 74 29 3b 0d | 09 0d 09 2f 2a 0d 09 28 |rrent);.|.../*..(|
|00005b80| 2a 2a 68 61 29 2e 73 63 | 72 6f 6c 6c 6f 72 69 67 |**ha).sc|rollorig|
|00005b90| 69 6e 2e 76 20 3d 20 78 | 2e 76 65 72 74 63 75 72 |in.v = x|.vertcur|
|00005ba0| 72 65 6e 74 3b 0d 09 0d | 09 28 2a 2a 68 61 29 2e |rent;...|.(**ha).|
|00005bb0| 73 63 72 6f 6c 6c 6f 72 | 69 67 69 6e 2e 68 20 3d |scrollor|igin.h =|
|00005bc0| 20 78 2e 68 6f 72 69 7a | 63 75 72 72 65 6e 74 3b | x.horiz|current;|
|00005bd0| 0d 09 2a 2f 0d 09 0d 09 | 28 2a 2a 68 61 29 2e 64 |..*/....|(**ha).d|
|00005be0| 65 66 61 75 6c 74 73 69 | 7a 65 20 3d 20 78 2e 64 |efaultsi|ze = x.d|
|00005bf0| 65 66 61 75 6c 74 73 69 | 7a 65 3b 0d 09 0d 09 28 |efaultsi|ze;....(|
|00005c00| 2a 2a 68 61 29 2e 64 65 | 66 61 75 6c 74 6a 75 73 |**ha).de|faultjus|
|00005c10| 74 69 66 69 63 61 74 69 | 6f 6e 20 3d 20 78 2e 64 |tificati|on = x.d|
|00005c20| 65 66 61 75 6c 74 6a 75 | 73 74 69 66 69 63 61 74 |efaultju|stificat|
|00005c30| 69 6f 6e 3b 0d 09 0d 09 | 64 69 73 6b 67 65 74 66 |ion;....|diskgetf|
|00005c40| 6f 6e 74 6e 75 6d 20 28 | 78 2e 64 65 66 61 75 6c |ontnum (|x.defaul|
|00005c50| 74 66 6f 6e 74 73 74 72 | 69 6e 67 2c 20 26 66 6f |tfontstr|ing, &fo|
|00005c60| 6e 74 6e 75 6d 29 3b 0d | 09 0d 09 28 2a 2a 68 61 |ntnum);.|...(**ha|
|00005c70| 29 2e 64 65 66 61 75 6c | 74 66 6f 6e 74 20 3d 20 |).defaul|tfont = |
|00005c80| 66 6f 6e 74 6e 75 6d 3b | 0d 09 7d 20 2f 2a 6c 6f |fontnum;|..} /*lo|
|00005c90| 61 64 61 70 70 77 69 6e | 64 6f 77 69 6e 66 6f 2a |adappwin|dowinfo*|
|00005ca0| 2f 0d 09 0d 0d 62 6f 6f | 6c 65 61 6e 20 73 61 76 |/....boo|lean sav|
|00005cb0| 65 77 69 6e 64 6f 77 20 | 28 66 6e 61 6d 65 2c 20 |ewindow |(fname, |
|00005cc0| 76 6e 75 6d 29 20 62 69 | 67 73 74 72 69 6e 67 20 |vnum) bi|gstring |
|00005cd0| 66 6e 61 6d 65 3b 20 73 | 68 6f 72 74 20 76 6e 75 |fname; s|hort vnu|
|00005ce0| 6d 3b 20 7b 0d 09 0d 09 | 72 65 67 69 73 74 65 72 |m; {....|register|
|00005cf0| 20 68 64 6c 61 70 70 77 | 69 6e 64 6f 77 20 68 61 | hdlappw|indow ha|
|00005d00| 20 3d 20 61 70 70 2e 61 | 70 70 77 69 6e 64 6f 77 | = app.a|ppwindow|
|00005d10| 3b 0d 09 48 61 6e 64 6c | 65 20 68 20 3d 20 6e 69 |;..Handl|e h = ni|
|00005d20| 6c 3b 0d 09 6c 6f 6e 67 | 20 63 74 62 79 74 65 73 |l;..long| ctbytes|
|00005d30| 3b 0d 09 73 68 6f 72 74 | 20 72 6e 75 6d 3b 0d 09 |;..short| rnum;..|
|00005d40| 0d 09 73 65 74 73 74 72 | 69 6e 67 6c 65 6e 67 74 |..setstr|inglengt|
|00005d50| 68 20 28 62 73 65 72 72 | 6f 72 73 74 72 69 6e 67 |h (bserr|orstring|
|00005d60| 2c 20 30 29 3b 0d 09 0d | 09 69 66 20 28 28 2a 2a |, 0);...|.if ((**|
|00005d70| 68 61 29 2e 66 6e 75 6d | 20 3d 3d 20 30 29 20 7b |ha).fnum| == 0) {|
|00005d80| 20 2f 2a 66 69 6c 65 20 | 69 73 6e 27 74 20 6f 70 | /*file |isn't op|
|00005d90| 65 6e 2a 2f 0d 09 0d 09 | 09 73 68 6f 72 74 20 66 |en*/....|.short f|
|00005da0| 6e 75 6d 3b 0d 09 09 0d | 09 09 69 66 20 28 21 66 |num;....|..if (!f|
|00005db0| 69 6c 65 6e 65 77 20 28 | 66 6e 61 6d 65 2c 20 76 |ilenew (|fname, v|
|00005dc0| 6e 75 6d 2c 20 61 70 70 | 2e 63 72 65 61 74 6f 72 |num, app|.creator|
|00005dd0| 2c 20 61 70 70 2e 66 69 | 6c 65 74 79 70 65 2c 20 |, app.fi|letype, |
|00005de0| 26 66 6e 75 6d 29 29 20 | 7b 0d 09 09 09 0d 09 09 |&fnum)) |{.......|
|00005df0| 09 61 70 70 61 6c 65 72 | 74 20 28 22 5c 70 45 72 |.appaler|t ("\pEr|
|00005e00| 72 6f 72 20 73 61 76 69 | 6e 67 20 74 68 65 20 66 |ror savi|ng the f|
|00005e10| 72 6f 6e 74 20 77 69 6e | 64 6f 77 2e 22 29 3b 0d |ront win|dow.");.|
|00005e20| 09 09 09 0d 09 09 09 72 | 65 74 75 72 6e 20 28 66 |.......r|eturn (f|
|00005e30| 61 6c 73 65 29 3b 0d 09 | 09 09 7d 0d 09 09 0d 09 |alse);..|..}.....|
|00005e40| 09 28 2a 2a 68 61 29 2e | 66 6e 75 6d 20 3d 20 66 |.(**ha).|fnum = f|
|00005e50| 6e 75 6d 3b 0d 09 09 7d | 0d 09 65 6c 73 65 20 7b |num;...}|..else {|
|00005e60| 20 2f 2a 66 69 6c 65 20 | 69 73 20 61 6c 72 65 61 | /*file |is alrea|
|00005e70| 64 79 20 6f 70 65 6e 2a | 2f 0d 09 09 0d 09 09 69 |dy open*|/......i|
|00005e80| 66 20 28 21 66 69 6c 65 | 73 65 74 65 6f 66 20 28 |f (!file|seteof (|
|00005e90| 28 2a 2a 68 61 29 2e 66 | 6e 75 6d 2c 20 28 6c 6f |(**ha).f|num, (lo|
|00005ea0| 6e 67 29 20 30 29 29 20 | 7b 0d 09 09 09 0d 09 09 |ng) 0)) |{.......|
|00005eb0| 09 61 70 70 61 6c 65 72 | 74 20 28 22 5c 70 45 72 |.appaler|t ("\pEr|
|00005ec0| 72 6f 72 20 74 72 75 6e | 63 61 74 69 6e 67 20 74 |ror trun|cating t|
|00005ed0| 68 65 20 66 69 6c 65 2e | 22 29 3b 0d 09 09 09 0d |he file.|");.....|
|00005ee0| 09 09 09 72 65 74 75 72 | 6e 20 28 66 61 6c 73 65 |...retur|n (false|
|00005ef0| 29 3b 0d 09 09 09 7d 0d | 09 09 7d 0d 09 0d 09 69 |);....}.|..}....i|
|00005f00| 66 20 28 21 28 2a 61 70 | 70 2e 70 61 63 6b 63 61 |f (!(*ap|p.packca|
|00005f10| 6c 6c 62 61 63 6b 29 20 | 28 26 68 29 29 20 7b 0d |llback) |(&h)) {.|
|00005f20| 09 09 0d 09 09 61 70 70 | 61 6c 65 72 74 20 28 22 |.....app|alert ("|
|00005f30| 5c 70 4f 75 74 20 6f 66 | 20 6d 65 6d 6f 72 79 2e |\pOut of| memory.|
|00005f40| 22 29 3b 0d 09 09 0d 09 | 09 67 6f 74 6f 20 65 72 |");.....|.goto er|
|00005f50| 72 6f 72 3b 0d 09 09 7d | 0d 09 09 09 0d 09 69 66 |ror;...}|......if|
|00005f60| 20 28 21 66 69 6c 65 77 | 72 69 74 65 68 61 6e 64 | (!filew|ritehand|
|00005f70| 6c 65 20 28 28 2a 2a 68 | 61 29 2e 66 6e 75 6d 2c |le ((**h|a).fnum,|
|00005f80| 20 68 29 29 20 7b 0d 09 | 09 0d 09 09 61 70 70 61 | h)) {..|....appa|
|00005f90| 6c 65 72 74 20 28 22 5c | 70 45 72 72 6f 72 20 77 |lert ("\|pError w|
|00005fa0| 72 69 74 69 6e 67 20 74 | 6f 20 66 69 6c 65 2e 22 |riting t|o file."|
|00005fb0| 29 3b 0d 09 09 0d 09 09 | 67 6f 74 6f 20 65 72 72 |);......|goto err|
|00005fc0| 6f 72 3b 0d 09 09 7d 0d | 09 0d 09 69 66 20 28 6f |or;...}.|...if (o|
|00005fd0| 70 65 6e 72 65 73 6f 75 | 72 63 65 66 69 6c 65 20 |penresou|rcefile |
|00005fe0| 28 66 6e 61 6d 65 2c 20 | 76 6e 75 6d 2c 20 26 72 |(fname, |vnum, &r|
|00005ff0| 6e 75 6d 29 29 20 7b 0d | 09 0d 09 09 74 79 64 69 |num)) {.|....tydi|
|00006000| 73 6b 77 69 6e 64 6f 77 | 69 6e 66 6f 20 78 3b 0d |skwindow|info x;.|
|00006010| 09 09 48 61 6e 64 6c 65 | 20 68 6f 70 74 69 6f 6e |..Handle| hoption|
|00006020| 73 20 3d 20 6e 69 6c 3b | 0d 09 09 0d 09 09 73 61 |s = nil;|......sa|
|00006030| 76 65 61 70 70 77 69 6e | 64 6f 77 69 6e 66 6f 20 |veappwin|dowinfo |
|00006040| 28 68 61 2c 20 26 78 29 | 3b 0d 09 09 0d 09 09 70 |(ha, &x)|;......p|
|00006050| 75 74 72 65 73 6f 75 72 | 63 65 20 28 72 6e 75 6d |utresour|ce (rnum|
|00006060| 2c 20 27 61 70 74 6b 27 | 2c 20 31 32 38 2c 20 6c |, 'aptk'|, 128, l|
|00006070| 6f 6e 67 73 69 7a 65 6f | 66 20 28 78 29 2c 20 26 |ongsizeo|f (x), &|
|00006080| 78 29 3b 0d 09 09 0d 09 | 09 28 2a 61 70 70 2e 67 |x);.....|.(*app.g|
|00006090| 65 74 6f 70 74 69 6f 6e | 73 63 61 6c 6c 62 61 63 |etoption|scallbac|
|000060a0| 6b 29 20 28 26 68 6f 70 | 74 69 6f 6e 73 29 3b 0d |k) (&hop|tions);.|
|000060b0| 09 09 0d 09 09 69 66 20 | 28 68 6f 70 74 69 6f 6e |.....if |(hoption|
|000060c0| 73 20 21 3d 20 6e 69 6c | 29 0d 09 09 09 70 75 74 |s != nil|)....put|
|000060d0| 72 65 73 6f 75 72 63 65 | 68 61 6e 64 6c 65 20 28 |resource|handle (|
|000060e0| 72 6e 75 6d 2c 20 27 61 | 70 74 6b 27 2c 20 31 32 |rnum, 'a|ptk', 12|
|000060f0| 39 2c 20 68 6f 70 74 69 | 6f 6e 73 29 3b 0d 09 09 |9, hopti|ons);...|
|00006100| 0d 09 09 64 69 73 70 6f | 73 65 68 61 6e 64 6c 65 |...dispo|sehandle|
|00006110| 20 28 68 6f 70 74 69 6f | 6e 73 29 3b 0d 09 09 0d | (hoptio|ns);....|
|00006120| 09 09 63 6c 6f 73 65 72 | 65 73 6f 75 72 63 65 66 |..closer|esourcef|
|00006130| 69 6c 65 20 28 72 6e 75 | 6d 29 3b 0d 09 09 7d 0d |ile (rnu|m);...}.|
|00006140| 09 0d 09 64 69 73 70 6f | 73 65 68 61 6e 64 6c 65 |...dispo|sehandle|
|00006150| 20 28 68 29 3b 0d 09 0d | 09 28 2a 2a 68 61 29 2e | (h);...|.(**ha).|
|00006160| 66 6c 6d 61 64 65 63 68 | 61 6e 67 65 73 20 3d 20 |flmadech|anges = |
|00006170| 66 61 6c 73 65 3b 0d 09 | 09 0d 09 72 65 74 75 72 |false;..|...retur|
|00006180| 6e 20 28 74 72 75 65 29 | 3b 0d 09 09 0d 09 65 72 |n (true)|;.....er|
|00006190| 72 6f 72 3a 0d 09 0d 09 | 64 69 73 70 6f 73 65 68 |ror:....|disposeh|
|000061a0| 61 6e 64 6c 65 20 28 68 | 29 3b 0d 09 0d 09 2f 2a |andle (h|);..../*|
|000061b0| 63 6f 6d 6d 65 6e 74 65 | 64 20 64 77 20 38 2f 38 |commente|d dw 8/8|
|000061c0| 2f 39 32 20 2d 2d 20 73 | 65 65 6d 73 20 77 72 6f |/92 -- s|eems wro|
|000061d0| 6e 67 2c 20 68 61 76 65 | 6e 27 74 20 74 65 73 74 |ng, have|n't test|
|000061e0| 65 64 20 63 68 61 6e 67 | 65 2e 0d 09 0d 09 66 69 |ed chang|e.....fi|
|000061f0| 6c 65 63 6c 6f 73 65 20 | 28 28 2a 2a 68 61 29 2e |leclose |((**ha).|
|00006200| 66 6e 75 6d 29 3b 0d 09 | 0d 09 28 2a 2a 68 61 29 |fnum);..|..(**ha)|
|00006210| 2e 66 6e 75 6d 20 3d 20 | 30 3b 0d 09 0d 09 66 69 |.fnum = |0;....fi|
|00006220| 6c 65 64 65 6c 65 74 65 | 20 28 66 6e 61 6d 65 2c |ledelete| (fname,|
|00006230| 20 76 6e 75 6d 29 3b 0d | 09 2a 2f 0d 09 0d 09 72 | vnum);.|.*/....r|
|00006240| 65 74 75 72 6e 20 28 66 | 61 6c 73 65 29 3b 0d 09 |eturn (f|alse);..|
|00006250| 7d 20 2f 2a 73 61 76 65 | 77 69 6e 64 6f 77 2a 2f |} /*save|window*/|
|00006260| 0d 09 0d 0d 62 6f 6f 6c | 65 61 6e 20 6e 65 77 61 |....bool|ean newa|
|00006270| 70 70 77 69 6e 64 6f 77 | 20 28 62 73 74 69 74 6c |ppwindow| (bstitl|
|00006280| 65 2c 20 66 6c 73 68 6f | 77 77 69 6e 64 6f 77 29 |e, flsho|wwindow)|
|00006290| 20 62 69 67 73 74 72 69 | 6e 67 20 62 73 74 69 74 | bigstri|ng bstit|
|000062a0| 6c 65 3b 20 62 6f 6f 6c | 65 61 6e 20 66 6c 73 68 |le; bool|ean flsh|
|000062b0| 6f 77 77 69 6e 64 6f 77 | 3b 20 7b 0d 09 0d 09 72 |owwindow|; {....r|
|000062c0| 65 67 69 73 74 65 72 20 | 68 64 6c 61 70 70 77 69 |egister |hdlappwi|
|000062d0| 6e 64 6f 77 20 68 61 20 | 3d 20 61 70 70 2e 61 70 |ndow ha |= app.ap|
|000062e0| 70 77 69 6e 64 6f 77 3b | 0d 09 72 65 67 69 73 74 |pwindow;|..regist|
|000062f0| 65 72 20 57 69 6e 64 6f | 77 50 74 72 20 6d 61 63 |er Windo|wPtr mac|
|00006300| 77 69 6e 64 6f 77 3b 0d | 09 72 65 67 69 73 74 65 |window;.|.registe|
|00006310| 72 20 73 68 6f 72 74 20 | 69 3b 0d 09 72 65 67 69 |r short |i;..regi|
|00006320| 73 74 65 72 20 62 6f 6f | 6c 65 61 6e 20 66 6c 72 |ster boo|lean flr|
|00006330| 65 6c 61 74 69 76 65 20 | 3d 20 66 61 6c 73 65 3b |elative |= false;|
|00006340| 0d 09 73 68 6f 72 74 20 | 68 77 69 6e 64 6f 77 2c |..short |hwindow,|
|00006350| 20 76 77 69 6e 64 6f 77 | 3b 0d 09 52 65 63 74 20 | vwindow|;..Rect |
|00006360| 72 77 69 6e 64 6f 77 3b | 0d 09 62 69 67 73 74 72 |rwindow;|..bigstr|
|00006370| 69 6e 67 20 62 73 6c 61 | 73 74 77 6f 72 64 3b 0d |ing bsla|stword;.|
|00006380| 09 68 64 6c 73 63 72 6f | 6c 6c 62 61 72 20 76 65 |.hdlscro|llbar ve|
|00006390| 72 74 62 61 72 20 3d 20 | 6e 69 6c 2c 20 68 6f 72 |rtbar = |nil, hor|
|000063a0| 69 7a 62 61 72 20 3d 20 | 6e 69 6c 3b 0d 09 62 6f |izbar = |nil;..bo|
|000063b0| 6f 6c 65 61 6e 20 66 6c | 3b 0d 09 0d 09 69 66 20 |olean fl|;....if |
|000063c0| 28 68 61 20 21 3d 20 6e | 69 6c 29 20 7b 20 2f 2a |(ha != n|il) { /*|
|000063d0| 73 65 65 64 20 77 69 6e | 64 6f 77 20 70 6f 73 69 |seed win|dow posi|
|000063e0| 74 69 6f 6e 20 66 72 6f | 6d 20 66 72 6f 6e 74 6d |tion fro|m frontm|
|000063f0| 6f 73 74 20 77 69 6e 64 | 6f 77 2a 2f 0d 09 09 0d |ost wind|ow*/....|
+--------+-------------------------+-------------------------+--------+--------+