コメント - Rmake

このコメントは、【雑談】リンクの冒険へのコメントです。

コメントの内容

井戸乃博士(投稿日：2014/01/19 21:01/19/14)

入れ違いで簸川さんがコメントくださったみたいですね。
ご指摘の箇所は、仲間に加えるところでもう一つifを加えた方がよさそうですね。
ちょっと全体を直してみます。

a= createArray()
i =0

while i < 4
 if getVariable("member")[i][0] == "true"
 pushArray(a, getVariable("member")[i][1])
 end
i = i + 1
end
pushArray(a, "やめる")
 
close = 0 
while close == 0
 k = speakWithSelectArray(a, "誰を変更しますか？")
 i = 0
 while i < 4
  if a[k] == getVariable("member")[i][1]

#修正してメンバーを加えるところに、パーティーがいっぱいの場合を入れました。   
   if getPartyMember(getVariable("member")[i][2])== -1
    if addPartyMember(getVariable("member")[i][2])
     speak(getVariable("member")[i][1]+"がパーテイに加わりました。")
    else 
     speak("メンバーはいっぱいです。誰かを外して下さい") 
    end

#パーティーにいる場合はパーティーから外す。ここはelseだけで良くなります。
   else
    removePartyMember(getVariable("member")[i][2])
    speak(getVariable("member")[i][1]+"をパーティからはずしました。")
   end

  elsif a[k] == "やめる"
      close = 1 
    end
  i = i + 1
  end
end

ややこしいですが、こちらを試してみてください。ご面倒おかけします。

コメントの内容(一番最初の投稿)

井戸乃博士(投稿日：2014/01/19 21:01/19/14)

a= createArray()
i =0

while i < 4
 if getVariable("member")[i][0] == "true"
 pushArray(a, getVariable("member")[i][1])
 end
i = i + 1
end
pushArray(a, "やめる")
 
close = 0 
while close == 0
 k = speakWithSelectArray(a, "誰を変更しますか？")
 i = 0
 while i < 4
  if a[k] == getVariable("member")[i][1]

#修正してメンバーを加えるところに、パーティーがいっぱいの場合を入れました。   
   if getPartyMember(getVariable("member")[i][2])== -1
    if addPartyMember(getVariable("member")[i][2])
     speak(getVariable("member")[i][1]+"がパーテイに加わりました。")
    else 
     speak("メンバーはいっぱいです。誰かを外して下さい") 
    end

#パーティーにいる場合はパーティーから外す。ここはelseだけで良くなります。
   else
    removePartyMember(getVariable("member")[i][2])
    speak(getVariable("member")[i][1]+"をパーティからはずしました。")
   end

  elsif a[k] == "やめる"
      close = 1 
    end
  i = i + 1
  end
end

ややこしいですが、こちらを試してみてください。ご面倒おかけします。