Revision (current)

Last Updated by adelikat on 6/9/2019 7:37 PM

Last Updated by adelikat on 6/9/2019 7:37 PM

First of all, C002AB is multiplication routine. It takes m23*m24 and stores it in m26-27 (2 bytes). C002E2 is the division routine. Here's how the RNG works: The RNG is stored in 7E0038-7E003B. The RNG is modified by functions like these (not exhaustive): Address C00342 STA $23 REP #$20 LDA $3A EOR #$8020 STA $3A LDA $38 ASL A ASL A CLC ADC $38 ADC $3A STA $38 SEP #$20 XBA STA $24 JSR $02AB [[multiplication]] LDA $27 RTS Translation: (16 bits) m23:=A AND 0xFF m3A:=m3A XOR 0x8020 A:=4*m38 AND 0xFFFF A:=A+m38 if A>0xFFFF then C:=1 else C:=0 m38:=(A+m3A+C) AND 0xFFFF m24:=m38 >> 8 m26:=m23*m24 return (m26 >> 8) [[A]] The function calculates a random number between 0 and (A AND 0xFF)-1. We'll call this function rand(X), for a random number between 0 and X-1. All jumps to this routine use "JSR $0342" !!Encounters Address C02A89 LDA #$FA JSR $0342 [[rand]] CMP #$96 BCS $18 [[3]] CMP #$8E BCC $02 [[1]] BRA $08 [[2]] [[1]] CMP #$32 BCS $0E [[3]] CMP #$2A BCC $0A [[3]] [[2]] LDA #$01 STA $07F9 LDA #$06 STA $07EA [[3]] RTS Translation: A:=rand(250) if 142<=A<150 or 42<=A<50 then [[encounter]] This determines encounters. !!Pre-emptive attack on encounter Address C086DC LDA $07F9 CMP #$02 BEQ $12 [[1]] LDA #$C8 JSR $0342 [[rand]] LDX #$0002 CMP #$BE BCS $06 DEX CMP #$AA BCS $01 DEX [[1]] TXA STA $159A BEQ $0D RTS Translation: if m7F9==2 [[boss battle]] then Type:=0 exit A:=rand(200) if 190<=A<200 then Type:=2 exit if 170<=A<190 then Type:=1 exit Type:=0 Type 0: no pre-empt Type 1: ally pre-empt Type 2: enemy pre-empt The function determines whether or not a pre-empt occurs. If an ally pre-empt occurs, all allies get a free round to attack first. If an enemy pre-empt occurs, all enemies get a free round to attack first. Boss battles cannot have pre-empts. !!Accuracy of physical attacks Address C08B9D LDA $12,x AND #$00FF PHA LDX $15A1 LDA $12,x AND #$00FF ADC #$0028 SEC SBC $01,s [[push value]] BCS $03 [[1]] LDA #$0000 [[1]] STA $2C PLA SEP #$20 LDA #$05 STA $30 JSR $02E2 [[division m32:=int(m2C/m30)]] INC $32 INC $32 LDA $32 JSR $0342 DEC $32 CMP $32 BCC $09 [[2]] LDX $15B0 LDA $35,x ORA #$10 STA $35,x [[2]] RTS Translation: A:=DefAgl AND 0xFF S:=A A:=AtkAgl AND 0xFF A:=A+40 A:=A-S if A<0 then A:=0 m2C:=A m30:=5 m32:=int(m2C/m30)+2 A:=rand(m32) if A==m32-1 then [[attack miss]] else [[attack hit]] !!Another RNG-related routine Address C00363 STY $2A REP #$20 LDA $38 ASL A ASL A CLC ADC $38 ADC $3A STA $38 STA $24 SEP #$20 JSR $025F [[multiplication]] LDY $28 RTS Y:=m2A AND 0xFFFF A:=4*m38 AND 0xFFFF A:=A+m38 if A>0xFFFF then C:=1 else C:=0 m38:=(A+m3A+C) AND 0xFFFF m24:=m38 return m24*Y >> 16 [[Y]] This is another rng-modifying function. The only difference between this function and rand(X) is that address m3A does not XOR by 0x8020, and that the multiplication uses 16-bits of RNG, rather than 8-bit. Call this function rand2(Y) !!Initial damage routine Address C08BDB REP #$20 STZ $0554 LDA $054E [[atk]] SEC SBC $0550 [[def]] BCS $06 [[1]] LDY #$0001 JMP $8C1F [[4]] [[1]] STA $2A SEP #$20 LDA #$0A STA $24 LDA $15AB BIT #$80 BNE $02 [[2]] LSR $24 [[2]] JSR $0288 [[multiplication m26:=m2A(16bit)*m24]] LDA #$00 XBA LDA $24 TAY LDX $26 STX $0554 BEQ $0B [[3]] STX $2C LDA #$0A STA $30 JSR $02E2 [[division m32:=int(m2C/m30)]] LDY $32 [[3]] JSR $0363 [[rand2]] INY [[4]] LDX $15B0 REP #$21 TYA ADC $0554 STA $0554 CMP #$270F BCC $03 [[5]] LDA #$270F [[5]] STA $0554 SEP #$20 RTS Translation: m554:=0 A:=m54E [[atk]] A:=A-m550 [[def]] if A<0 then Damage:=1 exit m2A:=A if [[enemy attack]] then m24:=5 else m24:=10 m26:=m24*m2A if m26==0 then Damage:=rand2(m24)+1 exit m554:=m26 m2C:=m26 m30:=10 Y:=int(m2C/m30) m554:=m554+rand2(Y)+1 if m554>9999 then m554:=9999 Damage:=m554 This routine calculates the initial damage. This is the final damage if it is magic/item attack. If it is physical attack, there may be critical hit applied later. This routine only executes if the attack does not miss. !!Magic damage (attack value) Address C0964C LDX $15A1 LDA $13,X JSR $97D1 [[?]] REP #$20 AND #$00FF PHA LDA $0546 AND #$00FF CLC ADC $01,S [[push value]] STA $054E LSR A CLC ADC $054E STA $054E PLA SEP #$20 RTS Translation: S:=Wisdom [[cannot exceed 255]] A:=m546 [[basepower of spell/item]] [[cannot exceed 255]] A:=A+S A:=A+int(A/2) AtkValue:=A This routine calculates the attack value of a spell/item. !! Critical hit Address C08A69 LDA #$1E STA $02 LDA $159E [[?]] BIT #$80 BEQ $02 [[1]] ASL $02 [[1]] LDX $15A1 LDA $3C,X LSR A BCC $02 [[2]] LSR $02 [[2]] LDA $02 JSR $0342 [[RAND]] LSR $02 CMP $02 BNE $1C [[4]] REP #$20 LDA $0554 [[DMG]] ASL A ADC $0554 [[DMG]] CMP #$270F BCC $03 [[3]] LDA #$270F [[3]] STA $0554 SEP #$20 LDA #$00 JSR $AAD2 [[GREATEST ATTACK?]] RTS [[4]] LDA #$14 STA $02 LDA $159E BIT #$80 BEQ $02[[5]] ASL $02 [[5]] LDX $15A1 LDA $3C,X LSR A LSR A BCC $02[[6]] LSR $02 [[6]] LDA $02 JSR $0342 [[RAND]] LSR $02 CMP $02 BNE $18 [[8]] REP #$20 LDA $0054 [[DMG]] ASL A CMP #$270F BCC $03 [[7]] LDA #$270F [[7]] STA $0554 SEP #$20 LDA #$01 JSR $AAD2 [[CRUSHING ATTACK?]] [[8]] RTS Translation: m2:=30 if [[unknown thing]] then m2:=2*m2 if [[modifier]] then m2:=int(m2/2) A:=rand(m2) if A==int(m2/2) then m554:=max(3*m554,9999) exit [[greatest attack]] m2:=20 if [[unknown thing]] then m2:=2*m2 if [[modifier2]] then m2:=int(m2/2) A:=rand(m2) if A==int(m2/2) then m554:=max(2*m554,9999) exit [[crushing attack]] This routine first determines whether an attack is a GREATEST ATTACK (1/30 probability). If it is, damage is multiplied by 3, max damage 9999. If an attack is not a GREATEST ATTACK, the routine determines whether an attack is a CRUSHING ATTACK (1/20 probability). If so, damage is multiplied by 2. This routine only executes if the attack does not miss. The CRUSHING ATTACK part only executes if the attack is not a GREATEST ATTACK.