Mercurial > hg > Members > kono > nitros9-code

annotate 3rdparty/drivers/disto/rampak.asm @ 1963:4b599621c682

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Moved to using new boot_common/hardware dependent boot system
author afra
date Wed, 04 Jan 2006 14:20:25 +0000
parents 71cac8cb5027
children f91dc5c378f6
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
352
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
1 ********************************************************************
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
2 * RamPak - Disto RAM Pak device driver
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
3 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
4 * $Id$
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
5 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
6 * Ed. Comments Who YY/MM/DD
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
7 * ------------------------------------------------------------------
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
8 * 2 Original Disto version by Brian Lantz BL
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
9 * 3 Removed copyright info, removed useless BGP 98/10/20
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
10 * register saves, optimized, changed port
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
11 * address in descriptor to hold port address
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
12 * of RAM pak instead of MPI.
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
13
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
14 nam RamPak
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
15 ttl Disto RAM Pak device driver
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
16
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
17 * Disassembled 98/04/20 09:57:05 by Disasm v1.5 (C) 1988 by RML
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
18
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
19 ifp1
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
20 use defsfile
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
21 use rbfdefs
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
22 endc
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
23
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
24 tylg set Drivr+Objct
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
25 atrv set ReEnt+rev
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
26 rev set $01
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
27 edition set 3
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
28
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
29 mod eom,name,tylg,atrv,start,size
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
30
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
31 * RBF Data Area
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
32 rmb 129
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
33
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
34 * Free for driver use
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
35 ORGSlot rmb 1
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
36
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
37 size equ .
1181
d05758ec0de9 Improved source slightly
boisy
parents: 352
diff changeset
38
d05758ec0de9 Improved source slightly
boisy
parents: 352
diff changeset
39 fcb DIR.+SHARE.+PEXEC.+PREAD.+PWRIT.+EXEC.+UPDAT.
352
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
40
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
41 name fcs /RamPak/
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
42 fcb edition
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
43 * fcc /(C) 1985 BRIAN A. LANTZ/
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
44 * fcb $0D
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
45 * fcc /LICENSED TO DISTO/
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
46
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
47 start lbra Init
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
48 lbra Read
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
49 lbra Write
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
50 lbra GetStat
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
51 lbra SetStat
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
52 lbra Term
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
53
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
54 * Init
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
55 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
56 * Entry:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
57 * Y = address of device descriptor
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
58 * U = address of device memory area
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
59 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
60 * Exit:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
61 * CC = carry set on error
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
62 * B = error code
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
63 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
64 Init ldd #($FF*256)+3
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
65 stb V.NDRV,u
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
66 leax DRVBEG,u
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
67 * For each B, compute total sectors...
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
68 Init010 sta V.TRAK,x
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
69 pshs b,a
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
70 lda IT.CYL+1,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
71 ldb IT.SCT+1,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
72 mul
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
73 std DD.TOT+1,x
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
74 puls b,a
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
75 leax DRVMEM,x
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
76 decb
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
77 bne Init010
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
78 rts
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
79
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
80 * Write
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
81 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
82 * Entry:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
83 * B = MSB of the disk's LSN
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
84 * X = LSB of the disk's LSN
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
85 * Y = address of path descriptor
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
86 * U = address of device memory area
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
87 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
88 * Exit:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
89 * CC = carry set on error
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
90 * B = error code
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
91 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
92 Write pshs cc
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
93 bsr SlctSlot
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
94 WritLoop lda ,x+
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
95 stb ,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
96 sta 3,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
97 incb
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
98 bne WritLoop
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
99 bra RestSlot
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
100
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
101 * Read
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
102 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
103 * Entry:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
104 * B = MSB of the disk's LSN
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
105 * X = LSB of the disk's LSN
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
106 * Y = address of path descriptor
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
107 * U = address of device memory area
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
108 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
109 * Exit:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
110 * CC = carry set on error
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
111 * B = error code
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
112 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
113 Read cmpx #$0000
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
114 beq ReadLSN0
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
115
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
116 ReadSect pshs cc
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
117 bsr SlctSlot
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
118 ReadLoop stb ,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
119 lda 3,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
120 sta ,x+
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
121 incb
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
122 bne ReadLoop
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
123
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
124 * Restore the original MPI slot value we saved off
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
125 RestSlot lda >ORGSlot,u
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
126 sta >MPI.Slct
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
127 puls cc
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
128 clrb
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
129 rts
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
130
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
131 * Read LSN0 into our path descriptor
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
132 ReadLSN0 pshs y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
133 bsr ReadSect
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
134 puls y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
135 ldx PD.BUF,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
136 lda <PD.DRV,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
137 leay DRVBEG,u
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
138 ldb #DRVMEM
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
139 mul
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
140 leay d,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
141 ldb #DD.SIZ-1
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
142 LSN0Loop lda b,x
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
143 sta b,y
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
144 decb
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
145 bne LSN0Loop
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
146 rts
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
147
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
148
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
149 * This routine selects the MPI slot
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
150 * Exit: X = address of path descriptor buffer
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
151 SlctSlot orcc #IntMasks mask interrupts
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
152 lda >MPI.Slct get current selected slot
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
153 sta >ORGSlot,u save off
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
154 lda PD.DRV,y get drive no.
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
155 ldb #$11
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
156 mul multiply drive no. times $11
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
157 stb >MPI.Slct set new MPI slot no.
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
158 tfr x,d
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
159 ldx PD.BUF,y load X with address of path buffer
1900
71cac8cb5027 Driver now properly accesses hardware registers via Y instead of embedding
boisy
parents: 1181
diff changeset
160 ldy V.PORT,u get HW addr
71cac8cb5027 Driver now properly accesses hardware registers via Y instead of embedding
boisy
parents: 1181
diff changeset
161 sta 2,y write LSN hi byte to PAK
71cac8cb5027 Driver now properly accesses hardware registers via Y instead of embedding
boisy
parents: 1181
diff changeset
162 stb 1,y write LSN lo byte to PAK
352
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
163 clrb
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
164 rts
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
165
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
166 * GetStat
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
167 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
168 * Entry:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
169 * A = function code
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
170 * Y = address of path descriptor
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
171 * U = address of device memory area
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
172 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
173 * Exit:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
174 * CC = carry set on error
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
175 * B = error code
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
176 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
177 GetStat comb
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
178 ldb #E$UnkSvc
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
179 rts
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
180
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
181 SetStat
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
182 * Term
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
183 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
184 * Entry:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
185 * U = address of device memory area
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
186 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
187 * Exit:
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
188 * CC = carry set on error
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
189 * B = error code
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
190 *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
191 Term clrb
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
192 rts
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
193
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
194 emod
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
195 eom equ *
a9169e6c5f3f Moved rampak driver and descriptors from rampak/ dir
boisy
parents:
diff changeset
196 end