TOP > プログラミング関係解説＆調査 > 順序ポイント

$C1/EBCA BMI $1F    [$EBEB]      ;ネガティブフラグが立っているとき[$EBEB]分岐
$C1/EBCC BEQ $F9    [$EBC7]      ;ゼロフラグが立っているとき[$EBC7]分岐
$C1/EBCE LDY $0002,x[$00:1B02]   ;Yに[$00:1B02]をロード
$C1/EBD1 LDA #$00                ;Aに$00をロード
$C1/EBD3 SEC                     ;キャリーフラグON
$C1/EBD4 SBC $0028,y[$00:1A28]   ;A - [$00:1A28](敵データ08　知)
$C1/EBD7 STA $7E9104,x[$7E:AC04] ;Aを[$7E:AC04]に書き込み
$C1/EBDB LDA #$00                ;Aに$00をロード
$C1/EBDD STA $7E9105,x[$7E:AC05] ;Aを[$7E:AC05]に書き込み
$C1/EBE1 STA $7E9106,x[$7E:AC06] ;Aを[$7E:AC06]に書き込み
$C1/EBE5 STA $7E9107,x[$7E:AC07] ;Aを[$7E:AC07]に書き込み
$C1/EBE9 BRA $DC    [$EBC7]      ;フラグにかかわりなく常に分岐[$EBC7]
$C1/EBC7 JSR $E1A9  [$C1:E1A9]   ;[$C1:E1A9]へジャンプ

$C1/1CF7 PHX                     ;Xをスタックにプッシュ
$C1/1CF8 LDA $7E8F02,x           ;Aに[$7E:AAn2](敵番号nの行動異常)をロード （$00をロード）
$C1/1CFC ASL A                   ;Aを算術左シフト *2
$C1/1CFD ASL A                   ;Aを算術左シフト *2
$C1/1CFE ASL A                   ;Aを算術左シフト *2
$C1/1CFF REP #$21                ;Aを16bit幅に変更、キャリーフラグクリア
$C1/1D01 AND #$00F8              ;Aと$00F8で論理積
$C1/1D04 ADC $D50060[$D5:0060]   ;A + [$D5:0060]
$C1/1D08 TAX                     ;Aの値をXレジスタに転送
$C1/1D09 SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/1D0B LDY #$0320              ;Yに$0320をロード

;ループ処理ここから
$C1/1D0E LDA $D50000,x[$D5:644B] ;Aに[$D5:644B+n]をロード
$C1/1D12 STA $0000,y[$00:0320]   ;Aを[$00:0320+n]に書き込み
$C1/1D15 INX                     ;Xをインクリメント +1
$C1/1D16 INY                     ;Yをインクリメント +1
$C1/1D17 CPY #$0328              ;Yと$0328を減算比較（ステータスレジスタ変更のみ）
$C1/1D1A BNE $F2    [$1D0E]      ;ゼロフラグが立っていないとき[$1D0E]分岐
;ループ処理ここまで

$C1/1D1C PLX                     ;Xレジスタにスタックからプル
$C1/1D1D RTS                     ;サブルーチン戻り

$C1/1C77 STZ $27    [$00:0327]   ;[$00:0327]に$00を書き込み
$C1/1C79 REP #$20                ;Aを16bit幅に変更、Mフラグをクリア
$C1/1C7B LDA $7E9104,x           ;Aに[$7E:ACn5][$7E:ACn4](敵番号nの順序ポイント)をロード
$C1/1C7F SEC                     ;キャリーフラグON
$C1/1C80 SBC $26    [$00:0326]   ;A - [$00:0327][$00:0326](行動順・攻撃時の減少値)
$C1/1C82 BCS $03    [$1C87]      ;キャリーフラグが立っているとき[$1C87]分岐
;キャリーフラグOFF
$C1/1C84 LDA #$0000              ;Aに$0000をロード
;キャリーフラグON
$C1/1C87 STA $7E9104,x           ;Aを[$7E:ACn4](敵番号nの順序ポイント下1バイト)に書き込み
$C1/1C8B SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/1C8D RTS                     ;サブルーチン戻り

