| 電脳戦機バーチャロンの バルバドス用ERL操作インクルードファイルを作ってみたのですが ユニットコマンドでインクルードを読み込み、 ERLを設置して帰還させた後、もう一度同じERLを設置すると 無限に設置できてしまいます。 どうかアドバイスをください。
ユニットデータは武装を外していますが以下の通りです。
バル=バドス バル=バドス, バーチャロイド, 1, 2 陸, 4, M, 4000, 105 特殊能力 ハードポイントLv4=ERL 阻止Lv2=V.アーマー BV 100 5 BGM=VOOT_BalBados.mid 3200, 130, 1000, 100 -ABA, VO_BalBados_1.bmp
右手ERL 右手ERL, バーチャロイド, 1, 1 空, 0, S, 0, 40 特殊能力 EN回復Lv10 無効化=全 100, 120, 100, 70 AAAA, VO_RhERL.bmp
左手ERL 左手ERL, バーチャロイド, 1, 1 空, 0, S, 0, 40 特殊能力 EN回復Lv10 無効化=全 100, 120, 100, 70 AAAA, VO_LhERL.bmp
右腿ERL 右腿ERL, バーチャロイド, 1, 1 空, 0, S, 0, 40 特殊能力 EN回復Lv10 無効化=全 100, 120, 100, 70 AAAA, VO_RsERL.bmp
左腿ERL 左腿ERL, バーチャロイド, 1, 1 空, 0, S, 0, 40 特殊能力 EN回復Lv10 無効化=全 100, 120, 100, 70 AAAA, VO_LsERL.bmp
ERL操作: Do Ask ERLを操作します 連続表示 キャンセル可 ERL設置する ERLを帰還させる 操作終了 End If 選択 = 1 Then Ask どのERLを設置しますか? 連続表示 キャンセル可 右手ERL 左手ERL 右腿ERL 左腿ERL End If 選択 = 1 Then If Status(右手ERL(ザコ)) = 出撃 Then Talk システム すでに設置済みです End Goto ERL操作 Else RemoveItem Pilot(バル=バドス) 右手ERL Create 味方 右手ERL Rank(バル=バドス) 右手ERL(ザコ) Level(Pilot(バル=バドス)) X(Pilot(バル=バドス)) Y(Pilot(バル=バドス)) Goto ERL操作 EndIf ElseIf 選択 = 2 Then If Status(左手ERL(ザコ)) = 出撃 Then Talk システム すでに設置済みです End Goto ERL操作 Else RemoveItem Pilot(バル=バドス) 左手ERL Create 味方 左手ERL Rank(バル=バドス) 左手ERL(ザコ) Level(Pilot(バル=バドス)) X(Pilot(バル=バドス)) Y(Pilot(バル=バドス)) Goto ERL操作 EndIf ElseIf 選択 = 3 Then If Status(右腿ERL(ザコ)) = 出撃 Then Talk システム すでに設置済みです End Goto ERL操作 Else RemoveItem Pilot(バル=バドス) 右腿ERL Create 味方 右腿ERL Rank(バル=バドス) 右腿ERL(ザコ) Level(Pilot(バル=バドス)) X(Pilot(バル=バドス)) Y(Pilot(バル=バドス)) Goto ERL操作 EndIf ElseIf 選択 = 4 Then If Status(左腿ERL(ザコ)) = 出撃 Then Talk システム すでに設置済みです End Goto ERL操作
Else RemoveItem Pilot(バル=バドス) 左腿ERL Create 味方 左腿ERL Rank(バル=バドス) 左腿ERL(ザコ) Level(Pilot(バル=バドス)) X(Pilot(バル=バドス)) Y(Pilot(バル=バドス)) Goto ERL操作 EndIf EndIf
ElseIf 選択 = 2 Then Ask どのERLを帰還させますか? 連続表示 キャンセル可 右手ERL 左手ERL 右腿ERL 左腿ERL End If 選択 = 1 Then If Status(右手ERL(ザコ)) = 出撃 Then Equip Pilot(バル=バドス) 右手ERL Escape 右手ERL(ザコ) Goto ERL操作 Else Talk システム すでに帰還済みです End Goto ERL操作 EndIf ElseIf 選択 = 2 Then If Status(左手ERL(ザコ)) = 出撃 Then Equip Pilot(バル=バドス) 左手ERL Escape 左手ERL(ザコ) Goto ERL操作 Else Talk システム すでに帰還済みです End Goto ERL操作 EndIf ElseIf 選択 = 3 Then If Status(右腿ERL(ザコ)) = 出撃 Then Equip Pilot(バル=バドス) 右腿ERL Escape 右腿ERL(ザコ) Goto ERL操作 Else Talk システム すでに帰還済みです End Goto ERL操作 EndIf ElseIf 選択 = 4 Then If Status(左腿ERL(ザコ)) = 出撃 Then Equip Pilot(バル=バドス) 左腿ERL Escape 左腿ERL(ザコ) Goto ERL操作 Else Talk システム すでに帰還済みです End Goto ERL操作 EndIf EndIf Else 選択 = 3 Then Do Ask ERL操作を終了します 連続表示 キャンセル可 終了する まだ操作する End If 選択 = 1 Then Confirm OK? Else Goto ERL操作 EndIf Loop While (選択 = 0) EndIf Loop While (選択 = "Not 3") Ask 終了
|