(FILECREATED " 4-Jan-85 17:22:18" ("compiled on " {ERIS}READNUMBER.;1) "20-Dec-84 12:07:22" recompiled changes: RNUMBER CREATE.NUMBERPAD.READER NUMBER.READER.HANDLER NUMBERPAD.HELDFN in "INTERLISP-D 20-Dec-84 ..." dated "20-Dec-84 12:24:52") (FILECREATED " 4-Jan-85 17:21:11" {ERIS}READNUMBER.;1 12404 changes to: (FNS RNUMBER CREATE.NUMBERPAD.READER NUMBER.READER.HANDLER NUMBERPAD.HELDFN) (VARS READNUMBERCOMS RNUMBER.CLEAR.BITMAP RNUMBER.ABORT.BITMAP) previous date: "24-Aug-84 09:30:16" {ERIS}HARMONY>LIBRARY>READNUMBER.;1) \READNUMBER.FLASHAREA D1 (I 4 WIN I 3 HGHT I 2 WDTH I 1 BTM I 0 LFT) 1hddD@ABCggnÿÿ l< hddD@ABCggnÿÿ (56Q BKBITBLT 31Q DISMISS 24Q BKBITBLT) (47Q INVERT 44Q TEXTURE 15Q INVERT 12Q TEXTURE) NIL RNUMBER D1 (I 4 INCLUDEABORTFLG I 3 DIGITFONT I 2 MSGFONT I 1 POSITION I 0 MSG) @ABCD  (13Q NUMBERPAD.READ 10Q CREATE.NUMBERPAD.READER) NIL () NUMBERPAD.READA0001 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 NUMBERPAD/READER F 1 RESETVARSLST F 2 RESETY) 8gPhP hQc¿P ¿Pg «P ¿ld °íPg ci(62Q GETWINDOWUSERPROP 51Q DISMISS 43Q TOTOPW 36Q PUTWINDOWPROP 26Q DISPLAY/NUMBER/READER/TOTAL 12Q OPENW) (57Q TOTAL 33Q FINISHEDFLG 2 CLOSEW) () NUMBERPAD.READ D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 0 NUMBERPAD/READER F 3 LISPXHIST F 4 RESETVARSLST) -@gj S!Tog ‘h‚gZ J“I(50Q ERROR! 43Q RESETRESTORE 31Q NUMBERPAD.READA0001 12Q SPAWN.MOUSE 7 PUTWINDOWPROP) (37Q ERROR 26Q INTERNAL 3 TOTAL) ( 23Q (DUMMY.FOR.ERRORSET)) CREATE.NUMBERPAD.READERA0001 D1 (NAME ERRORSET P 15Q X P 14Q RMARG P 11Q FONTHEIGHT P 10Q TOTALWIDTH P 7 NUMBERPAD P 6 TOTALREGION P 5 PADLEFT P 4 READERWIDTH P 3 WIN P 2 MSGFONT P 1 DIGITFONT P 0 NUMBER/READER/MAXDIGITS F 16Q MSG F 17Q DIGITFONT F 20Q MSGFONT F 21Q INCLUDEABORTFLG F 22Q RNUMBER.ABORT.BITMAP F 23Q RNUMBER.CLEAR.BITMAP F 24Q WPOSITION F 25Q MACROY) ÁlWµ gl g W µ gl g “ `gW"²!JÈ_l ñlOñ—W$W&hˆoƒoo _¿dO¿dl¿di ¿dI¿dg¿dg¿dl¿dg ¿jdnÿdh_¿dO ¿dÉ IÈlØ¿_¿W(HkØl0I Ú_l Ø]O ÈØ\ Wµ=jO ÈØ hdi »W²dJK ¿K ¿Wd²N¿hK  W°