Mercurial > hg > Members > kono > nitros9-code

annotate 3rdparty/drivers/flashpak/flashpak.asm @ 52:3f0f7b4e5111

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added Cloud-9 FlashPak driver (untested, no hardware yet)
author boisy
date Sat, 20 Apr 2002 15:04:53 +0000
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
52
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
1 ********************************************************************
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
2 * FlashPak - Cloud-9 Flash Pak device driver
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
3 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
4 * $Id$
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
5 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
6 * Ed. Comments Who YY/MM/DD
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
7 * ------------------------------------------------------------------
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
8 * 1 Original version BGP 02/04/15
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
9
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
10 nam FlashPak
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
11 ttl Cloud-9 Flash Pak device driver
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
12
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
13 ifp1
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
14 use defsfile
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
15 endc
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
16
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
17 tylg set Drivr+Objct
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
18 atrv set ReEnt+rev
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
19 rev set $01
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
20 edition set 1
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
21
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
22 MSB set 0
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
23 LSB set 1
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
24 DATA set 2
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
25
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
26 mod eom,name,tylg,atrv,start,size
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
27
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
28 * RBF Data Area
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
29 rmb 129
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
30
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
31 * Free for driver use
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
32 size equ .
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
33
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
34 name fcs /FlashPak/
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
35 fcb edition
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
36
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
37 start lbra Init
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
38 lbra Read
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
39 lbra Write
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
40 lbra GetStat
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
41 lbra SetStat
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
42 lbra Term
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
43
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
44 * Init
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
45 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
46 * Entry:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
47 * Y = address of device descriptor
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
48 * U = address of device memory area
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
49 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
50 * Exit:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
51 * CC = carry set on error
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
52 * B = error code
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
53 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
54 Init ldd #($FF*256)+1
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
55 stb V.NDRV,u
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
56 leax DRVBEG,u
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
57 * For each B, compute total sectors...
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
58 Init010 sta V.TRAK,x
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
59 pshs b,a
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
60 lda IT.CYL+1,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
61 ldb IT.SCT+1,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
62 mul
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
63 std DD.TOT+1,x
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
64 puls b,a
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
65 leax DRVMEM,x
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
66 decb
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
67 bne Init010
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
68 rts
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
69
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
70 * Write
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
71 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
72 * Entry:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
73 * B = MSB of the disk's LSN
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
74 * X = LSB of the disk's LSN
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
75 * Y = address of path descriptor
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
76 * U = address of device memory area
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
77 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
78 * Exit:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
79 * CC = carry set on error
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
80 * B = error code
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
81 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
82 Write leas -1,s make room on the stack
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
83 ldy V.PORT,u
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
84 tfr x,d
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
85 sta MSB,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
86 stb LSB,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
87 ldx PD.BUF,y load X with address of path buffer
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
88 clrb
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
89 WritLoop lda ,x+
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
90 sta DATA,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
91 sta ,s
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
92 WritVfy lda DATA,y verify loop is here
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
93 cmpa ,s
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
94 bne WritVfy
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
95 incb
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
96 bne WritLoop
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
97 leas 1,s restore stack
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
98 rts
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
99
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
100 * Read
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
101 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
102 * Entry:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
103 * B = MSB of the disk's LSN
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
104 * X = LSB of the disk's LSN
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
105 * Y = address of path descriptor
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
106 * U = address of device memory area
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
107 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
108 * Exit:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
109 * CC = carry set on error
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
110 * B = error code
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
111 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
112 Read cmpx #$0000
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
113 beq ReadLSN0
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
114
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
115 ReadSect ldy V.PORT,u
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
116 tfr x,d
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
117 sta MSB,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
118 stb LSB,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
119 ldx PD.BUF,y load X with address of path buffer
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
120 clrb
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
121 ReadLoop lda DATA,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
122 sta ,x+
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
123 incb
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
124 bne ReadLoop
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
125 rts
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
126
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
127
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
128 * Read LSN0 into our path descriptor
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
129 ReadLSN0 pshs y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
130 bsr ReadSect
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
131 puls y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
132 ldx PD.BUF,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
133 lda <PD.DRV,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
134 leay DRVBEG,u
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
135 ldb #DRVMEM
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
136 mul
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
137 leay d,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
138 ldb #DD.SIZ-1
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
139 LSN0Loop lda b,x
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
140 sta b,y
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
141 decb
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
142 bne LSN0Loop
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
143 rts
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
144
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
145
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
146 * GetStat
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
147 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
148 * Entry:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
149 * A = function code
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
150 * Y = address of path descriptor
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
151 * U = address of device memory area
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
152 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
153 * Exit:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
154 * CC = carry set on error
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
155 * B = error code
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
156 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
157 GetStat comb
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
158 ldb #E$UnkSvc
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
159 rts
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
160
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
161 * SetStat
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
162 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
163 * Entry:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
164 * A = function code
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
165 * Y = address of path descriptor
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
166 * U = address of device memory area
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
167 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
168 * Exit:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
169 * CC = carry set on error
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
170 * B = error code
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
171 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
172 SetStat
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
173
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
174 * Term
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
175 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
176 * Entry:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
177 * U = address of device memory area
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
178 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
179 * Exit:
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
180 * CC = carry set on error
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
181 * B = error code
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
182 *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
183 Term clrb
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
184 rts
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
185
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
186 emod
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
187 eom equ *
3f0f7b4e5111 Added Cloud-9 FlashPak driver (untested, no hardware yet)
boisy
parents:
diff changeset
188 end