1HARDCOPYFACILITIESInterlisp-Dincludesfacilitiesforgeneratinghardcopyinboth"Press"and"Interpress"formats.PressisafileformatusedforcommunicatingdocumentstoXeroxprototypelaserXerographicprintersknownbythenames"Dover","Spruce","Penguin",and"Raven".InterpressisafileformatusedforcommunicatingdocumentstoXeroxNetworkSystemprinterssuchastheXerox8044andXerox5700.Filescanbeinanumberofformats:InterpressandPressfiles,plaintextfiles,andformattedTeditfiles.Inordertoprintafileonagivenprinter,itisnecessarytoidentifytheformatofthefile,convertthefiletoaformatthattheprintercanaccept,andtransmitit.Ratherthanrequirethattheuserexplicitlydeterminefiletypesanddotheconversion,theInterlisp-DhardcopyfunctionsgeneratePressorInterpressoutputdependingontheappropriatechoiceforthedesignatedprinter.ThehardcopyfunctionsusethevariablesPRINTERTYPESandPRINTFILETYPES(describedbelow)todeterminethetypeofafile,howtoconvertitforagivenprinter,andhowtosendit.Bychangingthesevariables,theusercandefineotherkindsofprintersandprinttothemusingthenormalhardcopyfunctions.(SEND.FILE.TO.PRINTERFILEHOSTPRINTOPTIONS)[Function]ThefunctionSEND.FILE.TO.PRINTERcausesthefileFILEtobesenttotheprinterHOST.IfHOSTisNIL,thefirsthostinthelistDEFAULTPRINTINGHOSTwhichcanprintFILEisused.PRINTOPTIONSisapropertylistoftheform(PROP1VALUE1PROP2VALUE2...).Propertiescaninclude:HEADING-astringtouseonthetopofeachpage;#COPIES-thenumberofcopiesofthefiletoprint;#SIDES-if2,selecttwo-sidedprinting(ifHOSTcanprinttwo-sidedcopies);DOCUMENT.NAME-the'name'ofthedocument,whichoftenappearsonacoversheet.Forexample,(SEND.FILE.TO.PRINTER'FOONIL'(#COPIES3#SIDES2DOCUMENT.NAME"ForJohn"))SEND.FILE.TO.PRINTERcallsPRINTERTYPEandPRINTFILETYPEtodeterminetheprintertypeofHOSTandthefileformatofFILE.IfFILEisaformattedfile(e.g.,alreadyinPressorInterpressformat)inaformthattheprintercanprint,itistransmitteddirectly.Otherwise,CONVERT.FILE.TO.TYPE.FOR.PRINTERiscalledtodotheconversion.AllofthesefunctionsusethelistsPRINTERTYPESandPRINTFILETYPEStoactuallydeterminehowtodotheconversion.LISTFILEScallsthefunctionLISTFILES1tosendasinglefiletoahardcopyprintingdevice.Interlisp-DisinitializedwithLISTFILES1definedtocallSEND.FILE.TO.PRINTER.Note:Forbackwardscompatibility,thefunctionEMPRESSisdefinedtopackitsargumentsintoalist,andcallSEND.FILE.TO.PRINTER.(HARDCOPYWWINDOW/BITMAP/REGIONFILEHOSTSCALEFACTORROTATIONPRINTERTYPE)[Function]Createsahardcopyfilefromabitmapandoptionallysendsittoaprinter.WINDOW/BITMAP/REGIONcaneitherbeaWINDOW(openorclosed),aBITMAP,oraREGION(interpretedasaregionofthescreen).IfNIL,theuserispromptedforascreenregionusingGETREGION.IfFILEisnon-NIL,itisusedasthenameofthefileforoutput.IfHOST=NIL,thisfileisnotprinted. q?` p q?` g_p b;q b; \u Tw \ur\u\u Yp  2A #)+.+25n <B$B|EGHJKJKYp W?L[ #% (/ 2 9>BDFFW Vj  #b)9) /01468;= GGVj T2% 5%()+/25b9U@LB}HHK Jts JtrJt`JtsJt "JtrJt# )t-/I57:<6=3?BDHIIJt H  >) !"(+ 1469-=6@D)EJJH Ge }5 :$ *gGesGe*mGe DxnnDxtDxc" +DxsDx,rDxrDx,-"0 6FDxBKBsB/^BrB/358+8+BtB:BrB;2<>uA*BDII><;d N$t$t;ds;d*U;dr;d*+~,{0!1357:7;>BUBU;ds;dH6;dr;dHI_I_;d9Z#W$')M*.~.~9s939r93457D:@EGG98Lt8Lr8L,%**8Ls8L 58Lr8L669=C>@GG8L6"$%),-!/46s6464)-O/42yP'!#;)* 6:@2/'n/r/'**/s/ 3/r/4:66/s/ A/r/BCII/.64 !!.6t.6$.6r.6%*'),0i11.6t.64.6r.65R566.6t.69.6r.6:;D~(s(>(%+1%+r%+!h#((%+s%+ 1F%+r%+136+7(:=>?EqJJ%+# e "C# ),,#s# 4#r#5I:;==#"s'n"r"((#"&b6# ,/.`33&s&9&r&9;?AmDF0F0& #*%((s8r91s97  11t"%)Q 28Z @ssAJrAAE|E|! !\Y"0$j'(-!/ 59|:<$=!AB1B1t&r&g(,.C/@/@s4Jr48^9>??sDrEyGH H sr #\$%)+x-224040s6r7e9S@+@+b`us&`ur`u&(z*--`ut`u 5`ur`u57;:M`u]p3!"#&*0166]s] ??]t]C]s]DD]t]GS]s]H*]r]HI1I1][!r&K*T,/4>4>[s[ ={={[t[A\[s[B3[r[BDFQI^JJ[Zp"""ZpsZp ++ZptZp/ZpsZp033ZptZp8ZpsZp9ZprZp:::ZptZp:ZpW  WrWd !'+,-V/3y45< DUHIIWVO #&(G /.027K::;3;3VtV;9VSSrS "T%)'Z+/45:H< >QBFcFJJSQ !&y&yQsQ .QrQ/711QsQ5QrQ69>??QtQEQrQEG{G{QP lP tP P M) M)rM)$Z'+8,1$246k >AiDGGM)K %)*>,2Z36::KtK BKrKBDrF5F5KsKJhKrKJJKJ88JsJ JrJ!N!NJsJ(JrJ)5+-0 79k<@E9FIJJJHB#% )+0736344HtH >HsHAHrHABGIjIjHGs GrGeGD &I,x-0) 7;2?EIEIDBs BrB $l)+.01579>/@DIFzJWJWBA"S##& .4B57;L>DDA?s ?t?%"?s?%?r?&*./35B7s;O@IACHqHq?==s== ; ; r; A0 5; 9~KPP9~s9~.E9~r9~./24h:?4s4>>4t4B'4s4B4r4C II43W!$&D),-N/24c6;M?* EH/H/3W1 i#v$&(*-1]2797 @MBDLII10Qs 0Qr0Q 0Q-d-ds-d'-dr-d(D)*.:2678=W>@ A3DVESGaHH-d+$+s+*+ ( (t(<(s((r(k0 6F('_"%#%(('_t'_*'_r'_+y+0499'_s'_='_r'_>y>y'_s'_ F'_r'_GG'_%s%r%9 %+Q-/2488%s%;%%r%;<,?OAEqJvJv%$Gs "d$Gr$G"$Gs$G"$G !Z !Zt!Z!Zs!Z!Zr!Z@0 6F!Z "F#C''t*r++146<@ FFK#&.'+*,9/22KsKAKrKBDJ3J3K"s "Kr"'(7())t-r-n./24@4@s6r78[=?:@C.GJpJp3++3s33r3"$,&]+--3s3393r3::: A9CjGI I 3D!u$V(3)q+/00s?r@uE@E@sIsrIsI  r`0 5.K!#a$^',D.j 57N9<>@BB.s r!e!%*+D,A.O/2 4s4yt%st#s$[$[t(s*+at2s22t7js9CEIHVISISXWX\!g!gWXsWX *WXrWX*+,23::WXtWX>0WXrWX>AAWXtWXEWXrWXFGIIWXU#!&(-A.>3955UsU >(UrU>?Q@NCGGUT@( x%&&T@sT@+T@rT@,-.0579>G@E#E#T@sT@E)T@ QS QSrQSf0 5QSOKPPOsO *OrO*j/ 6:?8ArFIION;#" %"' -01H38<9z=?N?NN;sN; IbN;rN;JJiJiN;LK ".$&N+00LsL3LrL485 6;M?*B CEBFuGHJfJfLK#XK#sK# (K#rK#(p)A*>/13@68BCH>H>K#IW #&y&yIsI.IrI.`/10.2<38; ACFMGJJJJIH H E'$d:!"'g(d*,v.377E'sE'9E'rE':Q< 1>r>B|!-%%>s>)>r>*>p>*>n q?` TIMESROMAN~GACHA  TIMESROMAN  TIMESROMAN ~GACHA U7!j/$"Š*{ERIS}HARMONY>DOC>IDHARDCOPY.TEDIT;2SANNELLA14-Nov-84 14:29:50