Miroirs/waterfoul
1
0
Fork 0
mirror of https://github.com/colby-swandale/waterfoul synced 2025-01-14 08:01:51 +01:00
Code Issues Projects Releases Packages Wiki Activity

fix breaking DAA instruction

Browse source
This commit is contained in:
Colby 2016-07-23 14:57:41 +10:00
parent 94984f5db4
commit 2a1f3a6e30
1 changed files with 25 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

35
lib/waterfoul/instructions/logic.rb
View file

@ -170,19 +170,36 @@ module Waterfoul
def daa
temp_a = @a
if @f & N_FLAG == 0x00
temp_a = temp_a + 0x6 if @f & H_FLAG == H_FLAG || temp_a & 0xF > 0x9
temp_a = temp_a + 0x60 if @f & C_FLAG == C_FLAG || temp_a > 0x9F
else
temp_a = (temp_a - 0x6) & 0xFF if @f & H_FLAG == H_FLAG
temp_a = temp_a - 0x60 if @f & C_FLAG == C_FLAG
if @f & H_FLAG == H_FLAG || (temp_a & 0xF) > 0x9
temp_a = temp_a + 0x06
end
reset_flags H_FLAG
if @f & C_FLAG == C_FLAG || (temp_a > 0x9F)
temp_a = temp_a + 0x60
end
else
if @f & H_FLAG == H_FLAG
temp_a = (temp_a - 0x06) & 0xFF
end
temp_a & 0xFF == 0x00 ? set_z_flag : reset_z_flag
temp_a & 0x100 == 0x100 ? set_c_flag : reset_c_flag
@a = temp_a & 0xFF
if @f & C_FLAG == C_FLAG
temp_a = temp_a - 0x60
end
end
reset_flags H_FLAG, Z_FLAG
if temp_a & 0x100 == 0x100
set_flags C_FLAG
end
temp_a = temp_a & 0xFF
set_flags Z_FLAG if temp_a == 0x0
@a = temp_a
end
def scf