Sharp MZ-80B - Page 62

57
0582 C9
RET
0583
0583
3E45
ESET:
LD
A,45H E
0585
CD8C05
CALL
KIN
0588
223300
LD
<EHL>
, HL
0588
C9
RET
058C
058C
058C
329905
KIN: LD
<KINP+l)
,A
058F
CD9805
KIN1: CALL KINP
0592 CD1406 CALL HLHEX
0595 38F8
JR
C,KINl
0597 C9
RET
0598
0598
0598
0598
3EFF KINP:
LD
A,FFH
059A
113F10 LD
DE,8UFER
059D
1~
£
LD <DE>
,A
059E
D5 PUSH DE
059F 13 INC
DE
05AO 216806
LD
HL,COMES
05A3 010700 LD
8C,7
05A6 EDBO LDIR
05A8
[11
POP
DE
05A9 CDB605 CALL
NLMSG
05AC
CDC505
CALL GETL8R
05AF
114610 LD
DE,BUFER+7
0582 1A
LD
A,
<DE>
0583 FEOD
CP
ODH
0585
C9
RET
0586
0586
NLMSG: ENT
0586 CDAB08 CALL NL
0589 C3CD08 JP MSGX
05BC
058C CDAB08
NLPHLS:
CALL NL
05BF
CDD805 CALL
PRTHL
05C2 C3B908
JP PRNTS
05C5
05C5
CDA406
GETL8R: CALL
GETL
05C8 1A
LD
A,
<DE>
05C9 FE08
CP 08H
05CB CA8100
JP
Z,ST
05CE C9
RET
05 CF
05CF CD8605
DSPNAM: CALL NLMSG
-.
05D2
11C110 LD
DE,NAME
.
05D5
C3CD08 JP
MSGX
0508
05D8
05D8
05D8 7C
PRTHL:
LD
A,H
05D9
CDDD05
CALL PRTHX
05DC 7D
LD
A,L
05DD
05DD
F5
PRTHX: PUSH AF
05DE E6FO
AND FOH
05EO
OF
RRCA
05E1 OF
RRCA