| ども、クロです。
今回は、題名とおりですけど「括弧の対応が取れていません」という
エラーについてです。
今、インターミッション以外でアイテム交換ができるインクルを作ってるんですけど、上記のようなエラーが出るのです。
大体のインクルはこちらです。
*ユニットコマンド 装備変更 味方:
StopBGM
Font Ｐゴシック Regular
#---------------------------------------------------------
ＨＰ変数 = 耐久
ＥＮ変数 = 出力
ユニット能力値変数 = スペック
装甲変数 = 装甲
運動性変数 = 運動性
移動力変数 = 移動力
サイズ変数 = サイズ
修理費変数 = 修理費
ユニット地形適応変数 = 適応地形
ユニット空変数 = 空
ユニット地変数 = 地
ユニット水変数 = 水
ユニット宇変数 = 宇
最大アイテム所持数変数 = アイテム
#---------------------------------------------------------
PaintPicture Bitmap\Event\MenuStatusMainAlly.bmp - 0
PaintPicture Bitmap\Event\StatusLoadAlly.bmp - 64
#---------------------------------------------------------
Font 24pt
PaintString 5 5 "$(最大アイテム所持数変数) $(Info(対象ユニットＩＤ,アイテム数))/$(Info(対象ユニットＩＤ,最大アイテム数))"
Font 15pt
If Info(対象ユニットＩＤ,最大アイテム数) >= 1 Then
If (対象ユニットＩＤ,アイテム,1) = "" Then
PaintString 9 40 "-"
HotPoint アイテム１ 9 40 235 25 非表示
Else
PaintString 9 40 "$(Info(対象ユニットＩＤ,アイテム,1))"
HotPoint アイテム１ 9 40 235 25 Info(Info(対象ユニットＩＤ,アイテム,1),解説文))
EndIf
Else
PaintString 9 40 "$(最大アイテム所持数変数)装備不可"
EndIf
If Info(対象ユニットＩＤ,最大アイテム数) >= 2 Then
If Info(対象ユニットＩＤ,アイテム,2) = "" Then
PaintString 9 68 "-"
HotPoint アイテム１ 9 68 235 25 非表示
Else
PaintString 9 68 "$(Info(対象ユニットＩＤ,アイテム,2))"
HotPoint アイテム１ 9 68 235 25 Info(Info(対象ユニットＩＤ,アイテム,2),解説文))
EndIf
EndIf
If Info(対象ユニットＩＤ,最大アイテム数) >= 3 Then
If Info(対象ユニットＩＤ,アイテム,3) = "" Then
PaintString 9 96 "-"
HotPoint アイテム１ 9 96 235 25 非表示
Else
PaintString 9 96 "$(Info(対象ユニットＩＤ,アイテム,3))"
HotPoint アイテム１ 9 96 235 25 Info(Info(対象ユニットＩＤ,アイテム,3),解説文))
EndIf
EndIf
If Info(対象ユニットＩＤ,最大アイテム数) >= 4 Then
If Info(対象ユニットＩＤ,アイテム,4) = "" Then
PaintString 9 124 "-"
HotPoint アイテム１ 9 124 235 25 非表示
Else
PaintString 9 124 "$(Info(対象ユニットＩＤ,アイテム,4))"
HotPoint アイテム１ 9 124 235 25 Info(Info(対象ユニットＩＤ,アイテム,4),解説文))
EndIf
EndIf
If Info(対象ユニットＩＤ,最大アイテム数) >= 5 Then
If Info(対象ユニットＩＤ,アイテム,5) = "" Then
PaintString 9 152 "-"
HotPoint アイテム１ 9 152 235 25 非表示
Else
PaintString 9 152 "$(Info(対象ユニットＩＤ,アイテム,5))"
HotPoint アイテム１ 9 152 235 25 Info(Info(対象ユニットＩＤ,アイテム,5),解説文))
EndIf
EndIf
If Info(対象ユニットＩＤ,最大アイテム数) >= 6 Then
If Info(対象ユニットＩＤ,アイテム,6) = "" Then
PaintString 9 180 "-"
HotPoint アイテム１ 9 180 235 25 非表示
Else
PaintString 9 180 "$(Info(対象ユニットＩＤ,アイテム,6))"
HotPoint アイテム１ 9 180 235 25 Info(Info(対象ユニットＩＤ,アイテム,6),解説文))
EndIf
EndIf
If Info(対象ユニットＩＤ,最大アイテム数) >= 7 Then
If Info(対象ユニットＩＤ,アイテム,7) = "" Then
PaintString 9 208 "-"
HotPoint アイテム１ 9 208 235 25 非表示
Else
PaintString 9 208 "$(Info(対象ユニットＩＤ,アイテム,7))"
HotPoint アイテム１ 9 208 235 25 Info(Info(対象ユニットＩＤ,アイテム,7),解説文))
EndIf
EndIf
If Info(対象ユニットＩＤ,最大アイテム数) >= 8 Then
If Info(対象ユニットＩＤ,アイテム,8) = "" Then
PaintString 9 236 "-"
HotPoint アイテム１ 9 236 235 25 非表示
Else
PaintString 9 236 "$(Info(対象ユニットＩＤ,アイテム,8))"
HotPoint アイテム１ 9 236 235 25 Info(Info(対象ユニットＩＤ,アイテム,8),解説文))
EndIf
EndIf
Exit
そして、これを読み込むと
HotPoint アイテム１ 9 40 235 25 Info(Info(対象ユニットＩＤ,アイテム,1),解説文))
や、他に似たところがエラー対象となっています。
このバグを取るにはどうしたらよいでしょうか？
分かる方は教えてくださるようお願いします。
|
新着情報