Werbung
••
Z80 ASSEMaLER 2Z-004C
<9Z-504M-Vl.0C>
PAGE 67
01 FIA2
02 F1A2 C054EB
03 FIA5 OA24EB
04 F!A8 09
05 FIA9 220411
06 FIAC
07 FIAC
08 FIAC
09 FIAC CD3E00
10 FIAF
11 FlAF
12
FIAF
13 FIAF CD8DEC
14 FIB2 3AA31 I
15 FISS FE0D
16 FIB7 28F6
17 FIB9 21A311
18 FIBC 1IFI10
1 9 F 1 BF 011 1 00
20 FIC2 EOB0
21 FIC4
22 FIC4
23 FIC4-
24 FIC4 CD0900
25 FIC7 113EF3
26 FICA DF
27
FICB
28 FICB
29 FICB
30 FICB 3AF010
31 FICE FE04
32 FID0 2806
33 FI02 FE05
34 FIQ4 2006
35 FID6
30
36 FID7 30
37 FI08
30
38 FID9 32F010
39 FIDC
40 FIDC
41 FlDC
42 F 1 DC 212E 1 1
43 FIDF 113011
44 F1E2 012000
45 FIES EDB8
46 FlE7 210000
4 7 F 1 EA
22021 1
48 FlED
te9 F!ED
50 FlED
51 FIED
3E02
52 FIEF
323AI
1
.
53 FIF2
21EDFI
54 FIFS
31EE10
55 FIF8 E3
56 FIF9
57 FIF9
58 FIF9
59 FIF9
CDCEF0
60 FIFC
CALL
L000
JP
C,?ERX
EXX
LD
COTAOR> ,HL
Bel 1
CALL
BELL
Input file name
.
QXFN0:
CALL
LO
CP
JR
LD
LO
LD
LDIR
FNINP
A, <SUFF>
00H
Z,QXFN0
l-IL,BUFF
DE.NAME
BC.0011H
Disp 'Set Disk ... •
CALL
NL
LD
JE,JDQCM
RST
3
Atrb
change <700800>
LD
CP
JR
CP
JR
DEC
DEC
ATRC0:
DEC
LD
A,
<ATRBJ
34H
Z
,ATRC0
35H
~Z.')XPRST
A
A
A
:
.HRB>
,A
Parameter
trans
.
QXPRST:
LD
LD
LD
LDDR
LD
LO
HL,
l
12EH
CE, 1130H
BC.0020H
HL,3000H
(
:
:
32H>
,HL
Erro
r
ret
c
r~
;et
.
QXSPST: LO
LO
LO
LO
EX
Wa1
t
'Y'
"',32H
JDCPA)
,A
-'..,QXSPST
5P,10EEH
;
SP
>
,HL
03.06.85
••
Z80 ASSEMBLER 2Z-004C
<9Z-504M-Vl.0C>
PAGE 68
01 FIFC
Read inf
&
data
02 FIFC
03 FIFC CDECEE
04 FIFF
05 FlFF
06 FlFF
07 FlFF C37BFI
08 F202
09 F202
10 F202
11 F202
12 F202
Input file name
13 F202
14 F202
15 F202
16 F202 1190F2
17 F205 FE28
18 F207 2838
19 F209 1119F3
20 F20C FE39
21 F20E 2834
22 F210 1106F2
23 F213 FE2E
24
F215
2820
'Set
d1stination disk'
25
F217
11E7F2
26
F21A FE32
27
F21C
2826
28 F21E l 1F4F2
29 F221
FE35
30
F223
281F
700 BSD file?
31 F225 1109F3
32
F228 FE36
700
BTX file?
33 F22A 2818
34 F22C 11C4F2
35
F22F FE2A
36 F231
2811
37 F233 11 A2F2
Atrb
set
38 F236
FE33
39
F238
280A
40 F23A
1129F3
41 F230 FE00
42 F23F
2803
43 F241 ll88F2
44 F244
45 F244
Lock
&
Secret
46 F244
47 F244
3E06
48 F246
323011
49 F249
C010E0
50 F24C
C05FF2
51 F24F
52 F24F
3A3AI 1
53 F252 lE
54 F253
08
55 F254 F5
56 F255
C00900
57 F258
DF
58 F259 F!
' OK?< Y
I
N> '
59 F25A
l F
60
F25B
08
Iocs flag reset
CALL
IOFRS
Ready
&
uprt check
JP
QCRWCK
;=====================
Error treatment
:=====================
.
QERTRT: ENT
LO
CP
JR
QERT0:
LO
CP
JR
QERl:
LD
CP
JR
QER2:
LO
CP
JR
QER3:
LD
CP
JR
QER4:
LO
CP
JR
GERS:
LD
CP
JR
QER6:
LD
CP
JR
QER7:
LD
CP
JR
QER8:
LO
Motor
off
QERMF:
LD
LD
CALL
CALL
OE,MGNFE
NTFECO
Z ,QERMF
DE,MGBOE
BOSKCO
Z.QERMF
OE,MGWPT
WPRTCO
Z,QERMF
DE,MGNRE
QNTRCO
Z,QERMF
OE,MGNSE
NFSECO
Z,QERMF
OE,MGUFE
UNFMCO
Z,QERMF
OE,MGALE
ALEX
CD
Z,QERMF
DE,MGTME
TMFECD
Z,QERMF
OE,MGBRK
BRKCO
Z,QERMF
DE,MGHOE
A,06H
CQOPA> ,A
QDIOS
HOPCL
LD
A,
<QDCPA>
RRA
RET
C
PUSH
AF
CALL
NL
RST
3
POP
AF
RRA
RET
C
03.06.85
•Not Found err'
Not found err
'Bad disk error'
Bad disk err
'Write protect'
Write protect
'Not ready'
Not
ready
'No
file
space
error'
No file space err
•
Unformat•
Unformat err
'Already exist'
Already exist
'Tao many files'
Tao many fi les err
'Break!•
Break
'Haard error'
Motor off
cmd.
Boot err
CMD QC,QX
err
Werbung
