Sharp MZ-800 Technical Reference And User's Guide

'·
.~~:.:
**
Z80 ASSEMBLER 2Z-004C
<9Z-504M-V
1. 0C>
PAGE 31
03.06.85
..
Lt.\.1 1--\'....',Lf'llH ~ H :! ~~~''"~ . . : ... \ .~. ~
01 E6CA
;
01 E706 ED5B08ll
LD
DE, ( lU11Ni l
;
Ill.(!]•"- >
02 E6CA ;======~==~================================
02 E70A 87
OR
A
'_. IJ!1• <\ d ~ ~
03 E6CA
;
03 E708 ED52
SBC HL,DE ; OK?
04 E6CA
;
1R12<Static ram board 32KbyteJ
04 E70D C9
RET
05 E6CA
;
Read/Write routine
05 E70E ;
06 E6CA
;
06 E70E ;
sum check
07 E6CA :==========================================
07 E70E ;
08 E6CA
.
08 E70E
:
IN BC=Size
09 1108
p
COMNT:
EQU
1108H 09 E70E
.
DE=Data adr
10 E6CA
:
10 E70E
: EXIT HL=Check sum
11 E6CA
; 1R12 Read sub. 11 E70E
.
12 E6CA
.
12 E70E D9
SUM:
EXX
13 E6CA
1R12RD: ENT
13 E70F 210000
LD
HL,0
;
HL'= Check sum clr
14 E6CA CDDAE6
CALL
1R12R0
14 E712 0E08
LD C,8 ; C' = Loop count
15 E6CD C224EB
JP
NZ,?ERX
15 E714 D9 EXX
16 E6D0
; 16 E715 78
SUMCK!: LD
A,B
; BC = Size
17 E6D0
;
Exec load file
17 E716 81
OR c
18 E6D0
.
18 E717 280E
JR Z,SUMCK2
19 E6D0
EX RAM: ENT 19 E719 lA
LD
A, (QEJ
; DE = Data adrs
20 E6D0 010000
LD
BC,0000H
;
Default code <SRAMJ
20 E71A D9
EXX
21 E6D3 D9
EXX
21 E718 41
LD
B,C
;
BC'
22 E6D4 210211
LD
HL,SIZE
22 E71C 07 SUMCK3: RLCA
23 E6D7 C3FCEC
JP EXF
23 E71D 3001
JR
NC,+3
24 E6DA
.
24 E71F 23 INC
HL ; HL'= Check sum data
25 E6DA
1R12R0: ENT
25 E720 10FA DJNZ
SUMCK3
26 E6DA
:
26 E722 D9 EXX
27 E6DA
; Information sum check
27 E1'23 13 INC DE ; DE
.....
28 E6DA
;
28 E724 BB DEC BC ; BC
.....
29 E6DA CD29E7 CALL CHECK
29 E725 18EE JR SUMCK!
(Jl
30 E6DD C0
RET
NZ
30 E727 D9
SUMCK2: EXX
31 E6DE
31 E728 C9 RET
32 E6DE
Counter reset
32 E729
:
33 E6DE
33 E729 ;
Information's sum check
34 E6DE ED78
,IN
A, <Cl
34 E729
.
35 E6E0
35 E729 ED78 CHECK: IN
A, (Cl
;
Counter reset
36 E6E0
Read information block
<9Bytel
36
E72B 0608
LD
B,08H
;
B=Byte Counter
37 E6E0
37 E72D 1600
LD
D,00H
;
Sum Counter
38 E6E0 0C
INC c
38 E72F 0C INC
c
; C=C+l
39 E6El 210211
LD
HL,SIZE
39 E730 ED78 CKl:
IN
A, <Cl ; C=C+l
40 E6E4 0609
LD
B,09H
40
E732 CS PUSH BC
41 E6E6 EDB2
INIR
41 E733 0608 LD
B,08H
;
Bit Counter
42 E6E8
42 E735
07 CK2: RLCA
43 E6E8
Read
data block
43 E736 3001 JR
NC,+3
44 E6E8
44 E738 14 INC D
45 E6E8
EDSB0211
LD
DE, <SIZEJ
45 E739 10FA DJNZ CK2
46 E6EC 210012
LD
HL,l200H
;
Loading adrs
46 E73B 7A
LD
A,D
47 E6EF 7B
LD
A,E
47
E73C Cl
POP
BC
48 E6F0 B7
OR A
48
E73D 57 LD
D,A
49 E6Fl 2803
JR
Z,+5
49 E73E 10F0 DJNZ CKl
50 E6F3 47
LD
B,A
50 E740 ED78 IN A, <Cl
; C=C+l
51 E6F4 EDB2
INIR 51 E742 0D DEC c
; C=C+0
52 E6F6 0600
LD
B,00H
52 E743 BA CP D
53 E6F8 15
DEC
D 53 E744 C9
RET
54 E6F9 F2F4E6
JP
P,-5
54 E745
55
E6FC
55 E745
!=============================
56 E6FC
Data block's sum check
56 E745
57
E6FC
57 E745
;
1Rl2 Write sub.
58 E6FC 110012
LD
DE,l200H
Data adrs
58 E745
:
59 E6FF ED4B0211
LD
BC, <SIZEl
BCSize
59 E745
!======================~======
60 E703 CD0EE7
CALL
SUM
HLCheck sum
60 E745

Sharp MZ-800 Specifications

General

Brand	Sharp
Model	MZ-800
Category	Desktop
Language	English