$C1/1C91 STZ $24    [$00:0324]   ;[$00:0324]に$00を書き込み
$C1/1C93 REP #$20                ;Aを16bit幅に変更、Mフラグをクリア
$C1/1C95 LDA $7E9104,x           ;Aに[$7E:ACn5][$7E:ACn4](敵番号nの順序ポイント)をロード
$C1/1C99 LSR A                   ;Aを論理右シフト　(/2)
$C1/1C9A CLC                     ;キャリーフラグクリア
$C1/1C9B ADC $23    [$00:0323]   ;A + [$00:0323](行動順・発生時修正値)
$C1/1C9D BCC $03    [$1CA2]      ;キャリーフラグが立っていないとき[$1CA2]分岐
;キャリーフラグON
$C1/1C9F LDA #$FFFF              ;Aに$FFFFをロード
;キャリーフラグOFF
$C1/1CA2 STA $7E9104,x           ;Aを[$7E:ACn5][$7E:ACn4](敵番号nの順序ポイント)に書き込み
$C1/1CA6 SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/1CA8 RTS                     ;サブルーチン戻り

$C1/1CAC LDY $0002,x             ;Yに[$00:1Bn2]をロード
$C1/1CAF REP #$20                ;Aを16bit幅に変更、Mフラグをクリア
$C1/1CB1 LDA $0010,y[$00:1A10]   ;Aに[$00:1A11][$00:1A10]（敵種類1の最大HP）をロード
$C1/1CB4 LSR A                   ;Aを論理右シフト　(/2)
$C1/1CB5 LSR A                   ;Aを論理右シフト　(/2)
$C1/1CB6 LSR A                   ;Aを論理右シフト　(/2)
$C1/1CB7 LSR A                   ;Aを論理右シフト　(/2)
$C1/1CB8 BNE $01    [$1CBB]      ;ゼロフラグが立っていないとき[$1CBB]分岐
$C1/1CBB STA $10    [$00:0310]   ;Aを[$00:0310]に書き込み
$C1/1CBD SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/1CBF LDY $2134  [$00:2134]   ;Yに[$00:2135][$00:2134]をロード
$C1/1CC2 STY $4204  [$00:4204]   ;Yを[$00:4205][$00:4204]に書き込み
$C1/1CC5 LDA $10    [$00:0310]   ;Aに[$00:0310](敵の最大HP/$10)をロード
$C1/1CC7 STA $4206  [$00:4206]   ;Aを[$00:4206]に書き込み
$C1/1CCA JSR $46C8  [$C1:46C8]   ;[$C1:46C8]へジャンプ
;
;符号付16bit / 8bit 
;$4204-$4205 / $4206 （$4214-$4215に商、$4216に余りが入る）
;総ダメージ / trunc(敵の最大HP/$10)
;
$C1/46C8 NOP                     ;計算待ち
$C1/46C9 RTS                     ;サブルーチン戻り

$C1/1CCD LDA $4214  [$00:4214]   ;Aに[$00:4214]（商の下1バイト）をロード
$C1/1CD0 INC A                   ;Aをインクリメント +1
$C1/1CD1 CMP #$10                ;Aと$10を減算比較（ステータスレジスタ変更のみ）
$C1/1CD3 BCC $02    [$1CD7]      ;キャリーフラグが立っていないとき[$1CD7]分岐
;キャリーフラグON
$C1/1CD5 LDA #$0F                ;Aに$0Fをロード
;キャリーフラグOFF
$C1/1CD7 STA $4202  [$00:4202]   ;Aを[$00:4202]に書き込み
$C1/1CDA LDA $24    [$00:0324]   ;Aに[$00:0324](行動順・被ダメージ定数)をロード
$C1/1CDC STA $4203  [$00:4203]   ;Aを[$00:4203]に書き込み
$C1/1CDF JSR $46C9  [$C1:46C9]   ;[$C1:46C9]へジャンプ
;
;符号付8bit x 8bit
;$4202 * $4203 ($4216-$4217に乗算結果)
;
$C1/46C9 RTS                     ;サブルーチン戻り
;
$C1/1CE2 REP #$21                ;Aを16bit幅に変更、キャリーフラグクリア
$C1/1CE4 LDA $7E9104,x           ;Aに[$7E:ACn5][$7E:ACn4](敵番号nの順序ポイント)をロード
$C1/1CE8 ADC $4216  [$00:4216]   ;A + [$00:4216][$00:4216]（乗算結果2バイト）
$C1/1CEB BCC $03    [$1CF0]      ;キャリーフラグが立っていないとき[$1CF0]分岐
;キャリーフラグON
$C1/1CED LDA #$FFFF              ;Aに$FFFFをロード
;キャリーフラグOFF
$C1/1CF0 STA $7E9104,x           ;Aを[$7E:ACn5][$7E:ACn4](敵番号nの順序ポイント)に書き込み
$C1/1CF4 SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/1CF6 RTS                     ;サブルーチン戻り

