Mercurial > hg > Members > kono > os9 > sbc09
comparison src/os9/level1/pty-dd.asm @ 57:2088fd998865
sbc09 directry clean up
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 23 Jul 2018 16:07:12 +0900 |
parents | os9/level1/pty-dd.asm@7c5379eb406e |
children |
comparison
equal
deleted
inserted
replaced
56:4fa2bdb0c457 | 57:2088fd998865 |
---|---|
1 **************************************** | |
2 * PTY Descriptor module | |
3 * | |
4 * Source by Soren Roug 2001 | |
5 * | |
6 ifp1 | |
7 use defsfile | |
8 endc | |
9 | |
10 nam P1 | |
11 ttl PTY Device Descriptor | |
12 | |
13 mod PEND,PNAM,DEVIC+OBJCT,REENT+1,PMGR,PDRV | |
14 | |
15 fcb READ.+WRITE.+SHARE. | |
16 fcb $FF IOBlock (unused) | |
17 fdb $E000 hardware address | |
18 fcb PNAM-*-1 option byte count | |
19 fcb $0 SCF device | |
20 fcb $0 Case (upper & lower) | |
21 fcb $1 Erase on backspace | |
22 fcb $0 delete (BSE over line) | |
23 fcb $1 echo on | |
24 fcb $1 lf on | |
25 fcb $0 eol null count | |
26 fcb $0 no pause | |
27 fcb 24 lines per page | |
28 fcb $8 backspace | |
29 fcb $18 delete line char | |
30 fcb $0D end of record | |
31 fcb $1b eof | |
32 fcb $04 reprint line char | |
33 fcb $01 duplicate last line char | |
34 fcb $17 pause char | |
35 fcb $03 interrupt char | |
36 fcb $05 quit char | |
37 fcb $08 backspace echo char | |
38 fcb $07 bell | |
39 fcb $00 n/a | |
40 fcb $00 n/a | |
41 fdb pnam offset to name | |
42 fdb $0000 offset to status routine | |
43 pnam fcs "TERM" | |
44 pmgr fcs "SCF" | |
45 pdrv fcs "PTY" | |
46 emod | |
47 pend equ * | |
48 end |