Fix BIT instruction
authorAlyssa Rosenzweig <alyssa@backtick.town>
Thu, 7 Jul 2016 01:14:50 +0000 (18:14 -0700)
committerAlyssa Rosenzweig <alyssa@backtick.town>
Thu, 7 Jul 2016 01:14:50 +0000 (18:14 -0700)
src/CPU/instructions/BIT

index 7ab9c49..fafe147 100644 (file)
@@ -1,3 +1,5 @@
 R, N, OP
 set flagV to <(OP mod 128) > 63>
-set flagZ to <<(item (join (letter 1 of A) (letter 1 of OP))+1 of AND) = 0> and <(item (join (letter 2 of A) (letter 2 of OP))+1 of AND) = 0>>
+set hA to item A+1 of hex
+set hOP to item OP+1 of hex
+set flagZ to <(16*(item (join "0x" (join (letter 1 of hA) (letter 1 of hOP)))+1 of AND)) + (item (join "0x" (join (letter 2 of hA) (letter 2 of hOP)))+1 of AND) = 0>
This page took 0.022389 seconds and 4 git commands to generate.