TOP > プログラミング関係解説＆調査 > 味方との戦闘 > 最終編オルステッド主人公時(2)

$C1/E894 STZ $0005,x[$00:1C05]   ;[$00:1C05](味方キャラ番号1 経験値)に$00を書き込み
$C1/E897 STZ $001E,x[$00:1C1E]   ;[$00:1C1E]に$00を書き込み
$C1/E89A LDA #$04                ;Aに$04をロード
$C1/E89C STA $001F,x[$00:1C1F]   ;A($04)を[$00:1C1F]に書き込み
$C1/E89F STZ $11    [$00:0311]   ;[$00:0311]に$00を書き込み
$C1/E8A1 STX $14    [$00:0314]   ;Xを[$00:0314]に書き込み
$C1/E8A3 LDY $0002,x[$00:1C02]   ;Yに[$00:1C02]をロード
$C1/E8A6 LDA $0006,y[$00:0D06]   ;Aに[$00:0D06]（シナリオ別キャラデータ　オルステッド　レベル）をロード
$C1/E8A9 STA $0038,x[$00:1C38]   ;Aを[$00:1C38]（味方キャラデータ1人目　LV(現在値)）に書き込み
$C1/E8AC LDA #$00                ;Aに$00をロード
$C1/E8AE STA $0039,x[$00:1C39]   ;Aを[$00:1C39]（味方キャラデータ1人目　状態異常）に書き込み
$C1/E8B1 LDA #$04                ;Aに$04をロード
$C1/E8B3 STA $08    [$00:0308]   ;Aを[$00:0308]に書き込み
;
;ループ処理
$C1/E8B5 LDA $0010,y             ;Aに[$00:0D10], [$00:0D13], [$00:0D13], [$00:0D16], [$00:0D19]をロード
$C1/E8B8 STA $0030,x             ;Aを[$00:1C30]～[$00:1C33]に書き込み
$C1/E8BB STA $0034,x             ;Aを[$00:1C34]～[$00:1C37]に書き込み
$C1/E8BE INX                     ;Xをインクリメント +1
$C1/E8BF INY                     ;Yをインクリメント +1
$C1/E8C0 INY                     ;Yをインクリメント +1
$C1/E8C1 INY                     ;Yをインクリメント +1
$C1/E8C2 DEC $08    [$00:0308]   ;[$00:0308]をデクリメント -1
$C1/E8C4 BNE $EF    [$E8B5]      ;ゼロフラグが立っていないとき[$E8B5]分岐
;ループここまで
;
$C1/E8C6 LDX $14    [$00:0314]   ;Xに[$00:0314]をロード
$C1/E8C8 RTS                     ;サブルーチン戻り

