ＨＳＰ 耐久力のある敵

質問

こんにちは。ＨＳＰでＳＴＧを制作しております

そこで「耐久力のある敵」を作ったのですが
【敵と敵２のヒットが一緒になってしまうので、敵と敵２が同時に消えてしまいます】
原因は「敵と敵２」を一緒にしていることなんですが、
一緒にしないとこの先ソースが大きくなってしまうため一緒にするしかないと思ってます

この場合選択肢がいくつかあると思います
１：敵を一緒にまとめたソース（これ）で解決する
２：敵を一緒にまとめる方法を変えて改善するか
３：当たった時の処理を変えるか

１を選択しなんとかしたいのですが、何かもっとよい方法がありましたら教えてください
それではよろしくお願いします
　-- ソース --
screen 0,380,450

buffer 1
// picload "自機.bmp"
gsel 0,1

buffer 3
// picload "でかい妖精2.bmp"
gsel 0

myx = 150 : myy = 350 ;自機座標
mySpd = 4 ;自機スピード

;←自機弾
TMMAX = 100
dim SHOT,100
dim SX,100 : dim SY,100

;妖精
DKMAX = 2
repeat DKMAX
DK_ene(DTK) = 0
DK_enex(DTK) = 0 : DK_eney(DTK) = 0
DTK++
loop
;****************メインループ*************************
*メイン
redraw 2 : color 20,20,20 : boxf
;****************カウンター*************************
color 255,0,0
pos 10,90 : mes "←敵カウンター " + HIT
pos 10,110 : mes "→敵カウンター " + HIT2
;****************************************************
gosub *弾移動
gosub *自機移動
gosub *妖精
gosub *敵ＶＳ弾

;自機
pos myx,myy : gmode 4,29,42,255 : gcopy 1,1,0

;妖精
DTK = 0
repeat DKMAX
if DK_ene(DTK) = 1 : pos DK_enex(DTK),DK_eney(DTK) : gmode 4,58,45,255 : gcopy 3,0,0
DTK++
loop

;自機弾
repeat TMMAX
if SHOT(cnt) = 1{
pos SX(cnt),SY(cnt) : gmode 2,9,8,255 : gcopy 1,1,43
}loop

redraw : await 15
goto *メイン
;**************自機の移動*******************************
*自機移動
stick key,15
if key & 1 : myx = myx - mySpd
if key & 2 : myy = myy - mySpd
if key & 4 : myx = myx + mySpd
if key & 8 : myy = myy + mySpd
return
;****************弾の移動******************************
*弾移動
getkey keyZ,90 ;Zキー
repeat TMMAX
if (keyZ) and SHOT(cnt) = 0 and rensya = 0 {
SHOT(cnt) = 1 : SX(cnt) = myx + 10　: SY(cnt) = myy - 10 : rensya = 500
}

if SHOT(cnt) = 1 : SY(cnt) -= 10
if SY(cnt) < 0 : SHOT(cnt) = 0
if rensya > 0 : rensya -= 1
loop
return
;****************妖精*****************************
*妖精
;敵Ｘ座高
DK_ENX(0) = 100
DK_ENX(1) = 200

;位置
DTK = 0
repeat DKMAX
　if DK_ene(DTK) = 0 : DK_ene(DTK) = 1 : DK_enex(DTK) = DK_ENX(DTK) : DK_eney(DTK) =　150
DTK++
loop
return

回答No.2

kmee · ベストアンサー

どんな手段使ったところで、各機毎にダメージ管理する必要があるでしょう。
今、HITを使っているところを(たぶん、これで管理しているように思います)、DK_eneh(DTK)みたいにして、他のDK_ene?と一緒に管理すればできるはずです。
ソースもそんなに大きくならないと思うのですが。

お礼

やっとできました。

単純に
if DPK == 0 : DKHIT += 1
if DPK == 1 : DKHIT2 += 1
とやれば別々に反応しました。

難しく考えすぎたようです・・・ｗ
どうもありがとうございました。〆ます

補足

言われてみればどんな方法だろうがダメージ管理は必要ですな。
今はＨＩＴで管理してますね。

左の敵を攻撃すると、左の敵と右の敵のＨＩＴカウントが同時に動いてしまいます。
右の敵を攻撃した場合も、左の敵と右の敵のＨＩＴカウントが同時に動いてしまいます。

でなんでこういうことが起きているかと言うと
if DK_ene(0) : HIT += 1 ;敵ヒットカウント
if DK_ene(1) : HIT2 += 1
の両方条件に当てはまってしまうがために、両方のカウントが動いてしまうのが原因です。

んでお答えしていただいたアドバイスを参考にしソースを変更してみましたがどうもうまくいかないです(´・ω・`)
ん～やりかたが悪いのかな～・・・参考になるソースとかあると助かるのですが・・・

お答えいただきありがとうございます。引き続きアドバイス等ありましたらお願いいたします。

回答No.1

tiutiu2

;***************敵ＶＳ弾************************
*敵ＶＳ弾
repeat TMMAX ;100
mytm_cnt = cnt
tmx(0) = SX.mytm_cnt : tmy(0) = SY.mytm_cnt
gosub *準備
loop
*準備
;***************妖精あたり判定****************************
DPK = 0
repeat DKMAX
;妖精
if DK_ene(DPK) = 1 and SHOT.mytm_cnt {
if (DK_enex(DPK) < tmx(0)+9) and (DK_enex(DPK) > tmx(0)-58) and (DK_eney(DPK) < tmy(0)+8) and (DK_eney(DPK) > tmy(0)-45){
if DK_ene(0) : HIT += 1 ;敵ヒットカウント
if DK_ene(1) : HIT2 += 1
// if DK_ene(DPK) == 0 : HIT += 1 ;敵ヒットカウント
// if DK_ene(DPK) == 1 : HIT2 += 1

SHOT.mytm_cnt = 0 ;自機弾フラグ
SHOT2.mytm_cnt2 = 0
}
}
DPK++
loop
return
----------------------
↑いつもどおり別アカで補足しときます。