(FILECREATED "20-Oct-86 11:27:42" ("compiled on " {ROSEBOWL}MICROTEKPRINT.;4) "12-Nov-85 14:59:23" tcompl'd in "Interlisp-D Xerox Quintus Prolog 23-Jun-86 ..." dated "23-Jun-86 15:12:41") (FILECREATED "20-Oct-86 11:27:09" {ROSEBOWL}MICROTEKPRINT.;4 7434 changes to: (FNS MT.CREATEPRINTMASTER MT.PRINT.MENU MT.CREATEPRINT MT.SELECT.SCALEFACTOR) (VARS MICROTEKPRINTCOMS) previous date: " 9-Oct-86 14:23:21" {ROSEBOWL}MICROTEKPRINT.;1) MT.PRINT.MENU D1 (P 0 MENU.DESCRIPTION F 1 MT.PRINT.MENUWINDOW F 2 MT.DISPLAY.MENUWINDOW) .oXd cdg Qnl Q QRgg h(52Q ATTACHWINDOW 37Q OPENW 33Q FM.CHANGESTATE 24Q FM.ITEMFROMID 13Q FM.MAKEMENU) (47Q JUSTIFY 44Q BOTTOM 21Q PRINTERTYPE) ( 6 ((TYPE MOMENTARY LABEL "PRINT" LEFT 0 BOTTOM 5 FONT (MODERN 12Q BOLD) SELECTEDFN MT.CREATEPRINT) (TYPE NCHOOSE LABEL "" LEFT 50Q BOTTOM 5 ID PRINTERTYPE ITEMS (17554Q 7715Q)) (TYPE TITLE LABEL XPOS FONT (MODERN 12Q BOLD) LEFT 144Q BOTTOM 5) (TYPE EDIT ID XPOS LABEL 0 MAXWIDTH 55Q EDITSTOPFLG T LEFT 202Q BOTTOM 5) (TYPE TITLE LABEL YPOS FONT (MODERN 12Q BOLD) LEFT 264Q BOTTOM 5) (TYPE EDIT ID YPOS LABEL 0 MAXWIDTH 55Q EDITSTOPFLG T LEFT 322Q BOTTOM 5) (TYPE MOMENTARY LABEL SCALE FONT (MODERN 12Q BOLD) LEFT 411Q BOTTOM 5 SELECTEDFN MT.SELECT.SCALEFACTOR) (TYPE EDIT LABEL "1:1" ID SCALEFACTOR LEFT 454Q BOTTOM 5) (WINDOWPROPS TITLE "Microtek Print Menu" BORDER 5))) MT.CREATEPRINT D1 (F 0 MT.PRINT.MENUWINDOW F 1 BITMAP F 2 MT.DISPLAY.MENUWINDOW) R g' c Q c`QP g' n4P g' dgdgdgdgdgihP g' nl1o QP g' P g' P g' h`l o h`l o h(314Q MT.PRINT.STATUS 304Q FLASHWINDOW 272Q MT.PRINT.STATUS 262Q FLASHWINDOW 250Q MT.CREATEPRINTMASTER 245Q MKATOM 236Q FM.READSTATE 232Q MKATOM 223Q FM.READSTATE 217Q MKATOM 210Q FM.READSTATE 202Q MT.PRINT.STATUS 165Q MKATOM 156Q FM.READSTATE 103Q MKATOM 74Q FM.READSTATE 62Q MKATOM 53Q FM.READSTATE 27Q EVAL 17Q BOUNDP 12Q MKATOM 3 FM.READSTATE) (277Q MT.STATUSWINDOW 255Q MT.STATUSWINDOW 241Q SCALEFACTOR 226Q YPOS 213Q XPOS 161Q PRINTERTYPE 141Q 1:4 133Q 1:2 125Q 1:1 116Q 2:1 107Q 4:1 77Q SCALEFACTOR 56Q PRINTERTYPE 35Q BITMAPTYPE# 6 BITMAPNAME) ( 311Q "This atom is not a bitmap" 267Q "Not a valid scale for 4045 printer" 177Q "") MT.CREATEPRINTMASTER D1 (P 2 SCALE P 1 SCANFACTOR P 0 IPS I 3 SCALEFACTOR I 2 Y I 1 X I 0 BITMAP F 3 MT.DISPLAY.MENUWINDOW F 4 MT.PRINT.MENUWINDOW) X0T g'nl oS g' g'YDo `l ooh` Y3`l o ho C C g @jdHABnTVnm$gghoJIoS g' g'YDo `l ooh` Y3`l o ho C C g JIl`l o h@jdHABn n gghoJI H o h(524Q MT.PRINT.STATUS 515Q CLOSEF 510Q SCALEDBITBLT 504Q FIXR 445Q MT.PRINT.STATUS 435Q FLASHWINDOW 414Q OPENIMAGESTREAM 401Q UNPACK 374Q UNPACK 367Q MT.PRINT.STATUS 356Q MT.PRINT.STATUS 346Q FLASHWINDOW 331Q MKATOM 326Q PROMPTFORWORD 306Q FLASHWINDOW 275Q MT.PRINT.STATUS 256Q MKATOM 247Q FM.READSTATE 201Q OPENIMAGESTREAM 166Q UNPACK 161Q UNPACK 154Q MT.PRINT.STATUS 143Q MT.PRINT.STATUS 133Q FLASHWINDOW 116Q MKATOM 113Q PROMPTFORWORD 73Q FLASHWINDOW 62Q MT.PRINT.STATUS 43Q MKATOM 34Q FM.READSTATE 20Q EQP 6 FM.READSTATE) (471Q REPLACE 466Q INPUT 430Q MT.STATUSWINDOW 411Q {LPT}.4045XLP 341Q MT.STATUSWINDOW 323Q MT.STATUSWINDOW 301Q MT.STATUSWINDOW 261Q RESOLUTION 252Q BITMAPNAME 224Q REPLACE 221Q INPUT 176Q {LPT}.IP 126Q MT.STATUSWINDOW 110Q MT.STATUSWINDOW 66Q MT.STATUSWINDOW 46Q RESOLUTION 37Q BITMAPNAME 11Q PRINTERTYPE) ( 521Q "Bitmap sent to printer" 476Q (0 0 4766Q 6344Q) 442Q "Not a valid scale for reduction used on this bitmap" 364Q "" 353Q "This is not a number" 317Q "1" 313Q "Resolution not on Bitmap proplist. Enter #:" 272Q "" 243Q (0 1 5 1 12Q 1 17Q 1 24Q 1 31Q 1 41Q 1 43Q 1 50Q 2 55Q 2 62Q 2 67Q 2 74Q 2 103Q 4 106Q 4 113Q 4) 231Q (0 0 52126Q 66444Q) 151Q "" 140Q "This is not a number" 104Q "1" 100Q "Resolution not on Bitmap proplist. Enter #:" 57Q "" 30Q (0 .24 5 .252 12Q .266 17Q .282 24Q .3 31Q .32 41Q .36 43Q .369 50Q .4 55Q .439 62Q .48 67Q .533 74Q .6 103Q .7200001 106Q .8 113Q .96)) MT.SELECT.SCALEFACTOR D1 (P 0 PRINTERTYPE F 2 MT.PRINT.MENUWINDOW F 3 FACTORS) XR g'Hnl oocRg R`dSdg dgjdndhdI h(124Q FM.CHANGESTATE 121Q MENU 45Q FM.ITEMFROMID 21Q EQP 3 FM.READSTATE) (72Q DEFAULTMENUHELDFN 63Q CLRPROMPT 51Q MENUTYPE# 42Q SCALEFACTOR 6 PRINTERTYPE) ( 33Q (4:1 2:1 1:1 1:2 1:4) 26Q (8:1 7:1 6:1 5:1 4:1 3:1 2:1 1:1 1:2 1:3 1:4 1:5 1:6 1:7 1:8)) (PRETTYCOMPRINT MICROTEKPRINTCOMS) (RPAQQ MICROTEKPRINTCOMS ((P (FILESLOAD MICROTEK)) (FNS MT.PRINT.MENU MT.CREATEPRINT MT.CREATEPRINTMASTER MT.SELECT.SCALEFACTOR) (P (IF (AND (BOUNDP (QUOTE MT.DISPLAY.MENUWINDOW)) (OPENWP MT.DISPLAY.MENUWINDOW)) THEN (MT.PRINT.MENU))))) (FILESLOAD MICROTEK) (IF (AND (BOUNDP (QUOTE MT.DISPLAY.MENUWINDOW)) (OPENWP MT.DISPLAY.MENUWINDOW)) THEN (MT.PRINT.MENU)) (PUTPROPS MICROTEKPRINT COPYRIGHT ("XEROX Corporation" 1986)) NIL