$C1/1C02 LDA $25    [$00:0325]   ;Aに[$00:0325](行動順・攻撃以外の増加値)をロード
$C1/1C04 BMI $22    [$1C28]      ;ネガティブフラグが立っているとき[$1C28]分岐
;ネガティブフラグOFF（攻撃以外の増加値が正の値)
$C1/1C06 LDA $7E9104,x[$7E:ACn4] ;Aに[$7E:ACn4](順序ポイント下1バイト)をロード
$C1/1C0A CLC                     ;キャリーフラグクリア
$C1/1C0B ADC $25    [$00:0325]   ;A + [$00:0325](行動順・攻撃以外の増加値)
$C1/1C0D STA $7E9104,x[$7E:ACn4] ;Aを[$7E:ACn4](順序ポイント下1バイト)に書き込み
$C1/1C11 BCC $31    [$1C44]      ;キャリーフラグが立っていないとき[$1C44]分岐
;キャリーフラグON
$C1/1C13 LDA $7E9105,x[$7E:ACn5] ;Aに[$7E:ACn5](順序ポイント上1バイト)をロード
$C1/1C17 INC A                   ;Aをインクリメント +1
$C1/1C18 BEQ $06    [$1C20]      ;ゼロフラグが立っているとき[$1C20]分岐
;ゼロフラグOFF
$C1/1C1A STA $7E9105,x[$7E:ACn5] ;Aを[$7E:ACn5](順序ポイント上1バイト)に書き込み
$C1/1C1E BRA $24    [$1C44]      ;フラグにかかわりなく常に分岐[$1C44]
;ゼロフラグON
$C1/1C20 LDA #$FF                ;Aに$FFをロード
$C1/1C22 STA $7E9104,x[$7E:ACn4] ;Aを[$7E:ACn4](順序ポイント下1バイト)に書き込み
$C1/1C26 BRA $1C    [$1C44]      ;フラグにかかわりなく常に分岐[$1C44]

;$C1/1C04でネガティブフラグON（攻撃以外の増加値が負の値)
$C1/1C28 LDA $7E9104,x[$7E:ACn4] ;Aに[$7E:ACn4](順序ポイント下1バイト)をロード
$C1/1C2C CLC                     ;キャリーフラグクリア
$C1/1C2D ADC $25    [$00:0325]   ;A + [$00:0325](行動順・攻撃以外の増加値)
$C1/1C2F STA $7E9104,x[$7E:ACn4] ;Aを[$7E:ACn4](順序ポイント下1バイト)に書き込み
$C1/1C33 BCS $0F    [$1C44]      ;キャリーフラグが立っているとき[$1C44]分岐
;キャリーフラグOFF
$C1/1C35 LDA $7E9105,x[$7E:ACn5] ;Aに[$7E:ACn5](順序ポイント上1バイト)をロード
$C1/1C39 BEQ $07    [$1C42]      ;ゼロフラグが立っているとき[$1C42]分岐
;ゼロフラグOFF
$C1/1C3B DEC A                   ;Aをデクリメント -1
$C1/1C3C STA $7E9105,x[$7E:ACn5] ;Aを[$7E:ACn5](順序ポイント上1バイト)に書き込み
$C1/1C40 BRA $02    [$1C44]      ;フラグにかかわりなく常に分岐[$1C44]
;ゼロフラグON
$C1/1C42 LDA #$00                ;Aに$00をロード

