RosettaCodeData/Task/Apply-a-callback-to-an-array/Z80-Assembly/apply-a-callback-to-an-array.z80

15 lines
164 B
Z80 Assembly
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Array:
byte &01,&02,&03,&04,&05
Array_End:
foo:
ld hl,Array
ld b,Array_End-Array ;ld b,5
bar:
inc (hl)
inc (hl)
inc (hl)
inc hl ;next entry in array
djnz bar