$C1/F89B LDX #$1C00              ;Xに$1C00をロード
$C1/F89E LDY #$1A00              ;Yに$1A00をロード
$C1/F8A1 LDA #$04                ;Aに$04をロード
$C1/F8A3 STA $08    [$00:0308]   ;Aを[$00:0308]に書き込み
;
;使用技1ループ処理
$C1/F8A5 LDA $002B,y[$00:1A2B]   ;Aに[$00:1A2B](敵データ11　使用技1)をロード
$C1/F8A8 STA $7ECD00,x[$7E:E900] ;Aを[$7E:E900](味方1 使用技1)に書き込み
$C1/F8AC LDA $0012,y[$00:1A12]   ;Aに[$00:1A12](技1の反撃属性1)をロード
$C1/F8AF STA $7ECD20,x[$7E:E920] ;Aを[$7E:E920](味方1 技1反撃属性1)に書き込み
$C1/F8B3 LDA $0016,y[$00:1A16]   ;Aに[$00:1A16](技1の反撃属性2)をロード
$C1/F8B6 STA $7ECD30,x[$7E:E930] ;Aを[$7E:E930](味方1 技1反撃属性2)に書き込み
$C1/F8BA LDA $001A,y[$00:1A1A]   ;Aに[$00:1A1A](技1が使用不可になるステータス異常)をロード
$C1/F8BD STA $7ECD10,x[$7E:E910] ;Aを[$7E:E910](味方1 技1が使用不可になるステータス異常)に書き込み
$C1/F8C1 INX                     ;Xをインクリメント +1
$C1/F8C2 INY                     ;Yをインクリメント +1
$C1/F8C3 DEC $08    [$00:0308]   ;[$00:0308]をデクリメント -1
$C1/F8C5 BNE $DE    [$F8A5]      ;ゼロフラグが立っていないとき[$F8A5]分岐
;使用技1ループ処理ここまで
;
;使用技2ループ処理
$C1/F8A5 LDA $002B,y[$00:1A2C]   ;Aに[$00:1A2C](敵データ12　使用技2)をロード
$C1/F8A8 STA $7ECD00,x[$7E:E901] ;Aを[$7E:E901](味方1 使用技2)に書き込み
$C1/F8AC LDA $0012,y[$00:1A13]   ;Aに[$00:1A13](技2の反撃属性1)をロード
$C1/F8AF STA $7ECD20,x[$7E:E921] ;Aを[$7E:E921](味方1 技2反撃属性1)に書き込み
$C1/F8B3 LDA $0016,y[$00:1A17]   ;Aに[$00:1A17](技2の反撃属性2)をロード
$C1/F8B6 STA $7ECD30,x[$7E:E931] ;Aを[$7E:E931](味方1 技2反撃属性2)に書き込み
$C1/F8BA LDA $001A,y[$00:1A1B]   ;Aに[$00:1A1B](技2が使用不可になるステータス異常)をロード
$C1/F8BD STA $7ECD10,x[$7E:E911] ;Aを[$7E:E911](味方1 技1が使用不可になるステータス異常)に書き込み
$C1/F8C1 INX                     ;Xをインクリメント +1
$C1/F8C2 INY                     ;Yをインクリメント +1
$C1/F8C3 DEC $08    [$00:0308]   ;[$00:0308]をデクリメント -1
$C1/F8C5 BNE $DE    [$F8A5]      ;ゼロフラグが立っていないとき[$F8A5]分岐
;使用技2ループ処理ここまで
;
;使用技3ループ処理
$C1/F8A5 LDA $002B,y[$00:1A2D]   ;Aに[$00:1A2D](敵データ13　使用技3)をロード
$C1/F8A8 STA $7ECD00,x[$7E:E902] ;Aを[$7E:E902](味方1 使用技3)に書き込み
$C1/F8AC LDA $0012,y[$00:1A14]   ;Aに[$00:1A14](技3の反撃属性1)をロード
$C1/F8AF STA $7ECD20,x[$7E:E922] ;Aを[$7E:E922](味方1 技3反撃属性1)に書き込み
$C1/F8B3 LDA $0016,y[$00:1A18]   ;Aに[$00:1A18](技3の反撃属性2)をロード
$C1/F8B6 STA $7ECD30,x[$7E:E932] ;Aを[$7E:E932](味方1 技3反撃属性2)に書き込み
$C1/F8BA LDA $001A,y[$00:1A1C]   ;Aに[$00:1A1C](技3が使用不可になるステータス異常)をロード
$C1/F8BD STA $7ECD10,x[$7E:E912] ;Aを[$7E:E912](味方1 技3が使用不可になるステータス異常)に書き込み
$C1/F8C1 INX                     ;Xをインクリメント +1
$C1/F8C2 INY                     ;Yをインクリメント +1
$C1/F8C3 DEC $08    [$00:0308]   ;[$00:0308]をデクリメント -1
$C1/F8C5 BNE $DE    [$F8A5]      ;ゼロフラグが立っていないとき[$F8A5]分岐
;使用技3ループ処理ここまで
;
;使用技4ループ処理
$C1/F8A5 LDA $002B,y[$00:1A2E]   ;Aに[$00:1A2E](敵データ14　使用技4)をロード
$C1/F8A8 STA $7ECD00,x[$7E:E903] ;Aを[$7E:E903](味方1 使用技4)に書き込み
$C1/F8AC LDA $0012,y[$00:1A15]   ;Aに[$00:1A15](技4の反撃属性1)をロード
$C1/F8AF STA $7ECD20,x[$7E:E923] ;Aを[$7E:E923](味方1 技4反撃属性1)に書き込み
$C1/F8B3 LDA $0016,y[$00:1A19]   ;Aに[$00:1A19](技4の反撃属性2)をロード
$C1/F8B6 STA $7ECD30,x[$7E:E933] ;Aを[$7E:E933](味方1 技4反撃属性2)に書き込み
$C1/F8BA LDA $001A,y[$00:1A1D]   ;Aに[$00:1A1D](技4が使用不可になるステータス異常)をロード
$C1/F8BD STA $7ECD10,x[$7E:E913] ;Aを[$7E:E913](味方1 技4が使用不可になるステータス異常)に書き込み
$C1/F8C1 INX                     ;Xをインクリメント +1
$C1/F8C2 INY                     ;Yをインクリメント +1
$C1/F8C3 DEC $08    [$00:0308]   ;[$00:0308]をデクリメント -1
$C1/F8C5 BNE $DE    [$F8A5]      ;ゼロフラグが立っていないとき[$F8A5]分岐
;使用技4ループ処理ここまで
;
$C1/F8C7 RTS                     ;サブルーチン戻り
;
$C1/F76F JSR $F8C8  [$C1:F8C8]   ;[$C1:F8C8]へジャンプ
;
$C1/F8C8 LDX #$0D00              ;Xに$0D00をロード
$C1/F8CB LDY #$1A00              ;Yに$1A00をロード
$C1/F8CE REP #$20                ;Aを16bit幅に変更、Mフラグをクリア
$C1/F8D0 LDA $0010,y[$00:1A10]   ;Aに[$00:1A11][$00:1A10](敵種類1のHP2バイト)をロード
$C1/F8D3 STA $0008,x[$00:0D08]   ;Aを[$00:0D09][$00:0D08]（シナリオ別キャラデータ オルステッド/現在HP）に書き込み
$C1/F8D6 STA $000A,x[$00:0D0A]   ;Aを[$00:0D0B][$00:0D0A]（シナリオ別キャラデータ オルステッド/最大HP）に書き込み
$C1/F8D9 LDA $003E,y[$00:1A3E]   ;Aに[$00:1A3F][$00:1A3E](敵データ30～31　回避属性)をロード
$C1/F8DC STA $0021,x[$00:0D21]   ;Aを[$00:0D22][$00:0D21]（シナリオ別キャラデータ オルステッド/回避属性）に書き込み
$C1/F8DF SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/F8E1 LDA $000B,y[$00:1A0B]   ;Aに[$00:1A0B](敵種類1 レベル)をロード
$C1/F8E4 STA $0006,x[$00:0D06]   ;Aを[$00:0D06]（シナリオ別キャラデータ オルステッド/レベル）に書き込み
$C1/F8E7 LDA $0025,y[$00:1A25]   ;Aに[$00:1A25](敵種類1 敵データ05　力)をロード
$C1/F8EA STA $0010,x[$00:0D10]   ;Aを[$00:0D10]（シナリオ別キャラデータ オルステッド/力＋装備上昇分）に書き込み
$C1/F8ED LDA $0026,y[$00:1A26]   ;Aに[$00:1A26](敵種類1 敵データ06　速)をロード
$C1/F8F0 STA $0013,x[$00:0D13]   ;Aを[$00:0D13]（シナリオ別キャラデータ オルステッド/速＋装備上昇分）に書き込み
$C1/F8F3 LDA $0027,y[$00:1A27]   ;Aに[$00:1A27](敵種類1 敵データ07　体)をロード
$C1/F8F6 STA $0016,x[$00:0D16]   ;Aを[$00:0D16]（シナリオ別キャラデータ オルステッド/体＋装備上昇分）に書き込み
$C1/F8F9 LDA $0028,y[$00:1A28]   ;Aに[$00:1A28](敵種類1 敵データ08　知)をロード
$C1/F8FC STA $0019,x[$00:0D19]   ;Aを[$00:0D19]（シナリオ別キャラデータ オルステッド/知＋装備上昇分）に書き込み
$C1/F8FF LDA $003D,y[$00:1A3D]   ;Aに[$00:1A3D]（敵種類1 敵データ29　背後補正/側面補正）をロード
$C1/F902 AND #$0F                ;Aと$0Fで論理積
$C1/F904 STA $001C,x[$00:0D1C]   ;Aを[$00:0D1C]（シナリオ別キャラデータ オルステッド/側面補正）に書き込み
$C1/F907 LDA $003D,y[$00:1A3D]   ;Aに[$00:1A3D]（敵データ29　背後補正/側面補正）をロード
$C1/F90A LSR A                   ;Aを論理右シフト　(/2)
$C1/F90B LSR A                   ;Aを論理右シフト　(/2)
$C1/F90C LSR A                   ;Aを論理右シフト　(/2)
$C1/F90D LSR A                   ;Aを論理右シフト　(/2)
$C1/F90E AND #$0F                ;Aと$0Fで論理積
$C1/F910 STA $001D,x[$00:0D1D]   ;Aを[$00:0D1D]（シナリオ別キャラデータ オルステッド/背後補正）に書き込み
$C1/F913 LDA $002A,y[$00:1A2A]   ;Aに[$00:1A2A](敵データ10　無効状態異常)をロード
$C1/F916 STA $0020,x[$00:0D20]   ;Aを[$00:0D20]（シナリオ別キャラデータ オルステッド/無効状態異常）に書き込み
$C1/F919 LDA $0021,y[$00:1A21]   ;Aに[$00:1A21](敵データ01　上4ビット：フィールド吸収/下4ビット：移動頻度)をロード
$C1/F91C LSR A                   ;Aを論理右シフト　(/2)
$C1/F91D LSR A                   ;Aを論理右シフト　(/2)
$C1/F91E LSR A                   ;Aを論理右シフト　(/2)
$C1/F91F LSR A                   ;Aを論理右シフト　(/2)
$C1/F920 AND #$0F                ;Aと$0Fで論理積
$C1/F922 STA $0031,x[$00:0D31]   ;Aを[$00:0D31](シナリオ別キャラデータ オルステッド/フィールド吸収)に書き込み
$C1/F925 LDY #$1C00              ;Yに$1C00をロード
$C1/F928 LDA $0010,x[$00:0D10]   ;Aに[$00:0D10](=[$00:1A25] おーでぃーおー　力の値)をロード
$C1/F92B STA $0030,y[$00:1C30]   ;Aを[$00:1C30]（味方キャラ1 力(通常値))に書き込み
$C1/F92E STA $0034,y[$00:1C34]   ;Aを[$00:1C34]（味方キャラ1 力(現在値))に書き込み
$C1/F931 LDA $0013,x[$00:0D13]   ;Aに[$00:0D13](=[$00:1A26] おーでぃーおー　速の値)をロード
$C1/F934 STA $0031,y[$00:1C31]   ;Aを[$00:1C31]（味方キャラ1 速(通常値))に書き込み
$C1/F937 STA $0035,y[$00:1C35]   ;Aを[$00:1C35]（味方キャラ1 速(現在値))に書き込み
$C1/F93A LDA $0016,x[$00:0D16]   ;Aに[$00:0D16](=[$00:1A27] おーでぃーおー　体の値)をロード
$C1/F93D STA $0032,y[$00:1C32]   ;Aを[$00:1C32]（味方キャラ1 体(通常値))に書き込み
$C1/F940 STA $0036,y[$00:1C36]   ;Aを[$00:1C36]（味方キャラ1 体(現在値))に書き込み
$C1/F943 LDA $0019,x[$00:0D19]   ;Aに[$00:0D19](=[$00:1A28] おーでぃーおー　知の値)をロード
$C1/F946 STA $0033,y[$00:1C33]   ;Aを[$00:1C33]（味方キャラ1 知(通常値))に書き込み
$C1/F949 STA $0037,y[$00:1C37]   ;Aを[$00:1C37]（味方キャラ1 知(現在値))に書き込み
$C1/F94C LDA $0006,x[$00:0D06]   ;Aに[$00:0D06](=[$00:1A0B](敵種類1 レベル))をロード
$C1/F94F STA $0038,y[$00:1C38]   ;Aを[$00:1C38](味方キャラ1 LV(現在値))に書き込み
$C1/F952 LDX #$1C00              ;Xに$1C00をロード
$C1/F955 JSR $E8C9  [$C1:E8C9]   ;[$C1:E8C9]へジャンプ
;
$C1/E8C9 LDY $0002,x[$00:1C02]   ;Yに[$00:1C02]をロード
$C1/E8CC REP #$21                ;Aを16bit幅に変更、キャリーフラグクリア
$C1/E8CE LDA $000A,y[$00:0D0A]   ;Aに[$00:0D0A]をロード
$C1/E8D1 STA $0008,y[$00:0D08]   ;Aを[$00:0D08]に書き込み
$C1/E8D4 STA $4204  [$00:4204]   ;Aを[$00:4204]に書き込み
$C1/E8D7 SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/E8D9 JSR $CE0B  [$C1:CE0B]   ;[$C1:CE0B]へジャンプ

