Memotech Limited MTX 500 Specifications Page 85

  • Download
  • Add to my manuals
  • Print
  • Page
    / 88
  • Table of contents
  • BOOKMARKS
  • Rated. / 5. Based on customer reviews
Page view 84
INBIT1: JR NC,INBIT 1
INBIT2: DEC A
JP C,INBIT2 ;A bit faster
DI
CP (IX+0) ;IX = MIDVAL
RET
;
;
;
OUTBIT::
CALL BLIP ;Preserves carry flag
LD A,0 ;Preserves carry flag
JR C,HIGH
;
;
;
;Both LOW and HIGH entered with A = 0
;
LOW:: JR NC,LOW
OUT (CASPORT),A
L0W1: JR C,LOW1
INC A
OUT (CASPORT),A
RET
;
;
;
HIGH:: JR C,HIGH
HIGH1: JR NC,HIGH1
OUT (CASPORT),A
HIGH2: JR C,HIGH2
HIGH3: JR NC,HIGH3
INC A
OUT (CASPORT),A
RET
;
;
;
INBYTE:: LD B,B
INBY1: CALL INBIT
RR C
DJNZ INBY1
RET
;
;
;
OUTBYTE:: LD B,B
OUTBY1: RR C
CALL OUTBIT
DJNZ OUTBY1
RET
;
Page view 84
1 2 ... 80 81 82 83 84 85 86 87 88

Comments to this Manuals

No comments