‘XCL Compiler output for source file {DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>LDE>ROOMS>MEDLEY-35>ROOMS-D.;2 Source file created Saturday, 5 December 2020, 16:24:55. FASL file created Saturday, 5 December 2020, 16:24:55. ے‌ک–#oggo ک•Œ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-DCOMSک•Œ FILEDATESک•ŒROOMS-Dک“ک“ک•Œ*ک•Œ;;کŒ-Rooms' interface to Interlisp-D window systemک“ک’ŒFILE-ENVIRONMENTSک‘کŒXEROX-COMMON-LISP™ک“ک•ŒPک“کڈŒEXPORTک“کڈŒQUOTEک“ک’Œ*WHO-LINE-ENTRY*ک‘کŒROOMSک“ک•ŒTYPESک’ŒBITMAP™"ک’ŒFONT™"ک’ŒTEXTURE™"ک“™ک•Œ;کŒwindowsک“ک•Œ FUNCTIONSک’ŒMOVE-WINDOW™"ک’ŒSHAPE-WINDOW™"ک’ŒOPEN-WINDOW™"ک’ŒCLOSE-WINDOW™"ک“™0ک’Œ WINDOW-REGION™"ک’ŒMAIN-WINDOW™"ک’ŒWINDOW-TITLE™"ک’ŒWINDOW-VISIBLE-P™"ک“™™-کŒregionsک“ک•Œ STRUCTURESک’ŒREGION™"ک“™0ک“™™-کŒ positionsک’Œ MAKE-POSITION™"ک’Œ POSITION-X™"ک’Œ POSITION-Y™"ک’ŒGET-POSITION™"ک“ ™0ک“™™-کŒiconsک’Œ SHRINK-WINDOW™"ک’Œ EXPAND-WINDOW™"ک’ŒICON?™"ک’Œ SHRUNKEN?™"ک’Œ ICON-POSITION™"ک’ŒWINDOW-POSITION™"ک’ŒWINDOW-ICON™"ک’ŒDELETE-WINDOW-ICON™"ک“™™-کŒuser interfaceک“ ™0ک’ŒMENU™"ک’ŒPROMPT-USER™"ک’ŒCONFIRM™"ک’ŒNOTIFY-USER™"ک’ŒGET-MESSAGE-STREAM™"ک’Œ SELECT-WINDOW™"ک’ŒSELECT-BAGGAGE™"ک’ŒEXTERNALIZE-FONT™"ک“ ™0ک“™™-کŒkeyboard interpretationک“™™کŒ‚£these have gotten out of control. it might be worth converting these to one function which returns a keyword naming the selected operation. EDITCALLERS, anyone? ک’ŒCOPY-KEY-DOWN-P™"ک’ŒHELP-KEY-DOWN-P™"ک’ŒDELETE-KEY-DOWN-P™"ک’ŒEDIT-KEY-DOWN-P™"ک’ŒMOVE-KEY-DOWN-P™"ک’ŒEXPAND-KEY-DOWN-P™"ک“ ک•ŒCOMSک“™™کŒ!add a lafite form for bug reportsک“™0ک’ŒMAKE-ROOMS-SUPPORT-FORM™"ک“ک•Œ VARIABLESک•ŒROOMSSUPPORTک“ک•ŒADDVARSک“ک•ŒLAFITESPECIALFORMSک“کŒRooms Reportک“ک•ŒFUNCTION™kکŒ*A form to report a Rooms bug or suggestionک“™ک“کڈŒSETQک•ŒLAFITEFORMSMENU€ک“™™کŒprovide a who line entryک“™m™#ک“™ک“کڈŒWHENک“کڈŒBOUNDPک“™ ک•Œ*WHO-LINE-ENTRY-REGISTRY*ک“کڈŒPUSHNEW™#™‚‚کگŒTESTک“™ کڈŒEQUALکگŒKEYک“™ کڈŒCARک“ ک•Œ GLOBALVARSک•ŒPROMPTWINDOWک•Œ CROSSHAIRSک•ŒWINDOWBACKGROUNDSHADEک•ŒWHOLESCREEN™q™zک•Œ DEFAULTICONFN™‚‚ک“ک”کŒ 5-Dec-2020 16:24:55•ŒQ{DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>LDE>ROOMS>MEDLEY-35>ROOMS-D.;2‌ک–+ggo؟gggکŒ"DEFINE-FILE-ENVIRONMENT IL:ROOMS-D™ک“€%™™ کگŒCOMPILE-FILEک•ŒFILETYPE™ک•ŒMAKEFILE-ENVIRONMENT™ک“™ کŒXCL™کŒROOMS‌ک–o کŒ1 top-level form™ک“€™ک“™#œک’Œtype-expand-BITMAP™"ک–o™‚©™ک“ک“کŒ%$$TYPE-FORMک“کڈŒ SATISFIESک•ŒBITMAPP‌ک–gggکŒDEFTYPE BITMAP™ک“€™™‚©کگŒ TYPE-EXPANDER™)œک’Œtypep-evaluate-BITMAP™"ک–@أ‘@h™‚µ™ک“ک“کŒ %$$OBJECTک•ŒBITMAP‌ک–gPgکڈŒ*TYPEP-HASH-TABLE*™‚±™ک“€کڈŒPUTHASH™‚µ™)œک’Œtype-expand-FONT™"ک–o™‚؟™ک“ک“کŒ%$$TYPE-FORMک“™‚ک•ŒFONTP‌ک–gggکŒDEFTYPE FONT™ک“€™™‚؟™‚³™*œک’Œtypep-evaluate-FONT™"ک–@ ™‚ة™ک“ک“کŒ %$$OBJECT™‚أ‌ک–gPg™‚»™‚ئ™ک“€™‚½™‚ة™*œک’Œtype-expand-TEXTURE™"ک–o™‚ذ™ک“ک“کŒ%$$TYPE-FORMک“™‚ک•ŒTEXTUREP‌ک–gggکŒDEFTYPE TEXTURE™ک“€™™‚ذ™‚³™+œک’Œtypep-evaluate-TEXTURE™"ک–@ ™‚ع™ک“ک“کŒ %$$OBJECT™‚ش‌ک–gPg™‚»™‚×™ک“€™‚½™‚ع™+œ™1ک–pekَ”elَ™ll ؟elظjً¤la¸†@ ¸@ ة&¹gIًZ‘JڈI›gI‘i‚h€h‘h@ ة¹@AIHصشAIHصش™1‚ےےےے™ک“ک“کŒWINDOWکŒPOSکڈŒ &OPTIONALکŒCURRENT-REGIONjک•ŒMOVEWOک•Œ \INSUREWINDOW(™‚è!ک•ŒWINDOWREGIONک’ŒARGUMENT-ERRORک‘کŒSYSTEM>ک•ŒDON'T0™‚يœ™2ک–‚ekَ¨lh ؟gµ @ ؛پa؛gµh»پa»o¼h½L¹n¾LWAJے›AJے€h_“O°@ ة _’O€K²@AAJ °,@g _’O„g_؟@A lO ½g‚h¹_gًڑM$ °%Oأ›hO$ ژOL \½L_‌o@O؟Mک•Œ*CONDITION-HANDLER-BINDINGS*ک’Œ*CATCH-RETURN-PC*™‚ëک’Œ*CATCH-RETURN-TO*™‚ë ™‚ï™2 ‚ےےےے™ک“ک“کŒWINDOWکŒDESIRED-REGIONکڈŒ&KEYکگŒCURRENT-REGIONکگŒNO-SHAPE‚ ™W‚÷ک•Œ\MVLIST‚ٍک’ŒCONDITION-CASE-ERROR™‚ë‚ç™‚ù‚ز™‚ù‚³™‚ù‚©ک’ŒCOPY-REGION™"‚”ک•ŒGETWINDOWUSERPROP‚‡™‚ù‚‚™1lک•Œ\USERFNISDON'Te™‚è™‚é™‚ى‚غکڈŒERROR‚اکگŒNORMAL‚¹™‚ے‚ںک•ŒSHAPEW1‚ڈک•Œ DOSHAPEFN!™‚ِ™‚ُ‚کŒError reshaping ~A: ~A/ک›ک“ک’ŒCREATE-CONDITION-CASE-LITERALS™‚ëک“™ ™‚‏œک’Œexpand-OPEN-WINDOW™"ک–@X¹gIh™‚™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک•ŒOPENW‌ک–&gg ؟ggoکŒDEFMACRO OPEN-WINDOW™ک“€ ™ک•ŒSETF-MACRO-FUNCTIONک•ŒARGNAMES™3™‚™3ک“کŒWINDOWœک’Œexpand-CLOSE-WINDOW™"ک–@X¹gIh™‚™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک•ŒCLOSEW‌ک–&gg ؟ggoکŒDEFMACRO CLOSE-WINDOW™ک“€ ™™‚™‚™4™‚™4ک“کŒWINDOWœک’Œexpand-WINDOW-REGION™"ک–@X¹gIh™‚"™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™‚é‌ک–&gg ؟ggoکŒDEFMACRO WINDOW-REGION™ک“€ ™™‚™‚™6™‚"™6ک“کŒWINDOWœک’Œexpand-MAIN-WINDOW™"ک–@X¹ggIhho™‚-™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک’ŒWINDOW™"کڈŒLETک“ک“کڈŒORک“ک•Œ WINDOWPROP™‚2ک“™ ک•ŒICONFORک“ک•Œ MAINWINDOW™‚2پ‌ک–&gg ؟ggoکŒDEFMACRO MAIN-WINDOW™ک“€ ™™‚™‚™7™‚-™7ک“کŒWINDOWœک’Œexpand-WINDOW-TITLE™"ک–@X¹gIo™‚C™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™‚5ک“ک“™ ک•ŒTITLE‌ک–&gg ؟ggoکŒDEFMACRO WINDOW-TITLE™ک“€ ™™‚™‚™8™‚C™8ک“کŒWINDOWœ™9ک–@ ²@ ` h™9™ک“ک“کŒWINDOWک•ŒREGIONSINTERSECTP ™‚éک•ŒOPENWP™‚”‌ک–(gio؟g ؟g کŒDEFSTRUCT REGION™ک“€"کڈŒESTABLISH-SETFS-AND-OPTIMIZERSکڈŒESTABLISH-ACCESSORSکڈŒSET-PARSED-STRUCTURE™>™>™>ک“کڈŒPS™>ک’ŒMAKE-REGION™"ک“ک’ŒLEFT™"ک’ŒBOTTOM™"ک’ŒWIDTH™"ک’ŒHEIGHT™"کڈŒLIST€€کŒREGION-ک“™‚]€کڈŒDEFAULT-STRUCTURE-PRINTER™‚û€€ک“ک“™‚^€پ€ک’ŒREGION-LEFT™"ک“™‚_€پ€ک’Œ REGION-BOTTOM™"ک“™‚`€پ€ک’ŒREGION-WIDTH™"ک“™‚a€پ€ک’Œ REGION-HEIGHT™"€€€€ک“کگŒACCESSORکگŒ PREDICATE€€€œ™‚]ک–‚چgµh¸h¹ƒa¸i¹gµh؛h»ƒa؛i»gµh¼h½ƒa¼i½gµ h¾h_؟…a¾i_؟l _؟I™jOH؟K™kOJ؟MڑlOL؟OڑlON؟O™‚] ‚ےےےے™ک“ک“™‚ôکگŒLEFTکگŒBOTTOMکگŒWIDTHکگŒHEIGHT‚„کڈŒ%SET-NTHv™‚{i™‚{]™‚{OکڈŒ MAKE-LIST7™‚x%™‚w™‚v™‚uœ™‚ûک–;l ¸jH@؟kH@؟lH@؟lH@؟H™‚û™ک“ک“کŒREGION3™‚{%™‚{™‚{ ™‚{™‚|œک’Œexpand-MAKE-POSITION™"ک–@X¹H؛gIJh™‚‚™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT کڈŒCONS‌ک–&gg ؟ggoکŒDEFMACRO MAKE-POSITION™ک“€ ™™‚™‚™B™‚‚™Bک“کŒXکŒYœک’Œexpand-POSITION-X™"ک–@X¹gIh™‚ڈ™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™‚ٹ‌ک–&gg ؟ggoکŒDEFMACRO POSITION-X™ک“€ ™™‚™‚™C™‚ڈ™Cک“کŒPOSœک’Œexpand-POSITION-Y™"ک–@X¹gIh™‚ڑ™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTکڈŒCDR‌ک–&gg ؟ggoکŒDEFMACRO POSITION-Y™ک“€ ™™‚™‚™D™‚ڑ™Dک“کŒPOSœ™Eک–*ejَ§kh ؟he#¸g @H؟™E‚ےےےے™ک“ک“کŒMESSAGEکڈŒ&RESTکŒMESSAGE-ARGS$ک•ŒGETPOSITIONکڈŒAPPLYکڈŒSYMBOL-FUNCTION™‚ى™Wœک’Œexpand-SHRINK-WINDOW™"ک–@X¹H؛gIhJh™‚¯™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT ک•ŒSHRINKW‌ک–&gg ؟ggoکŒDEFMACRO SHRINK-WINDOW™ک“€ ™™‚™‚™I™‚¯™Iک“کŒWINDOWکŒPOSœ™Jک–gg@hh™J™ک“ک“کŒWINDOW™Oک•ŒEXPANDWœک’Œexpand-ICON?™"ک–@X¹gIo™‚ء™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™‚5ک“ک“™ ™‚6‌ک–&gg ؟ggoکŒDEFMACRO ICON?™ک“€ ™™‚™‚™K™‚ء™Kک“کŒWINDOWœ™Lک–)@g ¸gHًY‘IH›gH‘ihh™L™ک“ک“کŒWINDOW™‚üک•ŒCLOSEICONWINDOW ™‚رک•ŒOPENFNœ™Mک–@g X–H h™M™ک“ک“کŒWINDOW™N™‚üک•Œ ICONWINDOWœ™Nک–@ XH™N™ک“ک“کŒWINDOW™‚éœک’Œexpand-WINDOW-ICON™"ک–@X¹gIo™‚ف™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™‚5ک“ک“™ ™‚×‌ک–&gg ؟ggoکŒDEFMACRO WINDOW-ICON™ک“€ ™™‚™‚™O™‚ف™Oک“کŒWINDOWœ™Pک–@gh؟@gh™P™ک“ک“کŒWINDOWک•Œ PUTWINDOWPROP™‚يک•ŒICONPOSITION™‚×œ™Tک–‚–ejَ§kh ؟ekظdjً³la¸kظjً«la¹he#؛…h¸h¹h؛I²g IJ؟`[¼K@؟L[¼KH؟L[¼Ki؟L[¼Kg ؟L[¼Kg؟L»jjnےnےh¼K½KL ؟M ™T‚ےےےے™ک“ک“کŒITEMS™‚مکŒTITLEکŒMESSAGE™‚§کŒMESSAGE-ARGS‚گک•ŒMENU=™‚¬6™‚™‚ىpک•ŒDEFAULTMENUHELDFNdک•Œ CLRPROMPTCک•ŒMENUTYPE#1™Wœ™Uک–mn¸ejَ§kh ؟H@؟ekظjً©la¹he#؛ƒh¹h؛I²g IJ؟g hhhnokoH-ک’Œ*RESETFORMS*™‚ë™U‚ےےےے™ک“ک“کŒPROMPT™‚مکŒMESSAGE™‚§کŒMESSAGE-ARGSJک•ŒTTYDISPLAYSTREAME™X:™‚¬3™‚™‚ى@™‚.™Weک–'Hةhhhhgo j@؟ ک’Œ*UNWIND-PROTECT*™‚ëکگŒCLOSUREک“ک“کŒG579!کڈŒVALUES-LIST™‚ùک•Œ PROMPTFORWORDک•ŒTTY ک“ ]ک–کŒClean-up forms™‚ک“€ک’ŒRESETUNWIND™‚ëYک•ŒCOMPILED-CLOSUREک•Œ \PTRHUNK2œ™Vک–Gejً¨ka¸he#¹ƒh¸h¹Z ؟H²g hHI€hhJi»J ؟K™V‚ےےےے™ک“ک“™‚مکŒMESSAGE™‚§کŒMESSAGE-ARGS?کڈŒTERPRI8ک•ŒMOUSECONFIRM.™‚¬&™‚™‚™X!کڈŒFORMATœ™Wک–8ejَ§kh ؟he#¸Y ؟g I@H؟I ™W‚ےےےے™ک“ک“کŒ FORMAT-STRING™‚§کŒARGS2™‚+™‚¬#™‚™‚™X™‚ى™‚œ™Xک–<`¸`ةة0ةHةًڑ` ؟` ™X™ک“€6ک•Œ GETSTREAM+ک’ŒUN-HIDE-WINDOW™"1™‚‘&™‚‘ک•Œ\DISPLAYDATAکڈŒSTREAMک•ŒWINDOW™‚‘™‚‘œ™Yک–Tejً¨ka¸he#¹ƒh¸h¹H²g HI؟g` hhhnokoh-™‚û™Y‚ےےےے™ک“ک“™‚مکŒMESSAGE™‚§کŒMESSAGE-ARGS1ک•ŒCURSOR!™‚¬™‚,™‚’'™‚+™WLک–U؟j`lهً‘h€i²4n¸dH‎؟²noHkoH- ‚hhپ°¸j@؟ ™‚™‚ک“ک“کŒG580O™‚?™‚ùک•ŒWHICHWک•Œ GETMOUSESTATEک•ŒLASTMOUSEBUTTONS8ک–‚•Hة ؟؟j`lهً‘h€i³kY²8I؛Ig [‘K†Ji Hة؛Hةg [‘K†Ji ً€h²&Hة؛Hةg [“KhڈJi ‚hhپ°پj@؟ ™‚™‚ک“ک“کŒG583‚ڈ™‚™‚ùz™‚9m™‚üW™‚9L™‚ü;™‚90™‚ü ™‚/ ™‚0ک•ŒINVERTWh™‚6G™‚6+™‚6™‚1-ک– Hة ™‚™‚ک“€™‚5)™‚™‚Dک–™‚™‚ک“€™‚@™‚œ™Zک–‚÷h¸h¹h؛h»g \’L°+g ²g ‍g ‘h„i‚h€h–g°Dg \’L°,g ²g ]‘M‰g ‘h‚i€h•gپ°l¼oL X،°\H ]¹M؛I²DLgًکIJ ؟ژLgً–I ¹IKgg gg »±ےK™Z™ک“€‚ىکڈŒADJOIN‚ـ™‚‚تک’ŒCOPY-PLACEMENT-INTERNAL™"‚؛ک’ŒDELETE-PLACEMENT™"‚،™‚ù‚œک’ŒFIND-PLACEMENT™"‚’™Ywک•Œ SHIFTDOWNPi™‚B]™‚BNک•ŒKEYDOWNP4™‚B)™‚B™‚B™‚C‚وکڈŒEQ‚ل™‚†‚×ک’ŒPLACEMENT-WINDOW™"‚ز™‚‰‚آکگŒCOPY‚±کگŒMOVE‚ƒ™‚Frک•ŒMETAdک•ŒCTRLXک•ŒSHIFTIک•ŒCOPYB™‚G/™‚H$™‚J™‚I ک•ŒMOVE‚ŒکŒSelect placement to ~Aœ™[ک–'@g @g @g h™[™ک“ک“کŒFONTک•ŒFONTPROP™‚R™‚Rک•ŒFACE ک•ŒSIZEک•ŒFAMILYœک’Œexpand-COPY-KEY-DOWN-P™"ک–o™‚W™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک“™‚4ک“™‚Cک“™ ™‚Kک“کڈŒANDک“™‚Bک“™ ™‚Jک“کڈŒNOTک“™‚4ک“™‚Bک“™ ™‚Iک“™‚Bک“™ ™‚H‌ک–"gg ؟gghکŒDEFMACRO COPY-KEY-DOWN-P™ک“€™™‚™‚™a™‚W™aœک’Œexpand-HELP-KEY-DOWN-P™"ک–o™‚n™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک“™‚4ک“™‚Cک“™ ک’ŒHELP™ک“™‚Cک“™ ک•ŒDBK-HELP‌ک–"gg ؟gghکŒDEFMACRO HELP-KEY-DOWN-P™ک“€™™‚™‚™b™‚n™bœک’Œexpand-DELETE-KEY-DOWN-P™"ک–o™‚~™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک“™‚4ک“™‚Cک“™ ک•ŒDELETEک“™‚^ک“™‚Bک“™ ™‚Iک“™‚Bک“™ ™‚Hک“™‚aک“™‚Bک“™ ™‚J‌ک–"gg ؟gghکŒDEFMACRO DELETE-KEY-DOWN-P™ک“€™™‚™‚™c™‚~™cœک’Œexpand-EDIT-KEY-DOWN-P™"ک–o™‚“™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک“™‚^ک“™‚Bک“™ ™‚Iک“™‚aک“™‚4ک“™‚Bک“™ ™‚Jک“™‚Bک“™ ™‚H‌ک–"gg ؟gghکŒDEFMACRO EDIT-KEY-DOWN-P™ک“€™™‚™‚™d™‚“™dœک’Œexpand-MOVE-KEY-DOWN-P™"ک–o™‚¥™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک“™‚4ک“™‚Cک“™ ™‚Lک“™‚^ک“™‚Bک“™ ™‚Iک“™‚Bک“™ ™‚Jک“™‚aک“™‚Bک“™ ™‚H‌ک–"gg ؟gghکŒDEFMACRO MOVE-KEY-DOWN-P™ک“€™™‚™‚™e™‚¥™eœک’Œexpand-EXPAND-KEY-DOWN-P™"ک–o™‚¹™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک“™‚4ک“™‚Cک“™ ک•ŒEXPANDک“™‚Cک“™ ک•ŒESCAPE‌ک–"gg ؟gghکŒDEFMACRO EXPAND-KEY-DOWN-P™ک“€™™‚™‚™f™‚¹™fœ™kک–o``™k™ک“€ک•ŒMAKEXXXSUPPORTFORMک’Œ*ROOMS-SYSTEM-DATE*™"™nکŒRooms‌ک–%o ؟g X‘HoکŒDEFGLOBALVAR IL:ROOMSSUPPORT™ک“€™‚پکڈŒPROCLAIM™n™nکŒRoomsSupport^.PAک“ک’ŒGLOBAL™™n‌ک–o ؟hکŒ2 top-level forms™ک“€ک•ŒADDTOVAR ™zک“™qک“کŒRooms Reportک“™s™kکŒ*A form to report a Rooms bug or suggestion‌ک–+o ؟ool nohc™#کŒDEFPARAMETER *WHO-LINE-ENTRY*™ک“€™‚ذک– gi کŒ'lambda in DEFPARAMETER *WHO-LINE-ENTRY*™‚ک“€ک’ŒINTERACTIVE-GO-TO-ROOM™"کگŒ ALLOW-NEW?ک“™‚^ک’Œ*CURRENT-ROOM*™"ک“ک’Œ ROOM-NAME™"™‚هکŒRoom:ک“کڈŒSPECIAL™#™‚‌ک–>g ²(P`gggg ؟o ™#کŒ2 top-level forms™ک“€8ک•ŒPUTPROPS(™‚>™‚پ-™‚‚"™‚ٹ™‚‰™‚‡™‚†™‚‚™‚‚3ک“™ک•Œ COPYRIGHTک“کŒVenue & Xerox Corporation‚أ‚ؤ‚ئ‚نڑ‚ُےے