Mercurial > hg > Members > kono > nitros9-code

annotate level2/modules/w5.asm @ 622:18b0ab24a828

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed initsize problem in descriptor
author boisy
date Tue, 03 Dec 2002 16:07:52 +0000
parents 02a8ba2b9092
children d13864ef3317
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
508
02a8ba2b9092 Added headers to most source files, added clock2_bb.asm
boisy
parents: 432
diff changeset
1 ********************************************************************
02a8ba2b9092 Added headers to most source files, added clock2_bb.asm
boisy
parents: 432
diff changeset
2 * W5 - OS-9 Level 2 Window descriptor
02a8ba2b9092 Added headers to most source files, added clock2_bb.asm
boisy
parents: 432
diff changeset
3 *
02a8ba2b9092 Added headers to most source files, added clock2_bb.asm
boisy
parents: 432
diff changeset
4 * $Id$
02a8ba2b9092 Added headers to most source files, added clock2_bb.asm
boisy
parents: 432
diff changeset
5 *
02a8ba2b9092 Added headers to most source files, added clock2_bb.asm
boisy
parents: 432
diff changeset
6 * Ed. Comments Who YY/MM/DD
02a8ba2b9092 Added headers to most source files, added clock2_bb.asm
boisy
parents: 432
diff changeset
7 * ------------------------------------------------------------------
02a8ba2b9092 Added headers to most source files, added clock2_bb.asm
boisy
parents: 432
diff changeset
8
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
9 nam W5
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
10 ttl OS-9 Level 2 Window descriptor
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
11
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
12 * Disassembled 98/08/23 22:38:05 by Disasm v1.6 (C) 1988 by RML
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
13
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
14 ifp1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
15 use defsfile
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
16 endc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
17
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
18 tylg set Devic+Objct
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
19 atrv set ReEnt+rev
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
20 rev set $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
21
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
22 * Window descriptor definitions
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
23 szx set 19 number of columns for display
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
24 szy set 11 number for rows for display
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
25 wnum set 5 window number
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
26 sty set $FF window type
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
27 cpx set 61 x cursor position
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
28 cpy set 0 y cursor position
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
29 prn1 set Black. foreground color
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
30 prn2 set Cyan. background color
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
31 prn3 set Red. border color
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
32
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
33 mod eom,name,tylg,atrv,mgrnam,drvnam
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
34
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
35 fcb READ.+WRITE. mode byte
410
9ed77eeace37 All floppy disk descriptor modules now made with dx.asm and different targets
boisy
parents: 372
diff changeset
36 fcb HW.Page extended controller address
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
37 fdb A.W5 physical controller address
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
38 fcb initsize-*-1 initilization table size
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
39 fcb $00 device type:0=scf,1=rbf,2=pipe,3=scf
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
40 fcb $00 case:0=up&lower,1=upper only
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
41 fcb $01 backspace:0=bsp,1=bsp then sp & bsp
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
42 fcb $00 delete:0=bsp over line,1=return
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
43 fcb $01 echo:0=no echo
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
44 fcb $01 auto line feed:0=off
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
45 fcb $00 end of line null count
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
46 fcb $00 pause:0=no end of page pause
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
47 fcb 24 lines per page
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
48 fcb C$BSP backspace character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
49 fcb C$DEL delete line character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
50 fcb C$CR end of record character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
51 fcb C$EOF end of file character
432
03c6934e5d62 Window descriptors set up for enhanced SCF command line edition for duplicate
boisy
parents: 410
diff changeset
52 fcb C$RARR reprint line character
03c6934e5d62 Window descriptors set up for enhanced SCF command line edition for duplicate
boisy
parents: 410
diff changeset
53 fcb C$SHRARR duplicate last line character
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
54 fcb C$PAUS pause character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
55 fcb C$INTR interrupt character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
56 fcb C$QUIT quit character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
57 fcb C$BSP backspace echo character
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
58 fcb C$BELL line overflow character (bell)
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
59 fcb $80 init value for dev ctl reg
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
60 fcb $00 baud rate
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
61 fdb name copy of descriptor name address
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
62 fcb $00 acia xon char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
63 fcb $00 acia xoff char
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
64 fcb szx (szx) number of columns for display
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
65 fcb szy (szy) number of rows for display
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
66 fcb wnum window number
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
67 fcb $01 data in rest of descriptor valid
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
68 fcb sty (sty) window type
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
69 fcb cpx (cpx) x cursor position
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
70 fcb cpy (cpy) y cursor position
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
71 fcb prn1 (prn1) foreground color
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
72 fcb prn2 (prn2) background color
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
73 fcb prn3 (prn3) border color
622
18b0ab24a828 Fixed initsize problem in descriptor
boisy
parents: 508
diff changeset
74 initsize equ *
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
75
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
76 name fcc /W/
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
77 fcb 176+wnum
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
78 mgrnam fcs /SCF/
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
79 drvnam fcs /CC3IO/
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
80
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
81 emod
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
82 eom equ *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
83 end
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
84