Werbung
.....
.....
3-3 li9ni-floppy
dlek control
••
Z80 ASSEMBLER 2Z-004C
<9Z-504M-V1.0C>
PAGE 23
01 E44A
02 E44A
03 E44A
04 E44A
05 E44A
06 E44A
07 E44A
08 E44A
09 E44A
10 E44A
11 E44A
12 E44A
13 EUA
14 E.l4A
15 E.!4A
16 E44A
17 E44A
18 E44A
19 E44A
20 E44A
21 E44A
22 E44A
23 E44A
24 E44A
25 E44A
26 E44A
21 e0ca
P
28
0009
p
29
e00A
P
30
ee:;e
P
31 2C!C:C
P
32 2C!DD
P
33 E.!4A
34 E.!4A
35 EUA
36 c=20
P
37
1 :.:13
p
38
CEE9
P
39 E44A
40 E44A
41 E44A
42 E44A
43 E.!4A
44 E.l4A
45 E44A
46 E44A
.
47 E44A
48 E44A
49 E44A
50 E44A
51 E.S4A
52 E44A
53 E44A
54 E44A
55 EUA
56 E44A
57 E44A
58 E44A E3
59 E44B 22FECE
60 EUE COD5E8
----<
MFM Minifloppy control >----
Subroutine
<MB8876l
Call condition
Case of disk initial ize
DRIVE N=IX+0
<0-3>
Case af sequential read
~
urite
Drive n=lX+0
<0-3>
Seetor adrs
=IX+l,2 <0-045FHl
<0-1119 )
R:
TR:
SCR:
DR:
DM:
HS:
.
Byte size
Address
Next track
Next sector
Start track
Start sector
l/O Port address
EQU
EQU
EQU
EQU
EQU
EQU
D8H
09H
OAH
DBH
DCH
ODH
Subroutine werk
=IX+3,4
=IX+5,6
=IX+7
=IX+8
=IX+9
=IX+l0
BPRO:
EQU
BUF:
EQU
BPARA:
EQU
CF00H
l!A3H
BPR0-23
.
:--------< Ercode map >--------
50 :Not ready
41 :Data error
;
!FM
loa~ing
adrs
.
;FD uark
Track 00 err
Write protect err
Seek err
CRC err
Lost data
54 :Unformat
Recode not found
56 :Invalid data
Main roüti ne
OX:
ENT
EX
LD
CALL
<SPl ,HL
<BPARA+21 l ,HL
FOCC~
;FO i/o check
••
Z80 ASSEMBLER 2Z-004C
<9Z-504M-Vl.0C>
PAGE 24
01 E451 C2BAE4
02 E454 llE9CE
03 E457 2101E4
04 E45A 010800
05 E450 EOB0
06 E45F C030E5
07 E462 0021E9CE
08 E466 COA7E5
09 E469 2100CF
10 E46C llCAE4
II E46F 0607
12 E471 4E
13 E472 lA
14 E473 99
15 E474 C2AEE4
16 E477 23
17 E478 13
18 E479 10F6
19 E47B 1188EO
20 E47E OF
21 E47F 1107CF
22 E482 OF
23 E483 210012
24 E486 007505
25 E489 007406
26 E48C 2Al4CF
27 E48F 007503
28 E492 D07404
29 E495 2A1ECF
30 E498 007501
31 E49B 007402
32 E49E
33 E49E CDA7E5
34 E4Al C030E5
35 E4A4
36 E4A4
37 E4A4
38 E4A4 010002
39 E4A7 09
40 E4A8 2114CF
41 E4AB C3FCEC
42 E4AE
43 E4AE C030E5
44 E4BI 11F6EO
45 E4B4 180C
46 E486
47 E486 FE32
48 E4B8 2005
49 E4BA 11B5EO
50 E4BO 1803
51 E48F 1 IE5EO
52 E4C2 31EEl0
53 E4C5 2AFECE
54 E4C8 E3
55 E4C9 C9
56 E4CA
57 E4CA
58 E4CA
59 E4CA 03
60 E4C8 49504C50
JP
NZ,NOTIO
LO
OE,BPARA
LO
HL,BOdi
LO
BC, 11
LOIR
CALL
MOFF
SJP:
LO
IX,BPARA
CALL
BREAO
LO
HL,BPRO
LO
OE,lPLMC
LO
B,7
MCHECK: LO
C, <HU
LO
A, <DEl
CP
c
JP
NZ,MASTE
lNC
HL
INC
OE
OJNZ
MCHECK
LD
DE, IPLM0
RST
3
LD
OE,BPR0+7
RST
3
LD
HL, 1200H
LD
<IX+5l ,L
LD
( l X+6l, H
LD
HL, <BPRO+l 4Hl
LO
<IX+3l ,L
LD
<IX+4l,H
LD
HL,<BPRO+lEH>
LD
<IX+l),L
LD
<IX+2l,H
CALL
BREAO
CALL
MOFF
Exec load file
LO
BC,0200H
EXX
LD
HL,BPR0+14H
JP
EXF
.
MASTE:
CALL
MOFF
LO
DE,ERRMI
JR
ERRTRI
.
ERRTRT: CP
50
JR
NZ,ERRTR0
NOTIO:
LD
DE, IPLM3
JR
ERRTRl
ERRTR0: LO
DE,ERRM0
ERRTRl: LO
SP, 10EEH
LD
HL, < BPARA+21 l
EX
<SP> ,HL
RET
PARAMETER SETTING
PLMC:
DEFB
03H
OEFM
'
IPLPRO'
;' IPL IS LOAOING'
;NAME
; Loading adrs
;BYTE SIZE
;START SECTOR
Oefault code
Size point
; 'NOT MASTER'
; 'MAKE READY FO'
;'FO:LOADING ERROR'
;IPL MASTER FLAG
Werbung
