‘XCL Compiler output for source file {DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>LDE>ROOMS>MEDLEY-35>ROOMS-PLACEMENT-EDITOR.;2 Source file created Saturday, 5 December 2020, 16:35:49. FASL file created Saturday, 5 December 2020, 16:35:49. ÿ˜–#ogg o ˜•ŒFILECREATEDLOC˜Œ*STANDARD-INPUT*˜Œ1 top-level form˜ŒFUNCTION˜“€˜•ŒDEFINE-FILE-INFO˜ŒOPEN ˜ŒOUTPUT˜Œ DIRECTION˜“˜Œ READTABLE˜ŒXCL˜ŒPACKAGE˜ŒROOMS˜Œ{Null}˜–!ggo ¿o˜Œ2 top-level forms™˜“€˜•ŒPUTPROP˜•ŒROOMS-PLACEMENT-EDITORCOMS˜•Œ FILEDATES˜•ŒROOMS-PLACEMENT-EDITOR˜“ ˜“˜’ŒFILE-ENVIRONMENTS˜‘˜ŒXEROX-COMMON-LISP™˜“˜•ŒP˜“˜ŒREQUIRE˜ŒROOMS˜“˜ŒEXPORT˜“˜ŒQUOTE˜“˜’ŒGET-PE˜‘˜ŒROOMS˜’ŒPRINT-PEP-TITLE-STRING™!˜ŒROOMS˜“˜•Œ STRUCTURES˜’ŒPLACEMENT-EDITOR™!˜’Œ PE-PLACEMENT™!˜“˜•Œ VARIABLES˜’Œ*PLACEMENT-EDITORS*™!˜’Œ*PE-INHIBIT-REDISPLAY*™!˜“˜•Œ FUNCTIONS™"˜’ŒMAKE-PE™!˜’ŒFIND-PE™!˜’Œ PE-WINDOW-P™!˜’Œ PE-CLOSEFN™!˜’Œ PE-REPAINTFN™!˜’Œ PE-RESHAPEFN™!˜’Œ PE-TOTOPFN™!˜’Œ UPDATE-PE?™!˜’Œ UPDATE-PE™!˜’Œ UPDATE-PEPS™!˜’ŒUPDATE-PEP-SAVE-BITMAP™!˜’ŒUPDATE-PE-WINDOW™!˜’Œ PLACED-REGION™!˜“˜•ŒCOMS˜“˜•Œ*˜•Œ;˜Œdisplay˜“™-˜’Œ*DEFAULT-ICON-SIZE*™!˜’Œ*PE-TITLE-FONT*™!˜’Œ*PEP-TITLE-FONT*™!˜’Œ*PEP-INCLUDED-SHADE*™!˜’Œ *PE-BORDER*™!˜“™1˜’Œ DISPLAY-PEPS™!˜’ŒSAVE-PEP-IMAGE™!˜’ŒDISPLAY-PE-TITLE™!˜’ŒDISPLAY-PE-BORDER™!˜’Œ DISPLAY-PEP™!˜’ŒPRINT-PEP-TITLE™!™#˜“™-˜’Œ*DISPLAY-PE-DEPTH*™!˜“˜•Œ WINDOW-TYPES˜ŒPLACEMENT-EDITOR˜“ ™1˜’ŒPE-RIGHTBUTTONFN™!˜“™A™B˜Œmouse trackers˜’ŒPE-BUTTONEVENTFN™!˜’ŒPE-BUTTONEVENTFN-INTERNAL™!˜’ŒPE-TRACK-MOUSE™!˜’ŒPE-GETMOUSESTATE™!˜’ŒPE-TRACK-LEFT-BUTTON™!˜’ŒPE-TRACK-MIDDLE-BUTTON™!˜’ŒPEP-GETBOXPOSITION™!˜’ŒPEP-GETBOXPOSITION-INTERNAL™!˜“™@˜“™A™B˜Œediting˜“™1˜’ŒPE-ROOM-CHANGED-FN™!˜’Œ PEP-SELECTED™!˜’ŒEXPAND-PLACEMENT™!˜’ŒPEP-SELECTED-COPY-OR-MOVE™!˜’ŒPE-ROOM-SELECTED™!˜“˜Œ EVAL-WHEN˜“˜ŒLOAD˜“™˜“˜ŒPUSHNEW˜“™™f˜’Œ*ROOM-CHANGED-FUNCTIONS*™!˜“˜•Œ GLOBALVARS˜•ŒTINYFONT˜•Œ CROSSHAIRS ˜“˜”˜Œ 5-Dec-2020 16:35:48•Œ`{DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>LDE>ROOMS>MEDLEY-35>ROOMS-PLACEMENT-EDITOR.;2˜–+ggo ¿ggg ˜Œ1DEFINE-FILE-ENVIRONMENT IL:ROOMS-PLACEMENT-EDITOR™˜“€%™™ ˜Œ COMPILE-FILE˜•ŒFILETYPE™˜•ŒMAKEFILE-ENVIRONMENT™ ˜“™ ˜ŒXCL™ ˜ŒROOMS˜–o ¿oo ˜Œ2 top-level forms™˜“€™™˜ŒROOMS ˜“™"™#˜ŒROOMS˜–Dgio ¿goolg ¿ggg ˜ŒDEFSTRUCT PLACEMENT-EDITOR™˜“€>™)˜’Œ%STRUCTURE-DECLARE-DATATYPE˜‘˜ŒSYSTEM ˜ŒSET-PARSED-STRUCTURE9˜ŒTYPE-EXPAND-STRUCTURE4˜Œ TYPE-EXPANDER/™*#˜ŒSTRUCTURE-OBJECT™*™*˜“˜“™*˜•ŒPOINTER˜“™*™‚—˜“™*™‚—˜“™*™‚—˜“™*™‚—˜“™* ™‚—˜“™* ™‚—˜“™‚—™‚—™‚—™‚—™‚—™‚—™‚—˜“˜ŒPS™*˜’ŒMAKE-PE-INTERNAL™!˜“˜’ŒCHANGED?™!˜’Œ ROOM-NAME™!˜’ŒSCALE™!˜’ŒPEPS™!˜’ŒWINDOW™!˜’Œ TITLE-TEXT™!˜’ŒCLIPPING-REGION™!˜ŒDATATYPE€€˜ŒPE-˜“™‚¢˜’ŒPLACEMENT-EDITOR-P™!˜“˜ŒLAMBDA˜“˜’ŒPE™!˜ŒSTREAM˜’ŒDEPTH™!˜“˜ŒFORMAT™‚±˜Œ#˜“˜’Œ PE-ROOM-NAME™!™‚°˜’ŒCOPY-PLACEMENT-EDITOR™!€€˜“˜“™‚£˜“˜ŒMEMBER€˜Œ PLACEMENTS€™‚˜˜’Œ PE-CHANGED?™!˜“™‚¤€€™‚™™‚¶˜“™‚¥˜’Œ *ONE-TO-ONE*™!™‚¥€™‚š˜’ŒPE-SCALE™!˜“™‚¦€˜ŒLIST€™‚›˜’ŒPE-PEPS™!˜“™‚§€€™‚œ˜’Œ PE-WINDOW™!˜“™‚¨€˜’ŒTEXT™!€™‚˜’Œ PE-TITLE-TEXT™!˜“™‚©€€™‚ž˜’ŒPE-CLIPPING-REGION™!€€™‚ €˜“˜ŒACCESSOR˜Œ PREDICATE€€€œ™‚®˜–@Ù‚®™˜“˜“˜ŒOBJECT™*˜–"g ¿g ¿g ™‚Ž™˜“€˜ŒESTABLISH-SETFS-AND-OPTIMIZERS˜ŒESTABLISH-ACCESSORS˜ŒESTABLISH-PREDICATE™* ™*™*œ™‚¢˜–‚Ñgµi¸a¸gµh¹hºƒa¹iºgµ `»a»gµh¼h½ƒa¼i½gµ h¾h_¿…a¾i_¿gµ h_¿h_¿‡a_¿i_¿gµ h_¿h_¿‡a_¿i_¿`_H¿J•OI¿OK¿M•OL¿O•ON¿O–OO ¿O–OO ¿O™‚¢ ‚ÿÿÿÿ™˜“˜“˜Œ&KEY˜ŒCHANGED?˜Œ ROOM-NAME˜ŒSCALE˜ŒPEPS˜ŒWINDOW˜Œ TITLE-TEXT˜ŒCLIPPING-REGION ‚˜’ŒPLACEMENT-EDITORTYPE#™!u™‚ä[™‚ãE™‚â3™‚á*™‚Á!™‚à™‚ß™‚Þœ™‚º˜–]@¸@Ñ°igHgh b¿°ß`X@É¿H@É¿H@É¿H@É¿H@É¿H@É  ¿H@É  ¿H™‚º™˜“˜“˜ŒPLACEMENT-EDITOR˜•ŒCHECK-TYPE-FAIL$™‚ç™* ™*™*˜–Dgio ¿goolg ¿ggg ˜ŒDEFSTRUCT PE-PLACEMENT™˜“€>™)™‚’ ™‚“9™‚”4™‚•/™+#™‚–™+™+˜“˜“™+™‚—˜“™+™‚—˜“™+˜”˜•ŒFLAGBITS˜“™+˜”™‚ò˜“™+™‚—˜“™+™‚—˜“™‚—™‚—˜•ŒFLAG™‚ú™‚—™‚—˜“™‚¡™+˜’ŒMAKE-PE-PLACEMENT™!˜“˜’Œ PLACEMENT™!˜’Œ SCALED-REGION™!˜’Œ IMMEDIATE?™!˜’ŒOPEN?™!˜’Œ SAVE-BITMAP™!˜’ŒUNSCALED-REGION™!™‚«€€˜ŒPEP-˜“™‚ü˜’ŒPE-PLACEMENT-P™!˜“™‚¯˜“˜’ŒPEP™!™‚±™‚²˜“™‚´™‚±˜Œ #˜“˜•Œ\HILOC™‚˜“˜•Œ\LOLOC™‚˜’ŒCOPY-PE-PLACEMENT™!€€˜“˜“™‚ý€™‚ý€™‚𘒌 PEP-PLACEMENT™!˜“™‚þ€˜’ŒREGION™!€™‚ñ˜’ŒPEP-SCALED-REGION™!˜“™‚ÿ€˜“™‚»€€™‚ô˜’ŒPEP-IMMEDIATE?™!˜“™‚€˜“™‚»€€™‚ö˜’Œ PEP-OPEN?™!˜“™‚€€™‚÷˜’ŒPEP-SAVE-BITMAP™!˜“™‚€™‚€™‚ø˜’ŒPEP-UNSCALED-REGION™!€€™‚û€™‚Ñ€€€œ™‚˜–@Ù‚™˜“˜“˜ŒOBJECT™+˜–"g ¿g ¿g ™‚“€™‚Ù™‚Ú™‚Û™+ ™+™+œ™‚ü˜–‚Ögµh¸h¹ƒa¸i¹gµhºh»ƒaºi»gµh¼h½ƒa¼i½gµ h¾h_¿…a¾i_¿gµ h_¿h_¿‡a_¿i_¿gµ h_¿h_¿‡a_¿i_¿`_¿I•OH¿K•OJ¿MŸL‘k€j_¿OOÏ¿OŸN‘k€j_¿OOÏ¿O–OO¿O–OO¿O™‚ü‚ÿÿÿÿ™˜“˜“™‚ݘŒ PLACEMENT˜Œ SCALED-REGION˜Œ IMMEDIATE?˜ŒOPEN?˜Œ SAVE-BITMAP˜ŒUNSCALED-REGION‚˜’ŒPE-PLACEMENTTYPE#™!g™‚.M™‚-7™‚,%™‚+™‚*™‚)œ™‚˜–n@¸@Ñ°igHgh b¿°ß`X@É¿H@É¿H¹j@Êð‘j€kºIJÏ¿Hºj@Êð‘j€k¹JIÏ¿H@É¿H@É¿H™‚™˜“˜“˜Œ PE-PLACEMENT™‚ì$™‚1™+ ™+™+˜–/o ¿g X‘Hgg ˜Œ DEFGLOBALVAR *PLACEMENT-EDITORS*™˜“€$˜ŒMAKE-HASH-TABLE˜ŒBOUNDP˜ŒPROCLAIM)™.˜ŒEQUAL˜ŒTEST ™.˜“˜’ŒGLOBAL™™.˜–o ¿g X‘Hhc™/˜ŒDEFVAR *PE-INHIBIT-REDISPLAY*™˜“€™‚:™‚; ™/˜“˜ŒSPECIAL™/œ™"˜–e@` X²PHÉYg ¿IgH ¿iI ¿I ¿I ¿A—IA ¿H ¿H@A ™/™"™˜“˜“˜Œ ROOM-NAME˜Œ &OPTIONAL˜ŒREGION _™2U™9M˜’Œ SHAPE-WINDOW™!C˜•ŒTOTOPW<˜•ŒOPENW5˜’ŒUN-HIDE-WINDOW™!*˜•Œ WINDOWPROP˜•ŒGETWINDOWUSERPROP˜•ŒGETHASH$™U˜•Œ ICONWINDOW™*™.œ™2˜–‚ Ahj ¸g@gHgg@ ‘@…@ gig`  ¹Hgg ¿HgI ¿Hgg ¿Hgg ¿Hgg ¿Hgg ¿Hgg ¿Hgg ¿Hgg ¿`H ¿@`I ¿I ¿I ¿I™2™˜“˜“˜Œ ROOM-NAME™‚G˜ŒREGION‚™:‚û™=‚ô˜ŒPUTHASH‚瘕ŒDSPFONT‚Û˜•Œ PUTWINDOWPROP‚Ê™‚Z‚¹™‚Z‚¨™‚Z‚—™‚Z‚†™‚Zu™‚Zd™‚OW™‚ZF™‚¢@˜’Œ MAKE-TEXT™!*˜ŒPRINC-TO-STRING!˜ŒSTRINGP˜•ŒCREATEW‚î™.‚á™G‚Ö™8‚ј•ŒOPENFN‚Å™8‚À˜•Œ AFTERMOVEFN‚´™8‚¯˜•ŒTOTOPFN‚£™7‚ž˜•Œ RESHAPEFN‚’™6‚˜•Œ REPAINTFN‚™X|˜•Œ RIGHTBUTTONFNp™[k˜•Œ BUTTONEVENTFN^™UR™5M˜•ŒCLOSEFN:™F5˜ŒFONT/˜ŒSHADOWS˜ŒSTRING™‚㙂⠙‚ßœ˜’Œexpand-FIND-PE™!˜–@X¹gIo™‚k™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT˜ŒGETHASH ˜“™.˜–&gg ¿ggo ˜ŒDEFMACRO FIND-PE™˜“€ ™ ˜•ŒSETF-MACRO-FUNCTION˜•ŒARGNAMES™3™‚k™3˜“˜Œ ROOM-NAMEœ™4˜–@g XÙ4™˜“˜“˜ŒWINDOW™‚O ™*™Uœ™5˜–@gh ™5™˜“˜“˜ŒWINDOW™‚O™Uœ™6˜–+@g X ¿H ¿Hi¿H ™6™˜“˜“˜ŒWINDOW%™:™N ™M™‚O™*™Uœ™7˜–(@g X ¿Hi¿Q‘hH ™/™7™˜“˜“˜ŒWINDOW"™: ™=™‚O™*™Uœ™8˜–+@i ¿@g X²H ¿Q‘hH h™/™8™˜“˜“˜ŒWINDOW#™9™M™‚O™‚L ™Uœ™9˜–@É–@ h™9™˜“˜“˜ŒPE ™:™*œ™:˜–‚›i@ÉU ¸H¢±ƒ@É º@É[gð²@ɼ@L ¿@JL ¿°:@ ¿HJg@Égig@É ¿@J ¿@[h¿hh™/˜’Œ*ROOMS*™!™:™˜“˜“˜ŒPE‚†™K~˜’ŒPAINT-BACKGROUND™!U™;L™KC™;!˜•Œ GETSTREAM ™‚Q ‚™*v™*p™‚äj˜ŒNO-TEXTc™*]™‚à9™*0™‚¼(™*™*™*œ™;˜–‚î@ÉW X¢±ÚHɹ@ɺH [¼L¬@]K¿KL½L^I_¿N _¿A_¿h_¿O’O‚h°N_ÉNð²8OAð”Ab¿jOÊð–O‘hƒiOœOÉOÌ€h’O€h‡O_¿°­_“O°.gNgOgOJ gO  ¾MN¿L¼±ÿFh ™‚’™; ™˜“˜“˜ŒPE™‚G˜ŒOLD-PEPS‚Ü™<‚×™‚ü‚ʘ’Œ SCALE-REGION™!I™>(˜’ŒFIND-PLACEMENTS™! ™‚Q ‚Ï™‚.‚™‚*‚»™‚+‚µ™‚)‚”™+~™+e™+2™*™*˜’ŒROOM™!™*œ™<˜–]@ÉXH ¹oºIJ ¿jHÕJ ¿jHÕJ ¿@J ¿@I¿@[jÏ¿@™<™˜“˜“˜ŒPEP?™O7˜•Œ DSPYOFFSET+˜•Œ DSPXOFFSET ˜•ŒDSPDESTINATION˜•Œ BITMAPCREATEP™+F™+™+˜›˜“˜•Œ DSPCREATEœ™=˜–‚£@ÉX ¿H Yº@É »JKÉ Õ¼`lÖ½g`g`gIMÕgLMÕ ¾@N ¿@N ¿K`L¿@ ¿@ ™=™˜“˜“˜ŒPE‚™N‚–™M}˜’Œ MAKE-SCALE™!f˜’Œ MAKE-REGION™!.˜•Œ BITMAPHEIGHT˜•Œ WINDOWREGION ™‚—‚‹™I‚†™‚Éw™*m™*]˜ŒHEIGHTR˜ŒWIDTHM™IH˜ŒBOTTOMC™I>˜ŒLEFT5™I'™‚É™*™*œ™>˜–j@ɲX@ɸ@Ég Y–I €hºgHgHgI”J€SgI•J€S @É™E™>™˜“˜“˜Œ PLACEMENT[™‚±)™‚³!™‚P b™‚ýL™‚´?™‚µ8™‚¶1™‚·™‚R™‚ý ™‚ý™‚ý˜–o ¿g X‘HlKc™E˜ŒDEFVAR *DEFAULT-ICON-SIZE*™˜“€™‚:™‚; ™E˜“™‚C™E˜–8o ¿g X‘Hgl$ohg ˜ŒDEFGLOBALVAR *PE-TITLE-FONT*™˜“€-˜•Œ FONTCREATE™‚:™‚;2™F'˜•ŒDISPLAY˜•Œ HELVETICA ™F!˜“˜•ŒBOLD˜•ŒREGULAR™‚ǘ“™‚>™F˜–%o ¿`hhhg ˜Œ#DEFGLOBALPARAMETER *PEP-TITLE-FONT*™˜“€™‚Ù‚;™G™‚Ä ™w˜“™‚>™G˜–o ¿nH˜Œ'DEFGLOBALPARAMETER *PEP-INCLUDED-SHADE*™˜“€™‚;™H˜“™‚>™H˜–o ¿l˜ŒDEFGLOBALPARAMETER *PE-BORDER*™˜“€™‚;™I˜“™‚>™Iœ™K˜–jB¸@ɹH‘h€iZ’J°I‘h€i[‘KˆHIð‘h€i‡H¸I¹°ÜH ºh»J‘J€»AK@ ¿Jº°íI»hºK‘KhºAJ@ ¿K»°ì™K™˜“˜“˜ŒPE˜ŒDSP™‚G˜ŒOLD-PEPS_™LE™L3˜ŒREVERSE™*œ™L˜–‚$AÉX¹H¸I¹HºH¸JºH»H¸K»H¼H¸L¼BÉ ]¾M½N¾M_¿M½O_¿M_¿M½O_¿M_¿M½O_¿AÉ_¿ Ojj@IJKLgghM ¿@INó‘I€NJOó‘JOOjjONÔIÕ_¿KOýó‘KOOOÔJÕ_¿LOýó‘LOgg ¿Ojj@IJKLgghM ¿A_¿jAÊð‘i€h‘k€j_¿OOÏ¿Ojð‘hi ˜•Œ\INTERRUPTABLE™L™˜“˜“˜ŒDSP˜ŒPEP˜ŒPE‚형ŒBITBLT‚Ñ™‚ä‚„™‚ä ‚ÿ™+‚õ™+‚嘕ŒINVERT‚à˜•ŒINPUT‚Ë™‚å‚Æ™‚æ|™‚åw™‚æa™+*™*™+œ™M˜–‚è@ÉX ¹H º@É »I\KÉ Õ½H ÉjMJjMILMÕ ¿@É`̲eKÉið²vK` ¾h_¿h_¿h_¿N£O°*N’N„o_¿O˜OO&_¿ˆOh__¿N¾°Ô¿K ¿°KÉið³Ki¿K ¿KJ ™M ™˜“˜“˜ŒPE ‚☒Œ DISPLAY-TEXT™!‚Ú˜’ŒUPDATE-TEXT-CACHES™!‚»™‚ìw˜’ŒGET-TEXT-SHADOWS-INTERNAL™!J™‚ä6˜•Œ \INSUREWINDOW.™‚²™‚— ™‚³ ‚Й‚É‚Ä™‚Ér™Fm™‚Éa™‚ÉX˜’Œ*BACK-DOOR-ROOM-NAME*™!Q™*'™‚É™*™*‚•˜›˜“˜’ŒMAKE-TEXT-SHADOW™!˜Œ SOURCE-TYPE˜“™˜•ŒMERGE˜ŒTEXTURE‚¥¥˜Œ OPERATION˜“™™‚圙N˜–g@ÉX ¹gjgjgIgI@É É Õ H g`l ™N™˜“˜“˜ŒPEa˜’ŒDRAW&FILL-BOX-WITHIN™!\˜’ŒSFLOOR™K™‚—E™‚±>™‚² ™‚³ U™IP˜Œ BORDER-WIDTH7™‚É0™*%™‚´™‚µ™‚¶™‚·™*œ™O˜–7@ÉAgkgj@Êð•`€j ¿@A ™O™˜“˜“˜ŒPEP˜ŒDSP1™P)™‚ý!™H™+˜ŒSHADE ™‚ÿ™+œ™P˜–‚¤@ÉÉi X¢±ŠHÉg'Y²GI ²'I@ÉAg@ÉÉ Iº@É@ÉAlJHÉ @ÉAg@ÉÉ h™P™˜“˜“˜ŒPEP˜ŒDSP‚œ™#y˜ŒSTRINGS™#-™‚]˜’Œ WINDOW-TYPE™!‚”™‚ý‚™+‚‡˜Œ NO-TITLE-BAR?™+r™‚ d™+\™+K™‚ýD™+>™‚ 6™+#˜ŒTITLE™‚ ™‚ý™+œ™#˜–‚=eló¨lh ¿gµ `¸a¸gµh¹a¹@ ‘@…@ ºH »AAÔKÕI‘k€jÕ¼JH ]AlÕýó›KAlÕýó€h¢±ÃI³nÿÿBALkÕAKg ¿I•g„gB ¿HB ¿AI²Al Ml ÕlÔI²#AAl Kl ÕÔH Ô‡LH ÔB ¿B¾BÑ°igNgh b¿°ßJB ¿gB h™#‚ÿÿÿÿ™˜“˜“˜ŒSTRING˜ŒREGION˜ŒDSP™‚Ý™‚g™‚ ‚5˜•Œ DSPOPERATION‚)˜•Œ\SOUT‚™‚ì‚þ˜•ŒMOVETO‚÷˜•Œ FONTDESCENT‚‚時þ‚Þ™‚þ‚Ç™‚þ‚¿™‚þ‚®™‚Y‚¦™‚‚’˜•ŒBLTSHADEZ˜•Œ STRINGWIDTH@˜•Œ FONTHEIGHT9™‚\0™‚] ˜’ŒARGUMENT-ERROR™‚‘ ‚/˜•ŒREPLACE‚™‚±‚˜’ŒDSP™!‚™‚±‚ ™‚å‚š˜•ŒPAINT‚Œ™‚!™‚ ™G™‚g˜–%o ¿kc¿ggo ™R˜ŒDEFPARAMETER *DISPLAY-PE-DEPTH*™˜“€˜•ŒSET-DOCUMENTATION™‚;˜ŒVARIABLE™R˜ŒFDepth to recursivly display placement editors within placement editors˜“™‚C™R˜–og`ggghgnognognoggnoh ˜Œ!DEF-WINDOW-TYPE :PLACEMENT-EDITOR™˜“€i™‚Xd˜’ŒMAKE-WINDOW-TYPE™! P™‚K˜ŒPROPS;˜Œ RECONSTITUTER+˜Œ ABSTRACTER˜Œ RECOGNIZER˜Œ DEPENDENCIES™U ˜ŒNAME˜’Œ*WINDOW-TYPES*™!™UY˜–7@Ég X²!HÉY ‘I…I AB h˜Œ+lambda in DEF-WINDOW-TYPE :PLACEMENT-EDITOR˜ŒCLOSURE˜“˜“˜Œ PLACEMENT˜ŒREGION˜ŒDSP/™#(™‚\™‚]™‚O™* ™U™‚ýD˜–!@g'@g' ɘŒ+lambda in DEF-WINDOW-TYPE :PLACEMENT-EDITOR™‚3˜“˜“˜ŒPLIST™"˜’ŒINTERNALIZE-REGION™!™* ˜ŒREGION™‚ß4˜–E@g X²6gHÉ g@g Éhh˜Œ+lambda in DEF-WINDOW-TYPE :PLACEMENT-EDITOR™‚3˜“˜“˜ŒWINDOW1™‚O!˜’ŒEXTERNALIZE-REGION™!™‚³™‚O6™*,™U&™‚ß™*™‚?™U$˜–@g XØŒ+lambda in DEF-WINDOW-TYPE :PLACEMENT-EDITOR™‚3˜“˜“˜ŒWINDOW™‚O ™*™UU˜•ŒCOMPILED-CLOSURE@™‚L0™‚L ™‚Lœ™X˜–``ð‘h@ ™X™˜“˜“˜ŒWINDOW˜•Œ DOWINDOWCOM˜’Œ*OVERVIEW-ROOM*™!˜’Œ*CURRENT-ROOM*™!œ™[˜–]@ ¿@g XÉ @ @ —H@ ``ð‘ho Ygð•h™[™˜“˜“˜ŒWINDOWU˜’ŒUPDATE-PLACEMENTS™!H˜’ŒMENU™!/™\'˜•ŒINSIDEP"˜•Œ LASTMOUSEY˜•Œ LASTMOUSEX™‚O™‚LN˜ŒRE-FETCH:™‚R5™‚S™* ™UC˜“˜“˜ŒReFetch™‚]œ™\˜–FA¸@¹I×IH €h‘h¿j`låð‘i€h‘hX›Hg €h¹°Á™\™˜“˜“˜ŒPE˜ŒWINDOW<™‚O/˜•ŒWHICHW™^™]7™U˜•ŒLASTMOUSEBUTTONS™*œ™]˜–N` l`ålð²@ Y™I@ ¿ih`kåjð‘h@ Y˜@ ¿ih˜’Œ*TIMER*™!™]™˜“˜“˜ŒPE˜ŒWINDOWD™j<™`%™g™_˜•Œ SETUPTIMER/™‚g™‚g˜’Œ*BUTTON-HELP-DELAY*™!œ™^˜–-`¸`¹¿H`ÿ—I`ÿ€h•h™^™˜“€%˜•ŒBLOCK ˜•Œ GETMOUSESTATE™‚[™‚\™‚[™‚\œ™_˜–‚“h¸@É ¹@ɺ@É »l`ålð‘h€i\’L°IJ J ‘h€i²WH²RHɼnÿÿJLLLLgI ¿`kåjð‘i€h²IJ J €h‘HhhK¼h½L’L°>h]^’N°7H²2HÉ_¿nÿÿJOOOOgI ¿h¸°~]ÉJ J ²\MHð³VH²*HɾnÿÿJNNNNgI ¿MXɾnÿÿJNNNNgI ¿…L¼±ÿFW—W €h²o ¿Ji ¿hc¿¿±þ“™‚i™_™˜“˜“˜ŒPE‚Š™^‚€™‚L‚x˜’Œ NOTIFY-USER™!‚j˜•Œ TIMEREXPIRED?‚X™‚‚/™‚‚þ™‚Z‚ù™‚[‚ó™‚\‚ß™‚‚–™‚Z‚‘™‚[‚‹™‚\t™‚D™‚Z?™‚[9™‚\™‚Ü‚Q™‚å‚7™+‚(™‚å‚™+‚ë™+‚Ø™‚傸™+z™‚gm™‚åS™+%™‚g™* ™*™*‚s˜Œ,Use LEFT to select placements, MIDDLE Rooms.œ™`˜–6nX¿@ÉdHý¿ Hý¿noHkoH-™`™˜“˜“˜ŒPE™‚³™*.˜–|HÉ ¿HÉ`` ¤hh°R`kåjð‘i€h²j`låð“ih‚hh°/Q–Q €h²o ¿HÉi ¿hc¿¿°šj@¿ ™‚i˜’Œ*UNWIND-PROTECT*™‚‘™‚3˜“˜“˜ŒG1863v˜Œ VALUES-LISTj™^`™‚LV™‚xH™‚y™‚Z˜•ŒINVERTW2™‚g"™‚g™‚[ ™‚\Q˜Œ,Use LEFT to select placements, MIDDLE Rooms.#˜– HÉ ˜ŒClean-up forms™‚3˜“€™‚„™‚L˜•Œ \PTRHUNK2œ™a˜–8nX@A¿Hý¿Hý¿noHkoH-™a™˜“˜“˜ŒPE˜ŒPEP˜•Œ TTY.PROCESS ˜•ŒCURSOR0˜–‚'` ¿ ¿HÉÉHÉÉHÉÉ ¿HÉÉ YºI»h¼h½h¾N‘Nj`låð‘h€i²#N²NMÉ M$ ‚hh±Œ\–L €h›Lg €h]²bMÉ _¿MÉ_¿OL L ²1KOÉÖ JOÉÖ MÉ L „„¾±ÿEj@¿ ™‚ ™‚3˜“˜“˜ŒG1865‚!™‚ƒ‚™‚s‚™‚s‚™b‚ú˜•ŒFIXR‚Ꙃ•‚Ø™‚Z‚Ó™‚[‚Í™‚\‚ª™‚O‚œ™4‚”™‚f‚ˆ˜•Œ\MVLIST˜’ŒUN-SCALE-POSITION™!I™>9˜•ŒCURSORPOSITION™‚ ˜•Œ THIS.PROCESS™‚‘ ‚™*‚ò™‚¥‚♂¥‚À™*‚µ™*‚¥™Ux™*d™‚gB™+2™*%™+™+™x%˜–HÉ ¿HÉ ™‚‡™‚3˜“€ ™‚™‚‘!™‚L˜•Œ \PTRHUNK4œ™b˜–tnZ@ABC¿ggYJý¿n¦»JÉ Jý ¿hJÉ Jý ¿JÉ Jý¿JÉ Jý¿noJkoJ-˜’Œ*CATCH-RETURN-PC*™‚‘˜’Œ*CATCH-RETURN-TO*™‚‘™b™˜“˜“˜ŒWIDTH˜ŒHEIGHT˜ŒCLIPPING-REGION˜ŒWINDOWS™‚[F™‚\9™‚+™‚—™b™bl˜–‚HÉ ¿gHÉ ¿HÉHÉHÉHÉÔHÉHÉÔHÉ ` ¿HÉHÉHÉ «HÉhh ¿j`låð‘h€i²HÉHÉHÉ HÉ HÉÿ‘h€iY‘IHÉ HÉÿ‘h€i²fHÉHÉHÉHÉÔHÉHÉÔHÉ ` ¿HÉ Hý¿HÉ Hý¿HÉHÉHÉHÉÔHÉHÉÔHÉ ` ¿±ÿ0™‚Þ™‚™‚3˜“˜“˜ŒG1869‚˜•Œ DRAWGRAYBOX‚Ý™‚[‚Й‚\‚Ç™‚ª‚˜™‚[‚„™‚\{˜’ŒNON-LOCAL-RETURN-VALUES™‚‘v™‚–V™‚sP™‚«D™‚Z5™‚ª™‚™‚L‚þ˜•Œ GRAYSHADE‚Á™‚¬]™‚g/™‚¬ ™‚åa˜–0HÉHÉHÉHÉÔHÉHÉÔHÉ ` ¿HÉ HÉ ™‚‡™‚3˜“€*™‚™‚ª™‚¬]™‚L˜•Œ \PTRHUNK10œ™f˜–‚·Agð²@@É` X²+HÉY ¿I ¿@É` ¿@i X¹hºI‘IhZÉ` [²EKÉið³KAgð‘A€i¿KÉ\ šL ‘h‚i€h–K ¿I¹°ž™f™˜“˜“˜ŒROOM˜ŒREASON ‚¬™:‚Ÿ˜’ŒWINDOW-HIDDEN?™!‚˜˜•ŒOPENWPg™‚QJ˜’ŒROOM-INCLUDERS™!B˜ŒREMHASH/˜•ŒCLOSEW(™‚N™‚Q ‚™*‚‚™‚¼|™*p™*b™.[™‚ =™.6™‚  ™*™. ™‚ ˜ŒDELETEDœ™g˜–‚Pg X’H°,g ²g Y‘I‰g ‘h€i€h—g±§g X’H°+g ²g žg ‘h€i€h€h–g°fg X’H°+g ²g žg ‘h€i€h€h–g°&g X‘H‰g •g„XgðY‘I†Hgð˜H@A Hgð²%@ÉÉAÉR Hgð@É o ™‚’™g™˜“˜“˜ŒPEP˜ŒPE‚J™‚x‚?™h‚)˜’ŒINTERACTIVE-CLOSE-WINDOW™!‚$™‚Q‚ý™i‚☒Œ OV-OPERATION™!‚Ö˜•ŒKEYDOWNP‚È™‚®˜•Œ SHIFTDOWNP‚£™‚Ä‚—™‚Ä‚ˆ™‚Ãn™‚Äc™‚ÄW™‚ÄH™‚Ã/™‚Ä!™‚Ä™‚Ä™‚Â8™+‚0˜ŒEXPAND‚™*‚™‚ý‚ ™+‚˜ŒDELETE‚ó˜ŒMOVE‚蘌COPY‚Ü™‚łј•ŒESCAPE‚Ø•ŒEXPAND‚¼™‚Æ‚©˜•ŒSHIFT‚ž˜•ŒMETA‚’˜•ŒCTRL‚ƒ˜•ŒDELETE|™‚Çi™‚Ì^™‚ËR™‚ÍC˜•ŒMOVE;™‚È*™‚Ì™‚Í™‚˘•ŒCOPY‚E˜Œ)Use a modifier (eg. COPY, MOVE or DELETE)œ™h˜–\@ÉX ²3o ¿@ ¿¿`låjð‘h€i°êH H ›Hg €H ™h™˜“˜“˜Œ PLACEMENTV˜•Œ FLASHWINDOWO™‚PC˜’Œ SHRUNKEN?™!<˜’Œ HIDE-WINDOW™!#™‚s˜’ŒPLACE-PLACEMENT™!™‚x ™‚¶J™‚R)™‚g™‚ý˜ŒClick LEFT when finishedœ™i˜–‚BA X¹HºI¢±îAÉ[ \É›LI¿°@LgIgIgLÉgLÉ ¿BÉW ½JÉW ¾KÉM __¿O_¿@gð²!BJð“O¾ŽNOð©OO ¿LN @gð—LN hg@o o  ™‚’™i ™˜“˜“˜ŒOP˜ŒPEP˜ŒPE ‚ ™‚x‚þ˜•Œ ECASE-FAIL‚옒Œ ADD-PLACEMENT™!‚Ü™‚â‚Ô˜’ŒDELETE-PLACEMENT™!‚¨™‚–‚£˜’ŒFIND-PLACEMENT™!‚”™‚Q‚„™‚Qr™‚±"˜’ŒCOPY-PLACEMENT™!™‚–™a‚ó˜’ŒOP™!‚㙂È‚»™‚Ç‚›™‚ý‚‹™*{™*f™‚ý`™‚´V™‚ýP™‚µI™‚¶B™‚·=™‚ý1™‚ý(™‚ý™+‚˜ŒInvalid destination.‚ù˜“™‚Ç™‚Èœ™j˜–‚…@ÉS ¸g —g±g ²g Y‘I‰g ‘h‚i€h—g±Üg Y’I°,g ²g Z‘J‰g ‘h‚i€h—g±šg Y’I°+g ²g žg ‘h„i‚h€h–g°Yg Y’I°+g ²g žg ‘h„i‚h€h–g°``ð•„gYgð–H Igð–H Igð–H Igð–H Igð–H o ™‚’™j™˜“˜“˜ŒPE‚™‚x‚t˜’Œ GO-TO-ROOM™!‚e˜’ŒINTERACTIVE-DELETE-ROOM™!‚V˜’ŒINTERACTIVE-RENAME-ROOM™!‚G˜’ŒINTERACTIVE-COPY-ROOM™!‚8˜’Œ EDIT-ROOM™!‚$™‚‚™‚Ä‚ø™‚Ă왂Ä‚Ý™‚ÂÙ‚Ä‚¸™‚Ä‚¬™‚Ä‚™‚„™‚Äv™‚Äj™‚Ä[™‚ÃB™‚Ä4™‚Ä(™‚Ä™‚à ™‚Q‚l˜ŒENTER‚]™‚Æ‚N™‚Ç‚?™‚È‚0˜ŒEDIT‚*™‚ò‚™‚R‚™‚S‚™‚Æ‚þ™‚Ë‚ó™‚̂療Í‚Ø™‚΂љ‚Ç‚¾™‚Ì‚³™‚Ë‚§™‚Í‚˜™‚Ï‚™‚È™‚Ìq™‚Íe™‚ËV™‚ÐN™‚ó=™‚Ì/™‚Ë#™‚Í™‚ò˜•ŒSPACE™*‚z˜Œ+Use a modifier (eg. COPY, DELETE or GO TO).˜–-`¸g`‘H†gH¿o ˜Œ2 top-level forms™˜“€'˜•ŒPUTPROPS™q™f ™q™f™q"˜“™˜•Œ COPYRIGHT˜“˜ŒVenue & Xerox Corporation‚ÂÄ‚Æ‚äš‚ÿÿÿ