(PROGN (PRIN1 "Use LOADDB to load database files!
" T) (ERROR!))
("26-Aug-86 16:23:09" . {ERIS}<LISPUSERS>EDITFONT.\;2)
FNS (EF.INIT EF.EDIT EF.PROMPT EF.MESSAGE EF.CLOSEFN EF.CHARITEMS EF.BUTTONEVENTFN EF.WHENSELECTEDFN 
EF.EDITBM EF.MIDDLEBUTTONFN EF.CHANGESIZE EF.DELETE EF.ENTER EF.REPLACE EF.SAVE EF.BLANK COPYFONT 
READSTRIKEFONTFILE WRITESTRIKEFONTFILE BLANKFONTCREATE EDITFONT)
(READATABASE)
(
CALL EF.INIT (|create| FREPLACEFIELDVAL NCREATE CONS) EF.EDIT (EF.CHARITEMS |create| FREPLACEFIELDVAL 
NCREATE FUNCTION CONS PACK* FONTPROP PACKC |for| MAPCAR CHCON1 HEIGHTIFWINDOW |fetch| FETCHFIELD 
CHECK/MENU/IMAGE WIDTHIFWINDOW GETBOXPOSITION CREATEW) EF.PROMPT (GETPROMPTWINDOW RESETLST RESETSAVE 
TTYDISPLAYSTREAM TTY.PROCESS THIS.PROCESS TTYINREAD EVAL) EF.MESSAGE (GETPROMPTWINDOW) EF.CLOSEFN (
ASKUSER) EF.CHARITEMS (GETCHARBITMAP |create| CONS IPLUS ITIMES |fetch| FETCHFIELD \\GETCHARSETINFO 
\\GETBASEPTR |ffetch| FFETCHFIELD UNFOLD LLSH \\CREATECHARSET \\FGETOFFSET \\GETBASE PLUS) 
EF.BUTTONEVENTFN (DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY MENU) EF.WHENSELECTEDFN NIL EF.EDITBM (
RESETSAVE SHADEITEM BQUOTE LIST* |fetch| COPYALL UNINTERRUPTABLY |replace| RPLACA EDITBM WFROMMENU) 
EF.MIDDLEBUTTONFN (MENU) EF.CHANGESIZE (WFROMMENU EF.PROMPT EVAL BITMAPCREATE |fetch| |replace| RPLACA
) EF.DELETE (WFROMMENU WINDOWPROP |fetch| LAST |replace| RPLACA) EF.ENTER (EF.PROMPT TERPRI TYPENAMEP 
|replace| RPLACA WFROMMENU) EF.REPLACE (WFROMMENU EF.PROMPT TYPENAMEP |replace| RPLACA) EF.SAVE (
WINDOWPROP |fetch| IPLUS FETCHFIELD IMAX PLUS |create| FREPLACEFIELDVAL NCREATE \\CREATECSINFOELEMENT 
\\ALLOCBLOCK FOLDHI LRSH IDIFFERENCE LAST BITMAPCREATE \\PUTBASE \\CHAR8CODE LOGAND |for| REVERSE 
\\CHARSET |replace| REPLACEFIELD \\FONTRESETCHARWIDTHS) EF.BLANK (U-CASE \\FONTFACE LENGTH IPLUS 
IMINUS |create| FREPLACEFIELDVAL NCREATE \\CREATECSINFOELEMENT \\ALLOCBLOCK FOLDHI LRSH |fetch| 
FETCHFIELD LAST SUB1 \\PUTBASE PLUS ADD1 \\FGETOFFSET \\GETBASE \\FGETWIDTH BITMAPCREATE REPLACEFIELD 
LIST \\CREATEFONTCHARSETVECTOR IMAX \\RPLPTR UNFOLD LLSH \\AVGCHARWIDTH) COPYFONT (|create| NCREATE 
\\ALLOCBLOCK ADD1 |fetch| FETCHFIELD \\GETBASEPTR UNFOLD LLSH FREPLACEFIELDVAL COPYALL 
\\CREATECSINFOELEMENT FOLDHI LRSH IPLUS REPLACEFIELD PLUS) READSTRIKEFONTFILE (OPENSTREAM |create| 
FREPLACEFIELDVAL NCREATE \\CREATECSINFOELEMENT \\ALLOCBLOCK FOLDHI LRSH IPLUS LLSH \\BIN \\WIN 
REPLACEFIELD |fetch| FETCHFIELD BITMAPCREATE UNFOLD ITIMES IDIFFERENCE \\PUTBASE PLUS LIST 
\\CREATEFONTCHARSETVECTOR ADD1 IMAX \\RPLPTR \\AVGCHARWIDTH) WRITESTRIKEFONTFILE (\\GETCHARSETINFO 
\\GETBASEPTR |ffetch| FFETCHFIELD UNFOLD LLSH \\CREATECHARSET |fetch| FETCHFIELD \\FGETOFFSET 
\\GETBASE |for| PLUS ADD1 OPENSTREAM LRSH \\BOUT LOGAND IMAX \\FGETWIDTH IPLUS IDIFFERENCE ITIMES) 
BLANKFONTCREATE (EF.BLANK) EDITFONT (EF.EDIT) NIL
BIND EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM (CHARCODE DUMMYFLG) EF.MIDDLEBUTTONFN NIL 
EF.CHANGESIZE NIL EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL 
READSTRIKEFONTFILE NIL WRITESTRIKEFONTFILE (PREVIOUSOFFSET) BLANKFONTCREATE NIL EDITFONT NIL NIL
NLAMBDA EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
NOBIND EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
RECORD EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
CREATE EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
FETCH EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
REPLACE EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
REFFREE EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS (DUMMYINDEX) 
EF.BUTTONEVENTFN (EF.TITLEMENU) EF.WHENSELECTEDFN NIL EF.EDITBM (BLACKSHADE DUMMYINDEX) 
EF.MIDDLEBUTTONFN (EF.MENU) EF.CHANGESIZE NIL EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE (
DUMMYINDEX \\MAXTHINCHAR) EF.BLANK (\\MAXTHINCHAR DUMMYINDEX \\MAXCHARSET) COPYFONT (\\MAXCHARSET 
\\MAXTHINCHAR DUMMYINDEX) READSTRIKEFONTFILE (\\MAXTHINCHAR \\MAXCHARSET) WRITESTRIKEFONTFILE (
\\MAXCHARSET DUMMYINDEX MAXCODE) BLANKFONTCREATE NIL EDITFONT NIL NIL
REF EF.INIT NIL EF.EDIT (FONT ATOM) EF.PROMPT (WINDOW STRING) EF.MESSAGE (WINDOW STRING) EF.CLOSEFN (
WINDOW) EF.CHARITEMS (FONT CHARSET FROMCHAR8CODE TOCHAR8CODE) EF.BUTTONEVENTFN (WINDOW) 
EF.WHENSELECTEDFN (KEY MENU) EF.EDITBM (MENU) EF.MIDDLEBUTTONFN (CHARITEM MENU) EF.CHANGESIZE (MENU) 
EF.DELETE (MENU) EF.ENTER (MENU) EF.REPLACE (MENU) EF.SAVE (WINDOW) EF.BLANK (SIZE FIRSTCHAR LASTCHAR 
ASCENT DESCENT WIDTH) COPYFONT (FONT) READSTRIKEFONTFILE (FILE FAMILY SIZE FACE) WRITESTRIKEFONTFILE (
FONT FILE W) BLANKFONTCREATE (FAMILY SIZE FACE FIRSTCHAR LASTCHAR ASCENT DESCENT WIDTH) EDITFONT (FONT
 FROMCHARCODE TOCHARCODE) NIL
SETFREE EF.INIT (EF.MENU EF.TITLEMENU) EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL 
EF.CHARITEMS NIL EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL 
EF.CHANGESIZE NIL EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL 
READSTRIKEFONTFILE NIL WRITESTRIKEFONTFILE (WIDTHS OFFSETS) BLANKFONTCREATE NIL EDITFONT NIL NIL
SET EF.INIT NIL EF.EDIT (FROMCHAR8CODE TOCHAR8CODE CHARSET CHARITEMS MENU TITLE HEIGHT WIDTH POS 
REGION WINDOW) EF.PROMPT (PROMPTW ANSWER) EF.MESSAGE (PROMPTW) EF.CLOSEFN NIL EF.CHARITEMS (
DUMMYBITMAP CHARITEM CHARITEMS FROMCHARCODE TOCHARCODE OFFSETS DUMMYOFFSET OFFSET BITMAP I) 
EF.BUTTONEVENTFN (COMMAND) EF.WHENSELECTEDFN NIL EF.EDITBM (BITMAP) EF.MIDDLEBUTTONFN (COMMAND) 
EF.CHANGESIZE (WINDOW HEIGHT WIDTH NEWBITMAP) EF.DELETE (WINDOW CHARITEMS DUMMYBITMAP) EF.ENTER (
NEWBITMAP) EF.REPLACE (WINDOW BITMAP) EF.SAVE (CHARITEMS FONT CBWIDTH CBHEIGHT CHARITEM BITMAP I 
CSINFO OFFSETS WIDTHS OFFSET DUMMYOFFSET CB WIDTH HEIGHT FIRSTCHAR LASTCHAR CHARSET) EF.BLANK (FAMILY 
FACE W CSINFO WIDTHS DUMMYWIDTH I OFFSETS DUMMYOFFSET CBHEIGHT CBWIDTH CB FONT) COPYFONT (NEWFONT 
NEWCHARSETVECTOR OLDCHARSETVECTOR OLDCSINFO NEWCSINFO CHARSET) READSTRIKEFONTFILE (STRM CSINFO 
FIRSTCHAR LASTCHAR RW HEIGHT BITMAP NUMBCODES OFFSETS I J WIDTHS CHARSET FONT) WRITESTRIKEFONTFILE (
CHARSET CSINFO DUMMYOFFSET FIRSTCHAR I LASTCHAR DUMMYCHAR STREAM MAXWIDTH RASTERWIDTH LENGTH CODE 
OFFSET WIDTH) BLANKFONTCREATE NIL EDITFONT NIL NIL
SMASHFREE EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
SMASH EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM (CHARITEM) EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE (
CHARITEM) EF.DELETE (CHARITEM) EF.ENTER (CHARITEM) EF.REPLACE (CHARITEM) EF.SAVE NIL EF.BLANK NIL 
COPYFONT NIL READSTRIKEFONTFILE NIL WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
PROP EF.INIT NIL EF.EDIT (CHARITEMS BUTTONEVENTFN) EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN (MENU) 
EF.CHARITEMS NIL EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL 
EF.CHANGESIZE NIL EF.DELETE (CHARITEMS) EF.ENTER NIL EF.REPLACE NIL EF.SAVE (CHARITEMS FONT) EF.BLANK 
NIL COPYFONT NIL READSTRIKEFONTFILE NIL WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
TEST EF.INIT NIL EF.EDIT (FROMCHAR8CODE TOCHAR8CODE CHARSET) EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN 
NIL EF.CHARITEMS NIL EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN (CHARITEM) EF.EDITBM NIL EF.MIDDLEBUTTONFN
 (COMMAND) EF.CHANGESIZE (HEIGHT WIDTH) EF.DELETE NIL EF.ENTER (NEWBITMAP) EF.REPLACE (BITMAP) EF.SAVE
 NIL EF.BLANK NIL COPYFONT (OLDCSINFO) READSTRIKEFONTFILE (CHARSET FONT) WRITESTRIKEFONTFILE (CHARSET 
CSINFO) BLANKFONTCREATE NIL EDITFONT NIL NIL
TESTFREE EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
PREDICATE EF.INIT NIL EF.EDIT (FONTP) EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS (LESSP)
 EF.BUTTONEVENTFN (INSIDEP) EF.WHENSELECTEDFN NIL EF.EDITBM (IEQP) EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE
 NIL EF.DELETE NIL EF.ENTER (|type?|) EF.REPLACE (|type?|) EF.SAVE (GREATERP IEQP) EF.BLANK (FIXP 
SMALLP |for| IEQP GREATERP) COPYFONT (GREATERP) READSTRIKEFONTFILE (GREATERP) WRITESTRIKEFONTFILE (
FONTP IGEQ ILESSP GREATERP LESSP IEQP) BLANKFONTCREATE NIL EDITFONT NIL NIL
EFFECT EF.INIT NIL EF.EDIT (WINDOWPROP ADDMENU ERROR) EF.PROMPT (CLEARW PRIN1 TERPRI) EF.MESSAGE (
PRIN1) EF.CLOSEFN (CLOSEW WINDOWPROP) EF.CHARITEMS (|push| |for|) EF.BUTTONEVENTFN (MENUBUTTONFN 
APPLY*) EF.WHENSELECTEDFN (SELECTQ EF.EDITBM EF.MIDDLEBUTTONFN) EF.EDITBM (RESETLST UPDATE/MENU/IMAGE 
REDISPLAYW) EF.MIDDLEBUTTONFN (APPLY*) EF.CHANGESIZE (EF.MESSAGE BITBLT UNINTERRUPTABLY 
UPDATE/MENU/IMAGE REDISPLAYW) EF.DELETE (UNINTERRUPTABLY UPDATE/MENU/IMAGE REDISPLAYW) EF.ENTER (
|printout| PRIN1 UNINTERRUPTABLY UPDATE/MENU/IMAGE REDISPLAYW LISPERROR) EF.REPLACE (EF.MESSAGE 
UNINTERRUPTABLY UPDATE/MENU/IMAGE REDISPLAYW LISPERROR) EF.SAVE (\\FSETWIDTH \\FSETOFFSET BITBLT 
UNINTERRUPTABLY) EF.BLANK (LISPERROR \\FSETWIDTH \\FSETOFFSET |replace| \\FONTRESETCHARWIDTHS 
\\SETCHARSETINFO) COPYFONT (|for| \\BLT |replace| \\RPLPTR) READSTRIKEFONTFILE (|replace| \\BINS |for|
 \\FSETOFFSET \\FSETWIDTH \\FONTRESETCHARWIDTHS CLOSEF \\SETCHARSETINFO) WRITESTRIKEFONTFILE (
LISPERROR ERROR \\WOUT DECLARE \\BOUTS CLOSEF) BLANKFONTCREATE NIL EDITFONT NIL NIL
CLISP EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
SPECVARS EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
LOCALVARS EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE (STREAM W) BLANKFONTCREATE NIL EDITFONT NIL NIL
APPLY EF.INIT NIL EF.EDIT (EF.WHENSELECTEDFN) EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS
 NIL EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
ERROR EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN (|apply|) EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN (|apply|) 
EF.CHANGESIZE NIL EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL 
READSTRIKEFONTFILE NIL WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
LOCALFREEVARS EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
ARGS EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL
USERTEMPLATES WINDOWPROP (CALL EVAL PROP EVAL . PPE) WINDOWDELPROP (CALL EVAL PROP EVAL . PPE) PERFORM
 (MACRO ARGS (PERFORMTRAN ARGS T)) RUN-SUPER (CALL .. EVAL) |perform| (MACRO ARGS (PERFORMTRAN ARGS T)
) SPREADAPPLY (CALL FUNCTIONAL EVAL . PPE) SETQ.NOREF (CALL SET EVAL . PPE) WINDOWADDPROP (CALL EVAL 
PROP EVAL EVAL . PPE) UNINTERRUPTABLY (CALL .. EVAL) OP# (CALL) SHAZAM (CALL .. NIL) SPREADAPPLY* (
CALL FUNCTIONAL .. EVAL) CATCH (CALL CALL CALL .. EVAL) REF (CALL EVAL (IF (AND (CONSP EXPR) (EQ (CAR 
EXPR) (QUOTE QUOTE))) (NIL FETCH) EVAL)) |\\DoveIO.LockMem| (CALL .. EVAL) NIL
0 EF.INIT NIL EF.EDIT NIL EF.PROMPT NIL EF.MESSAGE NIL EF.CLOSEFN NIL EF.CHARITEMS NIL 
EF.BUTTONEVENTFN NIL EF.WHENSELECTEDFN NIL EF.EDITBM NIL EF.MIDDLEBUTTONFN NIL EF.CHANGESIZE NIL 
EF.DELETE NIL EF.ENTER NIL EF.REPLACE NIL EF.SAVE NIL EF.BLANK NIL COPYFONT NIL READSTRIKEFONTFILE NIL
 WRITESTRIKEFONTFILE NIL BLANKFONTCREATE NIL EDITFONT NIL NIL

)