(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED " 9-Sep-94 14:06:14" ("compiled on " {DSK}lispusers>NOTEPAD.;1) "28-Jul-94 17:28:46" bcompl'd in "Medley 25-Aug-94 ..." dated "25-Aug-94 10:02:49") (FILECREATED "27-Sep-91 16:43:36" |{PELE:MV:ENVOS}MEDLEY>NOTEPAD.;2| 104138 changes to%: ( VARS NOTEPADCOMS NOTEPAD.DEFAULT.FONT NOTEPAD.STYLE.REPRESENTATION.NUMBER SPOTMARKER NOTEPAD.DEFAULT.BRUSH NOTEPAD.DEFAULT.MASK) (FILEPKGCOMS NOTEPADSTYLE) (FNS NOTEPAD.NAMED.OBJECT) previous date%: "11-Sep-88 20:44:42" |{PELE:MV:ENVOS}MEDLEY>NOTEPAD.;1|) ACQUIRE.STYLE :D8 (P 8 ELEMENT P 1 NAME P 0 NAME.MENU I 1 NAME.PLEASE I 0 BITS.PER.PIXEL) @`do`ALFMdJdi didg dgjdndhdK Xd YdA*_g'@O_N Oh^L\O&I`(89 MENU) (142 NOTEPAD.STYLES 106 BITS.PER.PIXEL 62 DEFAULTMENUHELDFN 53 CLRPROMPT 22 NOTEPAD.STYLES 7 |MENUTYPE#|) ( 14 "Styles") ACQUIRE.SYMMETRY :D8 (P 0 MENU I 0 MESSAGE) M `d@dodi didg dgjdndhdI Xd (74 MENU) (47 DEFAULTMENUHELDFN 38 CLRPROMPT 7 |MENUTYPE#|) ( 19 ((none NIL) LEFT/RIGHT UP/DOWN 4-FOLD 8-FOLD)) ADD.NOTEPAD.TO.BACKGROUND.MENU :D8 NIL 9gooh gooh (54 NOTEPAD.ADD.TO.BACKGROUND.MENU 28 COLORDISPLAYP 23 NOTEPAD.ADD.TO.BACKGROUND.MENU) (35 Color% Notepad 4 Notepad) ( 45 "Opens a NOTEPAD window for color" 40 (NOTEPAD NIL T) 14 "Opens a NOTEPAD window" 9 (NOTEPAD)) BITMAP.INTERIOR :D8 (P 7 MAXVAL P 6 FROMVALUE P 5 INTERIOR P 4 NBITS P 3 Y P 2 X P 1 HEIGHT P 0 WIDTH I 1 PT I 0 BITMAP) K@ @ AA@ 5lL k_@JKh^HIL ]@MJKHkIkNO M(71 EXTEND.AREA 51 BITMAPCREATE 32 EXPT 21 BITSPERPIXEL 11 BITMAPHEIGHT 5 BITMAPWIDTH) NIL () DELDEF.NOTEPAD.STYLE :D8 (I 1 TYPE I 0 NAME) @`` (16 DREMOVE) (21 NOTEPAD.STYLES 11 NOTEPAD.STYLES 5 NOTEPAD.STYLES) () DISTANCE :D8 (P 1 DY P 0 DX I 1 P2 I 0 P1)  @AX@AYHdId (26 SQRT) NIL () DUMP.NOTEPAD.STYLE :D8 (P 0 NOTEPAD.STYLE I 0 NAME F 1 NOTEPAD.STYLE.REPRESENTATION.NUMBER) %@ Xg@Qh Hhi h(33 HPRINT 25 PRINT 8 GETDEF.NOTEPAD.STYLE) (14 READ.NOTEPAD.STYLE) () ERASE.REGION :D8 (I 1 REGION I 0 WINDOW) %hjd@AAAAggj (34 BKBITBLT) (27 REPLACE 22 TEXTURE) () EXTEND.AREA :D8 (L (7 TOVALUE 6 FROMVALUE 5 MAXY 4 MAXX 3 Y 2 X 1 AREA.BITMAP 0 DEFINING.BITMAP)) @ABCFG @ABCDEFG (29 EXTEND.AREA.X 12 TEST.AND.SET) NIL () EXTEND.AREA.X :D8 (L (7 TOVAL 6 FROMVAL 5 MAXY 4 MAXX 3 Y 2 X 1 AREA.BITMAP 0 DEFINING.BITMAP)) uBXjBkٻJK@AKCFG ,BYDBkؽML@AMCFG IH_OdNhKXmԻMYk]B@AOCDEFG Ok_(106 EXTEND.AREA.Y 54 TEST.AND.SET 27 TEST.AND.SET) NIL () EXTEND.AREA.Y :D8 (L (7 TOVAL 6 FROMVAL 5 MAXY 4 MAXX 3 Y 2 X 1 AREA.BITMAP 0 DEFINING.BITMAP)) uCXjCkٻJK@ABKFG ,CYECkؽML@ABMFG IH_OdNhKXmԻMYk]C@ABODEFG Ok_(106 EXTEND.AREA.X 54 TEST.AND.SET 27 TEST.AND.SET) NIL () GET.BITMAP :D8 (P 0 BITMAPS I 1 PROP I 0 CHARACTERISTICS) @A'dddNIL NIL () GET.NOTEPAD.BITMAP :D8 (I 0 WINDOW) h@ (13 DSPDESTINATION 6 \INSUREWINDOW) NIL () GET.NOTEPAD.REGION :D8 (P 6 GRID P 5 CHARACTERISTICS P 4 TOP P 3 RIGHT P 2 BOTTOM P 1 LEFT P 0 REGION I 0 WINDOW) p@ XdYHZIH[JH\@g ]dg'PMg'INN KNN JNN LNN IJKILJhH(115 NOTEPAD.ON.GRID.X 100 NOTEPAD.ON.GRID.X 85 NOTEPAD.ON.GRID.X 72 NOTEPAD.ON.GRID.X 42 GETWINDOWUSERPROP 8 GET.WINDOW.REGION) (58 GRID.DEFINITION 49 USE.GRID.TO.DRAW 37 CHARACTERISTICS) () GET.SYMMETRIC.BITMAPS :D8 (P 9 NEW.BITMAPS P 8 BM8 P 7 BM7 P 6 BM6 P 5 BM5 P 4 BM4 P 3 BM3 P 2 BM2 P 1 BM1 P 0 BITMAPS I 1 PROP I 0 CHARACTERISTICS) b  @A'XdWdYd ZI [d \I ]d ^M _d _IJKLMNOOh_@AO O(93 LISTPUT 61 INVERT.BITMAP.HORIZONTALLY 53 INVERT.BITMAP.VERTICALLY 46 INVERT.BITMAP.HORIZONTALLY 39 INVERT.BITMAP.DIAGONALLY 32 INVERT.BITMAP.HORIZONTALLY 25 INVERT.BITMAP.VERTICALLY 18 INVERT.BITMAP.HORIZONTALLY) NIL () GETDEF.NOTEPAD.STYLE :D8 (I 1 TYPE I 0 NAME) @`NIL (5 NOTEPAD.STYLES) () GETPOSITION.RUBBERBANDA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 DS F 1 X0 F 2 Y0 F 3 GDY F 4 GX0 F 5 GY0 F 6 GDX) PQRTUVS (12 GETPOSITION.RUBBERBAND1) NIL () GETPOSITION.RUBBERBAND :D8 (P 10 SI::*RESETFORMS* P 9 DS P 8 Y0 P 7 GDY P 6 GDX P 5 GY0 P 4 GX0 P 3 X0 P 2 GRID P 1 CHARACTERISTICS P 0 COLORDS I 1 WINDOW I 0 STARTPOSITION) Ag  @[@_Ag Yg'Ig'ZJJJ_H A _H4g hhh g $OKOLMNO (149 GETPOSITION.RUBBERBAND1 128 SI::RESETUNWIND 123 \MVLIST 118 GETPOSITION.RUBBERBANDA0001 98 CHANGECURSORSCREEN 93 COLORSCREENBITMAP 76 \INSUREWINDOW 31 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (113 SI::RESETUNWIND 88 CHANGECURSORSCREEN 46 GRID.DEFINITION 37 USE.GRID 26 CHARACTERISTICS 5 INCOLOR) () GETPOSITION.RUBBERBAND1 :D8 (P 5 DOWN P 4 DONE P 3 NEW.Y1 P 2 NEW.X1 P 1 Y1 P 0 X1 I 6 GRIDDY I 5 GRIDDX I 4 GRIDY0 I 3 GRIDX0 I 2 Y0 I 1 X0 I 0 WHERE) LABHIkg@ HI`l^jNN iHM`l_jkO^@ @ CJCE KDF HdJIKHABHIkg@ JKABHIkg@ T i\I(182 \FZEROP 173 DRAWLINE 151 DRAWLINE 119 NOTEPAD.ON.GRID.X 110 NOTEPAD.ON.GRID.X 98 LASTMOUSEY 91 LASTMOUSEX 54 \FZEROP 31 GETMOUSESTATE 22 DRAWLINE) (166 INVERT 144 INVERT 70 LASTMOUSEBUTTONS 37 LASTMOUSEBUTTONS 15 INVERT) () MARK.SPOT :D8 (P 3 HEIGHT P 2 WIDTH P 1 X P 0 COLORDS I 2 WINDOW I 1 Y I 0 X/POSITION F 4 COLORSPOTMARKER) Bg 1@ @@b@` Z` [H4TT`j c T`jdHBIJlAKlJKgg h(147 BKBITBLT 101 COLORNUMBERBITSPERPIXEL 96 BITSPERPIXEL 87 COLORIZEBITMAP 82 COLORNUMBERBITSPERPIXEL 77 MAXIMUMCOLOR 52 BITMAPHEIGHT 41 BITMAPWIDTH 19 POSITIONP 10 GETWINDOWUSERPROP) (141 INVERT 136 INPUT 111 SPOTMARKER 71 SPOTMARKER 62 BITMAP 47 SPOTMARKER 36 SPOTMARKER 5 INCOLOR) () MASKED.BRUSH :D8 (P 10 BRUSH P 9 NEW.BOTTOM P 8 NEW.LEFT P 7 HEIGHT P 6 WIDTH P 5 BOTTOM P 4 LEFT P 3 BUFFER.BITMAP P 2 POSITION P 1 DONE P 0 BEEN.DOWN I 1 MASK I 0 WINDOW) P  A^A_NO [` o` I&K _AjdOjdhdgg OH"`l_jO`l_jOO i@ _@ _OLOMrLKjd@LMNOgg OO@LMKjdNOgg Ajd@LMNOgg  _LKjd@LMNOgg iY(328 BKBITBLT 296 \FZEROP 287 BKBITBLT 261 BKBITBLT 229 BKBITBLT 185 LASTMOUSEY 176 LASTMOUSEX 167 \FZEROP 141 GETMOUSESTATE 109 GETMOUSESTATE 100 GETMOUSESTATE 92 BKBITBLT 65 BITMAPCOPY 56 PRIN1 40 TERPRI 29 BITMAPCREATE) (322 REPLACE 317 INPUT 281 PAINT 276 INPUT 255 REPLACE 250 INPUT 223 REPLACE 218 INPUT 147 LASTMOUSEBUTTONS 115 LASTMOUSEBUTTONS 86 ERASE 81 INVERT 51 PROMPTWINDOW 35 PROMPTWINDOW 17 BITMAP 8 BITMAP) ( 46 "Place mask over desired brush area") MOVE.BITMAPA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 COLORDS F 1 BUFFER.BITMAP F 2 WIDTH F 3 HEIGHT) PQRS (8 MOVE.BITMAP1) NIL () MOVE.BITMAP :D8 (P 4 SI::*RESETFORMS* P 3 HEIGHT P 2 WIDTH P 1 BUFFER.BITMAP P 0 COLORDS I 2 OPERATION I 1 BITMAP I 0 WINDOW) @g 1A ZA [JKHk Y` o` H5g hhhg $@ IJK h(140 MOVE.BITMAP1 130 \INSUREWINDOW 118 SI::RESETUNWIND 113 \MVLIST 108 MOVE.BITMAPA0001 88 CHANGECURSORSCREEN 83 COLORSCREENBITMAP 70 PRIN1 54 TERPRI 43 BITMAPCREATE 36 COLORNUMBERBITSPERPIXEL 26 BITMAPHEIGHT 19 BITMAPWIDTH 10 GETWINDOWUSERPROP) (103 SI::RESETUNWIND 78 CHANGECURSORSCREEN 65 PROMPTWINDOW 49 PROMPTWINDOW 5 INCOLOR) ( 60 "Indicate where to copy area to") MOVE.BITMAP1 :D8 (P 5 NEW.BOTTOM P 4 NEW.LEFT P 3 BOTTOM P 2 LEFT P 1 DOWN P 0 DONE I 3 HEIGHT I 2 WIDTH I 1 BUFFER.BITMAP I 0 DS F 8 WINDOW F 9 BITMAP F 10 OPERATION) Hh`l^jNN iYI`l_jzOm@ @ LJMKJAjd@JKBCgg LMWJKAjdBCgg Wjd@JKBCgW ] iXR(173 \FZEROP 164 BKBITBLT 141 BKBITBLT 111 BKBITBLT 74 LASTMOUSEY 67 LASTMOUSEX 34 \FZEROP 11 GETMOUSESTATE) (156 INPUT 135 REPLACE 130 INPUT 105 REPLACE 100 INPUT 46 LASTMOUSEBUTTONS 17 LASTMOUSEBUTTONS) () NOTEPAD :D8 (I 1 INCOLORFLG I 0 BITMAP) Y@APo o dgil go i (86 NOTEPAD.CREATE 79 PROMPTPRINT 68 COLORDISPLAYP 53 COLORDISPLAY 36 MACHINETYPE 30 CLRPROMPT 24 FILESLOAD 13 PROMPTPRINT) (60 DORADO 42 DOLPHIN) ( 74 " You will have to turn on the color display before you will see anything. " 19 (LLCOLOR COLOR HLCOLOR) 8 "Making sure the color functions are loaded...") NOTEPAD.ADD.TO.BACKGROUND.MENU :D8 (I 0 ITEM) $@``@h h(22 \NCONC2) (33 BackgroundMenu 27 BackgroundMenuCommands 14 BackgroundMenuCommands 6 BackgroundMenuCommands) () NOTEPAD.BUTTONEVENTFN :D8 (I 0 WINDOW) /h@ @ @ @ @ (44 NOTEPAD.TITLEBUTTONFN 37 NOTEPAD.BUTTONFN 30 INSIDEP 25 LASTMOUSEY 19 LASTMOUSEX 13 DSPCLIPPINGREGION 6 \INSUREWINDOW) NIL () NOTEPAD.BUTTONFN :D8 (P 27 TEXTWIDTH P 26 OBJECT P 25 NAME P 24 TEXT P 23 NEW.BITMAP P 22 OLD.BITMAP P 21 POSITION P 20 P3 P 19 P2 P 18 P1 P 17 NEW.SHADE P 16 SHADE P 15 USE.MASK P 14 USE.GRID P 13 DY P 12 DX P 11 ORIGIN P 10 NEW.MASK P 9 MASK P 8 FONT P 7 NEW.BRUSH P 6 BRUSH P 5 REGION P 4 COMMAND P 3 COMMAND.MENU P 2 DSP P 1 CHARACTERISTICS P 0 OPERATION I 0 WINDOW) X[d \ddgdgdgddg𓿱gLdg@H lg@H [Ldg@H Gg@H 6Ldg@H "g@Hi Ldgdg@H dg@ g@H Ldg@H g@H Ldg@H gLdg@ xg'g@ddi3 g@hh KLdg@ 8g@ (Ldg@ gDg@d/ddi@3 g@h@@di3 g@h@h Ldg@ g@ Ldg@ g@ Ldg@ rg@ cLdg@ Qg@ BLdg@ 0g@ !Lg@ oL h(724 SHOULDNT 719 CONCAT 707 NOTEPAD.DELETE.STYLE 691 NOTEPAD.RESTORE.STYLE 676 SAVE.STYLE 658 NOTEPAD.EDIT.SHADE 643 NOTEPAD.POINT.OF.SYMMETRY 625 NOTEPAD.USE.SYMMETRIC.BRUSH/MASK 610 NOTEPAD.USE.SYMMETRY 591 NOTEPAD.USE.GRID 575 NOTEPAD.DEFINE.GRID 556 NOTEPAD.DEFINE.FONT 540 NOTEPAD.MASK=BRUSH.OUTLINE 521 EVAL.AS.PROCESS 447 NOTEPAD.DEFINE.MASK 428 NOTEPAD.USE.MASK 412 NOTEPAD.COOKIE.CUT 393 EVAL.AS.PROCESS 348 NOTEPAD.DEFINE.BRUSH 319 NOTEPAD.NAMED.OBJECT 299 NOTEPAD.COPY.FROM.SCREEN 282 NOTEPAD.FILL 262 NOTEPAD.SHADE.RECTANGLE 245 NOTEPAD.EDIT.RECTANGLE 227 NOTEPAD.TEXT 196 NOTEPAD.CURVE 178 NOTEPAD.CURVE 158 NOTEPAD.ELLIPSE 141 NOTEPAD.CIRCLE 121 NOTEPAD.LINE 104 NOTEPAD.SKETCH 23 MENU 16 NOTEPAD.COMMAND.MENU 10 NOTEPAD.OPERATION) (699 DELETE.STYLE 683 RESTORE.STYLE 667 SAVE.STYLE 650 EDIT.SHADE 634 DEFINE.POINT.OF.SYMMETRY 617 USE.SYMMETRIC.BRUSH/MASK 601 USE.SYMMETRY 583 USE.GRID 566 DEFINE.GRID 548 DEFINE.FONT 531 MASK=OUTLINE.OF.BRUSH 506 QUOTE 485 QUOTE 463 NOTEPAD.EDIT.MASK 455 EDIT.MASK 438 DEFINE.MASK 420 USE.MASK 403 BRUSH=COOKIE.CUT.WITH.MASK 381 QUOTE 364 NOTEPAD.EDIT.BRUSH 356 EDIT.BRUSH 339 DEFINE.BRUSH 327 * 309 NAMED.OBJECT 290 COPY.FROM.SCREEN 272 FILL 253 SHADE.RECTANGLE 236 EDIT.RECTANGLE 217 TEXT 206 * 186 CLOSED.CURVE 168 OPEN.CURVE 149 ELLIPSE 131 CIRCLE 112 LINE 94 SKETCH 82 * 71 -styles- 59 -objects/editing- 48 -trajectories- 37 --) ( 713 "Unrecognized COMMAND in NOTEPAD.BUTTONFN: ") NOTEPAD.CIRCLE :D8 (P 3 P2 P 2 P1 P 1 BRUSH P 0 CHARACTERISTICS I 1 OPERATION I 0 WINDOW) @@g Xdg Y` o` @` Zdh@ ` o` @` [Jh@ @A JJJK gh@ h(149 DRAWCIRCLE 136 DISTANCE 125 NOTEPAD.SETUP.TO.PAINT 118 MARK.SPOT 109 NOTEPAD.GETPOSITION 98 PRIN1 82 TERPRI 72 MARK.SPOT 63 NOTEPAD.GETPOSITION 52 PRIN1 36 TERPRI 25 GET.BITMAP 13 GETWINDOWUSERPROP) (141 PAINT.AT.POSSIBLE.POINT 104 CIRCLE.EDGE 93 PROMPTWINDOW 77 PROMPTWINDOW 58 CIRCLE.CENTER 47 PROMPTWINDOW 31 PROMPTWINDOW 20 BRUSH.DEFINITION 8 CHARACTERISTICS) ( 88 "Indicate a point of the circumference of the circle" 42 "Indicate center of circle") NOTEPAD.COMMAND.MENU :D8 NIL ` (11 NOTEPAD.COMMAND.MENU.CREATE) (16 NOTEPAD.COMMAND.MENU 4 NOTEPAD.COMMAND.MENU) () NOTEPAD.COMMAND.MENU.CREATE :D8 (P 8 STYLE P 7 OPERATION P 1 STYLES P 0 OPERATIONS) @oXoY`dodlIH2M_L3NdJdidg dgjdndhdK _NOOh ML(119 \NCONC2) (81 DEFAULTMENUHELDFN 72 CLRPROMPT 19 |MENUTYPE#|) ( 26 "Adding and editing" 13 (-styles- DEFINE.BRUSH EDIT.BRUSH BRUSH=COOKIE.CUT.WITH.MASK USE.MASK DEFINE.MASK EDIT.MASK MASK=OUTLINE.OF.BRUSH USE.GRID DEFINE.GRID USE.SYMMETRY DEFINE.POINT.OF.SYMMETRY USE.SYMMETRIC.BRUSH/MASK EDIT.SHADE DEFINE.FONT -- SAVE.STYLE RESTORE.STYLE DELETE.STYLE) 7 (-trajectories- SKETCH LINE CIRCLE ELLIPSE OPEN.CURVE CLOSED.CURVE -objects/editing- TEXT NAMED.OBJECT COPY.FROM.SCREEN SHADE.RECTANGLE FILL EDIT.RECTANGLE -- -- -- -- --)) NOTEPAD.COOKIE.CUT :D8 (P 1 NEW.BRUSH P 0 CHARACTERISTICS I 0 WINDOW F 2 MASK) M @g Xdg c@R YHgI ` o` h(73 PRIN1 57 TERPRI 47 LISTPUT 34 MASKED.BRUSH 25 GET.BITMAP 13 GETWINDOWUSERPROP) (68 PROMPTWINDOW 52 PROMPTWINDOW 41 BRUSH.DEFINITION 20 MASK.DEFINITION 8 CHARACTERISTICS) ( 63 "Brush defined") NOTEPAD.COPY.FROM.SCREEN :D8 (P 1 NEW.BITMAP P 0 REGION I 1 OPERATION I 0 WINDOW) N ` o` @g  Y@IA (75 MOVE.BITMAP 66 PICKUP.SCREEN.BITMAP 61 SCREENBITMAP 56 GETREGION 50 COLORSCREENBITMAP 45 GETCOLORREGION 39 GETWINDOWUSERPROP 28 PRIN1 12 TERPRI) (34 INCOLOR 23 PROMPTWINDOW 7 PROMPTWINDOW) ( 18 "Indicate a region of the screen to be copied") NOTEPAD.CURVE :D8 (P 8 PT P 7 I P 6 DONE P 5 PTS P 4 P2 P 3 P1 P 2 REGION P 1 BRUSH P 0 CHARACTERISTICS I 2 CLOSED I 1 OPERATION I 0 WINDOW) A p@g Xdg Yh@g @ Z` o` @` [dh@ o` o` @` \l@`ljjkj^Lh@ KLh]lN[o` O` @` l@`ljjkjMLh Lh@ Ok_MdOh@ @A MBgh@ h(317 DRAWCURVE 302 NOTEPAD.SETUP.TO.PAINT 290 MARK.SPOT 263 MARK.SPOT 254 \NCONC2 224 NOTEPAD.GETPOSITION 212 PRIN1 199 PRIN1 170 MARK.SPOT 141 NOTEPAD.GETPOSITION 130 PRIN1 115 PRIN1 100 MARK.SPOT 91 NOTEPAD.GETPOSITION 80 PRIN1 64 TERPRI 53 DSPCLIPPINGREGION 46 \INSUREWINDOW 38 GETWINDOWUSERPROP 25 GET.BITMAP 13 GETWINDOWUSERPROP) (309 PAINT.AT.POSSIBLE.POINT 232 \LASTKEYSTATE 219 CURVE.KNOT 207 PROMPTWINDOW 194 PROMPTWINDOW 149 \LASTKEYSTATE 136 CURVE.KNOT 125 PROMPTWINDOW 110 PROMPTWINDOW 86 CURVE.KNOT 75 PROMPTWINDOW 59 PROMPTWINDOW 33 INCOLOR 20 BRUSH.DEFINITION 8 CHARACTERISTICS) ( 189 ", " 120 ", point 2" 105 " (indicate last point by holding down left shift key)" 70 "Indicate first point of curve") NOTEPAD.DEFINE.BRUSH :D8 (P 1 BRUSH P 0 CHARACTERISTICS I 0 WINDOW) y @g X` o` @g  YHgI ` o` h(117 PRIN1 101 TERPRI 91 LISTPUT 78 PICKUP.SCREEN.BITMAP 73 SCREENBITMAP 68 GETREGION 62 COLORSCREENBITMAP 57 GETCOLORREGION 51 GETWINDOWUSERPROP 40 PRIN1 24 TERPRI 13 GETWINDOWUSERPROP) (112 PROMPTWINDOW 96 PROMPTWINDOW 85 BRUSH.DEFINITION 46 INCOLOR 35 PROMPTWINDOW 19 PROMPTWINDOW 8 CHARACTERISTICS) ( 107 "Brush defined" 30 "Indicate a region to be used as the brush") NOTEPAD.DEFINE.FONT :D8 (P 1 FONT P 0 CHARACTERISTICS I 0 WINDOW) M @g XYdHgI ` o` I` h(73 PRIN1 61 PRIN1 45 TERPRI 34 LISTPUT 19 NOTEPAD.READ.FONT 13 GETWINDOWUSERPROP) (68 PROMPTWINDOW 56 PROMPTWINDOW 40 PROMPTWINDOW 28 PRINTING.FONT.DEFINITION 8 CHARACTERISTICS) ( 51 "Font defined to be ") NOTEPAD.HELP :D8 NIL *` o` ` o` ` lh` o` ` lh` o` ` lh` o` o` ` lh` o` o` ` lh` o` o` (295 PRIN1 280 PRIN1 265 TAB 252 TERPRI 242 PRIN1 226 PRIN1 210 TAB 196 TERPRI 186 PRIN1 170 PRIN1 154 TAB 140 TERPRI 130 PRIN1 114 TAB 100 TERPRI 90 PRIN1 74 TAB 60 TERPRI 50 PRIN1 34 TERPRI 24 PRIN1 9 CLEARW) (290 PROMPTWINDOW 275 PROMPTWINDOW 260 PROMPTWINDOW 247 PROMPTWINDOW 237 PROMPTWINDOW 221 PROMPTWINDOW 205 PROMPTWINDOW 191 PROMPTWINDOW 181 PROMPTWINDOW 165 PROMPTWINDOW 149 PROMPTWINDOW 135 PROMPTWINDOW 125 PROMPTWINDOW 109 PROMPTWINDOW 95 PROMPTWINDOW 85 PROMPTWINDOW 69 PROMPTWINDOW 55 PROMPTWINDOW 45 PROMPTWINDOW 29 PROMPTWINDOW 19 PROMPTWINDOW 4 PROMPTWINDOW) ( 285 " window commands" 270 "Using Right button:" 232 " => erase" 216 "Using Middle button:" 176 " => paint" 160 "Using Left button:" 120 "Within the window:" 80 "In the title bar: commands affecting the whole" 40 "Selection: " 14 "NOTEPAD is menu-driven") NOTEPAD.READ.FONT :D8 (P 5 NEW.FONT P 4 BRUSH P 3 REGION P 2 COMMAND P 1 COMMAND.MENU P 0 LOADED.FONTS)  X`do0 H4d^dddid3 gNhh_O Oh_O&_Ogh _dOdg dgjdndh_dO Yd ZddhgZo ]` o` M` o` M o` MJ(251 PRIN1 236 FONTCREATE 230 PRIN1 214 PRIN1 202 PRIN1 186 TERPRI 175 READ.FROM.PROMPT.WINDOW 151 MENU 97 \NCONC2 7 NOTEPAD.FONTS.IN.CORE) (246 PROMPTWINDOW 225 PROMPTWINDOW 209 PROMPTWINDOW 197 PROMPTWINDOW 181 PROMPTWINDOW 162 NEW.FONT 121 DEFAULTMENUHELDFN 112 CLRPROMPT 90 NEW.FONT 51 QUOTE 13 |MENUTYPE#|) ( 241 "done" 220 " ... " 192 "Reading font " 170 "New font (FAMILY SIZE FACE):" 20 "Style") NOTEPAD.FONTS.IN.CORE :D8 (P 4 FAMILY F 13 \FONTSINCORE) @W:d0Ld[A O