RosettaCodeData/Task/Flow-control-structures/Z80-Assembly/flow-control-structures-2.z80

13 lines
77 B
Z80 Assembly

foo:
push af
bar:
ld a,(hl)
cp 255
jr z,exit
inc hl
jr bar
exit:
pop af
ret