(PROGN (PRIN1 "Use LOADDB to load database files! " T) (ERROR!)) ("27-Feb-85 17:38:26" . {ERIS}<SPEECH>MAILREADER>PROSE-UTIL.;31) FNS (ACTIVEWINDOW ADVISE.FOR.TYPEOUT VERIFYINPUT DESCRIBE.STATE GETSTATEFIELD P.INDEX.SEQ? P.RS232.INIT P.FINISHED? P.INTERPRET.OUTPUT P.LAST.SENTENCE.SAID P.MESSAGE.QUERY P.PROCESS P.NO.RS232 DEBUGOUTPUT? PROSEDEBUGINFO MAKECOMMAND MSG.LEN.TO.TIME MSG.LEN.TO.SECS MSG.LEN.TO.MINS PLURAL? BACK.SENTENCE P.SPEED P.QUIT.READING.MSG BACK.SENTENCE1 BOUT.FROM.STRING LETTERP READ.TTY SAYT SETSTATEFIELD START.PROSE.PROCESSES PHONE.MONITOR START.PROSE.PROCESS SYNCH CHARS.TO.MINUTES CHECK.RS232.SETTINGS COPYMSGBYTES BINARYLCASE BINLETTERP P.USER.MESSAGE PHONE.INTERRUPT EOSP P.CHECK.GLOBAL.VARS P.HELP P.CHUNK P.RESET.TIMER SIMPLESYNCH IGNORETIMER P.COMMAND P.ENSURE.ESC.SEQ P.FIND.ESC.SEQ P.FINISHED.ACTIONS P.FIX P.FIND.IMAGE.OBJS P.SEARCH.SELECT.AND.SAY.MSG P.SEND.ESC.SEQ TEDIT.LIST.OF.OBJECTS P.SAY.BODY P.SAY.BODY1 ACTIVEWINDOW PROSE.LAFITE.WRITE.PROFILE PROSE.LAFITE.BROWSE) (READATABASE) ( CALL ACTIVEWINDOW (EVAL CREATEW L-CASE WINDOWPROP) ADVISE.FOR.TYPEOUT (MAPC APPLY SHOULDNT) VERIFYINPUT (RETFROM) DESCRIBE.STATE NIL GETSTATEFIELD (EVAL LIST* CONS) P.INDEX.SEQ? (CHARACTER LIST NTH IPLUS LENGTH PACK MAPCAR REVERSE) P.RS232.INIT (CHECK.RS232.SETTINGS P.NO.RS232) P.FINISHED? ( SETUPTIMER PHONE.INTERRUPT P.INTERPRET.OUTPUT RS232READBYTE RPLACA CONS) P.INTERPRET.OUTPUT ( P.LAST.SENTENCE.SAID) P.LAST.SENTENCE.SAID (MEMBER CHCON1 P.INDEX.SEQ?) P.MESSAGE.QUERY (CONS) P.PROCESS (P.CONTROLLER) P.NO.RS232 (TERPRI) DEBUGOUTPUT? (PROSEDEBUGINFO) PROSEDEBUGINFO ( RECORDFIELDNAMES EVAL LIST* CONS LIST SUBSTRING) MAKECOMMAND (PACK REVERSE) MSG.LEN.TO.TIME ( MSG.LEN.TO.SECS MSG.LEN.TO.MINS CONCAT) MSG.LEN.TO.SECS (ITIMES FTIMES FQUOTIENT IQUOTIENT) MSG.LEN.TO.MINS (IQUOTIENT IREMAINDER CONCAT PLURAL?) PLURAL? NIL BACK.SENTENCE (RETFROM IDIFFERENCE BACK.SENTENCE1 IPLUS) P.SPEED (PACK*) P.QUIT.READING.MSG NIL BACK.SENTENCE1 (P.INTERPRET.OUTPUT SETFILEPTR IDIFFERENCE SUB1 ASSOC MEMBER) BOUT.FROM.STRING (SUBSTRING NCHARS CHCON1 GNC IPLUS) LETTERP (CHCON1 BINLETTERP) READ.TTY (READ) SAYT (SUBSTRING CHCON1 READPORT L-CASE PACK) SETSTATEFIELD (EVAL LIST* CONS) START.PROSE.PROCESSES (START.TONE.MONITOR.PROCESS) PHONE.MONITOR (PROCESSP) START.PROSE.PROCESS (ADD.PROCESS) SYNCH (GETFILEPTR ADD1 CONCAT RPLACA CONS) CHARS.TO.MINUTES (ITIMES IQUOTIENT CONCAT) CHECK.RS232.SETTINGS (TERPRI) COPYMSGBYTES (OPENTEXTSTREAM SUB1 GETEOFPTR GETFILEPTR PHONE.INTERRUPT BIN RS232READBYTE RPLACA CONS TYPENAME BINARYLCASE IPLUS) BINARYLCASE (IPLUS) BINLETTERP NIL P.USER.MESSAGE (SAYT) PHONE.INTERRUPT NIL EOSP (SELCHARQ \PEEKBIN) P.CHECK.GLOBAL.VARS (TERPRI) P.HELP (SELECTQ P.CHUNK P.HELP CONCAT SHOULDNT) P.CHUNK (NCHARS P.FIND.ESC.SEQ SUBSTRING SUB1 ADD1 STRPOS) P.RESET.TIMER (SETUPTIMER) SIMPLESYNCH (ADD1 CONCAT RPLACA CONS) IGNORETIMER NIL P.COMMAND (SELECTQ P.READBUFFER P.ESC.SEQ SHOULDNT) P.ENSURE.ESC.SEQ (NCHARS NTHCHAR IPLUS ADD1) P.FIND.ESC.SEQ (STRPOS ADD1 SUBSTRING) P.FINISHED.ACTIONS NIL P.FIX (MAPC EVAL LIST* CONS LIST) P.FIND.IMAGE.OBJS (TEDIT.LIST.OF.OBJECTS TEXTOBJ) P.SEARCH.SELECT.AND.SAY.MSG (SELECTMESSAGETODISPLAY) P.SEND.ESC.SEQ (RS232WRITECHARS CONCAT) TEDIT.LIST.OF.OBJECTS (TCONC FUNCTION) P.SAY.BODY (OPENSTREAM ) P.SAY.BODY1 (OPENTEXTSTREAM P.FIND.MSG.BODY GETEOFPTR P.FIND.IMAGE.OBJS CLOSEF GETSTREAM) ACTIVEWINDOW (EVAL CREATEW L-CASE WINDOWPROP) PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE ( ORIGINAL.LAFITE.BROWSE) NIL BIND ACTIVEWINDOW (X) ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY (MSGDESCRIPTOR MSGNO) P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG (MSGFILE) BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT (STRING CHAR OUTPUTBYTES PHONEMEMODE ESCAPECHAR P.READBUFFER) SETSTATEFIELD (VALUE) START.PROSE.PROCESSES NIL PHONE.MONITOR (DUMMY) START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP (UCASEFLG) P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP (BYTE NX) P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK (CHUNK) P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND (ARG2 ARG3 ARG4) P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS (BEG) P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS (PC#) P.SAY.BODY NIL P.SAY.BODY1 (MSGDESCRIPTOR ITEM MENU BUTTON MSG.STRING) ACTIVEWINDOW (X) PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL NLAMBDA ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD ( BQUOTE) P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? (GLOBALVARS USEDFREE) PROSEDEBUGINFO (BQUOTE) MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD (BQUOTE) START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS (USEDFREE) SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP (GLOBALVARS) P.CHUNK NIL P.RESET.TIMER (GLOBALVARS) SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX (BQUOTE) P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL NOBIND ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE (T) GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG T BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT T EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS T P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE (T) PROSE.LAFITE.BROWSE NIL NIL RECORD ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? (STATE STATEINFO) P.INTERPRET.OUTPUT (STATE) P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY (STATE PROSEINPUT STATEINFO HEARDMSGS) P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND (STATE INPUTINFO USERINFO) MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS (STATE PROSESETTINGS) MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE (STATE) P.SPEED (STATE PROSESETTINGS) P.QUIT.READING.MSG (STATE) BACK.SENTENCE1 (STATE) BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR (STATE STATEINFO) START.PROSE.PROCESS (STATE) SYNCH (STATE PROSEINPUT) CHARS.TO.MINUTES (STATE PROSESETTINGS) CHECK.RS232.SETTINGS NIL COPYMSGBYTES (STATE STATEINFO) BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT (STATE STATEINFO) EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK (STATE PROSESETTINGS) P.RESET.TIMER NIL SIMPLESYNCH (STATE PROSEINPUT) IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS (STATE) P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG (STATE LAFITEMSG) P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY (MAILFOLDER STATE LAFITEMSG) P.SAY.BODY1 (STATE PROSEINPUT) ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL CREATE ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES (STATE) PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL FETCH ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? (SYNCHLIST STATEINFO PROSEOUTPUT) P.INTERPRET.OUTPUT ( PROSEOUTPUT) P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY (PROSEINPUT HEADER STATEINFO HEARDMSGS MSGNO EXAMINED) P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND (INPUTINFO PHONEINPUT USERINFO USER PASSWORD) MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS (PROSESETTINGS SPEECHRATE) MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE (COMMAND TEMPFILE SPEECHRATE PROSESETTINGS) P.SPEED ( PROSESETTINGS) P.QUIT.READING.MSG (TEMPFILE) BACK.SENTENCE1 (TEMPFILE SYNCHLIST MSGBODYBEGIN) BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR (STATEINFO TALKING PHONEINPUT PROCESS) START.PROSE.PROCESS NIL SYNCH (PROSEINPUT SYNCHLIST) CHARS.TO.MINUTES (PROSESETTINGS SPEECHRATE) CHECK.RS232.SETTINGS NIL COPYMSGBYTES ( STATEINFO PROSEOUTPUT) BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE (TALKING) PHONE.INTERRUPT ( STATEINFO HALTSPEECH) EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK (PROSESETTINGS SPEECHRATE) P.RESET.TIMER NIL SIMPLESYNCH (PROSEINPUT SYNCHLIST) IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS (TEMPFILE) P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG (MAILFOLDER BROWSERWINDOW DELETED? BROWSERMENU) P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS (POBJ) P.SAY.BODY (SEEN?) P.SAY.BODY1 (PROSEINPUT) ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL REPLACE ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT (PHONEINPUT) DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? (PROSEOUTPUT TALKING PHONEINPUT COMMAND) P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY (EXAMINED MESSAGEQUERY?) P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND (COMMAND PHONEINPUT) MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED ( SPEECHRATE) P.QUIT.READING.MSG (TALKING HALTSPEECH TEMPFILE SYNCHLIST PROSEOUTPUT) BACK.SENTENCE1 ( SYNCHLIST) BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES (PROSESETTINGS) PHONE.MONITOR (HALTSPEECH) START.PROSE.PROCESS (PROCESS) SYNCH ( SYNCHLIST) CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES (TALKING PHONEINPUT COMMAND PROSEOUTPUT) BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT (PHONEINPUT) EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH (SYNCHLIST) IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS (TALKING SYNCHLIST PROSEOUTPUT PHONEINPUT HALTSPEECH) P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY (CURRENTDISPLAYEDMESSAGE TEMPFILE CURRENTDISPLAYEDSTREAM) P.SAY.BODY1 (MSGBODYBEGIN IMAGEOBJLIST) ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL REFFREE ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT (PROSETYPEOUTADVISEDFNS) VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT (STATE) P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO (PROSESTATUS) MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS (STATE) MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE (STATE) P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY (TOPLEVELTTYWINDOW) SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES (PROSE.DEFAULT.SETTINGS) PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES (STATE) CHECK.RS232.SETTINGS (RS232INIT) COPYMSGBYTES (IMAGEOBJMSG) BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE (STATE) PHONE.INTERRUPT NIL EOSP (B EOSENTCHARCODES) P.CHECK.GLOBAL.VARS (TOPLEVELTTYWINDOW P.USER P.QUIT PHONE.INPUT P.MAILFOLDER P.BROWSEROPEN \LAFITE.LAST.STATUS \LAFITE.AUTHENTICATION.FAILURE) P.HELP (MENUINPUT) P.CHUNK (STATE) P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG (STATE) P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE (LAFITEMAINMENU) NIL REF ACTIVEWINDOW (WINDOWNAME REGION WINDOWPROPLST) ADVISE.FOR.TYPEOUT (READVISE/UNADVISE F) VERIFYINPUT (INPUTLIST) DESCRIBE.STATE NIL GETSTATEFIELD (FIELDLIST) P.INDEX.SEQ? (REVOUTPUT) P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT (PROSEOUTPUT) P.LAST.SENTENCE.SAID (REVPROSEOUTPUT ) P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME (MSGLENGTH) MSG.LEN.TO.SECS (MSGLENGTH) MSG.LEN.TO.MINS (SECS) PLURAL? (VALUE PL SG) BACK.SENTENCE (TRIGGERBUTTON) P.SPEED (WPM) P.QUIT.READING.MSG NIL BACK.SENTENCE1 (SYNCHLIST) BOUT.FROM.STRING (STRING WORKSTRING TOSTREAM) LETTERP (CHAR CODE) READ.TTY NIL SAYT (INSTRING) SETSTATEFIELD (FIELDLIST) START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH ( INSTREAM PTR) CHARS.TO.MINUTES (CHARLENGTH RATE) CHECK.RS232.SETTINGS NIL COPYMSGBYTES (OUTSTREAM) BINARYLCASE (CODE) BINLETTERP (CODE) P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP (STREAM) P.CHECK.GLOBAL.VARS NIL P.HELP (INTERNALSTATE) P.CHUNK (TEXTSTRING DONTLOWERCASE) P.RESET.TIMER NIL SIMPLESYNCH (PTR) IGNORETIMER (FLG) P.COMMAND (COMMAND ARG1) P.ENSURE.ESC.SEQ (ESC.STRING.CANDIDATE) P.FIND.ESC.SEQ (TEXTSTRING) P.FINISHED.ACTIONS NIL P.FIX (X) P.FIND.IMAGE.OBJS (STREAM) P.SEARCH.SELECT.AND.SAY.MSG (MAILFOLDER) P.SEND.ESC.SEQ (ESC.STRING) TEDIT.LIST.OF.OBJECTS (TEXTOBJ CH# OBJLIST) P.SAY.BODY (MSGDESCRIPTOR) P.SAY.BODY1 (STREAM TEXTSTREAM) ACTIVEWINDOW (WINDOWNAME REGION WINDOWPROPLST) PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE (BUTTON FILE OPTIONS) NIL SETFREE ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT (RECLAIMWAIT) P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 (LAST.SENTENCE.UTTERED) BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT (PORTCONTENT.BEFORE) SETSTATEFIELD NIL START.PROSE.PROCESSES (STATE LOGINHOST/DIR) PHONE.MONITOR NIL START.PROSE.PROCESS (\PROSE.PROCESS) SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER (P.TIMEOUTTIMER) SIMPLESYNCH NIL IGNORETIMER (\IGNORETIMER) P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL SET ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT (X) DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? (X) P.RS232.INIT NIL P.FINISHED? (TIMER FLG INBYTE) P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID (LASTINDEX) P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO (X VAL) MAKECOMMAND NIL MSG.LEN.TO.TIME (SECS) MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS ( MINS REMAININGSECS) PLURAL? NIL BACK.SENTENCE (NO.OF.SENTENCES) P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 (NO.OF.SENTENCES START.SENTENCE SENT.PTR.PAIR FPTR) BOUT.FROM.STRING (X) LETTERP NIL READ.TTY (X) SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH (NEWSYNCH# LASTSYNCH#) CHARS.TO.MINUTES (SECS MINUTES) CHECK.RS232.SETTINGS NIL COPYMSGBYTES (INSTREAM FLG B INBYTE I) BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK (SPEED POS REST END.POS ESC.SEQ) P.RESET.TIMER NIL SIMPLESYNCH (NEWSYNCH# LASTSYNCH#) IGNORETIMER NIL P.COMMAND ( BUFFERCONTENT) P.ENSURE.ESC.SEQ (I) P.FIND.ESC.SEQ (NEXTPOS) P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG (P.SELECTEDMESSAGE) P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY (TEMPMSG) P.SAY.BODY1 (MSGBODYBEGIN MSGBODYEND IMAGEOBJLIST) ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE (ITEM MENU) NIL SMASHFREE ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT (STATE) DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? (STATE) P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY (STATE) P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND (STATE) MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED (STATE) P.QUIT.READING.MSG (STATE) BACK.SENTENCE1 (STATE) BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR (STATE ) START.PROSE.PROCESS (STATE) SYNCH (STATE) CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES (STATE) BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT (STATE) EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH (STATE) IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS (STATE) P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY (STATE) P.SAY.BODY1 (STATE) ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL SMASH ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS (OBL) P.SAY.BODY (MAILFOLDER) P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL PROP ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL TEST ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT (RS232CONNECTED?) P.FINISHED? (FLG) P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE (NO.OF.SENTENCES) P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 (FPTR MSGFILE) BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT (DONTLOWERCASE) SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES (FLG) BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK (POS ESC.SEQ) P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ (POS NEXTPOS) P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG (P.SELECTEDMESSAGE) P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS (PC TESTFN) P.SAY.BODY NIL P.SAY.BODY1 (IMAGEOBJLIST) ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE (MENU ITEM) NIL TESTFREE ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? (PROSEDEBUG) PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 (LAST.SENTENCE.UTTERED) BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS (RS232XON\XOFF?) COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP (P.HELP.FLG) P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL PREDICATE ACTIVEWINDOW (BOUNDP WINDOWP) ADVISE.FOR.TYPEOUT NIL VERIFYINPUT (NUMBERP FMEMB) DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? (NUMBERP) P.RS232.INIT NIL P.FINISHED? (EQUAL TIMEREXPIRED?) P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS (NLSETQ) P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO (STRINGP) MAKECOMMAND NIL MSG.LEN.TO.TIME (IGREATERP) MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS (ZEROP) PLURAL? (IGEQ) BACK.SENTENCE (EQUAL NUMBERP) P.SPEED (IGEQ ILEQ) P.QUIT.READING.MSG NIL BACK.SENTENCE1 (ZEROP ILEQ) BOUT.FROM.STRING (IGREATERP) LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR (EQUAL) START.PROSE.PROCESS (BOUNDP PROCESSP) SYNCH (NUMBERP) CHARS.TO.MINUTES (ILEQ) CHECK.RS232.SETTINGS NIL COPYMSGBYTES (OPENP IGREATERP EQUAL EOSP) BINARYLCASE (IGEQ LEQ) BINLETTERP (IGEQ LEQ ILEQ) P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP (MEMBER) P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH (NUMBERP) IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ (IGREATERP NUMBERP EQUAL LETTERP) P.FIND.ESC.SEQ (P.ENSURE.ESC.SEQ) P.FINISHED.ACTIONS (OPENP) P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW (BOUNDP WINDOWP) PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL EFFECT ACTIVEWINDOW (SET MAPC) ADVISE.FOR.TYPEOUT NIL VERIFYINPUT (DESCRIBE.STATE P.CHUNK) DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? (FRPLACD) P.RS232.INIT (RS232INIT RS232XON\XOFF? RS232BACKGROUND) P.FINISHED? (BLOCK SAYT RETFROM P.FINISHED.ACTIONS) P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY (P.CHUNK P.HELP) P.PROCESS (BLOCK P.CHUNK) P.NO.RS232 (MOVD PRIN1) DEBUGOUTPUT? (GLOBALVARS USEDFREE) PROSEDEBUGINFO (ACTIVEWINDOW CLEARW PRIN1 TAB TERPRI) MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE (P.QUIT.READING.MSG P.HELP P.SPEED) P.SPEED (P.CHUNK P.SEND.ESC.SEQ) P.QUIT.READING.MSG (CLOSEF) BACK.SENTENCE1 (SHOULDNT) BOUT.FROM.STRING (BOUT) LETTERP NIL READ.TTY (PRINT) SAYT (RS232WRITECHARS PROSE.COMMENCE.OUTPUT P.READBUFFER) SETSTATEFIELD NIL START.PROSE.PROCESSES (ON.HOOK OFF.HAND ON.LINE RS232BACKGROUND START.PROSE.PROCESS START.OPERATOR.PROCESS) PHONE.MONITOR (START.PROSE.PROCESS BLOCK WAKE.PROCESS) START.PROSE.PROCESS (USEDFREE) SYNCH (P.SEND.ESC.SEQ) CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS (PRIN1 TAB) COPYMSGBYTES (SETFILEINFO BLOCK SYNCH BOUT P.USER.MESSAGE RS232FORCEOUTPUT PROSE.COMMENCE.OUTPUT P.FINISHED? P.HELP RS232WRITESTRING) BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT (P.SEND.ESC.SEQ RS232CLEARBUFFER) EOSP NIL P.CHECK.GLOBAL.VARS (PRIN1) P.HELP (GLOBALVARS) P.CHUNK (P.SPEED SAYT P.SEND.ESC.SEQ P.CHUNK) P.RESET.TIMER (GLOBALVARS) SIMPLESYNCH (P.SEND.ESC.SEQ) IGNORETIMER NIL P.COMMAND (PRIN1 TERPRI P.RESET) P.ENSURE.ESC.SEQ (PRIN1 TERPRI) P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS (CLOSEF) P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG (\LAFITE.DISPLAY) P.SEND.ESC.SEQ (RS232WRITEBYTE) TEDIT.LIST.OF.OBJECTS ( TEDIT.MAPPIECES) P.SAY.BODY (LA.COPY.MESSAGE.TEXT CLOSEF P.SAY.BODY1 MARKMESSAGE) P.SAY.BODY1 ( SETFILEINFO SHOULDNT P.CHUNK SETFILEPTR COPYMSGBYTES) ACTIVEWINDOW (SET MAPC) PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL CLISP ACTIVEWINDOW (for in do) ADVISE.FOR.TYPEOUT (for in do) VERIFYINPUT (for in always) DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? (for in while collect finally) P.RS232.INIT NIL P.FINISHED? (for first until do finally) P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS (while do) P.NO.RS232 (printout) DEBUGOUTPUT? NIL PROSEDEBUGINFO (for in do printout) MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING (for from to do) LETTERP NIL READ.TTY (for while do) SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS ( printout) COPYMSGBYTES (for as from to while do finally) BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS (printout) P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND (printout) P.ENSURE.ESC.SEQ (for from to while do finally printout) P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX (for in do) P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW (for in do) PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL SPECVARS ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL LOCALVARS ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL APPLY ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT (READVISE UNADVISE) VERIFYINPUT (P.CONTROLLER) DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? (CHARACTER) P.RS232.INIT NIL P.FINISHED? ( COPYMSGBYTES) P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE (P.CONTROLLER) P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS (APPLY* TCONC LIST) P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL ERROR ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS (apply) P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL LOCALFREEVARS ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS (TESTFN) P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL ARGS ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL USERTEMPLATES SHAZAM (CALL .. NIL) OP# (CALL) WINDOWPROP (CALL EVAL PROP EVAL . PPE) perform (MACRO ARGS (PERFORMTRAN ARGS T)) UNINTERRUPTABLY (CALL .. EVAL) WINDOWDELPROP (CALL EVAL PROP EVAL . PPE) PERFORM (MACRO ARGS (PERFORMTRAN ARGS T)) WINDOWADDPROP (CALL EVAL PROP EVAL EVAL . PPE) NIL 0 ACTIVEWINDOW NIL ADVISE.FOR.TYPEOUT NIL VERIFYINPUT NIL DESCRIBE.STATE NIL GETSTATEFIELD NIL P.INDEX.SEQ? NIL P.RS232.INIT NIL P.FINISHED? NIL P.INTERPRET.OUTPUT NIL P.LAST.SENTENCE.SAID NIL P.MESSAGE.QUERY NIL P.PROCESS NIL P.NO.RS232 NIL DEBUGOUTPUT? NIL PROSEDEBUGINFO NIL MAKECOMMAND NIL MSG.LEN.TO.TIME NIL MSG.LEN.TO.SECS NIL MSG.LEN.TO.MINS NIL PLURAL? NIL BACK.SENTENCE NIL P.SPEED NIL P.QUIT.READING.MSG NIL BACK.SENTENCE1 NIL BOUT.FROM.STRING NIL LETTERP NIL READ.TTY NIL SAYT NIL SETSTATEFIELD NIL START.PROSE.PROCESSES NIL PHONE.MONITOR NIL START.PROSE.PROCESS NIL SYNCH NIL CHARS.TO.MINUTES NIL CHECK.RS232.SETTINGS NIL COPYMSGBYTES NIL BINARYLCASE NIL BINLETTERP NIL P.USER.MESSAGE NIL PHONE.INTERRUPT NIL EOSP NIL P.CHECK.GLOBAL.VARS NIL P.HELP NIL P.CHUNK NIL P.RESET.TIMER NIL SIMPLESYNCH NIL IGNORETIMER NIL P.COMMAND NIL P.ENSURE.ESC.SEQ NIL P.FIND.ESC.SEQ NIL P.FINISHED.ACTIONS NIL P.FIX NIL P.FIND.IMAGE.OBJS NIL P.SEARCH.SELECT.AND.SAY.MSG NIL P.SEND.ESC.SEQ NIL TEDIT.LIST.OF.OBJECTS NIL P.SAY.BODY NIL P.SAY.BODY1 NIL ACTIVEWINDOW NIL PROSE.LAFITE.WRITE.PROFILE NIL PROSE.LAFITE.BROWSE NIL NIL )