(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "26-Dec-2021 18:59:24" ("compiled on " {DSK}kaplan>Local>medley3.5>my-medley>lispusers>OBJECTWINDOW.;5) "26-Dec-2021 16:20:07" brecompiled exprs%: OBJ.CREATEW OBJ.BUTTONEVENTINFN in "FULL 26-Dec-2021 ..." dated "26-Dec-2021 16:20:12") (FILECREATED "26-Dec-2021 18:59:24" {DSK}kaplan>Local>medley3.5>my-medley>lispusers>OBJECTWINDOW.;5 94928 :CHANGES-TO (FNS OBJ.CREATEW) :PREVIOUS-DATE "21-Dec-2021 18:20:31" {DSK}kaplan>Local>medley3.5>my-medley>lispusers>OBJECTWINDOW.;4) OBJ.ADDMANYTOW :D8 (P 1 OBJECT I 1 OBJECTS I 0 WINDOW) AHddhH@I (25 OBJ.ADDTOW) NIL () OBJ.ADDTOW :D8 (P 11 SECOND.OBJECT P 10 OBJECTTAIL P 8 LASTOBJECTS P 7 POINT.BEFORE.END.OF.CLIPPING.REGION P 6 POINT.MOVED P 5 ADDED.OBJECT P 4 OBJECTS P 0 WINDOWTYPE I 1 OBJECT I 0 WINDOW) A @g 1@g Ahddddh@ @g hh@ @g hHgh@ h@ YIm@ h@ L=N:@M j@ h@ ZJmMM@ .ON1@M HgjdMM@ @M L@gMh Hdgh@ L$Hg%h@ L[KmML NjL! O_x_J@OO Hgh@ M.OMO@ MOMOOM&OL _O@MO OM&@ Mh@ M @M @dg @gh@ @gh@ A(573 PUTWINDOWPROP 568 DSPYPOSITION 555 PUTWINDOWPROP 550 DSPXPOSITION 537 OBJ.MOVETO.LAST.INSTANTIATED.OBJECT 532 GETWINDOWUSERPROP 519 OBJ.DRAW.OBJECT 511 REGIONSINTERSECTP 503 DSPCLIPPINGREGION 488 OBJ.RECOMPUTE.EXTENT 476 OBJ.INSTANTIATE 460 LAST 422 DSPYPOSITION 398 DSPXPOSITION 381 OBJ.INSTANTIATE 344 ATTACH 319 DSPYPOSITION 294 DSPXPOSITION 273 PUTWINDOWPROP 255 OBJ.COMPUTE.REGION 247 RELMOVETO 216 OBJ.COMPUTE.IMAGEBOX 201 DSPYPOSITION 170 DSPCLIPPINGREGION 162 DSPXPOSITION 154 OBJ.COMPUTE.IMAGEBOX 135 DSPCLIPPINGREGION 128 DSPYPOSITION 109 DSPCLIPPINGREGION 102 DSPXPOSITION 80 GETWINDOWUSERPROP 69 DSPYPOSITION 57 GETWINDOWUSERPROP 46 DSPXPOSITION 24 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (561 OLDYPOSITION 543 OLDXPOSITION 527 OBJECTS 388 HORIZONTAL 309 VERTICAL 283 HORIZONTAL 265 OBJECTS 223 VERTICAL 92 HORIZONTAL 75 OLDYPOSITION 52 OLDXPOSITION 19 OBJECTS 5 WINDOWTYPE) () OBJ.CLEARW :D8 (I 0 WINDOW) @gh @ @g g@g k@ @ o@ o@ n@ @gh@ @gh@ @(131 PUTWINDOWPROP 126 DSPYPOSITION 113 PUTWINDOWPROP 108 DSPXPOSITION 95 DSPRIGHTMARGIN 86 DSPYPOSITION 75 DSPXPOSITION 64 OBJ.CLEAR.EXTENT 57 WYOFFSET 49 GETWINDOWPROP 30 GETWINDOWUSERPROP 18 CLEARW 11 PUTWINDOWPROP) (119 OLDYPOSITION 101 OLDXPOSITION 44 HEIGHT 35 VERTICAL 25 WINDOWTYPE 5 OBJECTS) ( 80 2147483647 69 -2147483648) OBJ.CREATEW :D8 (P 0 WINDOW I 10 HCPYHEADING I 9 HARDCOPYFN I 8 BUTTONINFN I 7 DISPLAYFN I 6 BOXFN I 5 SEPDIST I 4 NOOPENFLG I 3 BORDERSIZE I 2 TITLE I 1 REGION/WINDOW I 0 WINDOWTYPE)  @o @ A ABHgB ABCD XHg@ H Hgg Hgg Hgg Hgg Hgg HgEj HgF HgG HgG HgGgGgh Hg@goo H(271 PUTWINDOWPROP 241 PUTWINDOWPROP 209 PUTWINDOWPROP 196 PUTWINDOWPROP 183 PUTWINDOWPROP 171 PUTWINDOWPROP 156 PUTWINDOWPROP 140 PUTWINDOWPROP 124 PUTWINDOWPROP 108 PUTWINDOWPROP 92 PUTWINDOWPROP 76 OBJ.CLEARW 70 PUTWINDOWPROP 56 CREATEW 46 PUTWINDOWPROP 27 WINDOWP 17 \ILLEGAL.ARG 10 MEMB) (253 HORIZONTAL 247 SCROLLEXTENTUSE 233 TITLE 224 OBJ.HARDCOPYFN 215 HARDCOPYFN 202 BUTTONINFN 189 DISPLAYFN 177 BOXFN 162 SEPARATIONDISTANCE 151 OBJ.BUTTONEVENTFN 146 BUTTONEVENTFN 135 OBJ.COPYBUTTONEVENTFN 130 COPYBUTTONEVENTFN 119 OBJ.RESHAPEFN 114 RESHAPEFN 103 OBJ.REPAINTFN 98 REPAINTFN 87 OBJ.SCROLLFN 82 SCROLLFN 64 WINDOWTYPE 40 TITLE) ( 266 (T . LIMIT) 260 (LIMIT . T) 5 (HORIZONTAL VERTICAL)) OBJ.DELFROMW :D8 (I 1 OBJECT I 0 WINDOW) #@g g@A @A (32 OBJ.DELFROMW.VERTICAL 24 OBJ.DELFROMW.HORIZONTAL 10 GETWINDOWUSERPROP) (15 HORIZONTAL 5 WINDOWTYPE) () OBJ.FIND.REGION :D8 (I 1 SEARCHOBJECT I 0 WINDOW) #@g g@A @A (32 OBJ.FIND.REGION.VERTICAL 24 OBJ.FIND.REGION.HORIZONTAL 10 GETWINDOWUSERPROP) (15 HORIZONTAL 5 WINDOWTYPE) () OBJ.INSERTOBJECTS :D8 (P 20 F P 19 O P 18 OTAIL P 17 PREV P 16 FOLLOWINGOBJECTS P 14 F P 13 O P 12 OTAIL P 11 PREV P 10 FOLLOWINGOBJECTS P 8 F P 7 PREV P 5 O P 4 OLDOBJTAIL P 3 PREVTAIL P 2 OBJECTS P 0 WINDOWTYPE I 3 WHERE I 2 OLDOBJECT I 1 NEWOBJECTS I 0 WINDOW) Addhb@g @g Bd" JYBIII[BJ LC @A AdglKh@ @ LdhAdMhddddL KJKN<_@OO O_N^gtLdhALLL OOLhdddd_OdOO_@OO O_O_d@OO O_CgL@ LdhLAhdddd@L ALLLOO Lhdddd_&O$dO&O$_$@O&O" O&_"O_d@O(O" O(_"@ @h@ W(513 REDISPLAYW 508 DSPCLIPPINGREGION 499 OBJ.RECOMPUTE.EXTENT 492 SHOULDNT 475 OBJ.INSTANTIATE 447 OBJ.INSTANTIATE 388 OBJ.INSTANTIATE 349 DSPXPOSITION 313 OBJ.INSTANTIATE 285 OBJ.INSTANTIATE 194 OBJ.INSTANTIATE 157 ATTACH 116 DSPXPOSITION 109 DSPCLIPPINGREGION 88 OBJ.ADDMANYTOW 73 MEMB 46 IMAGEOBJP 34 GETWINDOWUSERPROP 20 GETWINDOWUSERPROP) (333 REPLACE 210 AFTER 96 BEFORE 29 OBJECTS 15 WINDOWTYPE) () OBJ.MAP.OBJECTS :D8 (P 2 FN.RESULT P 1 OBJECT I 1 MAPFN I 0 WINDOW) <@g !H@h@ i YkAZ@IJi HX(52 OBJ.REPLACE 32 REDISPLAYW 26 DSPCLIPPINGREGION 10 GETWINDOWUSERPROP) (5 OBJECTS) () OBJ.OBJECTS :D8 (I 0 WINDOW) %0@g dIHhZH&J(13 GETWINDOWUSERPROP) (8 OBJECTS) () OBJ.REPLACE :D8 (I 3 DONT.REDISPLAY.FLG I 2 NEW.OBJECT I 1 OLD.OBJECT I 0 WINDOW) '@g g@ABC @ABC (36 OBJ.REPLACE.VERTICAL 26 OBJ.REPLACE.HORIZONTAL 10 GETWINDOWUSERPROP) (15 HORIZONTAL 5 WINDOWTYPE) () OBJWINDOWP :D8 (I 0 WINDOW) 5@ -@g g@g o @(47 MEMB 37 GETWINDOWUSERPROP 18 GETWINDOWUSERPROP 5 WINDOWP) (32 WINDOWTYPE 23 OBJ.COPYBUTTONEVENTFN 13 COPYBUTTONEVENTFN) ( 42 (HORIZONTAL VERTICAL)) OBJ.APPLY.USER.FNA0001A0002 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 WINDOW F 3 OBJECT F 4 RELX F 5 SI::NLSETQ-VALUE F 6 RELY F 7 USER.FN F 8 RESULT) (i@SRgTVRgdlWchc gNIL (37 :NORMAL 19 ? 11 ?) () OBJ.APPLY.USER.FNA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 2 SI::*NLSETQFLAG* P 1 *PROCEED-CASES* P 0 SI::NLSETQ-VALUE I 0 SI::*CLEANUP-FORMS* F 3 WINDOWDISPLAYSTREAM F 4 SI::*RESETFORMS* F 5 WINDOWCLIPPING.REGION F 6 WINDOWDELTAX F 7 WINDOWDELTAY F 8 OBJORIG F 9 REG F 10 RESULT F 11 *PROCEED-CASES*)  gVShjVS hTcgWShjWS hTchS c gUShUjWٵjjWٵjWWh S hTc`WI gW(146 OBJ.APPLY.USER.FNA0001A0002 119 DSPCLIPPINGREGION 113 INTERSECTREGIONS 62 DSPCLIPPINGREGION 48 WYOFFSET 19 WXOFFSET) (152 :NORMAL 134 SI::NLSETQ-PROCEED-CASE 69 DSPCLIPPINGREGION 31 WYOFFSET 4 WXOFFSET) () OBJ.APPLY.USER.FN :D8 (P 10 RESETSTATE P 9 SI::*RESETFORMS* P 8 LISPXHIST P 7 RESULT P 6 WINDOWCLIPPING.REGION P 5 WINDOWDELTAY P 4 WINDOWDELTAX P 3 OBJORIG P 2 RELY P 1 RELX P 0 WINDOWDISPLAYSTREAM I 3 REG I 2 WINDOW I 1 OBJECT I 0 USER.FN F 11 LISPXHIST) f B B B Ag oAjKٵjC\jKٵjC]W! g $(95 SI::RESETUNWIND 90 \MVLIST 85 OBJ.APPLY.USER.FNA0001 37 IMAGEOBJPROP 23 LASTMOUSEY 14 LASTMOUSEX 5 GETSTREAM) (80 SI::RESETUNWIND 32 OBJECTORIGIN) ( 44 (0 . 0)) OBJ.BUTTONEVENTFN :D8 (I 1 STREAM I 0 WINDOW) @A (6 OBJ.BUTTONEVENTINFN) NIL () OBJ.BUTTONEVENTINFN :D8 (P 7 REG P 6 OBJ P 5 RESULT P 4 WINDOWYPOS P 3 WINDOWXPOS P 2 MOUSEY P 1 MOUSEX P 0 CLIPPING.REGION I 1 STREAM I 0 WINDOW) @ h@ @ @ h@ h@ 5@IJ ^2`ljH@ Y@ Z _NONO@ Ng N@O KL@ Mdg@Ni }dg@ jg^M Rh(225 EVAL 201 REDISPLAYW 182 REDISPLAYW 161 MOVETO 152 OBJ.APPLY.USER.FN 142 IMAGEOBJPROP 129 MOVETO 92 INSIDEP 86 LASTMOUSEY 79 LASTMOUSEX 57 GETMOUSESTATE 49 OBJ.FIND.OBJECT 38 DSPYPOSITION 31 DSPXPOSITION 24 LASTMOUSEY 18 LASTMOUSEX 12 DSPCLIPPINGREGION 5 TOTOPW) (212 *DOFORM* 192 ALLCHANGED 169 CHANGED 137 BUTTONEVENTINFN 63 LASTMOUSEBUTTONS) () OBJ.CLEAR.EXTENT :D8 (I 0 WINDOW) @gmdddh (20 PUTWINDOWPROP) (5 EXTENT) () OBJ.COMPUTE.IMAGEBOX :D8 (P 0 BOXFN.RESULT I 1 OBJECT I 0 WINDOW) PA Ag A@lI9@g A@lJX AHAg A@lKHAodLLhALAL(78 IMAGEOBJPROP 60 IMAGEOBJP 45 GETWINDOWUSERPROP 23 IMAGEOBJPROP 9 IMAGEOBJP) (73 IMAGEBOXFN 40 BOXFN 18 IMAGEBOXFN) ( 97 -16383) OBJ.COMPUTE.REGION :D8 (I 1 OBJECT I 0 WINDOW) (Ah@ Ah@ AkAi(21 DSPYPOSITION 9 DSPXPOSITION) NIL () OBJ.COPYBUTTONEVENTFN :D8 (P 8 OLDY P 7 OLDX P 6 NOW.IMAGEOBJ P 5 COPYBUTTONEVENTINFN P 4 NEAR P 3 NOW P 2 OLDPOS P 1 BUTTON P 0 CLIPPING.REGION I 0 WINDOW) ( h@  @ `dljgkjg@d @ KLd@ L`ljKd~@ K^g ]Nh@ _h@ _KKKK@ MN@K OO@ @ |Ng _NkO H@ @ Kd@ hK@d @ \$4(285 OBJ.FIND.OBJECT 280 LASTMOUSEY 274 LASTMOUSEX 264 OBJ.FLIP.OBJECT 254 INSIDEP 249 LASTMOUSEY 243 LASTMOUSEX 235 COPYINSERT 221 IMAGEOBJPROP 206 OBJ.FLIP.OBJECT 199 MOVETO 189 OBJ.APPLY.USER.FN 178 MOVETO 150 DSPYPOSITION 141 DSPXPOSITION 131 IMAGEOBJPROP 117 OBJ.FLIP.OBJECT 92 GETMOUSESTATE 84 OBJ.FLIP.OBJECT 67 OBJ.FIND.OBJECT 62 LASTMOUSEY 56 LASTMOUSEX 15 TOTOPW 6 DSPCLIPPINGREGION) (216 COPYFN 126 COPYBUTTONEVENTINFN 98 LASTMOUSEBUTTONS 48 MIDDLE 34 LEFT 21 LASTMOUSEBUTTONS) () OBJ.DELFROMW.HORIZONTAL :D8 (P 20 OBJECT P 17 OBJECT P 15 OBJECTTAIL P 13 SCREEN.REDISPLAYED P 12 VISIBLE.WIDTH P 11 WIDTH.OF.OBJECTS.FOLLOWING P 10 OBJECTS.FOLLOWING P 9 WIDTH.OF.DELETED.OBJECT P 8 RIGHT.OF.DELETED.OBJECT P 7 LEFT.OF.DELETED.OBJECT P 6 REGION.OF.DELETED.OBJECT P 5 DELETED.OBJECT P 4 OBJECTS P 3 CLIP.WIDTH P 2 CLIP.RIGHT P 1 CLIP.LEFT P 0 CLIPPING.REGION I 1 OBJECT I 0 HWINDOW) *h@ HHHmH@g  LoA vAL"L@gL L_j@ OLO_8AO*O]@O @ OdO_OoA M]M^_NNm_N_OO !@M I`O@ @ _"dh@ J0O"O"O"O@O" @O" @ O _ JOk_OjO$1O&_IOCOI@ @ h@ @H_(O&dOO(_&O$_$OO!OO@ @ h@ @H=@ h@ NH ,@OHHHmOkHHi @g @ A(550 OBJ.CLEARW 543 GETWINDOWUSERPROP 531 REDISPLAYW 488 REGIONSINTERSECTP 480 DSPCLIPPINGREGION 472 OBJ.RECOMPUTE.EXTENT 461 DSPCLIPPINGREGION 453 OBJ.RECOMPUTE.EXTENT 446 WXOFFSET 392 DSPCLIPPINGREGION 384 OBJ.RECOMPUTE.EXTENT 377 WXOFFSET 323 DSPXPOSITION 317 OBJ.END.OF.OBJECT 308 OBJ.INSTANTIATE 273 DSPXPOSITION 252 OBJ.RECOMPUTE.EXTENT 245 WXOFFSET 232 OBJ.END.OF.OBJECT 175 ERROR 145 DSPXPOSITION 139 OBJ.END.OF.OBJECT 96 DSPXPOSITION 83 PUTWINDOWPROP 57 ERROR 41 GETWINDOWUSERPROP 6 DSPCLIPPINGREGION) (538 OBJECTS 76 OBJECTS 36 OBJECTS) ( 169 "Object not found " 51 "Object not found ") OBJ.DELFROMW.VERTICAL :D8 (P 14 OBJECT P 13 CLIP.BOTTOM P 11 OBJECTTAIL P 9 SCREEN.REDISPLAYED P 8 OBJECTS.FOLLOWING P 7 HEIGHT.OF.DELETED.OBJECT P 6 TOP.OF.DELETED.OBJECT P 5 REGION.OF.DELETED.OBJECT P 4 DELETED.OBJECT P 3 OBJECTS P 2 CLIP.HEIGHT P 1 CLIP.TOP P 0 CLIPPING.REGION I 1 OBJECT I 0 VWINDOW) h@ HHmH@g a KoA vAK"K@gK K_j@ OK O_8AO*O\@O @ OdO_OoA LL]MmؾM_OHO_h@ O-Od%@L IbjO@ @ Oh@ O2OOOO@O @O @ O_wNI,O@ h@ @Hi i_IN@ O;@ h@ MH #@HHHNHkHi @g @ A(486 OBJ.CLEARW 479 GETWINDOWUSERPROP 467 REDISPLAYW 433 REGIONSINTERSECTP 425 DSPCLIPPINGREGION 417 OBJ.RECOMPUTE.EXTENT 406 WYOFFSET 392 REDISPLAYW 383 DSPCLIPPINGREGION 375 OBJ.RECOMPUTE.EXTENT 351 DSPYPOSITION 345 OBJ.END.OF.OBJECT 336 OBJ.INSTANTIATE 299 DSPYPOSITION 281 OBJ.RECOMPUTE.EXTENT 274 WYOFFSET 260 OBJ.END.OF.OBJECT 236 DSPYPOSITION 175 ERROR 145 DSPYPOSITION 139 OBJ.END.OF.OBJECT 96 DSPYPOSITION 83 PUTWINDOWPROP 57 ERROR 41 GETWINDOWUSERPROP 6 DSPCLIPPINGREGION) (474 OBJECTS 76 OBJECTS 36 OBJECTS) ( 169 "Object not found " 51 "Object not found ") OBJ.DRAW.OBJECT :D8 (P 1 OLDY P 0 OLDX I 1 OBJECT I 0 WINDOW) h@ h@ "AAAA@ A Ag A@ lJ@g A@ lK@g g@A IH@A @ h(144 MOVETO 138 OBJ.END.OF.OBJECT 128 OBJ.END.OF.OBJECT 114 GETWINDOWUSERPROP 97 GETSTREAM 88 GETWINDOWUSERPROP 72 GETSTREAM 63 IMAGEOBJPROP 49 IMAGEOBJP 42 MOVETO 13 DSPYPOSITION 6 DSPXPOSITION) (119 HORIZONTAL 109 WINDOWTYPE 83 DISPLAYFN 58 DISPLAYFN) () OBJ.END.OF.OBJECT :D8 (I 2 FLIPVERTICAL I 1 OBJECT I 0 WINDOW) S@g gAA@g B@g AA@g (79 GETWINDOWUSERPROP 56 GETWINDOWUSERPROP 40 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (74 SEPARATIONDISTANCE 51 SEPARATIONDISTANCE 35 SEPARATIONDISTANCE 15 HORIZONTAL 5 WINDOWTYPE) () OBJ.FIND.OBJECT :D8 (P 1 OBJECT I 2 MOUSEY I 1 MOUSEX I 0 WINDOW) @g gF@g HhYAIImAIi@I AHX@g HhYImBIBIi@I BHX(147 OBJ.END.OF.OBJECT 97 GETWINDOWUSERPROP 77 OBJ.END.OF.OBJECT 29 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (92 OBJECTS 24 OBJECTS 15 HORIZONTAL 5 WINDOWTYPE) () OBJ.FIND.REGION.HORIZONTAL :D8 (P 3 OBJECT P 1 FOUND P 0 OLDX I 1 SEARCHOBJECT I 0 HWINDOW) h@ @g @ @g JN_@ Mh@M M_@M @ ON_LOeCgM\IdOjO@ @ AO*OBO] @M _OO\XO@_dh@ J0OOOO@O @O @ O_POsNNmIk_OO#IO@ @ h@ X@Hi jO@ @ h@ X@HHOHHi @ h@ XOH -@OHHHmOkHHi h(502 REDISPLAYW 457 REGIONSINTERSECTP 448 DSPCLIPPINGREGION 441 OBJ.RECOMPUTE.EXTENT 434 REDISPLAYW 405 DSPCLIPPINGREGION 398 OBJ.RECOMPUTE.EXTENT 392 WXOFFSET 381 REDISPLAYW 372 DSPCLIPPINGREGION 365 OBJ.RECOMPUTE.EXTENT 359 WXOFFSET 308 DSPXPOSITION 302 OBJ.END.OF.OBJECT 293 OBJ.INSTANTIATE 258 DSPXPOSITION 218 OBJ.END.OF.OBJECT 185 OBJ.RECOMPUTE.EXTENT 179 WXOFFSET 118 DSPXPOSITION 112 OBJ.END.OF.OBJECT 98 OBJ.INSTANTIATE 82 DSPXPOSITION 63 ERROR 36 GETWINDOWUSERPROP 6 DSPCLIPPINGREGION) (31 OBJECTS) ( 57 "Object not found ") OBJ.REPLACE.VERTICAL :D8 (P 15 OBJECT P 13 OBJECT P 11 END.OF.OLD.OBJECT P 10 TOP.OF.OLD.OBJECT P 9 HEIGHT.SHOWING P 8 HEIGHT.CHANGE P 7 NEW.REGION P 6 OLD.REGION P 5 OBJ P 4 OBJECTS.TAIL P 3 OBJECTS P 2 CLIP.BOTTOM P 1 CLIP.TOP P 0 CLIPPING.REGION I 3 DONT.REDISPLAY.FLG I 2 NEW.OBJECT I 1 OLD.OBJECT I 0 VWINDOW) h@ HHmH@g  K O_oA MJNNm_@ Mh@M M_@M @ ON_LOaC]MROIO@ @ AO*OBO] @M _OO\PO8_dh@ J2OOOO@O @O @ O_SOIkINk_OO#OI@ @ h@ X@Hi O@ @ h@ X@HOHOHi @ h@ XOH -@HHHOOmHHi h(507 REDISPLAYW 462 REGIONSINTERSECTP 453 DSPCLIPPINGREGION 446 OBJ.RECOMPUTE.EXTENT 439 REDISPLAYW 410 DSPCLIPPINGREGION 403 OBJ.RECOMPUTE.EXTENT 397 WYOFFSET 388 REDISPLAYW 379 DSPCLIPPINGREGION 372 OBJ.RECOMPUTE.EXTENT 366 WYOFFSET 320 DSPYPOSITION 314 OBJ.END.OF.OBJECT 305 OBJ.INSTANTIATE 269 DSPYPOSITION 229 OBJ.END.OF.OBJECT 196 OBJ.RECOMPUTE.EXTENT 190 WYOFFSET 131 DSPYPOSITION 125 OBJ.END.OF.OBJECT 111 OBJ.INSTANTIATE 95 DSPYPOSITION 66 ERROR 39 GETWINDOWUSERPROP 6 DSPCLIPPINGREGION) (34 OBJECTS) ( 60 "Object not found ") OBJ.RESHAPEFN :D8 (I 3 OLDSCREENREGION I 2 IMAGEREGION I 1 OLDIMAGE I 0 WINDOW) &@gh @ABC n@ @ (35 OBJ.RECOMPUTE.EXTENT 29 DSPRIGHTMARGIN 20 RESHAPEBYREPAINTFN 11 PUTWINDOWPROP) (5 EXTENT) () OBJ.SCROLLFN :D8 (I 3 CONTINUOUSFLG I 2 YDELTA I 1 XDELTA I 0 WINDOW) 4@g '@g g@ABC @ABC (49 OBJ.SCROLLFN.VERTICAL 39 OBJ.SCROLLFN.HORIZONTAL 23 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (28 HORIZONTAL 18 WINDOWTYPE 5 OBJECTS) () OBJ.SCROLLFN.HORIZONTAL :D8 (P 15 PREV P 14 OBJECT P 12 PREV P 11 OBJECT P 10 NEWCLIPRIGHT P 2 LEFTOFFIRST P 1 REGIONOFFIRST P 0 OBJECTS I 3 CONTINUOUSFLG I 2 YDELTA I 1 XDELTA I 0 HWINDOW) @g HHBAh@ @A bHh@ [KmA" O8@H @g@ _JO_oO^H!O,6_@OO @O OO_O__d;O\LmkJN]nMhO @ABC @ _O_h(244 OBJ.RECOMPUTE.EXTENT 238 SCROLLBYREPAINTFN 229 PUTWINDOWPROP 160 OBJ.END.OF.OBJECT 151 OBJ.INSTANTIATE 103 \INSUREWINDOW 91 OBJ.MOVETO.LAST.INSTANTIATED.OBJECT 63 DSPCLIPPINGREGION 51 OBJ.INDEX.OBJECT 43 DSPCLIPPINGREGION 10 GETWINDOWUSERPROP) (97 EXTENT 5 OBJECTS) ( 120 -16383) OBJ.SCROLLFN.VERTICAL :D8 (P 17 OBJECT P 15 PREV P 14 OBJECT P 13 NEWCLIPBOTTOM P 11 FAKO.HEIGHT P 10 TOPOFFIRST P 9 CLIPPING.REGION P 0 OBJECTS I 3 CONTINUOUSFLG I 2 YDELTA I 1 XDELTA I 0 VWINDOW) g@g h@  HYIm A5BOOm@B bHOB"O/@H BjAjHO >hOHh[rz_@OO @O OO_O__"d/ZJmOOmO"OO"iO _ d]Lk_@g@ _oO_OOkO^nN]OMhO @ABC @ K%h(348 OBJ.RECOMPUTE.EXTENT 342 SCROLLBYREPAINTFN 333 PUTWINDOWPROP 281 \INSUREWINDOW 162 OBJ.END.OF.OBJECT 153 OBJ.INSTANTIATE 102 OBJ.MOVETO.LAST.INSTANTIATED.OBJECT 75 OBJ.INDEX.OBJECT 20 DSPCLIPPINGREGION 10 GETWINDOWUSERPROP) (275 EXTENT 5 OBJECTS) ( 290 -16383) (PRETTYCOMPRINT OBJECTWINDOWCOMS) (RPAQQ OBJECTWINDOWCOMS ((DECLARE%: DOEVAL@LOAD DONTCOPY (RECORDS OBJ)) (* ;;; "User callable functions") (FNS OBJ.ADDMANYTOW OBJ.ADDTOW OBJ.CLEARW OBJ.CREATEW OBJ.DELFROMW OBJ.FIND.REGION OBJ.INSERTOBJECTS OBJ.MAP.OBJECTS OBJ.OBJECTS OBJ.REPLACE OBJWINDOWP) (* ;;; "Routines called by user routines") (FNS OBJ.APPLY.USER.FN OBJ.BUTTONEVENTFN OBJ.BUTTONEVENTINFN OBJ.CLEAR.EXTENT OBJ.COMPUTE.IMAGEBOX OBJ.COMPUTE.REGION OBJ.COPYBUTTONEVENTFN OBJ.DELFROMW.HORIZONTAL OBJ.DELFROMW.VERTICAL OBJ.DRAW.OBJECT OBJ.END.OF.OBJECT OBJ.FIND.OBJECT OBJ.FIND.REGION.HORIZONTAL OBJ.FIND.REGION.VERTICAL OBJ.FLIP.OBJECT OBJ.HARDCOPYFN OBJ.INDEX.OBJECT OBJ.INSTANTIATE OBJ.MOVETO.LAST.INSTANTIATED.OBJECT OBJ.RECOMPUTE.EXTENT OBJ.REPAINTFN OBJ.REPLACE.HORIZONTAL OBJ.REPLACE.VERTICAL OBJ.RESHAPEFN OBJ.SCROLLFN OBJ.SCROLLFN.HORIZONTAL OBJ.SCROLLFN.VERTICAL) (P (AND (GETD (QUOTE MODERNWINDOW.SETUP)) (MODERNWINDOW.SETUP (FUNCTION OBJ.BUTTONEVENTINFN)))))) (AND (GETD (QUOTE MODERNWINDOW.SETUP)) (MODERNWINDOW.SETUP (FUNCTION OBJ.BUTTONEVENTINFN))) NIL