RosettaCodeData/Task/Call-a-function/Z80-Assembly/call-a-function-1.z80

12 lines
167 B
Z80 Assembly

PackNibbles:
;input: B = top nibble, C = bottom nibble. Outputs to accumulator.
;usage: B = &0X, C = &0Y, => A = &XY
LD A,B
AND %00001111
RLCA
RLCA
RLCA
RLCA
OR C
RET