$C1/1C44 CMP #$00                ;Aと$00を減算比較（ステータスレジスタ変更のみ）
$C1/1C46 BNE $05    [$1C4D]      ;ゼロフラグが立っていないとき[$1C4D]分岐
;ゼロフラグON
$C1/1C48 JSR $6150  [$C1:6150]   ;[$C1:6150]へジャンプ
;（戦闘乱数生成）
$C1/1C4B AND #$0F                ;Aと$0Fで論理積
;ゼロフラグOFF
$C1/1C4D STA $7E9104,x[$7E:ACn4] ;Aを[$7E:ACn4]に書き込み
$C1/1C51 RTS                     ;サブルーチン戻り

$C1/8E5E CPX #$0000              ;Xと$0000を減算比較（ステータスレジスタ変更のみ）
$C1/8E61 BNE $01    [$8E64]      ;ゼロフラグが立っていないとき[$8E64]分岐
$C1/8E64 LDA $0005,x[$00:1Bn5]   ;Aに[$00:1Bn5](技関係状態)をロード
$C1/8E67 BNE $15    [$8E7E]      ;ゼロフラグが立っていないとき[$8E7E]分岐
;技関係状態 $00:通常 $40:タメ時間中 $F0:技を出している最中
;ゼロフラグON 技関係状態 $00:通常
$C1/8E69 LDA $7E8F07,x[$7E:AAn7] ;Aに[$7E:AAn7](状態異常)をロード
$C1/8E6D BIT #$B0                ;Aと$B0($1011 0000)で論理積（ステータスフラグ変更のみ）
$C1/8E6F BEQ $0E    [$8E7F]      ;ゼロフラグが立っているとき[$8E7F]分岐
;ゼロフラグOFF（石化、マヒ、眠り）
$C1/8E71 REP #$20                ;Aを16bit幅に変更、Mフラグをクリア
$C1/8E73 LDA $7E9104,x[$7E:AC04] ;Aに[$7E:ACn5][$7E:ACn4](敵番号nの順序ポイント)をロード
$C1/8E77 LSR A                   ;Aを論理右シフト　(/2)
$C1/8E78 STA $7E9104,x[$7E:AC04] ;Aを[$7E:ACn5][$7E:ACn4](敵番号nの順序ポイント)に書き込み
$C1/8E7C SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/8E7E RTS                     ;サブルーチン戻り

$C1/8F77 LDX $AC    [$00:03AC]   ;Xに[$00:03AC]をロード
$C1/8F79 REP #$20                ;Aを16bit幅に変更、Mフラグをクリア
$C1/8F7B LDA $7E9104,x[$7E:ACn4] ;Aに[$7E:ACn5][$7E:ACn4](敵番号nの順序ポイント)をロード
$C1/8F7F LSR A                   ;Aを論理右シフト　(/2)
$C1/8F80 STA $10    [$00:0310]   ;Aを[$00:0311][$00:0310]に書き込み
$C1/8F82 LSR A                   ;Aを論理右シフト　(/2)
$C1/8F83 CLC                     ;キャリーフラグクリア
$C1/8F84 ADC $10    [$00:0310]   ;A + [$00:0311][$00:0310]
$C1/8F86 STA $7E9104,x[$7E:ACn4] ;Aを[$7E:ACn5][$7E:ACn4](敵番号nの順序ポイント)に書き込み
$C1/8F8A SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/8F8C RTS                     ;サブルーチン戻り

$C1/8E51 LDA $AF    [$00:03AF]   ;Aに[$00:03AF](行動ポイント上1バイト)をロード
$C1/8E53 BNE $01    [$8E56]      ;ゼロフラグが立っていないとき[$8E56]分岐
$C1/8E56 LDA $B8    [$00:03B8]   ;Aに[$00:03B8]をロード
$C1/8E58 BNE $01    [$8E5B]      ;ゼロフラグが立っていないとき[$8E5B]分岐
$C1/8E5B JSR $92C3  [$C1:92C3]   ;[$C1:92C3]へジャンプ

;ここから敵ターンに回る処理
$C1/92C3 JSR $933C  [$C1:933C]   ;[$C1:933C]へジャンプ

$C1/933C STZ $16    [$00:0316]   ;[$00:0316]に$00を書き込み
$C1/933E LDX #$1AF0              ;Xに$1AF0をロード
$C1/9341 JSR $E1A9  [$C1:E1A9]   ;[$C1:E1A9]へジャンプ