$C1/C1C9 PLX                     ;Xレジスタにスタックからプル(X:1B20)
$C1/C1CA JSR $6F7C  [$C1:6F7C]   ;[$C1:6F7C]へジャンプ

$C1/6F7C STX $60    [$00:0360]   ;X(1B20/※HPが0になった敵番号アドレス)を[$00:0360]に書き込み
$C1/6F7E JSR $FD76  [$C1:FD76]   ;[$C1:FD76]へジャンプ

$C1/FD76 LDA $0A00  [$00:0A00]   ;Aに[$00:0A00](シナリオID)をロード
$C1/FD79 CMP #$08                ;Aと$08を減算比較（ステータスレジスタ変更のみ）
$C1/FD7B BNE $03    [$FD80]      ;ゼロフラグが立っていないとき[$FD80]分岐
$C1/FD7D LDA $0A10  [$00:0A10]   ;Aに[$00:0A10](最終編主人公)をロード
$C1/FD80 RTS                     ;サブルーチン戻り
;
$C1/6F81 BNE $64    [$6FE7]      ;ゼロフラグが立っていないとき[$6FE7]分岐
$C1/6F83 LDA $50    [$00:0350]   ;Aに[$00:0350]（※おーでぃーおー戦 F2）をロード
$C1/6F85 CMP #$F2                ;Aと$F2を減算比較（ステータスレジスタ変更のみ）
$C1/6F87 BNE $5E    [$6FE7]      ;ゼロフラグが立っていないとき[$6FE7]分岐
$C1/6F89 LDA #$07                ;Aに$07(ざきのキャラID)をロード
$C1/6F8B CMP $1C40  [$00:1C40]   ;Aと[$00:1C40]（味方2人目・ポゴのID）を減算比較（ステータスレジスタ変更のみ）
$C1/6F8E BEQ $57    [$6FE7]      ;ゼロフラグが立っているとき[$6FE7]分岐
$C1/6F90 CMP $1C80  [$00:1C80]   ;Aと[$00:1C80]（味方3人目・ゴリのID）を減算比較（ステータスレジスタ変更のみ）
$C1/6F93 BEQ $52    [$6FE7]      ;ゼロフラグが立っているとき[$6FE7]分岐
$C1/6F95 CMP $1CC0  [$00:1CC0]   ;Aと[$00:1CC0]（味方4人目・べるのID）を減算比較（ステータスレジスタ変更のみ）
$C1/6F98 BEQ $4D    [$6FE7]      ;ゼロフラグが立っているとき[$6FE7]分岐
$C1/6F9A LDX $60    [$00:0360]   ;Xに[$00:0360](1B20)をロード
$C1/6F9C LDA #$40                ;Aに$40をロード
$C1/6F9E STA $0001,x[$00:1B21]   ;Aを[$00:1B21]（敵番号2 戦闘状態）に書き込み
$C1/6FA1 REP #$20                ;Aを16bit幅に変更、Mフラグをクリア
$C1/6FA3 LDA $7E900E,x[$7E:AB2E] ;Aに[$7E:AB2E]をロード
$C1/6FA7 TAX                     ;Aレジスタの値をXレジスタに転送
$C1/6FA8 LDA #$0F80              ;Aに$0F80をロード
$C1/6FAB STA $0002,x[$00:1C82]   ;Aを[$00:1C82]に書き込み
$C1/6FAE SEP #$20                ;MフラグON　Aレジスタは8bit幅
$C1/6FB0 LDA #$07                ;Aに$07(ざきのキャラID)をロード
$C1/6FB2 STA $0000,x[$00:1C80]   ;Aを[$00:1C80]（味方キャラ3人目ID）に書き込み
$C1/6FB5 LDA #$20                ;Aに$20をロード
$C1/6FB7 STA $0001,x[$00:1C81]   ;A($20)を[$00:1C81]（味方キャラ3人目戦闘状態）に書き込み
$C1/6FBA JSR $E88B  [$C1:E88B]   ;[$C1:E88B]へジャンプ