jgz80: fix "ind" flags and mem_ptr (wz)

Author: rofl0r

z80.c

@@ -578,9 +578,17 @@ static void ini(z80* const z) {
 }
 
 static void ind(z80* const z) {
-  ini(z);
-  z->hl -= 2;
-  z->mem_ptr = z->bc - 2;
+  unsigned tmp = z->port_in(z, z->bc);
+  unsigned tmp2 = tmp + ((z->c - 1) & 0xff);
+  z->mem_ptr = z->bc - 1;
+  wb(z, z->hl, tmp);
+  --z->hl;
+  --z->b;
+  z->f = (f_szpxy[z->b] & ~(1 << pf)) |
+    flag_val(nf, GET_BIT(7, tmp)) |
+    flag_val(pf, parity((tmp2 & 7) ^ z->b)) |
+    flag_val(hf, tmp2 > 255) |
+    flag_val(cf, tmp2 > 255);
 }
 
 static void outi(z80* const z) {