l_long_store_mhl.asm
bitfixer_bitfixer/dg/z88dk/libsrc/_DEVELOPMENT/l/z80/long/l_long_store_mhl.asm

SECTION code_clib
SECTION code_l

PUBLIC l_long_store_mhl

l_long_store_mhl:

   ; store long to address in hl
   ;
   ; enter : debc = long
   ;
   ; exit  : *hl  = debc
   ;          hl += 3
   ;
   ; uses  : hl
   
   ld (hl),c
   inc hl
   ld (hl),b
   inc hl
   ld (hl),e
   inc hl
   ld (hl),d
   
   ret
