Class: Cpu
- Inherits:
-
Object
- Object
- Cpu
- Defined in:
- lib/cpu.rb
Instance Attribute Summary collapse
-
#cpu ⇒ Object
Returns the value of attribute cpu.
-
#ppu ⇒ Object
Returns the value of attribute ppu.
-
#ram ⇒ Object
Returns the value of attribute ram.
Instance Method Summary collapse
- #adc(zone, arg1, arg2) ⇒ Object
- #and(zone, arg1, arg2) ⇒ Object
- #asl(zone, arg1, arg2) ⇒ Object
- #bcc(zone, arg1, arg2) ⇒ Object
- #bcs(zone, arg1, arg2) ⇒ Object
- #beq(zone, arg1, arg2) ⇒ Object
- #bit(zone, arg1, arg2) ⇒ Object
- #bmi(zone, arg1, arg2) ⇒ Object
- #bne(zone, arg1, arg2) ⇒ Object
- #bpl(zone, arg1, arg2) ⇒ Object
- #brk(x, y, z) ⇒ Object
- #bvc(zone, arg1, arg2) ⇒ Object
- #bvs(zone, arg1, arg2) ⇒ Object
- #clc(x, y, z) ⇒ Object
- #cld(x, y, z) ⇒ Object
- #cli(x, y, z) ⇒ Object
- #clv(x, y, z) ⇒ Object
- #cmp(zone, arg1, arg2) ⇒ Object
- #cpx(zone, arg1, arg2) ⇒ Object
- #cpy(zone, arg1, arg2) ⇒ Object
- #dec(zone, arg1, arg2) ⇒ Object
- #dex(x, y, z) ⇒ Object
- #dey(x, y, z) ⇒ Object
- #eor(zone, arg1, arg2) ⇒ Object
- #inc(zone, arg1, arg2) ⇒ Object
-
#initialize(rom) ⇒ Cpu
constructor
A new instance of Cpu.
- #inx(x, y, z) ⇒ Object
- #iny(x, y, z) ⇒ Object
- #jmp(zone, arg1, arg2) ⇒ Object
-
#jsr(zone, arg1, arg2) ⇒ Object
Rappel : dans 0xC0E1 , C0 est l’octet de poids fort et E1 celui de poids faible.
- #lda(zone, arg1, arg2) ⇒ Object
- #ldx(zone, arg1, arg2) ⇒ Object
- #ldy(zone, arg1, arg2) ⇒ Object
- #lsr(zone, arg1, arg2) ⇒ Object
- #map_rom(rom) ⇒ Object
- #nmi_interrupt ⇒ Object
- #nop(x, y, z) ⇒ Object
- #ora(zone, arg1, arg2) ⇒ Object
- #pha(x, y, z) ⇒ Object
- #php(x, y, z) ⇒ Object
- #pla(x, y, z) ⇒ Object
- #plp(x, y, z) ⇒ Object
- #read(adresse) ⇒ Object
- #reset_rom ⇒ Object
- #rol(zone, arg1, arg2) ⇒ Object
- #ror(zone, arg1, arg2) ⇒ Object
- #rotate_left(byte) ⇒ Object
- #rotate_right(byte) ⇒ Object
- #rti(zone, arg1, arg2) ⇒ Object
- #rts(zone, arg1, arg2) ⇒ Object
- #sbc(zone, arg1, arg2) ⇒ Object
- #sec(x, y, z) ⇒ Object
- #sed(x, y, z) ⇒ Object
- #sei(x, y, z) ⇒ Object
- #set_overflow(byte) ⇒ Object
- #sign_zero_carry(byte) ⇒ Object
-
#sign_zero_clear_or_set(byte) ⇒ Object
Clears or sets flag.
-
#sign_zero_set(byte) ⇒ Object
Only sets flag ( in case of load or store instruction ).
-
#sign_zero_set_switch(byte) ⇒ Object
S_z_set, mais avec le petit bonus “Carry” pour les opcodes de switch !.
- #sta(zone, arg1, arg2) ⇒ Object
- #stx(zone, arg1, arg2) ⇒ Object
- #sty(zone, arg1, arg2) ⇒ Object
- #tax(x, y, z) ⇒ Object
- #tay(x, y, z) ⇒ Object
- #tsx(x, y, z) ⇒ Object
- #txa(x, y, z) ⇒ Object
- #txs(x, y, z) ⇒ Object
- #tya(x, y, z) ⇒ Object
- #write(adresse, value) ⇒ Object
Constructor Details
#initialize(rom) ⇒ Cpu
Returns a new instance of Cpu.
6 7 8 9 10 11 12 |
# File 'lib/cpu.rb', line 6 def initialize(rom) @ram = [0]*100000 @ppu = Ppu.new #@oam = Oam.new prg_start_index = map_rom(rom) @cpu = {:Y=>0,:X=>0,:A=>0,:S=>255,:P=>0,:compteur=>prg_start_index,:compteur_new=>prg_start_index} end |
Instance Attribute Details
#cpu ⇒ Object
Returns the value of attribute cpu.
3 4 5 |
# File 'lib/cpu.rb', line 3 def cpu @cpu end |
#ppu ⇒ Object
Returns the value of attribute ppu.
4 5 6 |
# File 'lib/cpu.rb', line 4 def ppu @ppu end |
#ram ⇒ Object
Returns the value of attribute ram.
2 3 4 |
# File 'lib/cpu.rb', line 2 def ram @ram end |
Instance Method Details
#adc(zone, arg1, arg2) ⇒ Object
327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 |
# File 'lib/cpu.rb', line 327 def adc(zone,arg1,arg2) opcode = zone.to_s(16).upcase accumulator_temp = @cpu[:A] @cpu[:P].bit?(0) == 1 ? valeur_carry = 1 : valeur_carry = 0 @cpu[:A] = @cpu[:A].int8_plus case opcode when "69" then arg1.int8_plus(valeur_carry) when "65" then read(arg1).int8_plus(valeur_carry) when "75" then read(arg1+@cpu[:X]).int8_plus(valeur_carry) when "6D" then read(arg1+(arg2*256)).int8_plus(valeur_carry) when "7D" then read(arg1+(arg2*256)+@cpu[:X]).int8_plus(valeur_carry) when "79" then read(arg1+(arg2*256)+@cpu[:Y]).int8_plus(valeur_carry) when "61" then read(read(arg1+@cpu[:X]) + (read(arg1+@cpu[:X]+1)*256)).int8_plus(valeur_carry) when "71" then read(read(arg1)+(read(arg1+1)*256)+@cpu[:Y]).int8_plus(valeur_carry) end @cpu[:P] = @cpu[:P].clear_bit(0) #clear the carry set_overflow(accumulator_temp) sign_zero_clear_or_set(@cpu[:A]) end |
#and(zone, arg1, arg2) ⇒ Object
155 156 157 158 159 160 161 162 163 164 165 166 167 168 |
# File 'lib/cpu.rb', line 155 def and(zone,arg1,arg2) opcode = zone.to_s(16).upcase @cpu[:A] = @cpu[:A] & case opcode when "29" then arg1 when "25" then read(arg1) when "35" then read(arg1+@cpu[:X]) when "2D" then read(arg1+(arg2*256)) when "3D" then read(arg1+(arg2*256)+@cpu[:X]) when "39" then read(arg1+(arg2*256)+@cpu[:Y]) when "21" then read(read(arg1+@cpu[:X]) + read(arg1+@cpu[:X]+1)*256) when "31" then read(read(arg1)+(read(arg1+1)*256)+@cpu[:Y]) end sign_zero_set(@cpu[:A]) end |
#asl(zone, arg1, arg2) ⇒ Object
68 69 70 71 72 73 74 75 76 77 |
# File 'lib/cpu.rb', line 68 def asl(zone,arg1,arg2) opcode = zone.to_s(16).upcase sign_zero_set_switch case zone when 0x0A then @cpu[:A] << 1 when 0x06 then write(arg1,read(arg1) << 1) when 0x16 then write(arg1+@cpu[:X], read(arg1+@cpu[:X]) << 1) when 0x0E then write(arg1+(arg2*256),read(arg1+(arg2*256)) << 1) when 0x1E then write(arg1+(arg2*256)+@cpu[:X],read(arg1+(arg2*256)+@cpu[:X]) << 1) end end |
#bcc(zone, arg1, arg2) ⇒ Object
530 531 532 533 534 |
# File 'lib/cpu.rb', line 530 def bcc(zone,arg1,arg2) if @cpu[:P].bit?(0) == 0 @cpu[:compteur_new] = @cpu[:compteur_new]+signed(arg1) end end |
#bcs(zone, arg1, arg2) ⇒ Object
536 537 538 539 540 |
# File 'lib/cpu.rb', line 536 def bcs(zone,arg1,arg2) if @cpu[:P].bit?(0) == 1 @cpu[:compteur_new] = @cpu[:compteur_new]+signed(arg1) end end |
#beq(zone, arg1, arg2) ⇒ Object
572 573 574 575 576 |
# File 'lib/cpu.rb', line 572 def beq(zone,arg1,arg2) if @cpu[:P].bit?(1) == 1 @cpu[:compteur_new] = @cpu[:compteur_new]+signed(arg1) end end |
#bit(zone, arg1, arg2) ⇒ Object
232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 |
# File 'lib/cpu.rb', line 232 def bit(zone,arg1,arg2) opcode = zone.to_s(16).upcase case opcode when "24" valeur = read(arg1) if valeur.bit?(7) == 0 @cpu[:P] = @cpu[:P].clear_bit(7) #clear else @cpu[:P] = @cpu[:P].set_bit(7) #set end if valeur.bit?(6) == 0 @cpu[:P] = @cpu[:P].clear_bit(6) #clear else @cpu[:P] = @cpu[:P].set_bit(6) #set end if valeur & @cpu[:A] == 0 @cpu[:P] = @cpu[:P].set_bit(1) #set else @cpu[:P] = @cpu[:P].clear_bit(1) #clear end when "2C" valeur = read(arg1+(arg2*256)) if valeur.bit?(7) == 0 @cpu[:P] = @cpu[:P].clear_bit(7) #clear else @cpu[:P] = @cpu[:P].set_bit(7) #set end if valeur.bit?(6) == 0 @cpu[:P] = @cpu[:P].clear_bit(6) #clear else @cpu[:P] = @cpu[:P].set_bit(6) #set end if valeur & @cpu[:A] == 0 @cpu[:P] = @cpu[:P].set_bit(1) #set else @cpu[:P] = @cpu[:P].clear_bit(1) #clear end end end |
#bmi(zone, arg1, arg2) ⇒ Object
560 561 562 563 564 |
# File 'lib/cpu.rb', line 560 def bmi(zone,arg1,arg2) if @cpu[:P].bit?(7) == 1 @cpu[:compteur_new] = @cpu[:compteur_new]+signed(arg1) end end |
#bne(zone, arg1, arg2) ⇒ Object
566 567 568 569 570 |
# File 'lib/cpu.rb', line 566 def bne(zone,arg1,arg2) if @cpu[:P].bit?(1) == 0 @cpu[:compteur_new] = @cpu[:compteur_new]+signed(arg1) end end |
#bpl(zone, arg1, arg2) ⇒ Object
554 555 556 557 558 |
# File 'lib/cpu.rb', line 554 def bpl(zone,arg1,arg2) if @cpu[:P].bit?(7) == 0 @cpu[:compteur_new] = @cpu[:compteur_new]+signed(arg1) end end |
#brk(x, y, z) ⇒ Object
302 303 304 305 306 307 308 309 310 311 312 313 314 |
# File 'lib/cpu.rb', line 302 def brk(x,y,z) #Interruption push d'abord l'octet de poids fort ensuite octet de pds faible ensuite le status bytefort = @cpu[:compteur_new] >> 8 bytefaible = @cpu[:compteur_new] & 0x00FF @ram[@cpu[:S]+0x100] = bytefort # octet de poids fort @cpu[:S] -= 1 #decrementation pour la prochaine valeur @ram[@cpu[:S]+0x100] = bytefaible #octet de poids faible @cpu[:S] -= 1 @ram[@cpu[:S]+0x100] = @cpu[:P] #status @cpu[:S] -= 1 @cpu[:compteur_new] = read(0xFFFE)+(read(0xFFFF)*256) @cpu[:P] = @cpu[:P].set_bit(4) end |
#bvc(zone, arg1, arg2) ⇒ Object
542 543 544 545 546 |
# File 'lib/cpu.rb', line 542 def bvc(zone,arg1,arg2) if @cpu[:P].bit?(6) == 0 @cpu[:compteur_new] = @cpu[:compteur_new]+signed(arg1) end end |
#bvs(zone, arg1, arg2) ⇒ Object
548 549 550 551 552 |
# File 'lib/cpu.rb', line 548 def bvs(zone,arg1,arg2) if @cpu[:P].bit?(6) == 1 @cpu[:compteur_new] = @cpu[:compteur_new]+signed(arg1) end end |
#clc(x, y, z) ⇒ Object
201 202 203 |
# File 'lib/cpu.rb', line 201 def clc(x,y,z) @cpu[:P] = @cpu[:P].clear_bit(0) end |
#cld(x, y, z) ⇒ Object
221 222 223 |
# File 'lib/cpu.rb', line 221 def cld(x,y,z) @cpu[:P] = @cpu[:P].clear_bit(3) end |
#cli(x, y, z) ⇒ Object
209 210 211 |
# File 'lib/cpu.rb', line 209 def cli(x,y,z) @cpu[:P] = @cpu[:P].clear_bit(2) end |
#clv(x, y, z) ⇒ Object
217 218 219 |
# File 'lib/cpu.rb', line 217 def clv(x,y,z) @cpu[:P] = @cpu[:P].clear_bit(6) end |
#cmp(zone, arg1, arg2) ⇒ Object
54 55 56 57 58 59 60 61 62 63 64 65 66 |
# File 'lib/cpu.rb', line 54 def cmp(zone,arg1,arg2) opcode = zone.to_s(16).upcase sign_zero_carry @cpu[:A].int8_minus signed case opcode when "C9" then arg1 when "C5" then read(arg1) when "D5" then read(arg1+@cpu[:X]) when "CD" then read(arg1+(arg2*256)) when "DD" then read(arg1+(arg2*256)+@cpu[:X]) when "D9" then read(arg1+(arg2*256)+@cpu[:Y]) when "C1" then read(read(arg1+@cpu[:X]) + (read(arg1+@cpu[:X]+1)*256)) when "D1" then read(read(arg1)+(read(arg1+1)*256)+@cpu[:Y]) end end |
#cpx(zone, arg1, arg2) ⇒ Object
135 136 137 138 139 140 141 142 |
# File 'lib/cpu.rb', line 135 def cpx(zone,arg1,arg2) opcode = zone.to_s(16).upcase sign_zero_carry @cpu[:X].int8_minus signed case opcode when "E0" then arg1 when "E4" then read(arg1) when "EC" then read(arg1+(arg2*256)) end end |
#cpy(zone, arg1, arg2) ⇒ Object
144 145 146 147 148 149 150 151 152 |
# File 'lib/cpu.rb', line 144 def cpy(zone,arg1,arg2) opcode = zone.to_s(16).upcase sign_zero_carry @cpu[:Y].int8_minus signed case opcode when "C0" then arg1 when "C4" then read(arg1) when "CC" then read(arg1+(arg2*256)) end end |
#dec(zone, arg1, arg2) ⇒ Object
365 366 367 368 369 370 371 372 373 |
# File 'lib/cpu.rb', line 365 def dec(zone,arg1,arg2) opcode = zone.to_s(16).upcase sign_zero_clear_or_set case opcode when "C6" then write(arg1,read(arg1).int8_minus(1)) when "D6" then write(arg1+@cpu[:X],read(arg1+@cpu[:X]).int8_minus(1)) when "CE" then write(arg1+(arg2*256),read(arg1+(arg2*256)).int8_minus(1)) when "DE" then write(arg1+(arg2*256)+@cpu[:X],read(arg1+(arg2*256)+@cpu[:X]).int8_minus(1)) end end |
#dex(x, y, z) ⇒ Object
471 472 473 474 |
# File 'lib/cpu.rb', line 471 def dex(x,y,z) @cpu[:X] = @cpu[:X].int8_minus(1) sign_zero_clear_or_set(@cpu[:X]) end |
#dey(x, y, z) ⇒ Object
491 492 493 494 |
# File 'lib/cpu.rb', line 491 def dey(x,y,z) @cpu[:Y] = @cpu[:Y].int8_minus(1) sign_zero_clear_or_set(@cpu[:Y]) end |
#eor(zone, arg1, arg2) ⇒ Object
170 171 172 173 174 175 176 177 178 179 180 181 182 183 |
# File 'lib/cpu.rb', line 170 def eor(zone,arg1,arg2) opcode = zone.to_s(16).upcase @cpu[:A] = @cpu[:A] ^ case opcode when "49" then arg1 when "45" then read(arg1) when "55" then read(arg1+@cpu[:X]) when "4D" then read(arg1+(arg2*256)) when "5D" then read(arg1+(arg2*256)+@cpu[:X]) when "59" then read(arg1+(arg2*256)+@cpu[:Y]) when "41" then read(read(arg1+@cpu[:X]) + read(arg1+@cpu[:X]+1)*256) when "51" then read(read(arg1)+(read(arg1+1)*256)+@cpu[:Y]) end sign_zero_set(@cpu[:A]) end |
#inc(zone, arg1, arg2) ⇒ Object
375 376 377 378 379 380 381 382 383 |
# File 'lib/cpu.rb', line 375 def inc(zone,arg1,arg2) opcode = zone.to_s(16).upcase sign_zero_clear_or_set case opcode when "E6" then write(arg1,read(arg1).int8_plus(1)) when "F6" then write(arg1+@cpu[:X],read(arg1+@cpu[:X]).int8_plus(1)) when "EE" then write(arg1+(arg2*256),read(arg1+(arg2*256)).int8_plus(1)) when "FE" then write(arg1+(arg2*256)+@cpu[:X],read(arg1+(arg2*256)+@cpu[:X]).int8_plus(1)) end end |
#inx(x, y, z) ⇒ Object
476 477 478 479 |
# File 'lib/cpu.rb', line 476 def inx(x,y,z) @cpu[:X] = @cpu[:X].int8_plus(1) sign_zero_clear_or_set(@cpu[:X]) end |
#iny(x, y, z) ⇒ Object
496 497 498 499 |
# File 'lib/cpu.rb', line 496 def iny(x,y,z) @cpu[:Y] = @cpu[:Y].int8_plus(1) sign_zero_clear_or_set(@cpu[:Y]) end |
#jmp(zone, arg1, arg2) ⇒ Object
319 320 321 322 323 324 325 |
# File 'lib/cpu.rb', line 319 def jmp(zone,arg1,arg2) opcode = zone.to_s(16).upcase @cpu[:compteur_new] = case opcode when "4C" then arg1+(arg2*256) when "6C" then read(arg1+(arg2*256))+(read(arg1+(arg2*256)+1)*256) end end |
#jsr(zone, arg1, arg2) ⇒ Object
Rappel : dans 0xC0E1 , C0 est l’octet de poids fort et E1 celui de poids faible
275 276 277 278 279 280 281 282 283 284 |
# File 'lib/cpu.rb', line 275 def jsr(zone,arg1,arg2) adresse = @cpu[:compteur_new] -1 bytefort = adresse >> 8 #byte fort bytefaible = adresse & 0x00FF #byte faible @ram[@cpu[:S]+0x100] = bytefort # adresse actuelle @cpu[:S] -= 1 #decrementation pour la prochaine valeur @ram[@cpu[:S]+0x100] = bytefaible @cpu[:S] -= 1 @cpu[:compteur_new] = arg1+(arg2*256) end |
#lda(zone, arg1, arg2) ⇒ Object
385 386 387 388 389 390 391 392 393 394 395 396 397 398 |
# File 'lib/cpu.rb', line 385 def lda(zone,arg1,arg2) opcode = zone.to_s(16).upcase @cpu[:A] = case opcode when "A9" then arg1 when "A5" then read(arg1) when "B5" then read(arg1+@cpu[:X]) when "AD" then read(arg1+(arg2*256)) when "BD" then read(arg1+(arg2*256)+@cpu[:X]) when "B9" then read(arg1+(arg2*256)+@cpu[:Y]) when "A1" then read(read(arg1+@cpu[:X]) + (read(arg1+@cpu[:X]+1)*256)) when "B1" then read(read(arg1)+(read(arg1+1)*256)+@cpu[:Y]) end sign_zero_set(@cpu[:A]) end |
#ldx(zone, arg1, arg2) ⇒ Object
400 401 402 403 404 405 406 407 408 409 410 |
# File 'lib/cpu.rb', line 400 def ldx(zone,arg1,arg2) opcode = zone.to_s(16).upcase @cpu[:X] = case opcode when "A2" then arg1 when "A6" then read(arg1) when "B6" then read(arg1+@cpu[:Y]) when "AE" then read(arg1+(arg2*256)) when "BE" then read(arg1+(arg2*256)+@cpu[:Y]) end sign_zero_set(@cpu[:X]) end |
#ldy(zone, arg1, arg2) ⇒ Object
412 413 414 415 416 417 418 419 420 421 422 |
# File 'lib/cpu.rb', line 412 def ldy(zone,arg1,arg2) opcode = zone.to_s(16).upcase @cpu[:Y] = case opcode when "A0" then arg1 when "A4" then read(arg1) when "B4" then read(arg1+@cpu[:X]) when "AC" then read(arg1+(arg2*256)) when "BC" then read(arg1+(arg2*256)+@cpu[:X]) end sign_zero_set(@cpu[:Y]) end |
#lsr(zone, arg1, arg2) ⇒ Object
121 122 123 124 125 126 127 128 129 130 |
# File 'lib/cpu.rb', line 121 def lsr(zone,arg1,arg2) opcode = zone.to_s(16).upcase sign_zero_set_switch case opcode when "4A" then @cpu[:A] = @cpu[:A] >> 1 when "46" then write(arg1,read(arg1) >> 1) when "56" then write(arg1+@cpu[:X], read(arg1+@cpu[:X]) >> 1) when "4E" then write(arg1+(arg2*256),read(arg1+(arg2*256)) >> 1) when "5E" then write(arg1+(arg2*256)+@cpu[:X], read(arg1+(arg2*256)+@cpu[:X]) >> 1) end end |
#map_rom(rom) ⇒ Object
14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 |
# File 'lib/cpu.rb', line 14 def map_rom(rom) header = rom.shift(16) if header[4] == 1 prg_start_index = 0xC000 #Index de mappage de la PRG (- de 16Ko de PRG) else prg_start_index = 0x8000 #Index de mappage de la PRG (+ de 16Ko de PRG) end if header[6].bit?(2) == 1 trainer = rom.shift(512) @ram[0x7000,trainer.length] = trainer # Mapping du trainer dans la RAM end prg_rom = rom.shift(header[4]*16384) chr_rom = rom.shift(header[5]*8192) @ppu.ppu[0,chr_rom.length] = chr_rom @ram[prg_start_index,prg_rom.length] = prg_rom # Mapping de la PRG dans la RAM return prg_start_index end |
#nmi_interrupt ⇒ Object
33 34 35 36 37 38 39 40 41 42 43 44 |
# File 'lib/cpu.rb', line 33 def nmi_interrupt() bytefort = @cpu[:compteur_new] >> 8 bytefaible = @cpu[:compteur_new] & 0x00FF @ram[@cpu[:S]+0x100] = bytefort # octet de poids fort @cpu[:S] -= 1 #decrementation pour la prochaine valeur @ram[@cpu[:S]+0x100] = bytefaible #octet de poids faible @cpu[:S] -= 1 @ram[@cpu[:S]+0x100] = @cpu[:P] #status @cpu[:S] -= 1 @cpu[:compteur_new] = read(0xFFFA)+(read(0xFFFB)*256) @cpu[:P] = @cpu[:P].set_bit(2) end |
#nop(x, y, z) ⇒ Object
229 230 |
# File 'lib/cpu.rb', line 229 def nop(x,y,z) end |
#ora(zone, arg1, arg2) ⇒ Object
186 187 188 189 190 191 192 193 194 195 196 197 198 |
# File 'lib/cpu.rb', line 186 def ora(zone,arg1,arg2) @cpu[:A] |= case zone when 0x09 then arg1 when 0x05 then read(arg1) when 0x15 then read(arg1+@cpu[:X]) when 0x0D then read(arg1+(arg2*256)) when 0x1D then read(arg1+(arg2*256)+@cpu[:X]) when 0x19 then read(arg1+(arg2*256)+@cpu[:Y]) when 0x01 then read(read(arg1+@cpu[:X]) + read(arg1+@cpu[:X]+1)*256) when 0x11 then read(read(arg1)+(read(arg1+1)*256)+@cpu[:Y]) end sign_zero_set(@cpu[:A]) end |
#pha(x, y, z) ⇒ Object
509 510 511 512 |
# File 'lib/cpu.rb', line 509 def pha(x,y,z) @ram[@cpu[:S]+0x100] = @cpu[:A] @cpu[:S] -= 1 end |
#php(x, y, z) ⇒ Object
316 317 |
# File 'lib/cpu.rb', line 316 def php(x,y,z) end |
#pla(x, y, z) ⇒ Object
514 515 516 517 |
# File 'lib/cpu.rb', line 514 def pla(x,y,z) @cpu[:A] = @ram[@cpu[:S]+1+0x100] #dernier elem @cpu[:S] += 1 end |
#plp(x, y, z) ⇒ Object
524 525 526 527 528 |
# File 'lib/cpu.rb', line 524 def plp(x,y,z) @cpu[:A] = @ram[@cpu[:S]+1+0x100] @cpu[:S] += 1 end |
#read(adresse) ⇒ Object
645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 |
# File 'lib/cpu.rb', line 645 def read(adresse) case adresse when 0x2007 @ppu.registers[0x2000].bit?(2) ==1 ? @pointeur_2006+=32 : @pointeur_2006+=1 when 0x2004 @ppu.registers[0x2003] = @ppu.registers[0x2003].int8_plus(1) end if Registers.include?(adresse) return @ppu.registers[adresse] else return @ram[adresse] end end |
#reset_rom ⇒ Object
48 49 50 51 |
# File 'lib/cpu.rb', line 48 def reset_rom() reset_address = @ram[0xFFFC]+(@ram[0xFFFD]*256) @cpu[:compteur] = @cpu[:compteur_new] = reset_address end |
#rol(zone, arg1, arg2) ⇒ Object
79 80 81 82 83 84 85 86 87 88 89 |
# File 'lib/cpu.rb', line 79 def rol(zone,arg1,arg2) opcode = zone.to_s(16).upcase sign_zero_set case opcode when "2A" then @cpu[:A] = rotate_left(@cpu[:A]) when "26" then write(arg1,rotate_left(read(arg1))) when "36" then write(arg1+@cpu[:X], rotate_left(read(arg1+@cpu[:X]))) when "2E" then write(arg1+(arg2*256), rotate_left(read(arg1+(arg2*256)))) when "3E" then write(arg1+(arg2*256)+@cpu[:X], rotate_left(read(arg1+(arg2*256)+@cpu[:X]))) end end |
#ror(zone, arg1, arg2) ⇒ Object
91 92 93 94 95 96 97 98 99 100 101 |
# File 'lib/cpu.rb', line 91 def ror(zone,arg1,arg2) opcode = zone.to_s(16).upcase sign_zero_set case opcode when "6A" then @cpu[:A] = rotate_right(@cpu[:A]) when "66" then write(arg1,rotate_right(read(arg1))) when "76" then write(arg1+@cpu[:X], rotate_right(read(arg1+@cpu[:X]))) when "6E" then write(arg1+(arg2*256), rotate_right(read(arg1+(arg2*256)))) when "7E" then write(arg1+(arg2*256)+@cpu[:X], rotate_right(read(arg1+(arg2*256)+@cpu[:X]))) end end |
#rotate_left(byte) ⇒ Object
103 104 105 106 107 108 109 |
# File 'lib/cpu.rb', line 103 def rotate_left(byte) byte.bit?(7) == 1 ? @cpu[:P] = @cpu[:P].set_bit(0) : @cpu[:P] = @cpu[:P].clear_bit(0) @cpu[:P].bit?(0) == 1 ? byte = ((byte << 1)&0xFF)| 1 : byte = ((byte << 1)&0xFF)| 0 @cpu[:P] = @cpu[:P].clear_bit(0) if byte.bit?(7) == 0 #clear carry @cpu[:P] = @cpu[:P].set_bit(0) if byte.bit?(7) == 1 #set carry return byte end |
#rotate_right(byte) ⇒ Object
111 112 113 114 115 116 117 |
# File 'lib/cpu.rb', line 111 def rotate_right(byte) byte.bit?(0) == 1 ? @cpu[:P] = @cpu[:P].set_bit(0) : @cpu[:P] = @cpu[:P].clear_bit(0) @cpu[:P].bit?(0) ==1 ? byte = (byte >> 1)| 128 : byte = (byte >> 1)| 0 @cpu[:P] = @cpu[:P].clear_bit(0) if byte.bit?(0) == 0 #clear carry @cpu[:P] = @cpu[:P].set_bit(0) if byte.bit?(0)==1 #set carry return byte end |
#rti(zone, arg1, arg2) ⇒ Object
293 294 295 296 297 298 299 300 |
# File 'lib/cpu.rb', line 293 def rti(zone,arg1,arg2) bytefort = @ram[@cpu[:S]+3+0x100] bytefaible = @ram[@cpu[:S]+2+0x100] status = @ram[@cpu[:S]+1+0x100] @cpu[:compteur_new] = bytefaible+(bytefort*256) @cpu[:P] = status #récup du status @cpu[:S]+=3 # pour ecraser l'adresse précédente sur 3x8bits end |
#rts(zone, arg1, arg2) ⇒ Object
286 287 288 289 290 291 |
# File 'lib/cpu.rb', line 286 def rts(zone,arg1,arg2) bytefaible = @ram[@cpu[:S]+1+0x100] bytefort = @ram[@cpu[:S]+2+0x100] @cpu[:compteur_new] = bytefaible+(bytefort*256) +1 @cpu[:S]+=2 # pour ecraser l'adresse précédente sur 2x8bits end |
#sbc(zone, arg1, arg2) ⇒ Object
346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 |
# File 'lib/cpu.rb', line 346 def sbc(zone,arg1,arg2) opcode = zone.to_s(16).upcase accumulator_temp = @cpu[:A] @cpu[:P].bit?(0) == 1 ? valeur_carry = 1 : valeur_carry = 0 @cpu[:A] = @cpu[:A].int8_minus case opcode when "E9" then arg1.int8_minus(valeur_carry) when "E5" then read(arg1).int8_minus(valeur_carry) when "F5" then read(arg1+@cpu[:X]).int8_minus(valeur_carry) when "ED" then read(arg1+(arg2*256)).int8_minus(valeur_carry) when "FD" then read(arg1+(arg2*256)+@cpu[:X]).int8_minus(valeur_carry) when "F9" then read(arg1+(arg2*256)+@cpu[:Y]).int8_minus(valeur_carry) when "E1" then read(read(arg1+@cpu[:X]) + (read(arg1+@cpu[:X]+1)*256)).int8_minus(valeur_carry) when "F1" then read(read(arg1)+(read(arg1+1)*256)+@cpu[:Y]).int8_minus(valeur_carry) end @cpu[:P] = @cpu[:P].set_bit(0) #set the carry set_overflow(accumulator_temp) sign_zero_clear_or_set(@cpu[:A]) end |
#sec(x, y, z) ⇒ Object
205 206 207 |
# File 'lib/cpu.rb', line 205 def sec(x,y,z) @cpu[:P] = @cpu[:P].set_bit(0) end |
#sed(x, y, z) ⇒ Object
225 226 227 |
# File 'lib/cpu.rb', line 225 def sed(x,y,z) @cpu[:P] = @cpu[:P].set_bit(3) end |
#sei(x, y, z) ⇒ Object
213 214 215 |
# File 'lib/cpu.rb', line 213 def sei(x,y,z) @cpu[:P] = @cpu[:P].set_bit(2) end |
#set_overflow(byte) ⇒ Object
579 580 581 582 583 |
# File 'lib/cpu.rb', line 579 def set_overflow(byte) if @cpu[:A].bit?(6) != byte.bit?(6) @cpu[:P] = @cpu[:P].set_bit(6) end end |
#sign_zero_carry(byte) ⇒ Object
586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 |
# File 'lib/cpu.rb', line 586 def sign_zero_carry(byte) if byte & 0x80 == 0 @cpu[:P] = @cpu[:P].set_bit(0) @cpu[:P] = @cpu[:P].clear_bit(7) @cpu[:P] = @cpu[:P].clear_bit(1) elsif byte == 0 @cpu[:P] = @cpu[:P].set_bit(0) @cpu[:P] = @cpu[:P].clear_bit(7) @cpu[:P] = @cpu[:P].set_bit(1) elsif byte & 0x80 != 0 @cpu[:P] = @cpu[:P].clear_bit(0) @cpu[:P] = @cpu[:P].set_bit(7) @cpu[:P] = @cpu[:P].clear_bit(1) end end |
#sign_zero_clear_or_set(byte) ⇒ Object
Clears or sets flag
602 603 604 605 606 607 608 609 610 611 612 613 614 |
# File 'lib/cpu.rb', line 602 def sign_zero_clear_or_set(byte) #Clears or sets flag if byte==0 @cpu[:P] = @cpu[:P].set_bit(1) else @cpu[:P] = @cpu[:P].clear_bit(1) end if byte & 0x80 == 0 @cpu[:P] = @cpu[:P].clear_bit(7) else @cpu[:P] = @cpu[:P].set_bit(7) end end |
#sign_zero_set(byte) ⇒ Object
Only sets flag ( in case of load or store instruction )
616 617 618 619 620 621 622 623 624 625 626 |
# File 'lib/cpu.rb', line 616 def sign_zero_set(byte) #Only sets flag ( in case of load or store instruction ) if byte==0 @cpu[:P] = @cpu[:P].set_bit(1) else @cpu[:P] = @cpu[:P].clear_bit(1) end if byte & 0x80 != 0 @cpu[:P] = @cpu[:P].set_bit(7) end end |
#sign_zero_set_switch(byte) ⇒ Object
S_z_set, mais avec le petit bonus “Carry” pour les opcodes de switch !
628 629 630 631 632 633 634 635 636 637 |
# File 'lib/cpu.rb', line 628 def sign_zero_set_switch(byte) # S_z_set, mais avec le petit bonus "Carry" pour les opcodes de switch ! if byte==0 @cpu[:P] = @cpu[:P].set_bit(1) end if byte & 0x80 != 0 @cpu[:P] = @cpu[:P].set_bit(7) @cpu[:P] = @cpu[:P].set_bit(0) #set carry end @cpu[:P] = @cpu[:P].clear_bit(0) if byte & 0x80 == 0 #clear carry end |
#sta(zone, arg1, arg2) ⇒ Object
425 426 427 428 429 430 431 432 433 434 435 436 437 |
# File 'lib/cpu.rb', line 425 def sta(zone,arg1,arg2) opcode = zone.to_s(16).upcase case opcode when "85" then write(arg1,@cpu[:A]) when "95" then write(arg1+@cpu[:X],@cpu[:A]) when "8D" then write(arg1+(arg2*256),@cpu[:A]) when "9D" then write(arg1+(arg2*256)+@cpu[:X], @cpu[:A]) when "99" then write(arg1+(arg2*256)+@cpu[:Y], @cpu[:A]) when "81" then write(read(read(arg1+@cpu[:X]) + (read(arg1+@cpu[:X]+1)*256)),@cpu[:A]) when "91" then write(read(read(arg1)+(read(arg1+1)*256)+@cpu[:Y]), @cpu[:A]) end sign_zero_set(@cpu[:A]) end |
#stx(zone, arg1, arg2) ⇒ Object
439 440 441 442 443 444 445 446 447 |
# File 'lib/cpu.rb', line 439 def stx(zone,arg1,arg2) opcode = zone.to_s(16).upcase case opcode when "86" then write(arg1, @cpu[:X]) when "96" then write(arg1+@cpu[:Y], @cpu[:X]) when "8E" then write(arg1+(arg2*256),@cpu[:X]) end sign_zero_set(@cpu[:X]) end |
#sty(zone, arg1, arg2) ⇒ Object
449 450 451 452 453 454 455 456 457 |
# File 'lib/cpu.rb', line 449 def sty(zone,arg1,arg2) opcode = zone.to_s(16).upcase case opcode when "84" then write(arg1, @cpu[:Y]) when "94" then write(arg1+@cpu[:X], @cpu[:Y]) when "8C" then write(arg1+(arg2*256),@cpu[:Y]) end sign_zero_set(@cpu[:Y]) end |
#tax(x, y, z) ⇒ Object
461 462 463 464 |
# File 'lib/cpu.rb', line 461 def tax(x,y,z) @cpu[:X] = @cpu[:A] sign_zero_set(@cpu[:X]) end |
#tay(x, y, z) ⇒ Object
481 482 483 484 |
# File 'lib/cpu.rb', line 481 def tay(x,y,z) @cpu[:Y] = @cpu[:A] sign_zero_set(@cpu[:Y]) end |
#tsx(x, y, z) ⇒ Object
505 506 507 |
# File 'lib/cpu.rb', line 505 def tsx(x,y,z) @cpu[:X] = @cpu[:S] end |
#txa(x, y, z) ⇒ Object
466 467 468 469 |
# File 'lib/cpu.rb', line 466 def txa(x,y,z) @cpu[:A] = @cpu[:X] sign_zero_set(@cpu[:A]) end |
#txs(x, y, z) ⇒ Object
501 502 503 |
# File 'lib/cpu.rb', line 501 def txs(x,y,z) @cpu[:S] = @cpu[:X] end |
#tya(x, y, z) ⇒ Object
486 487 488 489 |
# File 'lib/cpu.rb', line 486 def tya(x,y,z) @cpu[:A] = @cpu[:Y] sign_zero_set(@cpu[:A]) end |
#write(adresse, value) ⇒ Object
665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 |
# File 'lib/cpu.rb', line 665 def write(adresse,value) case adresse when 0x2007 print value @ppu.ppu[@pointeur_2006] = value @ppu.registers[0x2000].bit?(2) ==1 ? @pointeur_2006+=32 : @pointeur_2006+=1 when 0x2006 if @pointeur_2006==nil @pointeur_2006 = value elsif @pointeur_2006 <= 0xFF @pointeur_2006 = value + (@pointeur_2006 *256) ###CA VIENDRAIT DE Là elsif @pointeur_2006 > 0xFF @pointeur_2006 = value end until @pointeur_2006.between?(0,0x3FFF) @pointeur_2006 -= 0x4000 end when 0x2004 @OAM[@ppu.registers[0x2003]] = value @ppu.registers[0x2003] = @ppu.registers[0x2003].int8_plus(1) when 0x4014 @OAM = @ram[value*0x100..(value*0x100)+0xFF] end if Registers.include?(adresse) @ppu.registers[adresse] = value return @ppu.registers[adresse] else @ram[adresse] = value return @ram[adresse] end end |