$C1/E1A9 REP #$21                ;Aを16bit幅に変更、キャリーフラグクリア
$C1/E1AB TXA                     ;Xレジスタの値をAレジスタに転送
$C1/E1AC ADC #$0010              ;A + $0010 (=A:1B00)
$C1/E1AF TAX                     ;Aの値をXレジスタに転送
$C1/E1B0 SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/E1B2 CPX #$1C00              ;Xと$1C00を減算比較（ステータスレジスタ変更のみ）
$C1/E1B5 BEQ $11    [$E1C8]      ;ゼロフラグが立っているとき[$E1C8]分岐
$C1/E1B7 LDA $0001,x[$00:1B01]   ;Aに[$00:1B01](敵番号0戦闘状態)をロード
$C1/E1BA BIT #$40                ;Aと$40で論理積（ステータスフラグ変更のみ）
$C1/E1BC BNE $07    [$E1C5]      ;ゼロフラグが立っていないとき[$E1C5]分岐
$C1/E1C5 LDA #$7F                ;Aに$7Fをロード
$C1/E1C7 RTS                     ;サブルーチン戻り

$C1/9344 BEQ $FB    [$9341]      ;ゼロフラグが立っているとき[$9341]分岐
$C1/9346 BMI $0E    [$9356]      ;ネガティブフラグが立っているとき[$9356]分岐
$C1/9348 LDY $0002,x[$00:1B02]   ;Yに[$00:1B02]をロード
$C1/934B LDA $002F,y[$00:1A2F]   ;Aに[$00:1A2F](敵データ15 タイプ)をロード
$C1/934E BIT #$06                ;Aと$06で論理積（ステータスフラグ変更のみ）
$C1/9350 BNE $EF    [$9341]      ;ゼロフラグが立っていないとき[$9341]分岐
;ゼロフラグOFF　BREAKDOWN, OBJECT
$C1/9341 JSR $E1A9  [$C1:E1A9]  ;[$C1:E1A9]へジャンプ
;ゼロフラグON
$C1/9352 LDA #$FF                ;Aに$FFをロード
$C1/9354 STA $16    [$00:0316]   ;Aを[$00:0316]に書き込み
$C1/9356 RTS                     ;サブルーチン戻り

$C1/92C6 LDX #$1AF0              ;Xに$1AF0をロード
$C1/92C9 JSR $E1A9  [$C1:E1A9]   ;[$C1:E1A9]へジャンプ

$C1/E1A9 REP #$21                ;Aを16bit幅に変更、キャリーフラグクリア
$C1/E1AB TXA                     ;Xレジスタの値をAレジスタに転送
$C1/E1AC ADC #$0010              ;A + $0010
$C1/E1AF TAX                     ;Aの値をXレジスタに転送
$C1/E1B0 SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/E1B2 CPX #$1C00              ;Xと$1C00を減算比較（ステータスレジスタ変更のみ）
$C1/E1B5 BEQ $11    [$E1C8]      ;ゼロフラグが立っているとき[$E1C8]分岐
$C1/E1B7 LDA $0001,x[$00:1B01]   ;Aに[$00:1B01](敵番号0戦闘状態)をロード
$C1/E1BA BIT #$40                ;Aと$40で論理積（ステータスフラグ変更のみ）
$C1/E1BC BNE $07    [$E1C5]      ;ゼロフラグが立っていないとき[$E1C5]分岐
$C1/E1C5 LDA #$7F                ;Aに$7Fをロード
$C1/E1C7 RTS                     ;サブルーチン戻り

