Slowly begin fixing things
authorAlyssa Rosenzweig <alyssa@backtick.town>
Thu, 23 Jun 2016 14:31:16 +0000 (07:31 -0700)
committerAlyssa Rosenzweig <alyssa@backtick.town>
Thu, 23 Jun 2016 14:31:16 +0000 (07:31 -0700)
src/CPU/instructions/ADC
src/CPU/instructions/AND
src/CPU/instructions/ASL
src/CPU/instructions/BRK
src/CPU/instructions/CMP
src/CPU/instructions/CPX
src/CPU/instructions/CPY
src/CPU/instructions/EOR

index f4cfbf5..3c2663f 100644 (file)
@@ -1,5 +1,5 @@
-R,N,Z
+R,N,Z,A
 set tmp to (join "0x" (A)) + (join "0x" (OP)) + flagC
 set A to item (tmp mod 256) of hex
 set flagC to <tmp > 255>
-set flagV to <tmp > 127 or tmp < -128>
+set flagV to <<(join "0x" (A)) < 128 and (join "0x" (OP)) < 128 and (tmp mod 256) > 128> or <(join "0x" (A)) > 127 and (join "0x" (OP)) > 127 and (tmp mod 256) < 128>>
index efb1312..204a012 100644 (file)
@@ -1,2 +1,2 @@
-R,N,Z
+R,N,Z,A
 set A to join (item (join (letter 1 of A) (letter 1 of OP)) of AND) (item (join (letter 2 of A) (letter 2 of OP)) of AND)
index 629522d..4795934 100644 (file)
@@ -1,3 +1,3 @@
-RW,N,Z
+RW,N,Z,OP
 set flagC to <join "0x" (letter 1 of OP) > 7 >
-set OP to (OP * 2) mod 256
+set OP to (item ( (join "0x" (OP)) * 2) mod 256 of hex)
index d8d3fd7..e1578a6 100644 (file)
@@ -1,3 +1,4 @@
+IMPLIED
 set flagI to 1
 mapper write (256 + S) (PC + 2)
 set S to (S - 1) mod 256
index d0efdea..2b1452b 100644 (file)
@@ -1,2 +1,2 @@
 R, tmp, N, Z, C
-set tmp to A - OP
+set tmp to (join "0x" (A)) - (join "0x" (OP))
index bb943cf..40dd79d 100644 (file)
@@ -1,2 +1,2 @@
 R, tmp, N, Z, C
-set tmp to X - OP
+set tmp to (join "0x" (X)) - (join "0x" (OP))
index fcf2b44..12107ea 100644 (file)
@@ -1,2 +1,2 @@
 R, tmp, N, Z, C
-set tmp to Y - OP
+set tmp to (join "0x" (Y)) - (join "0x" (OP))
index 4ef6c20..f16741b 100644 (file)
@@ -1,2 +1,2 @@
-R,N,Z
+R,N,Z,A
 set A to join (item (join (letter 1 of A) (letter 1 of OP)) of EOR) (item (join (letter 2 of A) (letter 2 of OP)) of EOR)
This page took 0.032048 seconds and 4 git commands to generate.