; --------------- Debugging stuff ---------------
; Print a line with the 8080/Z80 registers
-; TODO: y:
-
printregs:
mov temp,z_flags
rcall printflags
rcall printhexw
printstring " "
movw xl,z_pcl
- mem_read
+ lcall dram_read_pp
rcall printhex
printstring " "
- adiw x,1
- mem_read
+ lcall dram_read_pp
rcall printhex
printstring " "
- adiw x,1
- mem_read
+ lcall dram_read
rcall printhex
printstring " "
#if EM_Z80
ldd temp,y+oz_f2
rcall printflags
- printstring " A'="
+ printstring " a'="
ldd temp,y+oz_a2
rcall printhex
- printstring " BC'="
+ printstring " bc'="
ldd temp2,y+oz_b2
ldd temp,y+oz_c2
rcall printhexw
- printstring " DE'="
+ printstring " de'="
ldd temp2,y+oz_d2
ldd temp,y+oz_e2
rcall printhexw
- printstring " HL'="
+ printstring " hl'="
ldd temp2,y+oz_h2
ldd temp,y+oz_l2
rcall printhexw