Mercurial > hg > Members > kono > nitros9-code
comparison level2/modules/w3.asm @ 0:6641a883d6b0
Initial revision
| author | boisy |
|---|---|
| date | Thu, 04 Apr 2002 16:34:12 +0000 |
| parents | |
| children | b3bfa479f8d0 |
comparison
equal
deleted
inserted
replaced
| -1:000000000000 | 0:6641a883d6b0 |
|---|---|
| 1 nam W3 | |
| 2 ttl OS-9 Level 2 Window descriptor | |
| 3 | |
| 4 * Disassembled 98/08/23 22:38:05 by Disasm v1.6 (C) 1988 by RML | |
| 5 | |
| 6 ifp1 | |
| 7 use defsfile | |
| 8 use scfdefs | |
| 9 endc | |
| 10 | |
| 11 tylg set Devic+Objct | |
| 12 atrv set ReEnt+rev | |
| 13 rev set $01 | |
| 14 | |
| 15 * Window descriptor definitions | |
| 16 szx set 40 number of columns for display | |
| 17 szy set 12 number for rows for display | |
| 18 wnum set 3 window number | |
| 19 sty set $FF window type | |
| 20 cpx set 0 x cursor position | |
| 21 cpy set 12 y cursor position | |
| 22 prn1 set Black. foreground color | |
| 23 prn2 set Cyan. background color | |
| 24 prn3 set Blue. border color | |
| 25 | |
| 26 mod eom,name,tylg,atrv,mgrnam,drvnam | |
| 27 | |
| 28 fcb READ.+WRITE. mode byte | |
| 29 fcb $07 extended controller address | |
| 30 fdb A.W3 physical controller address | |
| 31 fcb initsize-*-1 initilization table size | |
| 32 fcb $00 device type:0=scf,1=rbf,2=pipe,3=scf | |
| 33 fcb $00 case:0=up&lower,1=upper only | |
| 34 fcb $01 backspace:0=bsp,1=bsp then sp & bsp | |
| 35 fcb $00 delete:0=bsp over line,1=return | |
| 36 fcb $01 echo:0=no echo | |
| 37 fcb $01 auto line feed:0=off | |
| 38 fcb $00 end of line null count | |
| 39 fcb $00 pause:0=no end of page pause | |
| 40 fcb 24 lines per page | |
| 41 fcb C$BSP backspace character | |
| 42 fcb C$DEL delete line character | |
| 43 fcb C$CR end of record character | |
| 44 fcb C$EOF end of file character | |
| 45 fcb C$RPRT reprint line character | |
| 46 fcb C$RPET duplicate last line character | |
| 47 fcb C$PAUS pause character | |
| 48 fcb C$INTR interrupt character | |
| 49 fcb C$QUIT quit character | |
| 50 fcb C$BSP backspace echo character | |
| 51 fcb C$BELL line overflow character (bell) | |
| 52 fcb $80 init value for dev ctl reg | |
| 53 fcb $00 baud rate | |
| 54 fdb name copy of descriptor name address | |
| 55 fcb $00 acia xon char | |
| 56 fcb $00 acia xoff char | |
| 57 initsize equ * | |
| 58 fcb szx (szx) number of columns for display | |
| 59 fcb szy (szy) number of rows for display | |
| 60 fcb wnum window number | |
| 61 fcb $01 data in rest of descriptor valid | |
| 62 fcb sty (sty) window type | |
| 63 fcb cpx (cpx) x cursor position | |
| 64 fcb cpy (cpy) y cursor position | |
| 65 fcb prn1 (prn1) foreground color | |
| 66 fcb prn2 (prn2) background color | |
| 67 fcb prn3 (prn3) border color | |
| 68 | |
| 69 name fcc /W/ | |
| 70 fcb 176+wnum | |
| 71 mgrnam fcs /SCF/ | |
| 72 drvnam fcs /CC3IO/ | |
| 73 | |
| 74 emod | |
| 75 eom equ * | |
| 76 end | |
| 77 |