$C1/92CC BEQ $FB    [$92C9]      ;ゼロフラグが立っているとき[$92C9]分岐
$C1/92CE BMI $66    [$9336]      ;ネガティブフラグが立っているとき[$9336]分岐
$C1/92D0 LDY $0002,x[$00:1B02]   ;Yに[$00:1B02]をロード
$C1/92D3 LDA $002F,y[$00:1A2F]   ;Aに[$00:1A2F](敵データ15 タイプ)をロード
$C1/92D6 BIT #$04                ;Aと$04で論理積（ステータスフラグ変更のみ）OBJECT
$C1/92D8 BNE $EF    [$92C9]      ;ゼロフラグが立っていないとき[$92C9]分岐
;ゼロフラグON
$C1/92DA BIT #$02                ;Aと$02で論理積（ステータスフラグ変更のみ）BREAKDOWN
$C1/92DC BEQ $0C    [$92EA]      ;ゼロフラグが立っているとき[$92EA]分岐
;ゼロフラグON
$C1/92EA LDA $7E9104,x[$7E:AC04] ;Aに[$7E:AC04]をロード 敵番号0順序ポイント(下1バイト)94
$C1/92EE STA $10    [$00:0310]   ;Aを[$00:0310]に書き込み
$C1/92F0 LDA $7E9105,x[$7E:AC05] ;Aに[$7E:AC05]をロード 敵番号0順序ポイント(上1バイト)00
$C1/92F4 STA $11    [$00:0311]   ;Aを[$00:0311]に書き込み
$C1/92F6 STX $14    [$00:0314]   ;Xを[$00:0314]に書き込み
$C1/92F8 JSR $E1A9  [$C1:E1A9]   ;[$C1:E1A9]へジャンプ

;ループ処理ここから
$C1/E1A9 REP #$21                ;Aを16bit幅に変更、キャリーフラグクリア
$C1/E1AB TXA                     ;Xレジスタの値をAレジスタに転送
$C1/E1AC ADC #$0010              ;A + $0010
$C1/E1AF TAX                     ;Aの値をXレジスタに転送
$C1/E1B0 SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/E1B2 CPX #$1C00              ;Xと$1C00を減算比較（ステータスレジスタ変更のみ）
$C1/E1B5 BEQ $11    [$E1C8]      ;ゼロフラグが立っているとき[$E1C8]分岐
$C1/E1B7 LDA $0001,x[$00:1B11]   ;Aに[$00:1B11](敵番号1戦闘状態)をロード
$C1/E1BA BIT #$40                ;Aと$40で論理積（ステータスフラグ変更のみ）
$C1/E1BC BNE $07    [$E1C5]      ;ゼロフラグが立っていないとき[$E1C5]分岐
;ゼロフラグON（戦闘状態が$40か$80）
$C1/E1BE CMP #$80                ;Aと$80を減算比較（ステータスレジスタ変更のみ）
$C1/E1C0 BEQ $06    [$E1C8]      ;ゼロフラグが立っているとき[$E1C8]分岐
;ゼロフラグON（戦闘状態$80、つまり敵総数+1なので敵の判定すべて終了）
$C1/E1C8 LDA #$80                ;Aに$80をロード
;$C1/E1BCでゼロフラグOFF
$C1/E1C5 LDA #$7F                ;Aに$7Fをロード
$C1/E1C7 RTS                     ;サブルーチン戻り

