Routines
Prev: 66F9 Up: Map Next: 672D
6700: Routine at 6700
Used by the routines at 672E and 678C.
6700 LD DE,$7802 DE=7802.
6703 LD B,$10 B=10.
6705 LD A,(DE) A=*DE.
6706 INC E Increment E by one.
6707 LD C,$04 C=04.
6709 CP $0F Jump to 6722 if A is lower than 0F.
670B JR C,$6722
670D CP $90 Jump to 6722 if A is higher than 90.
670F JR NC,$6722
6711 INC C Increment C by one.
6712 CP $3D Jump to 6722 if A is lower than 3D.
6714 JR C,$6722
6716 INC C Increment C by one.
6717 CP $51 Jump to 6722 if A is lower than 51.
6719 JR C,$6722
671B LD C,$02 C=02.
671D CP $6F Jump to 6722 if A is lower than 6F.
671F JR C,$6722
6721 INC C Increment C by one.
6722 LD (HL),C Write C to *HL.
6723 LD A,$20 A=20.
6725 ADD A,L A+=L.
6726 LD L,A L=A.
6727 ADC A,H A+=H.
6728 SUB L A-=L.
6729 LD H,A H=A.
672A DJNZ $6705 Decrease counter by one and loop back to 6705 until counter is zero.
672C RET Return.
Prev: 66F9 Up: Map Next: 672D