view os9/level1/pty-dd.asm @ 108:014002970940

getc worked
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 30 Dec 2018 08:27:58 +0900
parents f20bf9874697
children
line wrap: on
line source

****************************************
* PTY Descriptor module
*
* Source by Soren Roug 2001
*
         ifp1
         use defsfile
         endc

         nam P1
         ttl PTY Device Descriptor

         mod PEND,PNAM,DEVIC+OBJCT,REENT+1,PMGR,PDRV

         fcb READ.+WRITE.+SHARE.
         fcb $FF IOBlock (unused)
         fdb $E000 hardware address
         fcb PNAM-*-1 option byte count
         fcb $0 SCF device
         fcb $0 Case (upper & lower)
         fcb $1 Erase on backspace
         fcb $0 delete (BSE over line)
         fcb $1 echo on
         fcb $1 lf on
         fcb $0 eol null count
         fcb $0 no pause
         fcb 24 lines per page
         fcb $8 backspace
         fcb $18 delete line char
         fcb $0D end of record
         fcb $04 eof    cntl d
         fcb $12 reprint line char
         fcb $01 duplicate last line char
         fcb $17 pause char
         fcb $03 interrupt char
         fcb $05 quit char
         fcb $08 backspace echo char
         fcb $07 bell
         fcb $00 n/a
         fcb $00 n/a
         fdb pnam offset to name
         fdb $0000 offset to status routine
pnam     fcs "TERM"
pmgr     fcs "SCF"
pdrv     fcs "PTY"
         emod
pend     equ *
         end