$C1/92FB BEQ $FB    [$92F8]      ;ゼロフラグが立っているとき[$92F8]分岐
$C1/92FD BMI $32    [$9331]      ;ネガティブフラグが立っているとき[$9331]分岐
;ネガティブフラグONの時ループ抜けて$C1/9331へ
;ネガティブフラグOFF
$C1/92FF LDY $0002,x[$00:1B12]   ;Yに[$00:1B12]をロード
$C1/9302 LDA $002F,y[$00:1A2F]   ;Aに[$00:1A2F](敵データ15 タイプ)をロード
$C1/9305 BIT #$04                ;Aと$04で論理積（ステータスフラグ変更のみ）OBJECT
$C1/9307 BNE $EF    [$92F8]      ;ゼロフラグが立っていないとき[$92F8]分岐
;ゼロフラグON
$C1/9309 BIT #$02                ;Aと$02で論理積（ステータスフラグ変更のみ）BREAKDOWN
$C1/930B BEQ $0C    [$9319]      ;ゼロフラグが立っているとき[$9319]分岐
;ゼロフラグOFF(BREAKDOWN)
$C1/930D LDA #$00                ;Aに$00をロード
$C1/930F STA $7E8F02,x[$7E:AAx2] ;Aを[$7E:AAx2]に書き込み
$C1/9313 LDA $16    [$00:0316]   ;Aに[$00:0316]をロード
$C1/9315 BEQ $E1    [$92F8]      ;ゼロフラグが立っているとき[$92F8]分岐
$C1/9317 BRA $00    [$9319]      ;フラグにかかわりなく常に分岐[$9319]
;ゼロフラグON
$C1/9319 LDA $7E9104,x[$7E:AC14] ;Aに[$7E:AC14]をロード 敵番号1順序ポイント(下1バイト)
$C1/931D STA $12    [$00:0312]   ;Aを[$00:0312]に書き込み
$C1/931F LDA $7E9105,x[$7E:AC15] ;Aに[$7E:AC15]をロード 敵番号1順序ポイント(上1バイト)
$C1/9323 STA $13    [$00:0313]   ;Aを[$00:0313]に書き込み
$C1/9325 LDY $12    [$00:0312]   ;Yに[$00:0313][$00:0312]をロード
$C1/9327 CPY $10    [$00:0310]   ;Yと[$00:0311][$00:0310]を減算比較（ステータスレジスタ変更のみ）
$C1/9329 BCC $CD    [$92F8]      ;キャリーフラグが立っていないとき[$92F8]分岐
;キャリーフラグON
$C1/932B STY $10    [$00:0310]   ;Yを[$00:0311][$00:0310]に書き込み
$C1/932D STX $14    [$00:0314]   ;Xを[$00:0315][$00:0314]に書き込み
$C1/932F BRA $C7    [$92F8]      ;フラグにかかわりなく常に分岐[$92F8]
;キャリーフラグOFF
$C1/92F8 JSR $E1A9  [$C1:E1A9]   ;[$C1:E1A9]へジャンプ
;ループ処理ここまで

$C1/92FB BEQ $FB    [$92F8]      ;ゼロフラグが立っているとき[$92F8]分岐
$C1/92FD BMI $32    [$9331]      ;ネガティブフラグが立っているとき[$9331]分岐
$C1/9331 LDX $14    [$00:0314]   ;Xに[$00:0315][$00:0314]（順序ポイント最大値の敵番号）をロード
$C1/9333 STX $AC    [$00:03AC]   ;Xを[$00:03AD][$00:03AC]に書き込み
$C1/9335 RTS                     ;サブルーチン戻り

$C1/8E5E CPX #$0000              ;Xと$0000を減算比較（ステータスレジスタ変更のみ）
;（中略）
$C1/8E7F JSR $90A2  [$C1:90A2]   ;[$C1:90A2]へジャンプ

$C1/90A2 LDA $7E8F02,x[$7E:AAn2] ;Aに[$7E:AAn2](行動異常)をロード
$C1/90A6 BEQ $1C    [$90C4]      ;ゼロフラグが立っているとき[$90C4]分岐
;ゼロフラグOFF（行動異常0以外）
$C1/90A8 LDA $0005,x[$00:1Bn5]   ;Aに[$00:1Bn5]（技関係状態）をロード
$C1/90AB BNE $17    [$90C4]      ;ゼロフラグが立っていないとき[$90C4]分岐
;ゼロフラグOFF（タメ時間中ではない）
$C1/90AD LDA $7E9106,x[$7E:ACn6] ;Aに[$7E:ACn6]をロード
$C1/90B1 BNE $11    [$90C4]      ;ゼロフラグが立っていないとき[$90C4]分岐
;ゼロフラグON（行動異常解除判定処理へ）
$C1/90B3 JSR $6150  [$C1:6150]   ;[$C1:6150]へジャンプ
;（戦闘乱数計算）
$C1/90B6 AND #$7F                ;Aと$7F($0111 1111)で論理積
$C1/90B8 CMP $7E9000,x[$7E:ABn0] ;Aと[$7E:ABn0](LV(現在値))を減算比較（ステータスレジスタ変更のみ）
$C1/90BC BCS $06    [$90C4]      ;キャリーフラグが立っているとき[$90C4]分岐
;キャリーフラグOFF
$C1/90BE LDA #$00                ;Aに$00をロード
$C1/90C0 STA $7E8F02,x[$7E:AAn2] ;Aを[$7E:AAn2](行動異常)に書き込み
;ゼロフラグON（行動異常0）
$C1/90C4 RTS                     ;サブルーチン戻り

$C1/8E82 JSR $1CF7  [$C1:1CF7]   ;[$C1:1CF7]へジャンプ