(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED " 2-Feb-2022 17:05:58" ("compiled on " {DSK}kaplan>Local>medley3.5>my-medley>lispusers>FM-CREATOR.;2) " 1-Feb-2022 22:31:00" tcompl'd in "FULL 1-Feb-2022 ..." dated " 1-Feb-2022 22:31:06") (FILECREATED " 1-Feb-2022 17:09:01" {DSK}kaplan>Local>medley3.5>my-medley>lispusers>FM-CREATOR.;2 171676 :CHANGES-TO (FNS FMC-EDIT.INFO) :PREVIOUS-DATE "18-Aug-88 14:32:54" {DSK}kaplan>Local>medley3.5>my-medley>lispusers>FM-CREATOR.;1) FMC-CREATE :D8 (P 4 FMC.PROMPTWINDOW P 3 RightMenu P 2 Window F 5 PROMPTWINDOW F 6 DEFAULTCURSOR) ’``nlÈholi`do¿di¿dg ¿dg¿jdnÿdhHdI ¿oU ¿U ¿oU ` KgJJggJggJggJggJggJggJggghJggJggJggJggJggJggJggJgKJghjdldg hdi\dggLgnÿÿL ÉgL LJgLgoJgLJ ` JgJ JgJ ggJhggJoohgggJ V (655 SETCURSOR 649 ADD.PROCESS 584 PUTWINDOWPROP 579 FMC-INSTALL.GP.WINDOW 567 PUTWINDOWPROP 562 FMC-INSTALL.IP.WINDOW 550 SETCURSOR 540 MOVEW 534 PUTWINDOWPROP 522 PUTWINDOWPROP 506 ATTACHWINDOW 494 DSPSCROLL 483 PUTWINDOWPROP 471 \INSUREWINDOW 456 PUTWINDOWPROP 439 CREATEW 431 CREATEREGION 426 HEIGHTIFWINDOW 421 FONTHEIGHT 416 DEFAULTFONT 402 PUTWINDOWPROP 390 PUTWINDOWPROP 378 PUTWINDOWPROP 362 PUTWINDOWPROP 346 PUTWINDOWPROP 330 PUTWINDOWPROP 314 PUTWINDOWPROP 298 PUTWINDOWPROP 282 PUTWINDOWPROP 266 PUTWINDOWPROP 242 PUTWINDOWPROP 226 PUTWINDOWPROP 210 PUTWINDOWPROP 194 PUTWINDOWPROP 178 PUTWINDOWPROP 162 PUTWINDOWPROP 146 PUTMENUPROP 134 SETCURSOR 124 PRIN1 112 TERPRI 105 PRIN1 32 CREATEW) (642 WINDOW 637 FMCreator 632 NAME 608 WINDOWPROP 603 UNTIL 594 TTYDISPLAYSTREAM 589 PROGN 573 FMC.GP.WINDOW 556 FMC.IP.WINDOW 545 WAITINGCURSOR 528 FMC.PROMPTWINDOW 512 PASSTOMAINCOMS 501 TOP 488 ON 462 MAXSIZE 451 NILL 446 PAGEFULLFN 411 DISPLAY 396 FMC.CHANGED 384 RIGHTMENU 373 FMC-EXPANDFN 368 EXPANDFN 357 FMC-ICONFN 352 ICONFN 341 FMC-SHRINKFN 336 SHRINKFN 325 FMC-CLOSEFN 320 CLOSEFN 309 FMC-COPYINSERTFN 304 COPYINSERTFN 293 FMC-COPYBUTTONEVENTFN 288 COPYBUTTONEVENTFN 277 FMC-HARDCOPY 272 HARDCOPYFN 258 FMC-REDRAW 253 REPOSITIONATTACHEDWINDOWS 248 RESHAPEFN 237 FMC-REDRAW 232 REPAINTFN 221 FMC-CURSOROUTFN 216 CURSOROUTFN 205 FMC-CURSORMOVEDFN 200 CURSORMOVEDFN 189 FMC-BUTTONEVENTFN 184 RIGHTBUTTONFN 173 FMC-BUTTONEVENTFN 168 BUTTONEVENTFN 157 FMC-WINDOWENTRYFN 152 WINDOWENTRYFN 140 FMC.WINDOW 129 WAITINGCURSOR 67 DEFAULTMENUHELDFN 58 CLRPROMPT 37 |MENUTYPE#| 9 LASTMOUSEY 4 LASTMOUSEX) ( 621 (DO (BLOCK)) 614 ((QUOTE CANCLOSE)) 517 (MOVEW SHAPEW SHRINKW BURYW) 118 "Copyright (c) 1988 by Rank Xerox France. Author Andre BLAVIER" 99 "FREE MENU CREATOR" 44 ((Redraw (QUOTE REDRAW) "Redraw the FMC window") (Grid (QUOTE GRID) "Grid" (SUBITEMS ("No Grid" (QUOTE NOGRID)) (Size (QUOTE SIZE) "Specify a grid size" (SUBITEMS 2 3 4 5 6 7 8 9 10)) ("Display Grid" (QUOTE DISPLAYGRID)) ("Remove Grid Display" (QUOTE REMOVEGRIDDISPLAY)))) ("Delete" (QUOTE DELETE) "Delete selected item(s)" (SUBITEMS ("Forget save list" (QUOTE FORGET.SAVE.LIST) "Forget the list of deleted items"))) ("Undelete" (QUOTE UNDELETE.LAST) "Undelete last item" (SUBITEMS (Last (QUOTE UNDELETE.LAST) "Undelete last item") (All (QUOTE UNDELETE.ALL) "Undelete all deleted item(s)") (List (QUOTE UNDELETE.LIST) "Undelete one item"))) (Group (QUOTE GROUP) "Group the selected items") (Ungroup (QUOTE UNGROUP) "Ungroup the selection") (Align (QUOTE ALIGN) "Align selected items" (SUBITEMS ("Left sides" (QUOTE ALIGNLEFT)) ("Right sides" (QUOTE ALIGNRIGHT)) ("Tops" (QUOTE ALIGNTOP)) ("Bottoms" (QUOTE ALIGNBOTTOM)))) (Center (QUOTE CENTER) "Center items" (SUBITEMS (Horizontally (QUOTE HCENTER)) (Vertically (QUOTE VCENTER)))) ("Select All" (QUOTE SELECTALL) "Select all the items") ("Background" (QUOTE WBACKGROUND) "Set the window's background") ("Summary" (QUOTE SUMMARY) "Create a summary of the items") (Import (QUOTE IMPORT) "Import items from a Free Menu") (Compute (QUOTE COMPUTE) "Create the Free Menu description") (Get (QUOTE GET) "Get items from a file") (Put (QUOTE PUT) "Put items onto a file") ("Fixed Menu" (QUOTE FIXRIGHTMENU) "Attach Right Menu")) 24 "Free Menu Creator") FMC-INSTALL.IP.WINDOW :D8 (P 6 PROP P 5 WhiteBitmap P 4 BlackBitmap P 3 ShadeMenu P 2 FontList P 1 DefaultFont P 0 FMC.IP.Window I 0 WINDOW F 7 FMC-IP-DESC) ?Wo g BI ZgJHgJHgJHgoHgoH[dÉ\KÉKÉ kÙ ]gLHgMHHgKHgnÿÿHgjo°dHgN oµâHgoH@ggHg@HggH(315 PUTWINDOWPROP 299 PUTWINDOWPROP 287 ATTACHWINDOW 270 PUTWINDOWPROP 249 WINDOWPROP 239 PACK* 215 PUTWINDOWPROP 203 PUTWINDOWPROP 189 PUTWINDOWPROP 177 FM.CHANGESTATE 165 FM.CHANGESTATE 150 NTH 143 LENGTH 110 FMC-CREATE.SHADE.MENU 105 FM.CHANGELABEL 89 FM.CHANGELABEL 73 FM.CHANGESTATE 58 FM.CHANGESTATE 44 FM.CHANGESTATE 30 FMC-FONT->LIST 21 DEFAULTFONT 11 FREEMENU) (310 DON'T 305 RESHAPEFN 293 MAIN.WINDOW 282 LEFT 277 TOP 260 FMC.ITEM.MENUPROPS 233 FMC.ITEM. 209 FMC.ITEM.BACKGROUND 195 FMC.ITEM.BOXSHADE 183 SHADE.MENU 170 BACKGROUND 158 BOXSHADE 136 MENU 128 MENU 117 MENU 94 MESSAGELINK 78 LABELLINK 63 FACE 49 SIZE 36 FAMILY 16 DISPLAY) ( 265 (NIL) 244 (FUNCTION NILL) 220 (CHANGESTATE SELECTEDFN DOWNFN HELDFN MOVEDFN) 99 "" 83 "" 6 "ITEM PROPERTIES") FMC-INSTALL.GP.WINDOW :D8 (P 4 WhiteBitmap P 3 BlackBitmap P 2 ShadeMenu P 1 FMC.IP.Window P 0 FMC.GP.Window I 0 WINDOW F 5 FMC-GP-DESC) ½Uo @g 2Ig ZdÉ[JÉJÉ kÙ \gKHgLHHgnÿÿHgjHgJHIggHg@HggH(185 PUTWINDOWPROP 169 PUTWINDOWPROP 157 ATTACHWINDOW 140 PUTWINDOWPROP 128 PUTWINDOWPROP 116 PUTWINDOWPROP 102 FM.CHANGESTATE 90 FM.CHANGESTATE 75 NTH 68 LENGTH 35 GETWINDOWUSERPROP 21 GETWINDOWUSERPROP 10 FREEMENU) (180 DON'T 175 RESHAPEFN 163 MAIN.WINDOW 152 BOTTOM 147 RIGHT 134 SHADE.MENU 122 FMC.ITEM.BACKGROUND 108 FMC.ITEM.BOXSHADE 95 BACKGROUND 83 BOXSHADE 61 MENU 53 MENU 42 MENU 30 SHADE.MENU 16 FMC.IP.WINDOW) ( 5 "GROUP PROPERTIES") FMC-CREATE.SHADE.MENU :D8 (P 6 s P 1 ShadeItems P 0 Shades) ‚o!@H°d^ »LµKh]K&¼µêMYdoh `dI¿di¿do¿dg ¿dg¿jdnÿdhºdJ ¿dÉ l<¿(53 \NCONC2 21 FMC-CREATE.SHADE.ITEM) (119 MENU 93 DEFAULTMENUHELDFN 84 CLRPROMPT 58 |MENUTYPE#|) ( 75 "SHADE" 46 ("OTHER" (CADADR (FMC-CREATE.SHADE.ITEM (EDITSHADE)))) 4 (65535 43605 38505 52224 61713 5160 32768 0)) FMC-CREATE.SHADE.ITEM :D8 (P 2 bm P 1 Stream P 0 Bitmap I 0 SHADE) •@lO ²5h@ @g ýñ²@g OµkhZµ‚±›¿`lå_jð®O´HO ´?`kå_jð®O´-O ´$`lå_jð®O´O ´@ _h@ ›Oµ‚±ÿoi±ÿkO_±ÿ_Hô²Z@g Oµ(h\¢±ÿML ¿LL@h ¿±ÿ._h@ –OµÈi°ÅO_°ºW ¿±ÿ(880 SETCURSOR 858 INSIDEP 853 CURSORPOSITION 838 APPLY 821 SETCURSOR 796 GETWINDOWUSERPROP 760 INSIDEP 755 CURSORPOSITION 724 FMC-CURSORMOVEDFN 716 \FZEROP 688 \FZEROP 661 \FZEROP 634 GETMOUSESTATE 612 GETWINDOWUSERPROP 597 GETWINDOWPROP 585 CURSORPOSITION 576 \FZEROP 538 GETMOUSESTATE 532 FMC-DESELECT 525 FMC-GET.SELECTION 518 SHIFTDOWNP 506 FMC-COMPUTE.SHAPE.REGS 499 FMC-MOVE.SELECTION 476 GETMOUSESTATE 469 TIMEREXPIRED? 457 \FZEROP 433 GETMOUSESTATE 427 FMC-SELECT.ITEM 420 PUTWINDOWPROP 393 FMC-DESELECT 384 FMC-MOVE.SELECTION 366 FMC-COMPUTE.SHAPE.REGS 359 FMC-MOVE.SELECTION 340 FMC-DESELECT.LIST.ITEM 318 INSIDEP 313 CURSORPOSITION 280 FMC-SELECT.LIST.ITEM 272 FMC-DESELECT.ITEM 265 WINDOWADDPROP 246 FMC-SELECT.LIST.ITEM 238 WINDOWADDPROP 217 SHIFTDOWNP 192 GETWINDOWUSERPROP 175 GETWINDOWPROP 163 CURSORPOSITION 152 \FZEROP 112 GETMOUSESTATE 106 FMC-DORIGHTSELECTION 100 MENU 95 GETWINDOWUSERPROP 82 DOWINDOWCOM 74 GETWINDOWPROP 62 CURSORPOSITION 53 GETWINDOWUSERPROP 27 GETWINDOWUSERPROP 16 GETWINDOWUSERPROP 5 TOTOPW) (791 SHAPE.REGS 695 LASTMOUSEBUTTONS 668 LASTMOUSEBUTTONS 640 LASTMOUSEBUTTONS 607 ITEMLIST 592 HEIGHT 555 LASTMOUSEBUTTONS 544 LASTMOUSEBUTTONS 513 META 494 UNIQUE 482 LASTMOUSEBUTTONS 464 TICKS 439 LASTMOUSEBUTTONS 414 SELECTED.ITEM 402 FIXP 379 MULTIPLE 354 UNIQUE 258 SELECTION.LIST 232 SELECTION.LIST 212 META 187 ITEMLIST 170 HEIGHT 132 LASTMOUSEBUTTONS 118 LASTMOUSEBUTTONS 90 RIGHTMENU 69 HEIGHT 48 FIXEDRIGHTMENU 35 LASTMOUSEBUTTONS 22 SELECTION.LIST 11 SELECTED.ITEM) () FMC-CLOSEFN :D8 (I 0 W) <@g ²#oo@g ¥g@gi(57 PUTWINDOWPROP 38 MOUSECONFIRM 33 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (51 CANCLOSE 44 DON'T 28 FMC.PROMPTWINDOW 5 FMC.CHANGED) ( 22 "" 17 "Warning ! Not saved yet. LEFT to quit anyway") FMC-COPYBUTTONEVENTFN :D8 (I 0 W) hg g ´Mg@g ²@g h°@g ´@g h (101 COPYINSERT 93 COPYALL 88 GETWINDOWUSERPROP 75 GETWINDOWUSERPROP 60 COPYALL 55 GETWINDOWUSERPROP 42 GETWINDOWUSERPROP 24 GETWINDOWUSERPROP 14 PROCESSPROP 4 TTY.PROCESS) (83 SELECTION.LIST 70 SELECTION.LIST 50 SELECTED.ITEM 37 SELECTED.ITEM 31 FROM-FMC 19 FMC.PROMPTWINDOW 9 WINDOW) () FMC-COPYINSERTFN :D8 (P 3 item P 2 Stream P 1 Bitmap P 0 ImageBox I 1 WINDOW I 0 OBJ) Û@ ²`0@g @Ah XdH Yd Z@g @Jgh gIAg i@gð´k@°dKA ¿AgKµäAg –A ¿Ag –A ¿Ag@A Agi(216 PUTWINDOWPROP 204 FMC-SELECT.LIST 198 PUTWINDOWPROP 183 FMC-DESELECT.LIST 176 GETWINDOWUSERPROP 164 FMC-DESELECT.ITEM 157 GETWINDOWUSERPROP 141 WINDOWADDPROP 128 FMC-REDRAW.ITEM 100 FM.CHANGELABEL 94 GETWINDOWUSERPROP 77 APPLY 61 IMAGEOBJPROP 49 DSPCREATE 42 BITMAPCREATE 31 APPLY 21 IMAGEOBJPROP 5 IMAGEOBJP) (210 FMC.CHANGED 190 SELECTION.LIST 171 SELECTION.LIST 152 SELECTED.ITEM 135 ITEMLIST 108 FROM-FMC 89 FMC.IP.WINDOW 82 LABELLINK 68 DISPLAY 56 DISPLAYFN 16 IMAGEBOXFN) () FMC-CURSORMOVEDFN :D8 (P 2 i P 0 Item I 0 WINDOW F 3 DEFAULTCURSOR F 4 MOVINGCURSOR) †@g Xµ@g Iµ6h³+S h@ ²ÃT Zh@ •Jµ©i°¦IY°(120 INSIDEP 115 CURSORPOSITION 85 SETCURSOR 77 INSIDEP 72 CURSORPOSITION 44 SETCURSOR 27 GETWINDOWUSERPROP 13 GETWINDOWUSERPROP) (22 SELECTION.LIST 8 SELECTED.ITEM) () FMC-CURSOROUTFN :D8 (I 0 W F 0 DEFAULTCURSOR) P (5 SETCURSOR) NIL () FMC-EXPANDFN :D8 (I 0 W) @ É.´@ É. (22 TTY.PROCESS 15 \INSUREWINDOW 5 \INSUREWINDOW) NIL () FMC-ICONFN :D8 (P 2 WindowTitle P 1 IconTitle P 0 Icon I 0 W F 3 FMC-ICON.TEMPLATE) ‡@g @g @ É(I–IJô³TI¤H² °MH²@gJY¿IhdH°0@gJY¿@gSIohihg ¿@g (132 GETWINDOWUSERPROP 120 PUTWINDOWPROP 115 TITLEDICONW 87 PUTWINDOWPROP 72 ICONTITLE 62 PUTWINDOWPROP 27 \INSUREWINDOW 21 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (127 ICON 109 FILE 94 ICON 80 FMC.ICON.TITLE 55 FMC.ICON.TITLE 16 FMC.ICON.TITLE 5 ICON) ( 101 (HELVETICA 8 STANDARD)) FMC-SHRINKFN :D8 (I 0 W) @ É.ð´i (21 TTY.PROCESS 12 TTY.PROCESS 5 \INSUREWINDOW) NIL () FMC-WINDOWENTRYFN :D8 (I 0 W) Vg ³Ig ³=g ³1g ³%@ É. ´@ É. @ h(81 FMC-BUTTONEVENTFN 75 TTY.PROCESS 68 \INSUREWINDOW 60 PROCESSP 53 \INSUREWINDOW 45 KEYDOWNP 33 KEYDOWNP 21 SHIFTDOWNP 9 SHIFTDOWNP) (40 COPY 28 MOVE 16 META 4 SHIFT) () FMC-FIXRIGHTMENUA0001 :D8 (I 0 MW) ?@g gh@g g g@ (60 DETACHWINDOW 42 GETWINDOWUSERPROP 32 GETWINDOWUSERPROP 21 PUTWINDOWPROP 10 GETWINDOWUSERPROP) (52 DEFAULTWHENSELECTEDFN 47 MENU 37 RIGHTMENU 27 ATTACHEDTO 15 FIXEDRIGHTMENU 5 ATTACHEDTO) () FMC-FIXRIGHTMENU :D8 (P 0 MenuWindow I 0 WINDOW) ~@g ³p@g g@g @ggHg@HgoHgg@gHh(121 PUTWINDOWPROP 109 PUTWINDOWPROP 93 PUTWINDOWPROP 77 PUTWINDOWPROP 62 ATTACHMENU 46 GETWINDOWUSERPROP 23 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (115 FIXEDRIGHTMENU 104 FMC-FIXRIGHTMENUA0001 99 CLOSEFN 83 PASSTOMAINCOMS 71 ATTACHEDTO 57 TOP 52 RIGHT 41 RIGHTMENU 33 FMC-DORIGHTSELECTION 28 MENU 18 RIGHTMENU 5 FIXEDRIGHTMENU) ( 88 (MOVEW SHAPEW SHRINKW BURYW)) FMC-DORIGHTSELECTION :D8 (P 1 Selection P 0 WINDOW I 2 BUTTON I 1 MENU.OR.WINDOW I 0 ITEM) 4A ‘AŠAg @d– Idgð—¿H gð’±¾Idgð²8¿Hg ²oHg H oH gð³7Idlð³1dlð³+dlð³%dlð³dlð³dlð³dlð«dl ð¦dl ð˜¿IH gð–H Idgð²'¿Hg ´‚±IHghH gð–H Idgð¿Hghgð›gH Idgðœ¿gH gð›gH Idgð—¿H gð–H Idgð³dgð¯dgð§dgð–H gð–H Idgð—¿H gð–H Idgð—¿H gð–H Idgð—¿H gð–H Idgð—¿H gð´H (561 FMC-PUT 546 FMC-GET 529 FMC-COMPUTE 515 FMC-IMPORT 498 FMC-EDIT.INFO 484 FMC-CHOOSE.WINDOW.BG 467 FMC-SELECTALL 453 FMC-VCENTER 436 FMC-HCENTER 422 FMC-ALIGN 381 FMC-UNGROUP 367 FMC-GROUP 350 FMC-UNDELETE 331 FMC-UNDELETE 309 FMC-UNDELETE 290 PUTWINDOWPROP 267 FMC-DELETE 253 FMC-REDRAW 247 PUTWINDOWPROP 229 GETWINDOWUSERPROP 206 FMC-DISPLAY.GRID 192 FMC-SET.GRIDSIZE 123 FMC-PROMPTPRINT 111 FMC-PROMPTPRINT 105 CONCAT 100 GETWINDOWUSERPROP 82 GETWINDOWUSERPROP 49 FMC-FIXRIGHTMENU 30 EVAL 19 GETMENUPROP 5 WINDOWP) (552 PUT 537 GET 521 COMPUTE 506 IMPORT 490 SUMMARY 475 WBACKGROUND 459 SELECTALL 444 VCENTER 428 HCENTER 414 ALIGNBOTTOM 406 ALIGNTOP 398 ALIGNRIGHT 389 ALIGNLEFT 373 UNGROUP 358 GROUP 344 LIST 337 UNDELETE.LIST 325 ALL 317 UNDELETE.ALL 303 LAST 296 UNDELETE.LAST 284 DELETED.ITEMS 275 FORGET.SAVE.LIST 259 DELETE 241 DISPLAYGRID 224 DISPLAYGRID 214 REMOVEGRIDDISPLAY 198 DISPLAYGRID 129 NOGRID 95 GRIDSIZE 77 GRIDSIZE 67 GRID 55 REDRAW 40 FIXRIGHTMENU 14 FMC.WINDOW) ( 117 "No grid" 89 "Grid size is ") FMC-SELECT.ITEM :D8 (P 5 RTop P 4 RRight P 3 RBottom P 2 RLeft P 1 Reg P 0 Item I 0 WINDOW) ³@g QHYdlÙZIlÙ[IIØmÿØlØ\IIØmÿØlØ]JKLKkg@ho LKLMkg@ho LMJMkg@ho JMJKkg@ho @ (176 FMC-COMPUTE.SHAPE.REGS 170 DRAWLINE 147 DRAWLINE 124 DRAWLINE 101 DRAWLINE 10 GETWINDOWUSERPROP) (157 REPLACE 134 REPLACE 111 REPLACE 88 REPLACE 5 SELECTED.ITEM) ( 164 (1 1) 141 (1 1) 118 (1 1) 95 (1 1)) FMC-SELECT.LIST :D8 (P 0 item I 0 WINDOW) @g dH@ µñh(23 FMC-SELECT.LIST.ITEM 10 GETWINDOWUSERPROP) (5 SELECTION.LIST) () FMC-SELECT.LIST.ITEM :D8 (P 4 RTop P 3 RRight P 2 RBottom P 1 RLeft P 0 Reg I 1 WINDOW I 0 ITEM) ¡@AHlÙYHlÙZHHØmÿØlØ[HHØmÿØlØ\IJKJkgAho KJKLkgAho KLILkgAho ILIJkgAho (158 DRAWLINE 135 DRAWLINE 112 DRAWLINE 89 DRAWLINE) (145 REPLACE 122 REPLACE 99 REPLACE 76 REPLACE) ( 152 (1 3) 129 (1 3) 106 (1 3) 83 (1 3)) FMC-SELECTALL :D8 (I 0 WINDOW) 1@g –@ ¿@g@g @ (46 FMC-SELECT.LIST 40 PUTWINDOWPROP 35 GETWINDOWUSERPROP 17 FMC-DESELECT.ITEM 10 GETWINDOWUSERPROP) (30 ITEMLIST 24 SELECTION.LIST 5 SELECTED.ITEM) () FMC-GET.SELECTION :D8 (P 4 item P 3 WBottom P 2 WLeft P 1 SelectionRegion P 0 SelectedItem I 0 WINDOW) ¨@g @ ÉlØ@ ÉlØIdJÙIIKÙ@g °]dIL ²9@gL¿L@ ¿H²!@gHi¿@ ¿H@ ¿h¸µ¤h(156 FMC-SELECT.LIST.ITEM 148 FMC-DESELECT.ITEM 141 WINDOWADDPROP 124 FMC-SELECT.LIST.ITEM 116 WINDOWADDPROP 102 SUBREGIONP 68 GETWINDOWUSERPROP 33 \INSUREWINDOW 21 \INSUREWINDOW 15 GETREGION 10 GETWINDOWUSERPROP) (134 SELECTION.LIST 110 SELECTION.LIST 63 ITEMLIST 5 SELECTED.ITEM) () FMC-DESELECT :D8 (I 0 WINDOW) (@g –@ ¿@g ´@ (37 FMC-DESELECT.LIST 29 GETWINDOWUSERPROP 17 FMC-DESELECT.ITEM 10 GETWINDOWUSERPROP) (24 SELECTION.LIST 5 SELECTED.ITEM) () FMC-DESELECT.ITEM :D8 (P 5 Rtop P 4 Rright P 3 Rbottom P 2 Rleft P 1 Region P 0 Item I 0 WINDOW) ¡@g QHYdlÙZIlÙ[IIØmÿØlØ\IIØmÿØlØ]JKLKkg@ LKLMkg@ LMJMkg@ JMJKkg@ @gh(158 PUTWINDOWPROP 146 DRAWLINE 129 DRAWLINE 112 DRAWLINE 95 DRAWLINE 10 GETWINDOWUSERPROP) (152 SELECTED.ITEM 139 ERASE 122 ERASE 105 ERASE 88 ERASE 5 SELECTED.ITEM) () FMC-DESELECT.LIST :D8 (P 0 item I 0 WINDOW) +@g dH@ µñ@gh(40 PUTWINDOWPROP 23 FMC-DESELECT.LIST.ITEM 10 GETWINDOWUSERPROP) (34 SELECTION.LIST 5 SELECTION.LIST) () FMC-DESELECT.LIST.ITEM :D8 (P 4 RTop P 3 RRight P 2 RBottom P 1 RLeft P 0 Reg I 1 WINDOW I 0 ITEM) •@AHlÙYHlÙZHHØmÿØlØ[HHØmÿØlØ\IJKJkgA KJKLkgA KLILkgA ILIJkgA Ag@(146 WINDOWDELPROP 134 DRAWLINE 117 DRAWLINE 100 DRAWLINE 83 DRAWLINE) (140 SELECTION.LIST 127 ERASE 110 ERASE 93 ERASE 76 ERASE) () FMC-APPLY :D8 (P 7 item P 3 ItemList P 2 Unique? P 1 Prop P 0 MainWindow I 2 BUTTON I 1 PROP.WINDOW I 0 ITEM) ÔAg iRHg Zd²HgHg h¿Hg [A É(o ¢±èKh½\µh²"oH ]gð•M³éi°äL°ÛK kñ²D`do¿do¿dg ¿dg¿jdnÿdh¾dN ¿ Y€I´‚±ÝH K°HdOjgH¿J—Og‚OIA¿OH µ¹J³hHgKH K k ²gKdgð²\¿H KjgHKA KH HgKHghH K jñ´Kgð«oH h(463 FMC-PROMPTPRINT 438 LENGTH 431 FMC-SELECT.ITEM 425 PUTWINDOWPROP 413 PUTWINDOWPROP 400 FMC-REDRAW.ITEM 392 FMC-UPDATE.GROUP 384 DSPFILL 350 FMC-DESELECT.LIST 329 EQP 323 LENGTH 316 FMC-SELECT.LIST 310 PUTWINDOWPROP 290 FMC-REDRAW.ITEM 281 FMC-UPDATE.ITEM 261 DSPFILL 219 FMC-DESELECT.LIST 204 MENU 136 LENGTH 109 FMC-PROMPTPRINT 84 STREQUAL 72 \INSUREWINDOW 65 GETWINDOWUSERPROP 53 PUTWINDOWPROP 46 GETWINDOWUSERPROP 25 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (450 GROUP 419 SELECTION.LIST 406 SELECTED.ITEM 378 REPLACE 340 GROUP 304 SELECTION.LIST 271 ALL 255 REPLACE 179 DEFAULTMENUHELDFN 170 CLRPROMPT 145 |MENUTYPE#| 118 GROUP 60 SELECTION.LIST 41 SELECTED.ITEM 35 SELECTION.LIST 20 SELECTED.ITEM 5 MAIN.WINDOW) ( 457 "Can't apply to simple ITEMs" 161 "Apply which Property ?" 152 (TYPE LABEL BOX BOXSHADE BACKGROUND FONT CHANGESTATE SELECTEDFN DOWNFN HELDFN MOVEDFN) 103 "Can't apply to GROUPs" 79 "ITEM PROPERTIES") FMC-SHOW.ITEM :D8 (P 6 Def P 5 prop P 3 ItemFont P 2 ItemBox P 1 Item P 0 MainWindow I 2 BUTTON I 1 IP.WINDOW I 0 IPW.ITEM) ÖAg 1Hg µHg YdZI[Id¢±³gð›oH gIAgIAgIAgJµjAgI AAgIgI AAgIgKAgKAgKAgIAo!Lµ‚±«gIAgI AAgIgI AAgIgIA]dgð²¿I°xgð²I°]Mdgð²¿I°>gð²I°!Mgð²I€i¾MN˜Nl ™gNh€N A¿AgM N˜Nl ™gNh€N¿L\±þn(717 WINDOWPROP 700 \TYPEMASK.UFN 690 PACK* 677 FM.CHANGESTATE 671 MKATOM 654 \TYPEMASK.UFN 493 FM.CHANGESTATE 473 PUTWINDOWPROP 449 FM.CHANGESTATE 443 MKATOM 420 PUTWINDOWPROP 394 FM.CHANGESTATE 388 MKATOM 363 FM.CHANGESTATE 310 FM.CHANGELABEL 291 FM.CHANGESTATE 276 FM.CHANGESTATE 262 FM.CHANGESTATE 249 PUTWINDOWPROP 226 FM.CHANGESTATE 215 FMC-CREATE.SHADE.ITEM 193 PUTWINDOWPROP 171 FM.CHANGESTATE 160 FMC-CREATE.SHADE.ITEM 139 FM.CHANGESTATE 124 FM.CHANGELABEL 108 FM.CHANGELABEL 94 FM.CHANGESTATE 80 FMC-PROMPTPRINT 37 GETWINDOWUSERPROP 24 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (706 FUNCTION 684 FMC.ITEM. 660 FUNCTION 617 MOVEDFN 587 HELDFN 558 DOWNFN 529 SELECTEDFN 502 CHANGESTATE 478 INITSTATE 455 FMC.ITEM.LINKS 425 LINKS 400 FMC.ITEM.MENUPROPS 368 MENU 332 INFINITEWIDTH 296 MESSAGELINK 281 FACE 267 SIZE 254 FAMILY 232 FMC.ITEM.BACKGROUND 198 BACKGROUND 177 FMC.ITEM.BOXSHADE 144 BOXSHADE 129 BOX 113 IDLINK 99 LABELLINK 86 TYPE 67 GROUP 32 SELECTION.LIST 19 SELECTED.ITEM 5 MAIN.WINDOW) ( 315 (CHANGESTATE SELECTEDFN DOWNFN HELDFN MOVEDFN) 74 "Can't show GROUPs") FMC-SHOW.GROUP :D8 (P 1 Item P 0 MainWindow I 2 BUTTON I 1 GP.WINDOW I 0 GPW.ITEM) þAg Hg Yd´‚±Þdgð¢±ÇgIAgI–I„oAgIAgIAgI AAgIgI AAgIoH (251 FMC-PROMPTPRINT 239 PUTWINDOWPROP 216 FM.CHANGESTATE 205 FMC-CREATE.SHADE.ITEM 183 PUTWINDOWPROP 161 FM.CHANGESTATE 150 FMC-CREATE.SHADE.ITEM 129 FM.CHANGESTATE 108 FM.CHANGESTATE 90 FM.CHANGELABEL 60 FM.CHANGELABEL 24 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (222 FMC.ITEM.BACKGROUND 188 BACKGROUND 167 FMC.ITEM.BOXSHADE 134 BOXSHADE 113 BOX 95 DESELECT 65 COLLECTIONLINK 49 IDLINK 39 GROUP 19 SELECTED.ITEM 5 MAIN.WINDOW) ( 245 "Can't show simple items" 84 "") FMC-NEWITEM :D8 (P 1 NewItem P 0 MainWindow I 2 BUTTON I 1 IP.WINDOW I 0 IPW.ITEM) ÇAg hddddddddddddddddddddjdhddIgAhH hH «oH ¿Hg –H ¿Hg –H ¿IH HgIHgIIH H H (196 FMC-COMPUTE.SHAPE.REGS 190 FMC-SELECT.ITEM 184 FMC-REDRAW.ITEM 177 PUTWINDOWPROP 165 WINDOWADDPROP 153 FMC-TRACK.NEW.ITEM 145 FMC-DESELECT.LIST 138 GETWINDOWUSERPROP 126 FMC-DESELECT.ITEM 119 GETWINDOWUSERPROP 107 CURSORPOSITION 95 INSIDEP 90 CURSORPOSITION 83 DSPCLIPPINGREGION 76 FMC-UPDATE.ITEM 10 GETWINDOWUSERPROP) (171 SELECTED.ITEM 159 ITEMLIST 133 SELECTION.LIST 114 SELECTED.ITEM 70 ALL 5 MAIN.WINDOW) ( 101 (5 . 5)) FMC-UPDATE.ITEM :D8 (P 2 ItemBitmap P 1 ItemBox P 0 ItemLabel I 2 IP.WINDOW I 1 PROP I 0 ITEM) 0Bg giAgð¨Agð²VghBÃghB°oghB ÉXo •o¸@Hƒ@X¿AgðªAdgð²¿@Bg ¿Agð¨Agð²UghBÃghB°oghB ÉYj ‘h¹@IŠ@Y¿AgðªAdgð²¿@I´ Bg ¿AgðªAdgð²D¿@ghBÃghB°oghB É¿Agð¬Adgð¢±Å¿@ghBÃghB°oghB ÉghBÃghB°oghB ÉghBÃghB°oghB Éh¿Agð²z@Bg ¿@Bg ¿@Bg ¿@Bg ±–Adgð²¿@Bg±gð²@Bg°lAdgð²¿@Bg°Hgð²@Bg°&Adgð²$¿@Bg ¿Agð¢±®@ghBÃghB°oghB Éo ’h°DghBÃghB°oghB É ¿@ghBÃghB°oghB É¿@Bg ¿@Bg ¿@ghBÃghB°oghB É¿@ghBÃghB°oghB É¿H@ Z@J@³,@ldJ J ¿I³8@j¿@j¿I²W@j ²7@l¿@l¿@@@J @Ø@ØJ @Ø@Ø(1799 CREATEREGION 1744 BITMAPHEIGHT 1690 BITMAPWIDTH 1564 EQP 1475 CREATEREGION 1470 BITMAPHEIGHT 1464 BITMAPWIDTH 1388 FMC-MAKEBITMAP 1383 FMC-LIST->FONT 1364 ERROR 1359 FM.GETITEM 1340 FM.GETITEM 1322 FM.GETITEM 1277 ERROR 1272 FM.GETITEM 1253 FM.GETITEM 1235 FM.GETITEM 1213 GETWINDOWUSERPROP 1188 GETWINDOWUSERPROP 1154 ERROR 1149 FM.GETITEM 1130 FM.GETITEM 1112 FM.GETITEM 1091 MKATOM 1079 ERROR 1074 FM.GETITEM 1055 FM.GETITEM 1037 FM.GETITEM 1021 STREQUAL 1004 ERROR 999 FM.GETITEM 980 FM.GETITEM 962 FM.GETITEM 933 GETWINDOWUSERPROP 751 GETWINDOWUSERPROP 720 GETWINDOWUSERPROP 690 GETWINDOWUSERPROP 661 GETWINDOWUSERPROP 613 ERROR 608 FM.GETITEM 589 FM.GETITEM 571 FM.GETITEM 552 ERROR 547 FM.GETITEM 528 FM.GETITEM 510 FM.GETITEM 491 ERROR 486 FM.GETITEM 467 FM.GETITEM 449 FM.GETITEM 404 ERROR 399 FM.GETITEM 380 FM.GETITEM 362 FM.GETITEM 328 GETWINDOWUSERPROP 258 EQP 244 ERROR 239 FM.GETITEM 220 FM.GETITEM 202 FM.GETITEM 171 GETWINDOWUSERPROP 113 STREQUAL 95 ERROR 90 FM.GETITEM 71 FM.GETITEM 53 FM.GETITEM 24 PUTWINDOWPROP 13 GETWINDOWUSERPROP) (1369 FREEMENUITEM 1352 INFINITEWIDTH 1333 INFINITEWIDTH 1327 FREEMENUITEM 1315 INFINITEWIDTH 1282 FREEMENUITEM 1265 INITSTATE 1246 INITSTATE 1240 FREEMENUITEM 1228 INITSTATE 1208 FMC.ITEM.LINKS 1183 FMC.ITEM.MENUPROPS 1159 FREEMENUITEM 1142 MESSAGELINK 1123 MESSAGELINK 1117 FREEMENUITEM 1105 MESSAGELINK 1084 FREEMENUITEM 1067 IDLINK 1048 IDLINK 1042 FREEMENUITEM 1030 IDLINK 1009 FREEMENUITEM 992 IDLINK 973 IDLINK 967 FREEMENUITEM 955 IDLINK 941 ALL 928 FMC.ITEM.MOVEDFN 899 MOVEDFN 890 FMC.ITEM.HELDFN 863 HELDFN 856 FMC.ITEM.DOWNFN 829 DOWNFN 820 FMC.ITEM.SELECTEDFN 795 SELECTEDFN 787 FMC.ITEM.CHANGESTATE 762 CHANGESTATE 746 FMC.ITEM.HELDFN 715 FMC.ITEM.DOWNFN 685 FMC.ITEM.SELECTEDFN 656 FMC.ITEM.CHANGESTATE 632 ALL 618 FREEMENUITEM 601 FACE 582 FACE 576 FREEMENUITEM 564 FACE 557 FREEMENUITEM 540 SIZE 521 SIZE 515 FREEMENUITEM 503 SIZE 496 FREEMENUITEM 479 FAMILY 460 FAMILY 454 FREEMENUITEM 442 FAMILY 428 FONT 419 ALL 409 FREEMENUITEM 392 TYPE 373 TYPE 367 FREEMENUITEM 355 TYPE 345 TYPE 336 ALL 323 FMC.ITEM.BOXSHADE 300 BOXSHADE 291 ALL 249 FREEMENUITEM 232 BOX 213 BOX 207 FREEMENUITEM 195 BOX 187 BOX 179 ALL 166 FMC.ITEM.BACKGROUND 145 BACKGROUND 136 ALL 100 FREEMENUITEM 83 LABELLINK 64 LABELLINK 58 FREEMENUITEM 46 LABELLINK 38 LABEL 30 ALL 18 FMC.CHANGED 8 MAIN.WINDOW) ( 1347 "Arg must be FreeMenuItem" 1260 "Arg must be FreeMenuItem" 1137 "Arg must be FreeMenuItem" 1062 "Arg must be FreeMenuItem" 1016 "" 987 "Arg must be FreeMenuItem" 596 "Arg must be FreeMenuItem" 535 "Arg must be FreeMenuItem" 474 "Arg must be FreeMenuItem" 387 "Arg must be FreeMenuItem" 227 "Arg must be FreeMenuItem" 119 "*NOLABEL*" 108 "" 78 "Arg must be FreeMenuItem") FMC-UPDATE.GROUP :D8 (I 1 GP.WINDOW I 0 GROUP) BAg gi@ghAÃghA°oghA Éo ’h°DghAÃghA°oghA É ghAÃghA°oghA Éo ˜@h±@Hµh².oAg °_Ygð¥IµÛi°ØHX°Ï@ghAÃghA°oghA É ¿@ghAÃghA°oghA É@ghAÃghA°oghA É@Ag @Ag (573 GETWINDOWUSERPROP 550 GETWINDOWUSERPROP 521 ERROR 516 FM.GETITEM 497 FM.GETITEM 479 FM.GETITEM 450 ERROR 445 FM.GETITEM 426 FM.GETITEM 408 FM.GETITEM 388 MKATOM 376 ERROR 371 FM.GETITEM 352 FM.GETITEM 334 FM.GETITEM 294 FMC-PROMPTPRINT 289 GETWINDOWUSERPROP 238 STREQUAL 221 ERROR 216 FM.GETITEM 197 FM.GETITEM 179 FM.GETITEM 166 MKATOM 154 ERROR 149 FM.GETITEM 130 FM.GETITEM 112 FM.GETITEM 96 STREQUAL 79 ERROR 74 FM.GETITEM 55 FM.GETITEM 37 FM.GETITEM 21 PUTWINDOWPROP 10 GETWINDOWUSERPROP) (568 FMC.ITEM.BACKGROUND 545 FMC.ITEM.BOXSHADE 526 FREEMENUITEM 509 BOX 490 BOX 484 FREEMENUITEM 472 BOX 455 FREEMENUITEM 438 DESELECT 419 DESELECT 413 FREEMENUITEM 401 DESELECT 381 FREEMENUITEM 364 COLLECTIONLINK 345 COLLECTIONLINK 339 FREEMENUITEM 327 COLLECTIONLINK 304 NWAY 284 MAIN.WINDOW 226 FREEMENUITEM 209 COLLECTIONLINK 190 COLLECTIONLINK 184 FREEMENUITEM 172 COLLECTIONLINK 159 FREEMENUITEM 142 IDLINK 123 IDLINK 117 FREEMENUITEM 105 IDLINK 84 FREEMENUITEM 67 IDLINK 48 IDLINK 42 FREEMENUITEM 30 IDLINK 15 FMC.CHANGED 5 MAIN.WINDOW) ( 504 "Arg must be FreeMenuItem" 433 "Arg must be FreeMenuItem" 359 "Arg must be FreeMenuItem" 278 "All items in GROUP should be NWAY" 233 "" 204 "Arg must be FreeMenuItem" 137 "Arg must be FreeMenuItem" 91 "" 62 "Arg must be FreeMenuItem") FMC-GET.LABEL :D8 (I 2 BUTTON I 1 IP.WINDOW I 0 IPW.ITEM) FBoô›gA Boô²gAiBoô´gAi(67 FM.EDITITEM 45 FM.CHANGELABEL 38 FMC-SNAPBM 18 FM.EDITITEM) (60 LABELLINK 33 LABELLINK 12 LABELLINK) ( 52 (RIGHT) 25 (MIDDLE) 5 (LEFT)) FMC-CHOOSE.ITEM.BOXSHADE :D8 (P 1 Shade P 0 ShadeMenu I 2 BUTTON I 1 IP.WINDOW I 0 IPW.ITEM) 4Ag H Yd´gIAAgI(49 PUTWINDOWPROP 36 FM.CHANGESTATE 19 MENU 10 GETWINDOWUSERPROP) (42 FMC.ITEM.BOXSHADE 28 BOXSHADE 5 SHADE.MENU) () FMC-CHOOSE.ITEM.BG :D8 (P 1 Shade P 0 ShadeMenu I 2 BUTTON I 1 IP.WINDOW I 0 IPW.ITEM) 4Ag H Yd´gIAAgI(49 PUTWINDOWPROP 36 FM.CHANGESTATE 19 MENU 10 GETWINDOWUSERPROP) (42 FMC.ITEM.BACKGROUND 28 BACKGROUND 5 SHADE.MENU) () FMC-GET.MENUPROPS :D8 (P 0 Expr I 2 BUTTON I 1 IP.WINDOW I 0 IPW.ITEM) KAg ›Ag „o ¸gH AAgH(72 PUTWINDOWPROP 60 FM.CHANGESTATE 54 MKATOM 42 EDITE 37 COPYALL 26 GETWINDOWUSERPROP 13 GETWINDOWUSERPROP) (66 FMC.ITEM.MENUPROPS 48 MENU 21 FMC.ITEM.MENUPROPS 8 FMC.ITEM.MENUPROPS) ( 32 (("ITEMS") "[FONT]" "[TITLE]")) FMC-GET.INITSTATE :D8 (P 5 PromptWindow P 4 Choice P 3 InitstateMenuItems P 2 MenuProps P 1 ItemType P 0 MainWindow I 2 BUTTON I 1 IP.WINDOW I 0 IPW.ITEM) bAg ghAÃghA°oghA ÉAg CIdgð³dgð¬gð´‚±ÄIdgð—¿o°;gð–o°-Igð²#J²oJo †o€i»`dK¿dg ¿dg¿jdnÿdh¾dN ¿ \dgð²J¿Hg ] ¿ ¿ohoMhdo \Ž¼gLA¿L´Lo ‘h¼gLA(351 FM.CHANGESTATE 336 STREQUAL 321 FM.CHANGESTATE 306 PROMPTFORWORD 280 TTY.PROCESS 275 THIS.PROCESS 269 DSPRESET 263 GETWINDOWUSERPROP 241 MENU 181 \APPEND2 176 \APPEND2 82 GETWINDOWUSERPROP 64 ERROR 59 FM.GETITEM 40 FM.GETITEM 22 FM.GETITEM 10 GETWINDOWUSERPROP) (344 INITSTATE 314 INITSTATE 258 FMC.PROMPTWINDOW 248 OTHER 216 DEFAULTMENUHELDFN 207 CLRPROMPT 195 |MENUTYPE#| 152 STATE 137 3STATE 122 TOGGLE 108 STATE 101 3STATE 92 TOGGLE 77 FMC.ITEM.MENUPROPS 69 FREEMENUITEM 52 TYPE 33 TYPE 27 FREEMENUITEM 15 TYPE 5 MAIN.WINDOW) ( 331 "NIL" 300 (13 27 10 9) 292 "Type in an unevaluated expression" 286 "INITSTATE :" 187 ("NIL" T OTHER) 171 (OTHER) 164 ("NIL" T) 144 (OFF "NIL" T) 130 ("NIL" T) 47 "Arg must be FreeMenuItem") FMC-EDIT.FN :D8 (P 1 Expr P 0 Prop I 2 BUTTON I 1 IP.WINDOW I 0 IPW.ITEM) [@Ã‘@Šo@ ÉAgH YHI AAgH I(88 WINDOWPROP 82 PACK* 70 FM.CHANGESTATE 64 MKATOM 56 EDITE 51 COPYALL 46 WINDOWPROP 41 PACK* 19 ERROR) (76 FMC.ITEM. 35 FMC.ITEM. 24 FREEMENUITEM 5 FREEMENUITEM) ( 13 "Arg must be FreeMenuItem") FMC-LINKS :D8 (P 8 i P 6 Link P 5 Id P 4 Item P 3 LinkMenu P 2 MainWindow I 2 BUTTON I 1 IP.WINDOW I 0 IPW.ITEM) @ Ag `do¿dg ¿dg¿jdnÿdhHdI ¿2K dgð¢±Â¿oJ ¿`låjð³ðJg Oµh\µH¿`låjð²ðh_hJ –OµÂi°¿O_°´]²/LM h¾AgN¿gN A¿°ˆoJ ¿±ÿzgð²#AgogoAi(315 FM.CHANGESTATE 299 PUTWINDOWPROP 271 FMC-PROMPTPRINT 257 FM.CHANGESTATE 251 MKATOM 239 PUTWINDOWPROP 223 MKATOM 193 INSIDEP 188 CURSORPOSITION 143 GETMOUSESTATE 125 GETWINDOWUSERPROP 101 GETMOUSESTATE 96 FMC-PROMPTPRINT 73 MENU 10 GETWINDOWUSERPROP) (304 LINKS 289 FMC.ITEM.LINKS 280 REMOVE 245 LINKS 233 FMC.ITEM.LINKS 149 LASTMOUSEBUTTONS 120 ITEMLIST 107 LASTMOUSEBUTTONS 79 ADD 40 DEFAULTMENUHELDFN 31 CLRPROMPT 15 |MENUTYPE#| 5 MAIN.WINDOW) ( 309 "(NIL)" 294 (NIL) 265 "This item has no ID - can't link" 90 "Click on the item you want to link to" 22 (("Add Link" (QUOTE ADD)) ("Remove Link" (QUOTE REMOVE)))) FMC-MAKEBITMAP :D8 (P 1 Stream P 0 Bitmap I 1 FONT I 0 LABEL) G @Ã“@d‘@A A X ¹AI ¿jA I¿@I H(67 PRIN1 59 MOVETO 53 FONTDESCENT 45 DSPFONT 37 DSPCREATE 31 BITMAPCREATE 26 FONTHEIGHT 20 STRINGWIDTH) (8 BITMAP) () FMC-COMPOUND.BITMAP :D8 (P 2 item P 1 Stream P 0 CompoundBitmap I 1 ITEM.LIST I 0 COMPOUND.REGION) ±@@ H YA±ŽdJjdIJJ@ÙØJJ@ÙØ µ‚±ÿqH(164 BITBLT 22 DSPCREATE 13 BITMAPCREATE) NIL () FMC-SNAPBM :D8 (P 1 SnapBM P 0 Region) *HH YHHII(38 BITBLT 27 SCREENBITMAP 21 BITMAPCREATE 4 GETREGION) NIL () FMC-MOVE.SELECTION :D8 (P 16 item P 12 Top P 11 Right P 10 Height P 9 Width P 8 Bottom P 7 Left P 6 CorrY P 5 CorrX P 4 NewPos P 3 Stream P 2 CompoundBitmap P 1 CompoundRegion P 0 ItemList I 1 UNIQUE.OR.MULTIPLE I 0 WINDOW) ‚Ð@giAgð²@g@g h¿@g X@ g0H°-d_¿Oµ Oh_‚O&_¿µÔO YdH Zd [I_I_IkÙ_IkÙ_IIØmÿØ_IIØmÿØ_OOOOkg@ho OOOOkg@ho OOOOkg@ho OOOOkg@ho jdOjkgKho OjOOkgKho OOjOkgKho jOjdkgKho JII@\dIÙ]LIÙ^L_L_OMÔ_ONÔ_OOOOkg@ OOOOkg@ OOOOkg@ OOOOkg@ H°'dO MN@¿O gð˜O @ ¿µÚAgð²"@gH@gh@ @gH@ (639 FMC-SELECT.LIST 633 PUTWINDOWPROP 620 FMC-SELECT.ITEM 614 PUTWINDOWPROP 602 PUTWINDOWPROP 574 FMC-REDRAW.ITEM 555 FMC-UPDATE.REGION 537 DRAWLINE 516 DRAWLINE 495 DRAWLINE 474 DRAWLINE 419 FMC-MOVE.BITMAP 407 DRAWLINE 383 DRAWLINE 357 DRAWLINE 331 DRAWLINE 307 DRAWLINE 280 DRAWLINE 253 DRAWLINE 226 DRAWLINE 146 DSPCREATE 139 FMC-COMPOUND.BITMAP 131 APPLY 66 FMC-DESELECT.LIST 59 GETWINDOWUSERPROP 47 PUTWINDOWPROP 40 GETWINDOWUSERPROP 14 PUTWINDOWPROP) (627 SELECTION.LIST 608 SELECTION.LIST 595 SELECTED.ITEM 586 UNIQUE 564 GROUP 530 ERASE 509 ERASE 488 ERASE 467 ERASE 394 REPLACE 370 REPLACE 344 REPLACE 318 REPLACE 294 REPLACE 267 REPLACE 240 REPLACE 213 REPLACE 71 UNIONREGIONS 54 SELECTION.LIST 35 SELECTED.ITEM 29 SELECTION.LIST 20 UNIQUE 8 FMC.CHANGED) ( 401 (2 2) 377 (2 2) 351 (2 2) 325 (2 2) 301 (2 2) 274 (2 2) 247 (2 2) 220 (2 2)) FMC-MOVE.BITMAP :D8 (P 11 NewPos P 10 OldY P 9 OldX P 8 GridOldY P 7 GridOldX P 6 NewY P 5 NewX P 4 GridNewY P 3 GridNewX P 2 Grid P 1 CorrY P 0 CorrX I 3 WINDOW I 2 BM.Y I 1 BM.X I 0 BITMAP F 12 MOVINGCURSOR F 13 DEFAULTCURSOR) @ lÛ@ lÛCg ABABWAHØBIØC @jdCABhdgg W AHØ_BIØ_A_B_J¢±ö¿`låjð”KL±øC ½C ¾OM ™ON ³ËMHÙJÛJÚ»NIÙJÛJÚ¼@jdCOOhdgg ¿@jdCKLhdgg ¿K_¿L_¿M_¿N_¿±ÿuC ½C ¾OM ™ON ³>@jdCOHÙOIÙhdgg ¿@jdCMHÙNIÙhdgg ¿M_¿N_¿¿`låjð²‹MHÙNIÙ_¿W O(378 SETCURSOR 348 GETMOUSESTATE 334 BITBLT 305 BITBLT 273 EQP 264 EQP 255 LASTMOUSEY 248 LASTMOUSEX 222 BITBLT 197 BITBLT 153 EQP 144 EQP 135 LASTMOUSEY 128 LASTMOUSEX 105 GETMOUSESTATE 79 SETCURSOR 72 BITBLT 48 CURSORPOSITION 28 GETWINDOWUSERPROP 14 BITMAPHEIGHT 5 BITMAPWIDTH) (354 LASTMOUSEBUTTONS 328 INVERT 323 INPUT 299 INVERT 294 INPUT 216 INVERT 211 INPUT 191 INVERT 186 INPUT 111 LASTMOUSEBUTTONS 66 REPLACE 61 INPUT 23 GRIDSIZE) () FMC-TRACK.NEW.ITEM :D8 (P 5 NewY P 4 NewX P 3 OldY P 2 OldX P 1 ItemRegion P 0 ItemBitmap I 1 WINDOW I 0 ITEM) Â@@A A $HjdAd A ¿`låjð¨ILIMA ¼A ½JL ˜KM ³4HjdAJKhdgg ¿HjdALMhdgg ¿LºM»°‘(185 BITBLT 160 BITBLT 134 EQP 126 EQP 118 LASTMOUSEY 111 LASTMOUSEX 84 GETMOUSESTATE 79 BITBLT 73 LASTMOUSEY 67 LASTMOUSEX 54 LASTMOUSEY 48 LASTMOUSEX) (179 INVERT 174 INPUT 154 INVERT 149 INPUT 90 LASTMOUSEBUTTONS) () FMC-UPDATE.BM.POSITION :D8 (P 2 X P 1 Region P 0 Bitmap I 1 WINDOW I 0 ITEM) €@@@´FIlÛH lÛÙZ@J@J(70 BITMAPWIDTH) NIL () FMC-UPDATE.REGION :D8 (P 3 obj P 2 ObjectList P 1 Box P 0 Reg I 3 WINDOW I 2 DELTAY I 1 DELTAX I 0 OBJECT) @@@HdAØHHBØH@gCI²@I@C¿@gð´JdKABCµïh(134 FMC-UPDATE.REGION 107 FMC-DRAW.BOX 85 DSPFILL) (115 GROUP 79 PAINT) () FMC-COMPUTE.SHAPE.REGS :D8 (P 11 Reg4 P 10 Reg3 P 9 Reg2 P 8 Reg1 P 7 HalfWidth P 6 HalfHeight P 5 Rheight P 4 Rwidth P 3 Rbottom P 2 Rleft P 1 Region P 0 Item I 0 WINDOW F 12 LowerRightCursor F 13 UpperLeftCursor F 14 UpperRightCursor F 15 LowerLeftCursor) @g ±HYdZI[I\I]dlÛ^LlÛ_H¢±šJKNØONggWh_JOØKNØONggWh_JOØKONggWh_JKONggWh_@gOOOOhJKLMghWh_@gOh(268 PUTWINDOWPROP 238 CREATEREGION 228 PUTWINDOWPROP 185 CREATEREGION 156 CREATEREGION 124 CREATEREGION 90 CREATEREGION 10 GETWINDOWUSERPROP) (259 SHAPE.REGS 243 FMC-SHAPE 210 SHAPE.REGS 195 BOTTOMLEFT 190 FMC-SHAPE 166 BOTTOMRIGHT 161 FMC-SHAPE 134 TOPRIGHT 129 FMC-SHAPE 100 TOPLEFT 95 FMC-SHAPE 5 SELECTED.ITEM) () FMC-SHAPE :D8 (P 19 object P 18 CorrY P 17 CorrX P 16 MinHeight P 15 MinWidth P 14 NewRegion P 13 SC.RTop P 12 SC.RRight P 11 SC.RBottom P 10 SC.RLeft P 9 SC.Region P 8 WBottom P 7 WLeft P 6 RTop P 5 RRight P 4 RBottom P 3 RLeft P 2 Region P 1 Box P 0 Item I 1 WINDOW I 0 WHERE) ÝAg ñ0AgiHYHZd[J\JJØ]JJØ^A ÉlØ_A ÉlØ_OKØ_OLØ_OMØ_ONØ_OOJJ_H IµGjØ_H Iµ*jØ_ A I³"OO OgOOOO±¥lØ°¹lØ°Ö@dgð²!¿OO OgOO@hOOOO°sgð² OO OgOO@hOOOO°M@dgð²¿OO OgOO@hOOO°$gð´)OO OgOO@hOOOOh _JjgAHOOÙOOÙOOHA Hdgð¢±¿¿@dgð²"¿OOÙKÙlÛ_"¿OOØOÙN°egð²'OOØOÙMÙlÛ_"¿OOØOÙN°8@dgðž¿OOØOÙMŽgð²OOÙKÙlÛ_"¿OOÙLÙlÛ_$¿H°dO&O"O$AµìHA AgHA (730 FMC-SELECT.ITEM 724 PUTWINDOWPROP 712 FMC-REDRAW.ITEM 700 FMC-UPDATE.REGION 505 FMC-UPDATE.BM.POSITION 497 CREATEREGION 448 DSPFILL 433 GETREGION 233 FMC-DESELECT.ITEM 220 BITMAPHEIGHT 186 BITMAPWIDTH 157 CREATEREGION 106 \INSUREWINDOW 92 \INSUREWINDOW 28 PUTWINDOWPROP 10 GETWINDOWUSERPROP) (718 SELECTED.ITEM 635 BOTTOMLEFT 613 BOTTOMRIGHT 566 TOPRIGHT 526 TOPLEFT 513 GROUP 442 REPLACE 405 FMC-BOX.NEWREGIONFN 391 BOTTOMLEFT 369 FMC-BOX.NEWREGIONFN 354 BOTTOMRIGHT 328 FMC-BOX.NEWREGIONFN 314 TOPRIGHT 290 FMC-BOX.NEWREGIONFN 275 TOPLEFT 247 FMC-NOBOX.NEWREGIONFN 22 FMC.CHANGED 5 SELECTED.ITEM) () FMC-BOX.NEWREGIONFN :D8 (P 6 DeltaY P 5 DeltaX P 4 MovingY P 3 MovingX P 2 WHERE P 1 AnchorY P 0 AnchorX I 2 X.Y.WHERE I 1 MOVINGPOINT I 0 FIXEDPOINT) pBBBAA%A¡@JgðªJdgð²¿KHÙ½LIÙ¾HMdNñ‘¿NØIMdNñ‘¿NØgð¨Jgð´KHÙ½ILÙ¾HMdNñ‘¿NØIMdNñ‘¿NÙNIL (79 BOTTOMRIGHT 71 TOPLEFT 34 TOPRIGHT 25 BOTTOMLEFT) () FMC-NOBOX.NEWREGIONFN :D8 (L (2 Y 1 MOVINGPOINT 0 FIXEDPOINT)) Aµ@BNIL NIL () FMC-REDRAW :D8 (P 0 ITEM I 1 REGION I 0 WINDOW) oh@g g@@g dH@ µñ@g –@ ¿@g –@ ¿@g ´@ (108 FMC-DISPLAY.GRID 100 GETWINDOWUSERPROP 88 FMC-SELECT.LIST 81 GETWINDOWUSERPROP 69 FMC-SELECT.ITEM 62 GETWINDOWUSERPROP 46 FMC-REDRAW.ITEM 33 GETWINDOWUSERPROP 22 DSPFILL 11 GETWINDOWUSERPROP) (95 DISPLAYGRID 76 SELECTION.LIST 57 SELECTED.ITEM 28 ITEMLIST 16 REPLACE 6 FMC.BACKGROUND) () FMC-REDRAW.ITEM :D8 (P 8 OBJECT P 7 RBottom P 6 RLeft P 5 BoxShade P 4 Box P 3 Background P 2 ObjectList P 1 Region P 0 Bitmap I 1 WINDOW I 0 ITEM) ê @@@@@@&IKgAL™@LMA¿@gð²JŽdOA µðhI^I_HjdAN@ØO@Øhdgg (231 BITBLT 142 FMC-REDRAW.ITEM 116 FMC-DRAW.BOX 105 DSPFILL) (225 PAINT 220 INPUT 124 GROUP 99 REPLACE) () FMC-DELETE :D8 (P 2 ITEM P 1 ItemList P 0 Unique? I 0 WINDOW) Ò@g H²@g@g h¿@g Yd¢±@ I°EdJjg@¿@gJ¿@gJiµ¼I o @ @gh@gh@gio@ (207 FMC-PROMPTPRINT 195 PUTWINDOWPROP 183 PUTWINDOWPROP 171 PUTWINDOWPROP 159 FMC-PROMPTPRINT 153 CONCAT 143 LENGTH 132 WINDOWADDPROP 118 WINDOWDELPROP 105 DSPFILL 64 FMC-DESELECT.LIST 52 GETWINDOWUSERPROP 40 PUTWINDOWPROP 33 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (189 FMC.CHANGED 177 SELECTION.LIST 165 SELECTED.ITEM 125 DELETED.ITEMS 112 ITEMLIST 99 REPLACE 47 SELECTION.LIST 28 SELECTED.ITEM 22 SELECTION.LIST 5 SELECTED.ITEM) ( 201 "Nothing to Delete" 148 " item(s) deleted") FMC-UNDELETE :D8 (P 7 ITEM P 1 UndeletedItems P 0 DeletedItems I 1 WINDOW I 0 WHAT) .Ag 1H¢±@dgð˜¿HhY±œdgð•¿HY±Žgð¢±ƒ`0H°@dOoOOd´dið3µgOhh¼MµLh^L&½µÁNºdJ¿dg ¿dg¿jdnÿdh»dK ¿ h¹I²VI°-dOA ¿AgO¿AgOµÔI o A AgioA oA (299 FMC-PROMPTPRINT 287 FMC-PROMPTPRINT 275 PUTWINDOWPROP 263 FMC-PROMPTPRINT 257 CONCAT 247 LENGTH 236 WINDOWADDPROP 222 WINDOWDELPROP 208 FMC-REDRAW.ITEM 185 MENU 94 CONCAT 10 GETWINDOWUSERPROP) (269 FMC.CHANGED 229 ITEMLIST 215 DELETED.ITEMS 160 DEFAULTMENUHELDFN 151 CLRPROMPT 112 QUOTE 65 |MENUTYPE#| 55 LIST 42 ALL 25 LAST 5 DELETED.ITEMS) ( 293 "Nothing to Undelete" 281 "Nothing Undeleted" 252 " items(s) undeleted" 85 " - ") FMC-GROUP :D8 (P 4 object P 3 GroupBitmap P 2 GroupRegion P 1 Group P 0 ObjectList I 0 WINDOW) –@g 1H kñ´‚±{@gi@ H°d@gLµìhddddddddddddddddddddjdhddYdgIHg0H°&d½NµMh_M&¾µÛO ZIJlÙJlÙJlØJlØJH [IKIKIkInÿÿIlIlI@ @gI@gI@ (403 FMC-SELECT.ITEM 397 PUTWINDOWPROP 385 WINDOWADDPROP 373 FMC-REDRAW.ITEM 262 FMC-COMPOUND.BITMAP 254 CREATEREGION 202 APPLY 65 WINDOWDELPROP 45 FMC-DESELECT 39 PUTWINDOWPROP 19 LENGTH 10 GETWINDOWUSERPROP) (391 SELECTED.ITEM 379 ITEMLIST 149 UNIONREGIONS 128 GROUP 59 ITEMLIST 33 FMC.CHANGED 5 SELECTION.LIST) () FMC-UNGROUP :D8 (P 2 OBJECT P 1 ObjectList P 0 Group I 0 WINDOW) Ÿ@g HYHd²~gð´u@gi@gH@ Hjg@I°*d@gJ¿@gJ¿J@ µ×@ (156 FMC-SELECT.LIST 145 FMC-REDRAW.ITEM 137 WINDOWADDPROP 124 WINDOWADDPROP 104 DSPFILL 71 FMC-DESELECT.ITEM 65 WINDOWDELPROP 53 PUTWINDOWPROP 10 GETWINDOWUSERPROP) (131 SELECTION.LIST 118 ITEMLIST 98 REPLACE 59 ITEMLIST 47 FMC.CHANGED 38 GROUP 5 SELECTED.ITEM) () FMC-ALIGN :D8 (P 7 deltaY P 6 deltaX P 5 region P 4 item P 2 RegionOfRefItem P 1 RefEdge P 0 ItemList I 1 WINDOW I 0 ALIGN.TYPE) LAg !AgiH kñ´{A HZ@dgð”¿d°3dgð•¿J°%gðšJJØ°@gð—JJØ€iYHAKµAgHA \½j^_¿MjgA¿@dgð™¿IMÙ¾MI°OgðœIMÙ_¿MI°;@dgð²¿IMMØÙ_¿MIM°gð²IMMØÙ¾MIMÙ¿Ldgð™NO¿LA ¿K[±ÿ?(323 FMC-REDRAW.ITEM 315 FMC-REL.MOVE 198 DSPFILL 156 FMC-SELECT.LIST 150 PUTWINDOWPROP 41 FMC-DESELECT.LIST 31 LENGTH 25 PUTWINDOWPROP 10 GETWINDOWUSERPROP) (305 GROUP 275 ALIGNRIGHT 245 ALIGNTOP 223 ALIGNBOTTOM 206 ALIGNLEFT 192 REPLACE 144 SELECTION.LIST 116 ALIGNRIGHT 97 ALIGNTOP 84 ALIGNBOTTOM 71 ALIGNLEFT 19 FMC.CHANGED 5 SELECTION.LIST) () FMC-HCENTER :D8 (P 6 deltaX P 5 region P 4 item P 2 RegionOfRefItem P 1 HPos P 0 ItemList I 0 WINDOW) Ç@g !@giH kñ´F@ HZdJlÛØYH1Kµ@gH@ \]jg@¿M¾MdMMlÛØIÙÙ¿MNÙ¾Ldgð˜Nj¿L@ ¿K[°Ž(191 FMC-REDRAW.ITEM 183 FMC-REL.MOVE 139 DSPFILL 103 FMC-SELECT.LIST 97 PUTWINDOWPROP 41 FMC-DESELECT.LIST 31 LENGTH 25 PUTWINDOWPROP 10 GETWINDOWUSERPROP) (174 GROUP 133 REPLACE 91 SELECTION.LIST 19 FMC.CHANGED 5 SELECTION.LIST) () FMC-VCENTER :D8 (P 6 deltaY P 5 region P 4 item P 2 RegionOfRefItem P 1 VPos P 0 ItemList I 0 WINDOW) Ï@g !@giH kñ´H@ HZdJlÛØYH1Kµ@gH@ \]jg@¿M¾MMMMlÛØIÙÙ¿MNÙ¾Ldgð˜jN¿L@ ¿K[°ˆ(199 FMC-REDRAW.ITEM 191 FMC-REL.MOVE 141 DSPFILL 105 FMC-SELECT.LIST 99 PUTWINDOWPROP 41 FMC-DESELECT.LIST 31 LENGTH 25 PUTWINDOWPROP 10 GETWINDOWUSERPROP) (182 GROUP 135 REPLACE 93 SELECTION.LIST 19 FMC.CHANGED 5 SELECTION.LIST) () FMC-REL.MOVE :D8 (P 3 Region P 2 item P 0 ObjectList I 2 DELTAY I 1 DELTAX I 0 GROUP) Y@H!IµhZ[dAØ¿KKBØ¿Jgð˜JAB¿IY°À(81 FMC-REL.MOVE) (71 GROUP) () FMC-GETA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 WINDOW F 1 Stream F 2 SI::*RESETFORMS* F 3 Item F 4 FileName) ¿Tg cg` hhRcgQhhdRcQ gð«oP P oQ oP Q cgð³PgS¿PgS¿°ÖP oQ oP (188 FMC-PROMPTPRINT 182 CONCAT 172 FULLNAME 161 FMC-REDRAW 152 WINDOWADDPROP 139 WINDOWADDPROP 117 FMC-GET.ONE.OBJECT 111 FMC-PROMPTPRINT 105 CONCAT 95 FULLNAME 84 FMC-DESELECT 77 FMC-PROMPTPRINT 59 READ 27 CURSOR 10 OPENSTREAM) (146 SELECTION.LIST 133 ITEMLIST 124 STOP 64 FreeMenuCreator-ItemList 41 CLOSEF 22 WAITINGCURSOR 17 CURSOR 5 INPUT) ( 177 "...done" 166 "GETting file " 100 "..." 89 "GETting file " 71 "Not a Free Menu Creator file") FMC-GET :D8 (P 7 RESETSTATE P 6 SI::*RESETFORMS* P 5 LISPXHIST P 4 Item P 3 Expr P 2 Stream P 1 FileName P 0 PromptWindow I 0 WINDOW F 8 LISPXHIST) «@g Ao@ oIhHhdo Yd²nd ²TW!g ¿$@g ³@gI¿@gI¿@gioI @ o@ (168 FMC-PROMPTPRINT 156 FMC-PROMPTPRINT 150 CONCAT 138 PUTWINDOWPROP 125 PUTWINDOWPROP 112 PUTWINDOWPROP 98 GETWINDOWUSERPROP 82 SI::RESETUNWIND 77 \MVLIST 72 FMC-GETA0001 55 FINDFILE 45 PROMPTFORWORD 24 FMC-PROMPTPRINT 10 GETWINDOWUSERPROP) (132 FMC.CHANGED 119 TITLE 106 FILENAME 93 FILENAME 67 SI::RESETUNWIND 5 FMC.PROMPTWINDOW) ( 162 "GET aborted" 144 "Couldn't find file " 39 (13 27 10 9) 29 "File to GET :" 18 "") FMC-GET.ONE.OBJECT :D8 (P 6 i P 4 ObjectListSize P 3 CompoundRegion P 2 Bitmap P 1 Item P 0 Expr I 0 STREAM) Y P@ Xdl \Hgð’±6H Yh¿Hgð³@Hdgðœ¿@ ºIJ‹H Z¿IJ±ÕILk2 NMó³&@ _¿OµOh__¿NkÔ^°âO&_¿°ôO¿g0 I°-d_¿Oµ Oh_‚O&_¿µÔO »IKI ¿IIIg(308 FMC-COMPOUND.BITMAP 266 APPLY 153 FMC-GET.ONE.OBJECT 97 FMC-MAKEBITMAP 80 HREAD 36 FMC-CREATE.ITEM.FROM.LIST 17 NTH 8 READ) (342 STOP 193 UNIONREGIONS 71 **BITMAP** 59 GROUP 25 STOP) () FMC-PUTA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 0 item I 0 SI::*CLEANUP-FORMS* F 1 Stream F 2 SI::*RESETFORMS* F 3 WINDOW F 4 FileName F 5 ItemList) žTg cg` hhRcgQhhdRcoQ oS gQ ¿Q UdHQ µñgQ oQ oS (155 FMC-PROMPTPRINT 149 CONCAT 139 FULLNAME 128 PRIN1 112 FMC-PUT.OBJECT 98 TERPRI 91 PRIN1 80 FMC-PROMPTPRINT 74 CONCAT 64 FULLNAME 27 CURSOR 10 OPENSTREAM) (122 STOP 85 FreeMenuCreator-ItemList 41 CLOSEF 22 WAITINGCURSOR 17 CURSOR 5 OUTPUT) ( 144 "...done" 133 "PUTting file " 69 "..." 58 "PUTting file ") FMC-PUT :D8 (P 6 RESETSTATE P 5 SI::*RESETFORMS* P 4 LISPXHIST P 3 Stream P 2 FileName P 1 ItemList P 0 PromptWindow I 0 WINDOW F 7 LISPXHIST) ›@g @g @g I´ho@ oJhHhdo Zd²EW!g ¿$@gJ@gJ@gho@ (152 FMC-PROMPTPRINT 140 PUTWINDOWPROP 128 PUTWINDOWPROP 116 PUTWINDOWPROP 99 SI::RESETUNWIND 94 \MVLIST 89 FMC-PUTA0001 70 PROMPTFORWORD 49 FMC-PROMPTPRINT 32 GETWINDOWUSERPROP 21 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (134 FMC.CHANGED 122 TITLE 110 FILENAME 84 SI::RESETUNWIND 27 FILENAME 16 ITEMLIST 5 FMC.PROMPTWINDOW) ( 146 "PUT aborted" 64 (13 27 10 9) 54 "File to PUT to :" 43 "") FMC-PUT.OBJECT :D8 (P 3 object P 2 Message P 1 Label P 0 ObjectList I 1 STREAM I 0 ITEM) ÷@@@@IÃ—I•ogIg@@@@J²gJgŠgd @@@@@H @@@@@@@h@@@@hA ¿A IÃ²I²@dgð«¿IAid¿@gð´HdKA µñh(494 FMC-PUT.OBJECT 469 HPRINT 438 TERPRI 431 PRIN1 174 LENGTH 113 CONCAT 101 CONCAT 60 CONCAT) (477 GROUP 457 GROUP 444 BITMAP 107 %" 96 %" 90 %" 55 %" 49 %" 35 BITMAP) ( 43 "**BITMAP**") FMC-EDIT.INFOA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 0 item I 0 SI::*CLEANUP-FORMS* F 1 Stream F 2 SI::*RESETFORMS* F 3 WINDOW F 4 ItemList F 5 TEdWindow F 6 DEFAULTCURSOR) ßg` hhRch cgQhhdRcoS ` T oQ ¿oQ ¿Q ¿Q oQ ¿Q ¿Q ¿Q TŽdHQjµðQoklV oS ho c QU (220 OPENTEXTSTREAM 211 CREATEW 200 FMC-PROMPTPRINT 189 SETCURSOR 183 TEDIT.PARALOOKS 164 FMC-EDIT.INFO.ITEM 149 TERPRI 142 TERPRI 135 PRIN1 129 DATE 123 CHANGEFONT 112 TERPRI 105 TERPRI 98 PRIN1 86 CHANGEFONT 75 FMC-SORT.ITEM.LIST 69 SETCURSOR 59 FMC-PROMPTPRINT 29 OPENTEXTSTREAM 14 CURSOR) (64 WAITINGCURSOR 36 CLOSEF 9 WAITINGCURSOR 4 CURSOR) ( 206 "FMC Items Summary" 194 "Creating summary ... done" 175 (QUAD CENTERED) 117 (MODERN 10 REGULAR) 92 "- Free Menu Creator Summary -" 80 (MODERN 14 BOLD) 53 "Creating summary ...") FMC-EDIT.INFO :D8 (P 5 RESETSTATE P 4 SI::*RESETFORMS* P 3 LISPXHIST P 2 TEdWindow P 1 Stream P 0 ItemList I 0 WINDOW F 6 LISPXHIST) ,@g !V!g ¿$(37 SI::RESETUNWIND 32 \MVLIST 27 FMC-EDIT.INFOA0001 10 GETWINDOWUSERPROP) (22 SI::RESETUNWIND 5 ITEMLIST) () FMC-EDIT.INFO.ITEM :D8 (P 18 Def P 17 prop P 15 OBJECT P 14 OBJECTLIST P 13 MESSAGE P 12 INFINITEWIDTH P 11 LINKS P 10 INITSTATE P 9 MENU P 8 MOVEDFN P 7 HELDFN P 6 DOWNFN P 5 SELECTEDFN P 4 CHANGESTATE P 3 FONT P 2 TYPE P 1 LABEL P 0 ID I 2 SPACES I 1 STREAM I 0 ITEM) !@@@@@@@@@@@@@@@@gð²uBA ¿oA ¿oA ¿oA ¿oA ¿oA ¿HA ¿A O °dOABlØµìhBA ¿oA ¿oA ¿oA ¿oA ¿oA ¿HA ¿oA ¿oA ¿oA ¿IA ¿A ¿BA ¿lA ¿oA ¿oA ¿oA ¿JA ¿A Jdgð’±ddgð’±Ydgð’±Ngð¢±ŸOoô³GBA ¿lA ¿oA ¿oA ¿oA ¿OA ¿A ¿Loô³FBA ¿lA ¿oA ¿oA ¿oA ¿LA ¿A ¿o!O µ‚±æO²GBA ¿lA ¿oA ¿oA ¿oA ¿OA ¿A ¿O²GBA ¿lA ¿oA ¿oA ¿oA ¿OA ¿A ¿Jgð¨Jgð´@BA lA oA oA oA OA A _" _$oô³NBA ¿lA ¿oA ¿O"o A ¿oA ¿O$A ¿A ¿O _ ±þ³(1046 TERPRI 1039 PRIN1 1030 CHANGEFONT 1018 PRIN1 1012 CONCAT 999 CHANGEFONT 987 SPACES 978 SPACES 961 EVAL 952 TERPRI 946 PRIN1 938 CHANGEFONT 927 PRIN1 916 CHANGEFONT 905 SPACES 897 SPACES 872 TERPRI 865 PRIN1 856 CHANGEFONT 844 PRIN1 832 CHANGEFONT 820 SPACES 811 SPACES 799 TERPRI 792 PRIN1 783 CHANGEFONT 771 PRIN1 759 CHANGEFONT 747 SPACES 738 SPACES 708 TERPRI 701 PRIN1 693 CHANGEFONT 681 PRIN1 669 CHANGEFONT 657 SPACES 648 SPACES 631 TERPRI 624 PRIN1 615 CHANGEFONT 603 PRIN1 591 CHANGEFONT 579 SPACES 570 SPACES 509 TERPRI 502 PRIN1 494 CHANGEFONT 482 PRIN1 470 CHANGEFONT 458 SPACES 449 SPACES 441 TERPRI 434 PRIN1 426 CHANGEFONT 414 PRIN1 402 CHANGEFONT 390 PRIN1 382 CHANGEFONT 370 PRIN1 358 CHANGEFONT 346 PRIN1 334 CHANGEFONT 322 SPACES 308 FMC-EDIT.INFO.ITEM 289 FMC-SORT.ITEM.LIST 282 TERPRI 275 PRIN1 267 CHANGEFONT 255 PRIN1 243 CHANGEFONT 231 PRIN1 219 CHANGEFONT 207 SPACES) (887 NUMBER 879 EDIT 548 STATE 538 NUMBER 527 EDIT 516 DISPLAY 197 GROUP) ( 1024 (MODERN 10 REGULAR) 1007 " : " 993 (MODERN 10 BOLDITALIC) 968 (FUNCTION NILL) 932 (MODERN 10 REGULAR) 921 "INFINITEWIDTH : " 910 (MODERN 10 BOLDITALIC) 850 (MODERN 10 REGULAR) 838 "LINKS : " 826 (MODERN 10 BOLDITALIC) 777 (MODERN 10 REGULAR) 765 "INITSTATE : " 753 (MODERN 10 BOLDITALIC) 714 (SELECTEDFN DOWNFN HELDFN MOVEDFN) 687 (MODERN 10 REGULAR) 675 "CHANGESTATE : " 663 (MODERN 10 BOLDITALIC) 638 (FUNCTION NILL) 609 (MODERN 10 REGULAR) 597 "MENU : " 585 (MODERN 10 BOLDITALIC) 560 (NIL) 488 (MODERN 10 REGULAR) 476 "TYPE : " 464 (MODERN 10 BOLDITALIC) 420 (MODERN 10 REGULAR) 408 " - LABEL : " 396 (MODERN 10 BOLDITALIC) 376 (MODERN 10 REGULAR) 364 " ID : " 352 (MODERN 10 BOLDITALIC) 340 "ITEM - " 328 (MODERN 10 BOLD) 261 (MODERN 10 REGULAR) 249 " ID : " 237 (MODERN 10 BOLDITALIC) 225 "GROUP - " 213 (MODERN 12 BOLD)) FMC-HARDCOPY :D8 (P 21 top P 20 right P 19 bottom P 18 left P 17 region P 16 item P 14 10points P 13 5points P 12 2points P 11 Yoffset P 10 Xoffset P 9 FMCHeight P 8 FMCWidth P 7 PageHeight P 6 PageWidth P 5 Ymax P 4 Ymin P 3 Xmax P 2 Xmin P 1 PageScale P 0 ItemList I 1 STREAM I 0 WINDOW) ¨@g hA nˆjnˆj–o@ HaOµ‚±ÝolHÖIÖjØ^olHÖIÖjØ_IKJÙÚ_IMLÙÚ_NOÙlÛ_jOñ“j_¿OOÙlÛ_IlÚ_IlÚ_Il Ú_jOñ“j_¿OOÙOOÙOOØOØOOÙOgA jOOØOgA jOOØÕjOgA jdOOØÕOgA OIJÚÙ_OILÚÙ_H±‚_ _"_$¿O"_&¿O"O"ØmÿØ_(¿O"O"ØmÿØ_*¿JO$ñ’O$ºLO&ñ’O&¼O(Kñ’O(»O*Mñ’O*½O_±þ¶dO AOOµìoo @ (421 FMC-PROMPTPRINT 415 CONCAT 395 FMC-HARDCOPY.ITEM 250 RELDRAWTO 228 RELDRAWTO 206 RELDRAWTO 186 DRAWLINE 39 FMC-PROMPTPRINT 17 DSPSCALE 10 GETWINDOWUSERPROP) (243 REPLACE 221 REPLACE 199 REPLACE 179 REPLACE 5 ITEMLIST) ( 410 " done" 405 "Formatting for print ... " 71 11.69 58 8.27 33 "Formatting for print ...") FMC-HARDCOPY.ITEM :D8 (P 14 object P 13 RTop P 12 RRight P 11 RHeight P 10 RWidth P 9 RBottom P 8 RLeft P 7 PageScale P 6 ObjectList P 5 BoxShade P 4 Box P 3 Region P 2 Bitmap P 1 Font P 0 Label I 3 YOFFSET I 2 XOFFSET I 1 STREAM I 0 ITEM) ø@@@@@@@hA h BOKÚØ_COKÚØ_OKÚ_OKÚ_OOØ_OOØ_OOOO[d@gAL²oOLÚ¼OOLOMgA¿OOLÙOLMgA¿OLÙOLOMgA¿OOOLMgA¿@gð²N°dOABCµîhHÃ²KH²HJjdAOO@ÚØOO@ÚØ OO@ÚØOO@ÚØOI ÚØAIA HA (501 PRIN1 494 CHANGEFONT 487 MOVETO 479 FONTDESCENT 411 BITBLT 324 FMC-HARDCOPY.ITEM 295 DSPFILL 283 CREATEREGION 270 DSPFILL 258 CREATEREGION 243 DSPFILL 231 CREATEREGION 216 DSPFILL 204 CREATEREGION 184 DSPFILL 159 CREATEREGION 91 DSPSCALE) (337 BITMAP 303 GROUP 289 REPLACE 264 REPLACE 237 REPLACE 210 REPLACE 178 REPLACE) () FMC-COMPUTEA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 3 object I 0 SI::*CLEANUP-FORMS* F 4 Description F 5 WINDOW F 6 SI::*RESETFORMS* F 7 Background F 8 FM-WINDOW F 9 FM-DESCRIPTION) ™g` hhVcoU ocWµT0Ug °7j ³äTgWh c°ÑdK ¸IµHhZH&¹µæJcdcd coU (150 FMC-PROMPTPRINT 137 FREEMENU 106 FMC-COMPUTE.OBJECT 91 \APPEND2 73 EQP 65 FMC-SORT.ITEM.LIST 60 GETWINDOWUSERPROP 34 FMC-PROMPTPRINT 14 CURSOR) (81 BACKGROUND 55 ITEMLIST 9 WAITINGCURSOR 4 CURSOR) ( 144 "COMPUTING ... DONE" 39 (PROPS FORMAT EXPLICIT) 28 "COMPUTING ... ") FMC-COMPUTE :D8 (P 5 RESETSTATE P 4 SI::*RESETFORMS* P 3 LISPXHIST P 2 FM-WINDOW P 1 Description P 0 Background I 0 WINDOW F 6 LISPXHIST) q@g !V!g ¿$Jdg Jg @ ÉjØ@ ÉjØ J J (110 TOTOPW 104 OPENW 98 MOVEW 93 GETBOXPOSITION 82 \INSUREWINDOW 71 \INSUREWINDOW 65 GETWINDOWPROP 54 GETWINDOWPROP 37 SI::RESETUNWIND 32 \MVLIST 27 FMC-COMPUTEA0001 10 GETWINDOWUSERPROP) (60 HEIGHT 49 WIDTH 22 SI::RESETUNWIND 5 FMC.BACKGROUND) () FMC-COMPUTE.OBJECT :D8 (P 22 Def P 21 prop P 19 item P 18 TmpLst P 17 ObjectList P 16 InfiniteWidth P 15 Background P 14 Initstate P 13 Links P 12 Menu P 11 MOVEDFN P 10 HELDFN P 9 DOWNFN P 8 SELECTEDFN P 7 CHANGESTATE P 6 Font P 5 Boxshade P 4 Box P 3 Id P 2 Label P 1 Type P 0 Region I 2 DESELECT I 1 COLLECTIONID I 0 OBJECT F 23 Collection) ð@@X@Y@o •o‚@Z@[@dgð˜c.¿@\@]@^@_@_@_@_@_@_@_@_@_@_ @_"@gð¢±ÎggKgHgHgLgMg@LÙh_$¿Oµ6gO$h_$¿O" ¿O$O"W.@h ¿O"°8j ³ÆO$gOh _$¿°°dO$O&W. h µæ±ÆgJgIgHgHh_$¿KO$gK¿Igð²%O$gA¿B²O$go¿L²EO$gL¿O$gM¿O$g@LÙ¿NO$gN¿Ooô³!O²O$gOdgð¡¿o!O(µ‚±ÖO²DO$gO¿Od²¿O$gO¿O²O$gO¿OžO$gO¿OžO$gO¿Idgð³2dgð³)¿L³$H@ ô²Igð¨Igð²O ³O$gH¿Oµ6O$_* _,oô³O$O*O,dgð¡¿O(_(±þøj ³ÆO$gO¿°µ(1046 LISTPUT 1030 EQP 1015 LISTPUT 983 EVAL 967 LISTPUT 927 BITMAPWIDTH 872 LISTPUT 854 LISTPUT 835 LISTPUT 810 LISTPUT 785 LISTPUT 746 LISTPUT 705 LISTPUT 689 LISTPUT 650 LISTPUT 636 LISTPUT 619 LISTPUT 598 LISTPUT 575 LISTPUT 513 \NCONC2 506 FMC-COMPUTE.OBJECT 485 \APPEND2 466 EQP 455 \NCONC2 448 FMC-COMPUTE.OBJECT 428 FMC-SORT.ITEM.LIST 43 STREQUAL) (1039 BACKGROUND 1006 LAMBDA 958 MAXWIDTH 944 NUMBER 936 EDIT 889 NUMBER 880 EDIT 865 INITSTATE 847 LINKS 825 MENUTITLE 801 MENUFONT 777 MENUITEMS 737 LAMBDA 728 CHANGESTATE 699 FONT 658 BOXSPACE 644 BOXSHADE 630 BOX 609 NWAYPROPS 592 COLLECTION 582 NWAY 569 ID 545 BOTTOM 538 LEFT 532 TYPE 526 LABEL 475 BACKGROUND 413 GROUP 361 BOXSPACE 355 BOXSHADE 349 BOX 341 BOTTOM 334 LEFT 328 ID 323 PROPS 313 GROUP 68 GROUP) ( 990 (FUNCTION NILL) 752 (CHANGESTATE SELECTEDFN DOWNFN HELDFN MOVEDFN) 713 (FUNCTION NILL) 614 (DESELECT T) 49 "" 38 "*NOLABEL*") FMC-CREATE.ITEM.FROM.LIST :D8 (I 0 L) ü@k @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l @l h(222 NTH 213 NTH 204 NTH 195 NTH 186 NTH 177 NTH 168 NTH 159 NTH 150 NTH 141 NTH 132 NTH 123 NTH 114 NTH 105 NTH 96 NTH 87 NTH 78 NTH 69 NTH 60 NTH 51 NTH 42 NTH 33 NTH 24 NTH 15 NTH 6 NTH) NIL () FMC-DRAW.BOX :D8 (P 6 RTop P 5 RRight P 4 RHeight P 3 RWidth P 2 RBottom P 1 RLeft P 0 Region I 3 WINDOW I 2 BOXSHADE I 1 BOX I 0 ITEM) ™@aHYHZH[H\HHØ]HHØ^A´ZIJALBgCINAÙKABgCMAÙJALBgCIJKABgC(150 DSPFILL 138 CREATEREGION 129 DSPFILL 117 CREATEREGION 106 DSPFILL 94 CREATEREGION 83 DSPFILL 71 CREATEREGION) (144 REPLACE 123 REPLACE 100 REPLACE 77 REPLACE) () FMC-CHOOSE.WINDOW.BG :D8 (P 1 Shade P 0 ShadeMenu I 0 WINDOW) 7@g g H Yd´@gI@ (52 FMC-REDRAW 46 PUTWINDOWPROP 29 MENU 20 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (39 FMC.BACKGROUND 15 SHADE.MENU 5 FMC.IP.WINDOW) () FMC-DISPLAY.GRID :D8 (P 2 y P 0 Size I 0 WINDOW) ˜@g Hµ@gilñ²ð@g jK²5Kjð³[K—K ³OjKóžJ@g ýóŒJ@g ó³-jJ@g Jkg@hkHkÙh ¿JH[Ôº°¡±ÿ}(138 DRAWLINE 116 GETWINDOWPROP 100 GETWINDOWPROP 85 GETWINDOWPROP 67 \FZEROP 45 GETWINDOWPROP 28 PUTWINDOWPROP 10 GETWINDOWUSERPROP) (123 REPLACE 111 WIDTH 95 HEIGHT 80 HEIGHT 40 HEIGHT 22 DISPLAYGRID 5 GRIDSIZE) () FMC-SET.GRIDSIZE :D8 (I 1 WINDOW I 0 SIZE) ‡@gð²9AghoA Ag –A ¿Agho@ A Ag @ ³"Ag@Ag ´A h(130 FMC-REDRAW 122 GETWINDOWUSERPROP 111 PUTWINDOWPROP 97 EQP 91 GETWINDOWUSERPROP 80 FMC-PROMPTPRINT 74 CONCAT 62 PUTWINDOWPROP 49 FMC-REDRAW 42 GETWINDOWUSERPROP 31 FMC-PROMPTPRINT 20 PUTWINDOWPROP) (117 DISPLAYGRID 105 GRIDSIZE 86 GRIDSIZE 56 DISPLAYGRID 37 DISPLAYGRID 14 GRIDSIZE 5 NOGRID) ( 68 "Grid size is " 25 "No grid") FMC-FONT->LIST :D8 (P 0 Face I 0 FONT) d@g @g @g Hoô–g°-Hoô–g°Hoô•gHoô´gh(35 FONTPROP 24 FONTPROP 10 FONTPROP) (93 BOLDITALIC 78 BOLD 63 ITALIC 48 STANDARD 30 SIZE 19 FAMILY 5 FACE) ( 85 (BOLD ITALIC REGULAR) 71 (BOLD REGULAR REGULAR) 56 (MEDIUM ITALIC REGULAR) 41 (MEDIUM REGULAR REGULAR)) FMC-LIST->FONT :D8 (I 0 FONT.LIST) @@@jg (20 FONTCREATE) (14 DISPLAY) () FMC-SORT.ITEM.LISTA0001 :D8 (I 1 ITEMB I 0 ITEMA) ¶@A@HHØmÿØAHHØmÿØ@ALKóµ IHó´JMóNIL NIL () FMC-SORT.ITEM.LIST :D8 (I 0 LIST) @g (10 SORT) (5 FMC-SORT.ITEM.LISTA0001) () FMC-IMPORT :D8 (P 15 movedFn P 14 heldFn P 13 downFn P 12 selectedFn P 11 changeState P 10 menuProps P 9 userData P 8 links P 7 message P 6 label P 5 NEW.ITEM P 4 ITEM P 1 FM.ITEMS P 0 FM.WINDOW I 0 WINDOW) ×0o@ ¿`låZjð³ïJ—J ³ãXdg Yd«o@ H o@ @ IÁKµ'H o@ @ @gi\É¾LÉ_¿LÉ_¿LÉ_g'_¿LÉ(_¿LÉ"_¿LÉ$_¿LÉ&_¿LÉNo ¢NµoLÉ LÉhdOo ³Oo ¬Oo •oOLÉ hjdO²OOÉh„ohOg'²XOg'h_¿Og'²OOg'h ¿Og'²"Odªhh ¿OOg'h ¿O„oOµ!oOšOl ²&gOh°l ›gOh°ÔO°ÐOO™Ol šgOhOO™Ol šgOhOO™Ol šgOhOLÉNo ¢NµoLÉ jdOg'hd ½No ¢N³kMM ¿MM ¿Og'²jMOg'¿MOg'¿MOg'¿MOg'¿@gM¿@gM¿M@ ¿K[±ü–(974 FMC-REDRAW.ITEM 966 WINDOWADDPROP 953 WINDOWADDPROP 825 BITMAPHEIGHT 772 BITMAPWIDTH 718 STREQUAL 706 COPYALL 701 FMC-CREATE.ITEM.FROM.LIST 659 FMC-MAKEBITMAP 637 STREQUAL 604 \TYPEMASK.UFN 578 \TYPEMASK.UFN 552 \TYPEMASK.UFN 521 \TYPEMASK.UFN 500 \TYPEMASK.UFN 470 \NCONC2 452 \NCONC2 428 \NCONC2 329 STREQUAL 316 STREQUAL 302 STREQUAL 280 FMC-FONT->LIST 258 STREQUAL 143 PUTWINDOWPROP 131 FMC-SELECT.LIST 125 FMC-PROMPTPRINT 114 INVERTW 99 FMC-DESELECT 93 FMC-PROMPTPRINT 82 INVERTW 75 FMC-PROMPTPRINT 61 GETWINDOWUSERPROP 49 WHICHW 42 \FZEROP 18 GETMOUSESTATE 13 FMC-PROMPTPRINT) (960 SELECTION.LIST 947 ITEMLIST 938 BOXOFFSET 905 BOXOFFSET 873 BOXSHADE 853 BOX 834 BOX 668 INFINITEWIDTH 652 FREEMENUITEM 624 FREEMENUITEM 610 FUNCTION 584 FUNCTION 558 FUNCTION 527 FUNCTION 507 FUNCTION 462 MENUTITLE 436 MENUTITLE 420 MENUFONT 408 MENUFONT 395 MENUITEMS 385 MENUITEMS 366 FREEMENUITEM 344 FREEMENUITEM 286 FREEMENUITEM 273 FREEMENUITEM 245 FREEMENUITEM 234 FREEMENUITEM 223 FREEMENUITEM 212 FREEMENUITEM 201 FREEMENUITEM 191 CHANGESTATE 182 FREEMENUITEM 171 FREEMENUITEM 160 FREEMENUITEM 151 FREEMENUITEM 137 FMC.CHANGED 56 FM.ITEMS 24 LASTMOUSEBUTTONS) ( 713 "" 646 "*NOLABEL*" 632 "" 488 (FUNCTION NILL) 479 (NIL) 377 (NIL) 335 "" 324 "Will toggle this item when you release the button." 311 "Will let you select a value from a pop up menu." 297 "Will select this item when you release the button." 267 "*NOLABEL*" 253 "" 119 "Importing items ... DONE" 87 "Importing items ..." 69 "This is not a Free Menu" 7 "Click on the Free Menu you want to import from") FMC-PROMPTPRINT :D8 (P 0 PromptWindow I 1 WINDOW I 0 STR) +Ag H H ¿@H Hk (40 FLASHWINDOW 33 PRIN1 25 TERPRI 19 DSPRESET 10 GETWINDOWUSERPROP) (5 FMC.PROMPTWINDOW) () (PRETTYCOMPRINT FM-CREATORCOMS) (RPAQQ FM-CREATORCOMS ((PROP MAKEFILE-ENVIRONMENT FM-CREATOR) (* * FMC items record) (RECORDS FMC-ITEM ) (* * FMC creation functions) (FNS FMC-CREATE FMC-INSTALL.IP.WINDOW FMC-INSTALL.GP.WINDOW FMC-CREATE.SHADE.MENU FMC-CREATE.SHADE.ITEM) (* * FMC windows functions) (FNS FMC-BUTTONEVENTFN FMC-CLOSEFN FMC-COPYBUTTONEVENTFN FMC-COPYINSERTFN FMC-CURSORMOVEDFN FMC-CURSOROUTFN FMC-EXPANDFN FMC-ICONFN FMC-SHRINKFN FMC-WINDOWENTRYFN) (* * FMC macros) (FUNCTIONS FM-GET.ITEM.LABEL FM-GET.ITEM.STATE FMC-CLEAR.REGION FMC-GET.ITEM FMC-GROUP? FMC-MARK.AS.CHANGED FMC-PUT.ITEM GET.REGION.BOTTOM GET.REGION.HEIGHT GET.REGION.LEFT GET.REGION.WIDTH NULLSTR PUT.REGION.BOTTOM PUT.REGION.HEIGHT PUT.REGION.LEFT PUT.REGION.WIDTH) (* * Right menu functions) (FNS FMC-FIXRIGHTMENU FMC-DORIGHTSELECTION) (* * Selection functions) (FNS FMC-SELECT.ITEM FMC-SELECT.LIST FMC-SELECT.LIST.ITEM FMC-SELECTALL FMC-GET.SELECTION FMC-DESELECT FMC-DESELECT.ITEM FMC-DESELECT.LIST FMC-DESELECT.LIST.ITEM) (* * Property windows functions) (FNS FMC-APPLY FMC-SHOW.ITEM FMC-SHOW.GROUP FMC-NEWITEM FMC-UPDATE.ITEM FMC-UPDATE.GROUP FMC-GET.LABEL FMC-CHOOSE.ITEM.BOXSHADE FMC-CHOOSE.ITEM.BG FMC-GET.MENUPROPS FMC-GET.INITSTATE FMC-EDIT.FN FMC-LINKS) (* * Property windows descriptions) (VARS FMC-IP-DESC FMC-GP-DESC) (* * Creating bitmaps) (FNS FMC-MAKEBITMAP FMC-COMPOUND.BITMAP FMC-SNAPBM) (* * Moving items) (FNS FMC-MOVE.SELECTION FMC-MOVE.BITMAP FMC-TRACK.NEW.ITEM FMC-UPDATE.BM.POSITION FMC-UPDATE.REGION) (* * Shaping items) (FNS FMC-COMPUTE.SHAPE.REGS FMC-SHAPE FMC-BOX.NEWREGIONFN FMC-NOBOX.NEWREGIONFN) (* * Redrawing items) (FNS FMC-REDRAW FMC-REDRAW.ITEM) (* * Deleting and undeleting items) (FNS FMC-DELETE FMC-UNDELETE) (* * GROUPing and UNGROUPing) (FNS FMC-GROUP FMC-UNGROUP) (* * Align and Center functions) (FNS FMC-ALIGN FMC-HCENTER FMC-VCENTER FMC-REL.MOVE) (* * File saving and loading) (FNS FMC-GET FMC-GET.ONE.OBJECT FMC-PUT FMC-PUT.OBJECT) (* * Creating a summary) (FNS FMC-EDIT.INFO FMC-EDIT.INFO.ITEM) (* * Hardcopy functions) (FNS FMC-HARDCOPY FMC-HARDCOPY.ITEM) (* * Creating the desription list) (FNS FMC-COMPUTE FMC-COMPUTE.OBJECT) (* * Miscellaneous) (FNS FMC-CREATE.ITEM.FROM.LIST FMC-DRAW.BOX FMC-CHOOSE.WINDOW.BG FMC-DISPLAY.GRID FMC-SET.GRIDSIZE FMC-FONT->LIST FMC-LIST->FONT FMC-SORT.ITEM.LIST FMC-IMPORT FMC-PROMPTPRINT) (* * Icon stuff) (COMS (BITMAPS FMC-ICON FMC-ICON.MASK) (INITVARS (FMC-ICON.TEMPLATE (create TITLEDICON ICON _ FMC-ICON MASK _ FMC-ICON.MASK TITLEREG _ (CREATEREGION 2 2 70 28))))) (* *) (COMS (P (OR ( SASSOC (QUOTE FMCreator) BackgroundMenuCommands) (NCONC1 BackgroundMenuCommands (QUOTE (FMCreator ( QUOTE (FMC-CREATE)) "Opens a Free Menu Creator window for use")))) (SETQ BackgroundMenu NIL))) ( CURSORS MOVINGCURSOR))) (PUTPROPS FM-CREATOR MAKEFILE-ENVIRONMENT (:READTABLE "INTERLISP" :PACKAGE "INTERLISP")) (RECORD FMC-ITEM (TYPE LABEL FONT ID COLLECTION DESELECT MESSAGE INITSTATE BOX BOXSHADE BACKGROUND LINKS OBJECTLIST MENU CHANGESTATE SELECTEDFN DOWNFN HELDFN MOVEDFN REGION BITMAP XBMOFFSET YBMOFFSET INFINITEWIDTH USERDATA) XBMOFFSET _ 0 YBMOFFSET _ 0) (DEFMACRO FM-GET.ITEM.LABEL (ID.OR.LABEL WINDOW) (LIST (QUOTE FM.ITEMPROP) (LIST (QUOTE FM.GETITEM) ID.OR.LABEL NIL WINDOW) (QUOTE (QUOTE LABEL)))) (DEFMACRO FM-GET.ITEM.STATE (ID.OR.LABEL WINDOW) (LIST (QUOTE FM.ITEMPROP) (LIST (QUOTE FM.GETITEM) ID.OR.LABEL NIL WINDOW) (QUOTE (QUOTE STATE)))) (DEFMACRO FMC-CLEAR.REGION (REGION WINDOW) (LIST (QUOTE DSPFILL) REGION (QUOTE WHITESHADE) (QUOTE ( QUOTE REPLACE)) WINDOW)) (DEFMACRO FMC-GET.ITEM (ITEM FIELD) (LIST (QUOTE fetch) (BQUOTE (FMC-ITEM (\, FIELD))) (QUOTE of) ITEM )) (DEFMACRO FMC-GROUP? (OBJECT) (LIST (QUOTE EQ) (BQUOTE (FMC-GET.ITEM (\, OBJECT) TYPE)) (QUOTE (QUOTE GROUP)))) (DEFMACRO FMC-MARK.AS.CHANGED (W) (LIST (QUOTE WINDOWPROP) W (QUOTE (QUOTE FMC.CHANGED)) T)) (DEFMACRO FMC-PUT.ITEM (ITEM FIELD VALUE) (LIST (QUOTE replace) (BQUOTE (FMC-ITEM (\, FIELD))) (QUOTE of) ITEM (QUOTE with) VALUE)) (DEFMACRO GET.REGION.BOTTOM (REGION) (LIST (QUOTE fetch) (QUOTE (REGION BOTTOM)) (QUOTE of) REGION)) (DEFMACRO GET.REGION.HEIGHT (REGION) (LIST (QUOTE fetch) (QUOTE (REGION HEIGHT)) (QUOTE of) REGION)) (DEFMACRO GET.REGION.LEFT (REGION) (LIST (QUOTE fetch) (QUOTE (REGION LEFT)) (QUOTE of) REGION)) (DEFMACRO GET.REGION.WIDTH (REGION) (LIST (QUOTE fetch) (QUOTE (REGION WIDTH)) (QUOTE of) REGION)) (DEFMACRO NULLSTR (STR) (LIST (QUOTE STREQUAL) STR "")) (DEFMACRO PUT.REGION.BOTTOM (REGION VALUE) (LIST (QUOTE replace) (QUOTE (REGION BOTTOM)) (QUOTE of) REGION (QUOTE with) VALUE)) (DEFMACRO PUT.REGION.HEIGHT (REGION VALUE) (LIST (QUOTE replace) (QUOTE (REGION HEIGHT)) (QUOTE of) REGION (QUOTE with) VALUE)) (DEFMACRO PUT.REGION.LEFT (REGION VALUE) (LIST (QUOTE replace) (QUOTE (REGION LEFT)) (QUOTE of) REGION (QUOTE with) VALUE)) (DEFMACRO PUT.REGION.WIDTH (REGION VALUE) (LIST (QUOTE replace) (QUOTE (REGION WIDTH)) (QUOTE of) REGION (QUOTE with) VALUE)) (RPAQQ FMC-IP-DESC ((PROPS FORMAT EXPLICIT) (LABEL APPLY TYPE MOMENTARY LEFT 0 BOTTOM 195 BOX 1 BOXSHADE 65535 BOXSPACE 1 FONT (MODERN 14 BOLDITALIC) SELECTEDFN FMC-APPLY) (LABEL SHOW TYPE MOMENTARY LEFT 49 BOTTOM 195 BOX 1 BOXSHADE 65535 BOXSPACE 1 FONT (MODERN 14 BOLDITALIC) SELECTEDFN FMC-SHOW.ITEM) (LABEL NEW TYPE MOMENTARY LEFT 111 BOTTOM 195 BOX 1 BOXSHADE 65535 BOXSPACE 1 FONT ( MODERN 14 BOLDITALIC) SELECTEDFN FMC-NEWITEM) (LABEL TYPE TYPE STATE LEFT -1 BOTTOM 178 FONT (MODERN 12 BOLD) MENUITEMS (MOMENTARY TOGGLE 3STATE STATE NWAY EDIT NUMBER EDITSTART DISPLAY) LINKS (DISPLAY TYPELINK) INITSTATE MOMENTARY) (LABEL MOMENTARY TYPE DISPLAY LEFT 31 BOTTOM 177 ID TYPELINK FONT ( MODERN 12 STANDARD)) (LABEL LABEL TYPE MOMENTARY LEFT 113 BOTTOM 178 FONT (MODERN 12 BOLD) SELECTEDFN FMC-GET.LABEL LINKS (EDIT LABELLINK)) (LABEL "" TYPE EDIT LEFT 151 BOTTOM 177 ID LABELLINK FONT ( MODERN 12 STANDARD) INITSTATE "IIIIMMMMMMMMMMMMMMM") (LABEL ID TYPE EDITSTART LEFT -1 BOTTOM 162 FONT (MODERN 12 BOLD) LINKS (EDIT IDLINK)) (LABEL "" TYPE EDIT LEFT 14 BOTTOM 161 ID IDLINK FONT (MODERN 12 STANDARD) INITSTATE "") (LABEL FONT TYPE DISPLAY LEFT -1 BOTTOM 146 FONT (MODERN 12 ITALIC)) (LABEL FAMILY TYPE STATE LEFT 32 BOTTOM 146 ID FAMILY FONT (MODERN 12 BOLD) MENUITEMS (CLASSIC MODERN TERMINAL TITAN GACHA HELVETICA TIMESROMAN) LINKS (DISPLAY FAMILYLINK) INITSTATE GACHA) (LABEL GACHA TYPE DISPLAY LEFT 77 BOTTOM 145 ID FAMILYLINK FONT (MODERN 12 STANDARD)) (LABEL SIZE TYPE STATE LEFT 161 BOTTOM 146 ID SIZE FONT (MODERN 12 BOLD) MENUITEMS (6 7 8 9 10 11 12 14 18 24 30 36) LINKS ( DISPLAY SIZELINK) INITSTATE 12) (LABEL 10 TYPE DISPLAY LEFT 191 BOTTOM 145 ID SIZELINK FONT (MODERN 12 STANDARD)) (LABEL FACE TYPE STATE LEFT 210 BOTTOM 146 ID FACE FONT (MODERN 12 BOLD) MENUITEMS ( REGULAR ITALIC BOLD BOLDITALIC) LINKS (DISPLAY FACELINK) INITSTATE BOLDITALIC) (LABEL REGULAR TYPE DISPLAY LEFT 241 BOTTOM 145 ID FACELINK FONT (MODERN 12 STANDARD)) (LABEL BOX TYPE STATE LEFT -1 BOTTOM 130 FONT (MODERN 12 BOLD) MENUITEMS (0 1 2 3 4 5 6 7 8 9 10) LINKS (DISPLAY BOXLINK) INITSTATE 0) (LABEL 0 TYPE DISPLAY LEFT 26 BOTTOM 129 ID BOXLINK FONT (MODERN 12 STANDARD)) (LABEL BOXSHADE TYPE STATE LEFT 40 BOTTOM 130 FONT (MODERN 12 BOLD) SELECTEDFN FMC-CHOOSE.ITEM.BOXSHADE LINKS (DISPLAY BOXSHADELINK)) (LABEL "" TYPE DISPLAY LEFT 107 BOTTOM 130 ID BOXSHADELINK FONT (MODERN 12 STANDARD) MAXWIDTH 60) (LABEL BACKGROUND TYPE STATE LEFT 176 BOTTOM 130 ID BACKGROUND FONT (MODERN 12 BOLD) SELECTEDFN FMC-CHOOSE.ITEM.BG LINKS (DISPLAY BACKGROUNDLINK)) (LABEL "" TYPE DISPLAY LEFT 262 BOTTOM 130 ID BACKGROUNDLINK FONT (MODERN 12 STANDARD) MAXWIDTH 60) (LABEL MENU TYPE STATE LEFT -1 BOTTOM 114 FONT (MODERN 12 BOLD) SELECTEDFN FMC-GET.MENUPROPS LINKS (DISPLAY MENULINK) INITSTATE "(NIL)") (LABEL "(NIL)" TYPE DISPLAY LEFT 39 BOTTOM 113 ID MENULINK FONT (MODERN 12 STANDARD)) (LABEL INITSTATE TYPE STATE LEFT 195 BOTTOM 114 ID INITSTATE FONT (MODERN 12 BOLD) SELECTEDFN FMC-GET.INITSTATE LINKS ( DISPLAY INITSTATELINK)) (LABEL "#NOLABEL#" TYPE DISPLAY LEFT 257 BOTTOM 113 ID INITSTATELINK FONT ( MODERN 12 STANDARD)) (LABEL CHANGESTATE TYPE STATE LEFT -1 BOTTOM 98 ID CHANGESTATE FONT (MODERN 12 BOLD) SELECTEDFN FMC-EDIT.FN LINKS (DISPLAY CHANGESTATELINK) INITSTATE "(FUNCTION NILL)") (LABEL "(FUNCTION NILL)" TYPE DISPLAY LEFT 89 BOTTOM 97 ID CHANGESTATELINK FONT (MODERN 12 STANDARD)) (LABEL SELECTEDFN TYPE STATE LEFT -1 BOTTOM 81 ID SELECTEDFN FONT (MODERN 12 BOLD) SELECTEDFN FMC-EDIT.FN LINKS (DISPLAY SELECTEDFNLINK) INITSTATE "(FUNCTION NILL)") (LABEL "(FUNCTION NILL)" TYPE DISPLAY LEFT 75 BOTTOM 80 ID SELECTEDFNLINK FONT (MODERN 12 STANDARD)) (LABEL "DOWNFN" TYPE STATE LEFT -1 BOTTOM 65 ID DOWNFN FONT (MODERN 12 BOLD) SELECTEDFN FMC-EDIT.FN LINKS (DISPLAY DOWNFNLINK) INITSTATE "(FUNCTION NILL)") (LABEL "(FUNCTION NILL)" TYPE DISPLAY LEFT 57 BOTTOM 64 ID DOWNFNLINK FONT (MODERN 12 STANDARD)) (LABEL "HELDFN" TYPE STATE LEFT -1 BOTTOM 49 ID HELDFN FONT (MODERN 12 BOLD) SELECTEDFN FMC-EDIT.FN LINKS (DISPLAY HELDFNLINK) INITSTATE "(FUNCTION NILL)") (LABEL "(FUNCTION NILL)" TYPE DISPLAY LEFT 49 BOTTOM 48 ID HELDFNLINK FONT (MODERN 12 STANDARD)) (LABEL "MOVEDFN" TYPE STATE LEFT -1 BOTTOM 33 ID MOVEDFN FONT (MODERN 12 BOLD) SELECTEDFN FMC-EDIT.FN LINKS (DISPLAY MOVEDFNLINK) INITSTATE "(FUNCTION NILL)") (LABEL "(FUNCTION NILL)" TYPE DISPLAY LEFT 62 BOTTOM 32 ID MOVEDFNLINK FONT (MODERN 12 STANDARD)) (LABEL LINKS TYPE STATE LEFT -1 BOTTOM 16 FONT (MODERN 12 BOLD) SELECTEDFN FMC-LINKS LINKS (DISPLAY LINKSLINK) INITSTATE "(NIL)") (LABEL "(NIL)" TYPE DISPLAY LEFT 36 BOTTOM 15 ID LINKSLINK FONT (MODERN 12 STANDARD)) (LABEL "INFINITEWIDTH" TYPE TOGGLE LEFT 239 BOTTOM 16 ID INFINITEWIDTH FONT (MODERN 12 BOLD)) (LABEL MESSAGE TYPE EDITSTART LEFT -1 BOTTOM 0 FONT (MODERN 12 BOLD) LINKS (EDIT MESSAGELINK)) (LABEL "" TYPE EDIT LEFT 61 BOTTOM -1 ID MESSAGELINK FONT (MODERN 12 STANDARD) INITSTATE "MMMMMMMMMMMMMMMMMMMMMMMM"))) (RPAQQ FMC-GP-DESC ((PROPS FORMAT EXPLICIT) (LABEL APPLY TYPE MOMENTARY LEFT 0 BOTTOM 106 BOX 1 BOXSHADE 65535 BOXSPACE 1 FONT (MODERN 14 BOLDITALIC) SELECTEDFN FMC-APPLY) (LABEL SHOW TYPE MOMENTARY LEFT 49 BOTTOM 106 BOX 1 BOXSHADE 65535 BOXSPACE 1 FONT (MODERN 14 BOLDITALIC) SELECTEDFN FMC-SHOW.GROUP) (LABEL "ID" TYPE EDITSTART LEFT 0 BOTTOM 83 FONT (MODERN 12 BOLD) LINKS (EDIT IDLINK)) (LABEL "" TYPE EDIT LEFT 17 BOTTOM 82 ID IDLINK FONT (MODERN 12 STANDARD)) (LABEL "COLLECTION" TYPE EDITSTART LEFT 0 BOTTOM 67 FONT (MODERN 12 BOLD) LINKS (EDIT COLLECTIONLINK)) (LABEL "" TYPE EDIT LEFT 75 BOTTOM 66 ID COLLECTIONLINK FONT (MODERN 12 STANDARD)) (LABEL "DESELECT" ID DESELECT TYPE TOGGLE LEFT 0 BOTTOM 50 FONT (MODERN 12 BOLD)) (LABEL BOX TYPE STATE LEFT 0 BOTTOM 33 FONT (MODERN 12 BOLD) MENUITEMS (1 2 3 4 5 6 7 8 9 10) LINKS (DISPLAY BOXLINK) INITSTATE 1) (LABEL 1 TYPE DISPLAY LEFT 27 BOTTOM 32 ID BOXLINK FONT (MODERN 12 STANDARD)) (LABEL BOXSHADE TYPE STATE LEFT 0 BOTTOM 16 FONT ( MODERN 12 BOLD) SELECTEDFN FMC-CHOOSE.ITEM.BOXSHADE LINKS (DISPLAY BOXSHADELINK)) (LABEL "" TYPE DISPLAY LEFT 86 BOTTOM 16 ID BOXSHADELINK FONT (MODERN 12 STANDARD) MAXWIDTH 60) (LABEL BACKGROUND TYPE STATE LEFT 0 BOTTOM 0 ID BACKGROUND FONT (MODERN 12 BOLD) SELECTEDFN FMC-CHOOSE.ITEM.BG LINKS ( DISPLAY BACKGROUNDLINK)) (LABEL "" TYPE DISPLAY LEFT 86 BOTTOM 0 ID BACKGROUNDLINK FONT (MODERN 12 STANDARD) MAXWIDTH 60))) (RPAQQ FMC-ICON #*(76 94)@@@@@@@@AO@@@@@@@@@@@@@@@@@@COH@@@@@@@@@@@@@@@@@GOL@@@@@@@@@@@@@@@@@OON@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@@OON@@@@@@@@@@@@@@@@@GOL@@@@@@@@@@@@@@@@@COH@@@@@@@@@@@@@@@@@AO@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@GOOOOON@@@@@@@@@@@@@OOOOOON@@@@@@@@@@@@AOOOOOOO@@@@@@@@@@@@AOOOOOOO@@@@@@@@@@@@CO@FOKHOH@@@@@@@@@@@COGNGCGGH@@@@@@@@@@@GOGNJKGOL@@@@@@@@@@@GOGNMKGOL@@@@@@@@@@@OOANOKGON@@@@@@@@@@@OOGNOKGON@@@@@@@@@@AOOGNOKGOO@@@@@@@@@@AOOGNOKGGO@@@@@@@@@@COOGNOKHOOH@@@@@@@@@COOOOOOOOOH@@@@@@AOOOOOOOOOOOOOOOL@@@AOOOOOOOOOOOOOOOL@@@AH@AOL@@@@@AOL@AL@@@C@@@OL@@@@@GON@@L@@@CCONONGOH@AOON@@L@@@CB@@GO@@H@COOL@@L@@@CBOOGOCLH@OOO@@@N@@@FDH@COHDHCOOL@@@F@@@FDOOKOILHOOOH@@@F@@@FD@@AOL@HOON@@@@F@@@FD@@AOL@HGOH@@@@G@@@LIOOLONLHGN@@@@@C@@@LI@@BONDHCH@@@@@C@@@LJ@@BGODHB@@@@@@C@@@LKOONGO@H@@@@@@@CH@AI@@@@COHH@@@@@@@AH@AI@@@@AO@H@@@@@@@AH@AIOOOOMLOH@@@@@@@AH@C@@@@@@@@@@@@@@@@AH@C@@@@@@@@@@@@@@@@@L@C@@@@@@@@@@@@@@@@@L@CCOOOOOHGOOLCOOO@@L@FB@@@@@HD@@DB@@A@@L@FB@@@@@HD@@DB@@A@@F@FD@@@@A@D@@DB@@@H@F@FD@@@@A@D@@DB@@@H@F@LGOOOOO@GOOLCOOOH@F@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@@@@@@@@@@@@@@@@@@@@@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@L@@@@@@@@@@@@@@@@@C@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@ ) (RPAQQ FMC-ICON.MASK #*(76 94)@@@@@@@@AO@@@@@@@@@@@@@@@@@@COH@@@@@@@@@@@@@@@@@GOL@@@@@@@@@@@@@@@@@OON@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@AOOO@@@@@@@@@@@@@@@@@OON@@@@@@@@@@@@@@@@@GOL@@@@@@@@@@@@@@@@@COH@@@@@@@@@@@@@@@@@AO@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@GOOOOON@@@@@@@@@@@@@OOOOOON@@@@@@@@@@@@AOOOOOOO@@@@@@@@@@@@AOOOOOOO@@@@@@@@@@@@COOOOOOOH@@@@@@@@@@@COOOOOOOH@@@@@@@@@@@GOOOOOOOL@@@@@@@@@@@GOOOOOOOL@@@@@@@@@@@OOOOOOOON@@@@@@@@@@@OOOOOOOON@@@@@@@@@@AOOOOOOOOO@@@@@@@@@@AOOOOOOOOO@@@@@@@@@@COOOOOOOOOH@@@@@@@@@COOOOOOOOOH@@@@@@AOOOOOOOOOOOOOOOL@@@AOOOOOOOOOOOOOOOL@@@AOOOOOOOOOOOOOOOL@@@COOOOOOOOOOOOOOOL@@@COOOOOOOOOOOOOOOL@@@COOOOOOOOOOOOOOOL@@@COOOOOOOOOOOOOOON@@@GOOOOOOOOOOOOOOON@@@GOOOOOOOOOOOOOOON@@@GOOOOOOOOOOOOOOON@@@GOOOOOOOOOOOOOOOO@@@OOOOOOOOOOOOOOOOO@@@OOOOOOOOOOOOOOOOO@@@OOOOOOOOOOOOOOOOO@@@OOOOOOOOOOOOOOOOOH@AOOOOOOOOOOOOOOOOOH@AOOOOOOOOOOOOOOOOOH@AOOOOOOOOOOOOOOOOOH@COOOOOOOOOOOOOOOOOH@COOOOOOOOOOOOOOOOOL@COOOOOOOOOOOOOOOOOL@COOOOOOOOOOOOOOOOOL@GOOOOOOOOOOOOOOOOOL@GOOOOOOOOOOOOOOOOON@GOOOOOOOOOOOOOOOOON@GOOOOOOOOOOOOOOOOON@OOOOOOOOOOOOOOOOOON@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@@@@@@@@@@@@@@@@@@@@@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@OOOOOOOOOOOOOOOOOOO@ ) (RPAQ? FMC-ICON.TEMPLATE (create TITLEDICON ICON _ FMC-ICON MASK _ FMC-ICON.MASK TITLEREG _ ( CREATEREGION 2 2 70 28))) (OR (SASSOC (QUOTE FMCreator) BackgroundMenuCommands) (NCONC1 BackgroundMenuCommands (QUOTE (FMCreator (QUOTE (FMC-CREATE)) "Opens a Free Menu Creator window for use")))) (SETQ BackgroundMenu NIL) (RPAQ MOVINGCURSOR (CURSORCREATE (QUOTE #*(16 16)@@@@@A@@@CH@@ED@@A@@@A@@BA@HD@@DOLGND@@DBA@H@A@@@A@@@ED@@CH@@A@@ ) (QUOTE NIL) 7 7)) (PUTPROPS FM-CREATOR COPYRIGHT ("Rank Xerox France. Author Andre BLAVIER" 1988)) NIL