(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "16-Jul-99 15:51:41" ("compiled on " {DSK}medley3.5>sources>MENU.;3) "29-Jan-99 11:25:20" brecompiled exprs%: UPDATE/MENU/IMAGE in "LFG 13-Jul-99 ..." dated "13-Jul-99 18:22:12") (FILECREATED "16-Jul-99 15:51:36" {DSK}medley3.5>sources>MENU.;3 102161 changes to%: (FNS UPDATE/MENU/IMAGE) previous date%: "28-Jun-99 17:05:55" {DSK}medley3.5>sources>MENU.;2) MAXMENUITEMHEIGHT :D8 (P 4 ITEM P 2 ANSWER P 1 LABEL P 0 FONTHEIGHT I 0 MENU) P@@ XjZ@$dL JIIHdKKZJ(41 \MENUITEMLABEL) (74 BITMAP 49 BITMAP 26 MENU 15 FONTDESCRIPTOR 8 MENU) () MAXMENUITEMWIDTH :D8 (P 6 SUBITEMS P 5 LABEL P 4 I P 3 P2FLG P 2 FONT P 1 ANSWER I 1 NOSUBITEMMARK I 0 MENU) |@j@@"g'DHI\ A@L hIMMdMJKh lN` j_dOOHX(102 BITMAPWIDTH 87 STRINGWIDTH 56 \MENUSUBITEMS 46 \MENUITEMLABEL) (97 MENUSUBITEMMARK 75 BITMAP 66 BITMAP 29 :ESCAPE 22 MENU 14 MENU 5 MENU) () MENUA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 IMAGE F 1 SI::*RESETFORMS* F 2 NESTEDFLG F 3 MENU F 4 DSP F 5 RELEASECONTROLFLG) gPhP hQcUoPg` Pgg Pgg P l ih`ljSThiR ܰSTidR (144 MENU.HANDLER 129 MENU.HANDLER 105 GETMOUSESTATE 99 GETMOUSESTATE 89 BLOCK 81 TOTOPW 74 PUTWINDOWPROP 57 PUTWINDOWPROP 40 PUTWINDOWPROP 14 OPENW) (111 LASTMOUSEBUTTONS 69 WAKE.MY.PROCESS 64 BUTTONEVENTFN 52 CLOSE.PROCESS.MENU 47 CLOSEFN 35 \RUNNING.PROCESS 30 MENUPROCESS 4 CLOSEW) () MENU :D8 (L (1 POSITION) P 5 RESETSTATE P 4 SI::*RESETFORMS* P 3 LISPXHIST P 2 DSP P 0 IMAGE I 3 NESTEDFLG I 2 RELEASECONTROLFLG I 0 MENU F 6 LISPXHIST) Z@0Ag@A @Xd ZV!g $YCd @II (87 DOSELECTEDITEM 66 SI::RESETUNWIND 61 \MVLIST 56 MENUA0001 39 \INSUREWINDOW 23 \POSITION.MENU.IMAGE) (51 SI::RESETUNWIND 30 MENU 14 INPLACE 5 MENU) () MENUTITLEFONT :D8 (P 0 TITLEFONT I 1 SCREEN I 0 MENU) gA(@@2`b@$Xd"di@gi dA (100 DSPFONT 85 FONTP 80 \COERCEFONTDESC) (93 SCREEN 74 DISPLAY 66 MENU 49 MENU 40 LASTSCREEN 32 WINDOW 25 MENU 18 WINDOW 11 MENU) () ADDMENU :D8 (P 2 SCREEN P 1 IMAGEHEIGHT P 0 IMAGEWIDTH I 3 DONTOPENFLG I 2 POSITION I 1 W I 0 ADDEDMENU) @@ 0@ X@ YB !@bAjd``bA >@ B@@ B@@A C lAA`@hJ J bBBJ @A jdb@ @@ @CA Agg Agg Agg Ag@ Agg @@ghA @ Agg A@ A(402 EXTENDEXTENT 397 MENUREGION 389 PUTWINDOWPROP 371 SUBREGIONP 366 MENUREGION 360 DSPCLIPPINGREGION 330 WINDOWADDPROP 314 WINDOWADDPROP 302 PUTWINDOWPROP 286 PUTWINDOWPROP 270 PUTWINDOWPROP 253 OPENW 201 SHOWSHADEDITEMS 193 MOVEW 181 CREATEWFROMIMAGE 175 BITMAPCOPY 170 CHECK/MENU/IMAGE 145 BLTMENUIMAGE 137 \INSUREWINDOW 85 WINDOWP 46 POSITIONP 39 BITMAPHEIGHT 34 CHECK/MENU/IMAGE 27 BITMAPWIDTH 22 CHECK/MENU/IMAGE 12 \ILLEGAL.ARG) (384 SCROLLBYREPAINTFN 379 SCROLLFN 350 BACKGROUNDWHENSELECTEDFN 345 MENU 336 MENU 325 MENUREPAINTFN 320 REPAINTFN 308 MENU 297 MENUBUTTONFN 292 CURSORMOVEDFN 281 MENUBUTTONFN 276 BUTTONEVENTFN 265 MENUBUTTONFN 260 CURSORINFN 241 MENU 232 MENU 222 MENU 214 MENU 161 LASTSCREEN 153 SCREEN 125 MENU 114 MENU 103 MENU 93 MENU 75 LASTMOUSEY 70 LASTMOUSEX 54 MENU 5 MENU) () DELETEMENU :D8 (P 1 OTHERMENUS P 0 W I 2 FROMWINDOW I 1 CLOSEFLG I 0 MENU) @@ BB@ Hh@H Hg Y*@Io Hgh AH Hg@I @g@hH(115 PUTWINDOWPROP 110 DREMOVE 95 CLOSEW 85 PUTWINDOWPROP 72 ERROR 53 GETWINDOWUSERPROP 42 ERASEMENUIMAGE 28 WFROMMENU 12 \ILLEGAL.ARG) (137 MENU 129 BACKGROUNDWHENSELECTEDFN 122 MENU 103 MENU 79 MENU 48 MENU 19 WINDOW 5 MENU) ( 67 "MENU not correctly in W") MENUREGION :D8 (I 0 MENU) I @ @ @ @@ @IHh(25 BITMAPHEIGHT 20 CHECK/MENU/IMAGE 13 BITMAPWIDTH 8 CHECK/MENU/IMAGE) (60 MENU 50 MENU 41 MENU 32 MENU) () BLTMENUIMAGE :D8 (P 5 CR P 4 BORDER P 1 DSTWIN P 0 SRC I 2 DONTOPEN I 1 WIN I 0 MENU) @ @@A "BI zI ,hI HjdIL@ @L@ @H MdJJH MdKK @I HhdI@ @@ @ @I (233 SHOWSHADEDITEMS 226 BKBITBLT 177 SHOWSHADEDITEMS 170 BKBITBLT 152 BITMAPHEIGHT 135 BITMAPWIDTH 74 DSPCLIPPINGREGION 65 \INSUREWINDOW 57 OPENWP 43 \INSUREWINDOW 12 WINDOWP) (217 MENU 207 MENU 198 MENU 189 MENU 125 MENU 115 MENU 104 MENU 95 MENU 86 WINDOW 35 MENU 26 WINDOW 19 MENU 5 MENU) () ERASEMENUIMAGE :D8 (I 1 W I 0 MENU) XhddA @ @@ @@ @ gg (85 BKBITBLT 69 BITMAPHEIGHT 64 CHECK/MENU/IMAGE 58 BITMAPWIDTH 53 CHECK/MENU/IMAGE 8 \INSUREWINDOW) (79 REPLACE 74 TEXTURE 44 MENU 34 MENU 25 MENU 16 MENU) () DEFAULTMENUHELDFN :D8 (I 0 ITEM) @ o @ (28 PROMPTPRINT 13 PROMPTPRINT) NIL ( 8 "Will select this item when you release the button.") DEFAULTWHENSELECTEDFN :D8 (I 2 BUTTON I 1 FROMMENU I 0 ITEM) '@d"dg g@i (36 STKEVAL 20 STKPOS) (27 MENUBUTTONFN 15 MENU) () BACKGROUNDWHENSELECTEDFN :D8 (I 2 BUTTON I 1 FROMMENU I 0 ITEM) @dd (13 EVAL.AS.PROCESS) NIL () GETMENUITEM :D8 (I 2 YGRID I 1 XGRID I 0 MENU) )@@Bk@Ak (37 FNTH) (25 MENU 13 MENU 5 MENU) () MENUBUTTONFN :D8 (P 2 SELECTION P 1 MENU I 0 W) H`lj@ @g !HhY@ ZIJJ HX(64 DOSELECTEDITEM 52 MENU.HANDLER 45 \INSUREWINDOW 28 GETWINDOWUSERPROP 17 TOTOPW) (23 MENU 4 LASTMOUSEBUTTONS) () MENU.HANDLERA0001A0003 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 4 MENU F 5 OLDBOXX F 6 HELDSTATE F 7 OLDBOXY F 8 DSP F 9 HOLDTIMER F 10 LASTBUTTONSTATE F 11 MOUSEDOWN F 12 BOXX F 13 SUBMENUWINDOW F 14 BOXY F 15 MGRIDSPEC F 16 SUBMENURESULT F 17 KEEPCONTROLIFOUTFLG F 18 SUBMENU F 19 NCOLUMNS F 20 MOVEDLEFT F 21 HELDFN F 22 SI::NLSETQ-VALUE F 23 NESTEDFLG F 24 CHANGEOFFSETFLG F 25 NROWS F 26 LOCALMENUHELDWAIT) oi@"W$`lZj~JuJ i`l[jUKK IW"$`lj`` "icU!UWTW UWTW chWW`` 6W$W W WW W UW&W$Wgk԰TdUW W hi c W(WWd hc W`cV(T c TUd TW lVhc W!WWUWTW UWTW V)T c TUW TW lVhc WWl `chc W W cmW2  W W cmW& WUWWUaWUWTW UWTW V)T c TUW TW lVhc WWl `WWl W4cWWWTW cWWTW Wc WcfW*`V[W PTUW TW lW*ic 1UgWUWTW UWTW V)T c TUW TW lVhc WWl `chc W.WjWjW W(W"hl `coUcWUWTW UWTW V)T c TUW TW lVhc WWl `cW0MUJTdgTW TdgTW W UTUW W hc,g(1122 \FDECODE/BUTTON 1115 GETMENUITEM 1097 LASTMOUSEY 1061 LASTMOUSEX 1011 \CLOCK0 982 \FDECODE/BUTTON 974 GETMENUITEM 949 \BOXITEM 937 \MENU.ITEM.DESELECT 908 \CLOCK0 883 LASTMOUSEX 849 \CLOCK0 820 \FDECODE/BUTTON 812 GETMENUITEM 787 \BOXITEM 775 \MENU.ITEM.DESELECT 744 \FDECODE/BUTTON 736 GETMENUITEM 723 TIMEREXPIRED? 691 \BOXITEM 676 \MENU.ITEM.SELECT 655 \CLOCK0 629 \CLOCK0 600 \FDECODE/BUTTON 592 GETMENUITEM 567 \BOXITEM 555 \MENU.ITEM.DESELECT 520 STRICTLY/BETWEEN 509 GRIDXCOORD 502 LASTMOUSEX 491 STRICTLY/BETWEEN 480 GRIDYCOORD 473 LASTMOUSEY 451 \CLOCK0 422 \FDECODE/BUTTON 414 GETMENUITEM 389 \BOXITEM 377 \MENU.ITEM.DESELECT 337 \FDECODE/BUTTON 329 GETMENUITEM 287 OPENW 271 MENU 264 NESTED.SUBMENU.POS 257 GETMENUITEM 220 GRIDXCOORD 213 LASTMOUSEX 199 GRIDYCOORD 192 LASTMOUSEY 177 INSIDE? 141 \MENU.ITEM.SELECT 129 \BOXITEM 109 DOWINDOWCOM 104 WHICHW 71 \FZEROP 47 GETMOUSESTATE 40 \FZEROP 13 GETMOUSESTATE) (1132 :NORMAL 1088 MENU 1077 X 1069 MENU 1052 MENU 1041 Y 1033 MENU 1016 MENUHELDWAIT 999 FIXP 959 MENU 913 MENUHELDWAIT 854 MENUHELDWAIT 837 FIXP 797 MENU 643 FIXP 634 MENUHELDWAIT 617 FIXP 577 MENU 456 MENUHELDWAIT 439 FIXP 399 MENU 354 FIXP 315 MENU 299 LASTMOUSEBUTTONS 241 INPLACE 172 LASTMOUSEY 167 LASTMOUSEX 160 WINDOW 99 LASTMOUSEY 94 LASTMOUSEX 82 LASTMOUSEBUTTONS 53 LASTMOUSEBUTTONS 19 LASTMOUSEBUTTONS) () MENU.HANDLERA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 22 SI::*NLSETQFLAG* P 21 *PROCEED-CASES* P 20 SI::NLSETQ-VALUE P 19 SUBMENU P 18 SUBMENUWINDOW P 17 HELDSTATE P 16 BOXY P 15 BOXX P 14 OLDBOXY P 13 OLDBOXX P 12 SUBMENURESULT P 11 SUBITEMS P 10 ITEM P 9 LOCALMENUHELDWAIT P 8 NCOLUMNS P 7 NROWS P 6 HELDFN P 5 HOLDTIMER P 4 MGRIDSPEC P 3 LASTBUTTONSTATE P 2 MOVEDLEFT P 1 MOUSEDOWN I 0 SI::*CLEANUP-FORMS* F 23 MENU F 24 DSP F 25 SI::*RESETFORMS* F 26 *PROCEED-CASES*) gW.hhdW2c2`lHj HH ho`W. l `W.W.W.`3 nIJW0 L _ mO 0W0 L _mO O_O _W.W0 _$`W4O* gO(_O"IOOW.W0 OOW.W0 (276 ERROR! 270 \BOXITEM 254 \MENU.ITEM.DESELECT 219 MENU.HANDLERA0001A0003 195 \MENU.ITEM.SELECT 176 STRICTLY/BETWEEN 165 GRIDXCOORD 159 LASTMOUSEX 150 STRICTLY/BETWEEN 139 GRIDYCOORD 133 LASTMOUSEY 75 \CLOCK0 45 \FZEROP) (225 :NORMAL 206 SI::NLSETQ-PROCEED-CASE 113 MENUHELDWAIT 106 MENU 97 MENU 88 MENU 80 MENUHELDWAIT 65 MENU 58 LASTMOUSEBUTTONS 23 LASTMOUSEBUTTONS 4 \SMASHMENUIMAGEONRESET) ( 53 "NESTED") MENU.HANDLER :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 4 NESTEDFLG I 3 CHANGEOFFSETFLG I 2 KEEPCONTROLIFOUTFLG I 1 DSP I 0 MENU F 3 LISPXHIST) S!g $(23 SI::RESETUNWIND 18 \MVLIST 13 MENU.HANDLERA0001) (8 SI::RESETUNWIND) () DOSELECTEDITEM :D8 (I 2 BUTTON I 1 ITEM I 0 MENU) +Ag@gA@BlHhNIL (27 DEFAULTWHENSELECTEDFN 18 MENU 9 *DUMMYITEM*) () SHOWSHADEDITEMS :D8 (P 8 ITEMDESCR P 6 ITEM P 4 ANYSUBITEMS P 3 ITEMREGION P 2 ITEM P 1 SHADE P 0 ALLITEMS I 1 DSP I 0 MENU) @AHMh\@*Oh@N NiM]_HO OJ@ [LKK` JK@IA O_(123 RESHADEITEM 109 BITMAPWIDTH 86 MENUITEMREGION 73 NTH 48 \MENUSUBITEMS) (104 MENUSUBITEMMARK 27 MENU 5 MENU) () \AddShade :D8 (P 1 SHADEDITEMS P 0 INDEX I 2 MENU I 1 SHADE I 0 ITEM) C@B B*"HIZHAIYBI*h[HKAJ(13 \ItemNumber) (45 MENU 19 MENU 6 MENU) () \DelShade :D8 (I 1 LIST I 0 KEY) Ah@AAA@A (22 \DelShade) NIL () \FDECODE/BUTTON :D8 (L (0 BUTTONSTATE)) "@dlgdlgkgNIL (31 MIDDLE 21 RIGHT 10 LEFT) () MENUITEMREGION :D8 (P 3 ITEMNUMBER P 2 BORDER P 1 GRIDSPEC P 0 ITEMS I 1 IMENU I 0 ITEM) A AA AH @HHhdd@ [IKAIJIAKAkIJIlJIlJh(67 LENGTH 38 LENGTH 5 CHECK/MENU/IMAGE) (107 MENU 98 MENU 78 MENU 27 MENU 19 MENU 11 MENU) () \MENUITEMLABEL :D8 (L (0 ITEM)) @dNIL NIL () \MENUSUBITEMS :D8 (I 1 ITEM I 0 MENU) @&g@AlHNIL (14 DEFAULTSUBITEMFN 5 MENU) () CHECK/MENU/IMAGE :D8 (P 2 WINDOW P 1 DSP P 0 IMAGE I 2 SCREEN I 1 MAKEWINDOWFLG I 0 MENU) 0@@ @XBdH2`bHH2B@B @AJHH HB @HHH,I H,I HHH(157 DSPYOFFSET 142 DSPXOFFSET 108 CREATEWFROMIMAGE 99 UPDATEWFROMIMAGE 73 UPDATE/MENU/IMAGE 15 \ILLEGAL.ARG) (173 WINDOW 164 BITMAP 149 WINDOW 134 WINDOW 125 WINDOW 115 MENU 92 WINDOW 80 MENU 60 WINDOW 49 LASTSCREEN 41 WINDOW 34 WINDOW 22 MENU 8 MENU) () PPROMPT2 :D8 (I 0 ITEM) @@ @ (16 PROMPTPRINT) NIL () UPDATE/MENU/IMAGE :D8 (P 26 MAJOR# P 25 ITEMREGION P 24 NITEMSTOFIT P 23 I P 20 CENTER? P 19 ANYSUBITEMS? P 18 TITLE P 17 WINDOW P 16 TITLEWIDTH P 15 TITLEHEIGHT P 14 TITLEFONT P 13 FONT P 12 OUTLINE P 11 BORDER P 10 NITEMS P 9 MENUITEMS P 8 BITSPERPIXEL P 7 ROWHEIGHT P 6 COLWIDTH P 5 BLK P 4 DSP P 3 HEIGHT P 2 WIDTH P 1 NUMROWS P 0 NUMCOLS I 1 SCREEN I 0 MNU F 27 MENUSUBITEMMARK) 3pA(@@2`b@_@ _(@@gi _ -` gl _@O@_$@A _ _O$O j__ O _@3X@3&OkHkذ@3YOkIkظkO@3 @jj_@3 @Odkk_*O*_@O,4h_&@ ^nX@i OklO&"W6 _.@O. iO,_,jؾO lNHO HkH۾@ Nn@ _ @ Ol_@ ONHOlZIOOlO[dAk@a@WAOO_0OkO0kظOkHkعNHOlغIOOlOػ@OIH _*@ @@OIH _@H@IARAAk_@]MMM M] JKO ]hddMjdJKggn hddMOdJOlKOOlggj M \nL OL OL @ j@ j@ HIOL gL O$4OL O$OKOOOlJOh@LO( KOٻ OKOOOl@ OlO&9W6 1JMKMOMjOOlh_2k_4OL O'@c@@MJlKl۰EO2@LO( O_O4dHk_4O2O2OO2Ok_4O2dNjd@_"O"2AO"M@MA _"O"O,O" @(1313 ADVISEWDS 1290 CREATEWFROMIMAGE 1178 \SHOWMENULABEL 1123 DSPFONT 1045 BITMAPWIDTH 993 \SHOWMENULABEL 957 DSPFONT 945 DSPOPERATION 934 GRID 894 DSPYOFFSET 886 DSPXOFFSET 878 DSPRIGHTMARGIN 868 DSPCREATE 862 BKBITBLT 821 BKBITBLT 793 BITMAPCREATE 768 CLOSEW 675 \MAKE.ITEMS.VERT.ORDER 633 \MAKE.ITEMS.VERT.ORDER 475 MAXMENUITEMHEIGHT 403 \MENUSUBITEMS 389 BITMAPWIDTH 370 MAXMENUITEMWIDTH 201 LENGTH 187 STRINGWIDTH 166 MENUTITLEFONT 128 FONTCREATE 114 FONTP 102 FONTP 95 \COERCEFONTDESC) (1326 WINDOW 1319 MENU 1302 WINDOW 1283 MENU 1272 WINDOW 1260 WINDOW 1251 WINDOW 1242 MENU 1151 MENU 1145 MENU 1135 MENU 1080 BITMAP 1066 BITMAP 1052 BITMAP 1023 MENU 939 INVERT 921 MENU 910 MENU 900 MENU 855 REPLACE 850 TEXTURE 812 REPLACE 807 TEXTURE 775 WINDOW 760 WINDOW 750 BITMAP 742 MENU 730 BITMAP 723 SCREEN 714 SCREEN 704 SCREEN 695 MENU 686 MENU 666 MENU 656 MENU 646 MENU 624 MENU 564 SCREEN 551 MENU 541 MENU 530 SCREEN 490 MENU 458 MENU 442 MENU 351 MENU 331 MENU 308 MENU 296 MENU 283 MENU 271 MENU 244 MENU 222 MENU 209 MENU 173 FONTDESCRIPTOR 153 MENU 142 MENU 133 MENUFONT 121 HELVETICA 109 MENUFONT 89 DISPLAY 82 MENU 72 MENU 62 MENU 52 MENU 43 LASTSCREEN 35 WINDOW 28 MENU 21 WINDOW 14 MENU) () \MAKE.ITEMS.VERT.ORDER :D8 (P 10 R P 9 C P 7 EMPTY.STRING P 6 ITEM.POINTER P 5 ROWS P 4 I I 2 %#COLUMNS I 1 %#ROWS I 0 ITEMS) AAk\H I@oB k_O0MThhJ KhZLk԰K&Md ONOgh Ok԰NdXI HZYJ YH(131 LAST 90 TCONC) (82 *DUMMYITEM*) ( 17 "") \SHOWMENULABEL :D8 (P 1 A17030 P 0 LABEL I 4 CENTER? I 3 DSP I 2 MENU I 1 ITEMREGION I 0 ITEM) 0@ B@ V`jdCAAAB hdgghAAA` A HcH`D=HjdCAAH lAAHlhdghdA HjdCAAAAghd DHACB"g' AkC AhC  C B"g'ggHClI(266 DSPYPOSITION 252 DSPFONT 242 DSPXPOSITION 231 CENTERPRINTINREGION 205 BKBITBLT 173 BKBITBLT 131 BITMAPWIDTH 100 BKBITBLT 94 CREATEREGION 83 BITMAPWIDTH 15 \MENUSUBITEMS 5 \MENUITEMLABEL) (292 PRIN3 286 PRIN4 279 :ESCAPE 272 MENU 257 FONTDESCRIPTOR 225 :ESCAPE 218 MENU 197 INPUT 164 INPUT 150 BITMAP 107 BITMAP 78 MENUSUBITEMMARK 63 REPLACE 58 INPUT 48 FONTDESCRIPTOR 41 MENU 22 MENUSUBITEMMARK) () \POSITION.MENU.IMAGE :D8 (P 3 MY P 2 MX P 1 IMAGE P 0 SCREEN I 1 POSITION I 0 MENU) `A @bd*!Add3d3AA7AA3A3AA``[`@iH @YJ@ZK@[JH@ ټdLLdjjZKdjjH@ ٽdMM[@YdJK @I I(246 SHOWSHADEDITEMS 239 MOVEW 213 BITMAPHEIGHT 208 CHECK/MENU/IMAGE 172 BITMAPWIDTH 167 CHECK/MENU/IMAGE 119 CHECK/MENU/IMAGE 91 GETMOUSESTATE 84 GETMOUSESTATE) (228 MENU 200 SCREEN 159 SCREEN 147 MENU 135 MENU 125 MENU 110 LASTSCREEN 103 LASTMOUSEY 97 LASTMOUSEX 25 SCREEN 11 MENU) () \SMASHMENUIMAGEONRESET :D8 (L (0 MENU) F 0 RESETSTATE) $Pdgdgih @hhNIL (29 MENU 14 HARDRESET 6 RESET) () CLOSE.PROCESS.MENU :D8 (I 0 WINDOW) @g i (16 WAKE.PROCESS 10 GETWINDOWUSERPROP) (5 MENUPROCESS) () DEFAULTSUBITEMFN :D8 (L (1 ITEM 0 MENU)) +A'Ab AbAbAbgANIL (35 SUBITEMS) () GETMENUPROP :D8 (I 1 PROPERTY I 0 MENU) @"A'NIL (5 MENU) () PUTMENUPROP :D8 (P 0 NOWDATA I 2 VALUE I 1 PROPERTY I 0 MENU) '@"H@ABh"BAB (35 LISTPUT) (19 MENU 5 MENU) () WAKE.MY.PROCESS :D8 (I 0 WINDOW) @g o (20 WAKE.PROCESS 10 GETWINDOWUSERPROP) (5 MENUPROCESS) ( 15 "ABC") \INVERTITEM :D8 (I 3 DSP I 2 MENU I 1 ROW I 0 COLUMN) #@AngB BC (32 SHADEGRIDBOX) (23 MENU 15 MENU 9 INVERT) () \MENU.ITEM.SELECT :D8 (P 1 SUBITEMS P 0 ITEM I 3 DSP I 2 MENU I 1 ROW I 0 COLUMN F 2 SUBMENU) cB@A HgJ@ABC H>BH Yd3g BI cdBHC BI ch(93 NESTED.SUBMENU 85 OPENW 80 \POSITION.MENU.IMAGE 75 NESTED.SUBMENU.POS 64 NESTED.SUBMENU 43 \MENUSUBITEMS 32 \INVERTITEM 7 GETMENUITEM) (53 POPUP 20 *DUMMYITEM*) () \MENU.ITEM.DESELECT :D8 (I 3 DSP I 2 MENU I 1 ROW I 0 COLUMN F 0 SUBMENUWINDOW F 1 SUBMENU) /B@A g@ABC Pd hcch(36 CLOSEW 28 \INVERTITEM 7 GETMENUITEM) (16 *DUMMYITEM*) () \ItemNumber :D8 (P 2 SOMEITEM P 1 ITEMNUM I 1 ALLITEMS I 0 ITEM) "AkHhZ@@JIHIkԹNIL NIL () \BOXITEM :D8 (P 5 HGHT P 4 WID P 3 BTM P 2 LFT P 1 GRID P 0 BORDER I 3 DSP I 2 MENU I 1 ROW I 0 COLUMN) B@A gB3 jB BhddC@I HZAI H[IHl\IHl]ggn hddCJkKkLlMlggn h(146 BKBITBLT 109 BKBITBLT 66 BOTTOMOFGRIDCOORD 56 LEFTOFGRIDCOORD 7 GETMENUITEM) (137 INVERT 132 TEXTURE 100 INVERT 95 TEXTURE 40 MENU 27 MENU 16 *DUMMYITEM*) () NESTED.SUBMENU :D8 (P 1 SUBMENU P 0 SUBMENULST I 1 SUBITEMS I 0 MENU) @g  AHY@gA`dAkldJdg@ dK @dL@dM@dkkdN@_dO@ _dO @&_dO&jdndh_dO YH I(203 PUTMENUPROP 10 GETMENUPROP) (163 MENU 146 MENU 129 MENU 109 MENU 95 MENU 81 MENU 67 MENU 58 Y 36 |MENUTYPE#| 30 SUBMENUS 5 SUBMENUS) () NESTED.SUBMENU.POS :D8 (P 4 ITEMNUMBER P 3 DD P 2 BORDER P 1 GRIDSPEC P 0 ITEMS I 2 STREAM I 1 ITEM I 0 IMENU) @@ @Bgh 0H AHHhddA \IL@IIlJKmJI@L@kIK(84 LENGTH 56 LENGTH 35 \GETSTREAM) (165 \DISPLAYDATA 146 MENU 137 MENU 120 \DISPLAYDATA 95 MENU 47 \DISPLAYDATA 40 STREAM 29 OUTPUT 21 MENU 13 MENU 5 MENU) () WFROMMENU :D8 (P 1 WINDOW I 0 MENU) .i Hh@Ig IiHX(33 MEMB 28 GETWINDOWUSERPROP 5 OPENWINDOWS) (23 MENU) () MENUREPAINTFN :D8 (P 1 MENU P 0 DSP I 1 REG I 0 WINDOW) 0@ @g dIH h(39 BLTMENUIMAGE 26 REVERSE 21 GETWINDOWUSERPROP 5 \INSUREWINDOW) (16 MENU) () MAXSTRINGWIDTH :D8 (P 2 I P 1 M I 3 RDTBL I 2 PRIN2FLG I 1 FONT I 0 L) %@j"HIIJABC dKKHX(22 STRINGWIDTH) NIL () CENTEREDPRIN1 :D8 (I 4 Y I 3 WIDTH I 2 LEFT I 1 DS I 0 EXP) BC@A lDA @A (27 PRIN3 20 MOVETO 8 STRINGWIDTH) NIL () CENTERPRINTINREGION :D8 (I 3 PRIN2FLG I 2 STREAM I 1 REGION I 0 EXP) =Al Ad3ihhB b@AAAABC (58 CENTERPRINTINAREA 32 DSPCLIPPINGREGION 7 EQLENGTH) NIL () CENTERPRINTINAREAA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 STREAM F 1 SI::*RESETFORMS* F 2 XPOS F 3 STRWIDTH F 4 PFN F 5 EXP) #gRSP PhhdQcUPlT(13 DSPRIGHTMARGIN) (4 DSPRIGHTMARGIN) () CENTERPRINTINAREA :D8 (P 5 RESETSTATE P 4 SI::*RESETFORMS* P 3 LISPXHIST P 2 XPOS P 1 PFN P 0 STRWIDTH I 6 PRIN2FLG I 5 STREAM I 4 HEIGHT I 3 WIDTH I 2 Y I 1 X I 0 EXP F 6 LISPXHIST) Egh b @EF FggACHklZBDEE lE JHhE V!g $@ElIh(115 SI::RESETUNWIND 110 \MVLIST 105 CENTERPRINTINAREAA0001 88 DSPRIGHTMARGIN 78 MOVETO 21 STRINGWIDTH 11 \GETSTREAM) (100 SI::RESETUNWIND 65 FONTDESCRIPTOR 56 FONTDESCRIPTOR 34 PRIN3 28 PRIN4 5 OUTPUT) () STRICTLY/BETWEEN :D8 (L (2 HIGHER 1 LOWER 0 VAL)) @AB@NIL NIL () UNREADITEM :D8 (I 2 BUTTON I 1 MENU I 0 ITEM) !@d o (30 BKSYSBUF 25 CONCAT 15 MKSTRING 10 EVAL) NIL ( 20 " ") TYPEINMENU :D8 (I 0 LST) <`d@dgdg dgjdndhHdI NIL (34 DEFAULTMENUHELDFN 25 CLRPROMPT 16 UNREADITEM 4 |MENUTYPE#|) () SHADEITEM :D8 (P 4 ITEM P 2 ITEMREGION P 1 DSP P 0 NEWSHADE I 3 DS/W I 2 SHADE I 1 MENU I 0 ITEM) Bj!@A Zdh@HA CA Yd g YAK(hJJ` @JAHI AL LiK[(127 \MENUSUBITEMS 115 RESHADEITEM 101 BITMAPWIDTH 62 DISPLAYSTREAMP 57 GETSTREAM 44 \INSUREWINDOW 35 WFROMMENU 26 \AddShade 13 MENUITEMREGION) (96 MENUSUBITEMMARK 71 MENU 52 OUTPUT) () RESHADEITEMA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 DSP F 1 SI::*RESETFORMS* F 2 NEWSHADE F 3 ITEMREGION F 4 MENU F 5 ITEM) R SngP gR