Add small performance test to compute Z80 actual speed.

2023-10-22 11:41:16 +02:00 · 2023-10-22 11:41:16 +02:00 · 1156e03305
commit 1156e03305
parent a80c52bedd
1 changed files with 17 additions and 0 deletions
--- a/src/performance_test.asm
+++ b/src/performance_test.asm
@ -0,0 +1,17 @@
+SECTION code
+
+PUBLIC _performance_test
+_performance_test:
+    in  a,($A0)
+
+    ld  de,$0100
+loop:
+    ld  a,($d000)           ; 13
+
+    dec de                  ; 6
+    ld  a,d                 ; 4
+    or  e                   ; 4
+    jp  nz,loop             ; 10
+
+    jp  _performance_test
+