コメント - Rmake

このコメントは、【トピック】持っているアイテムを選択肢にしたいへのコメントです。

コメントの内容

rurun9(投稿日：2011/12/25 01:12/25/11)

あー思ってたよりもややこしくて、ワケわからんねｗ

とりあえずランダムでアイテムをくれる人を用意

case speakWithSelect(2,"ひとつもらう","リセット","どーする？")
when 0
 case rand(3)
 when 0 giveItem(5142) #番号は自分で用意したのに変えてね
 when 1 giveItem(7493)
 when 2 giveItem(2029)
 end

when 1
 n=0; a=getItemIdArray()
 while n<getArrayLength(a)
  removeItemWithIndex(0)
 n=n+1
 end

end

んでコレが本体

a=getItemIdArray()
b=createArray(); b[0]=a[0]
c=createArray()
d=createArray()

n=0 #まずは所持配列aから各１個ずつの配列bを作成
while n<getArrayLength(a)
 m=0; judge=true
 while m<getArrayLength(b)
  if a[n]==b[m]
   judge=false #ダブりを発見したらフラグ変更
  end
 m=m+1
 end
 if judge #フラグが残ってる＝ダブり無しなので加える
  pushArray(b,a[n])
 end
n=n+1
end

n=0 #今度はそれぞれをいくつ持ってるのか数える
while n<getArrayLength(b)
 m=0; i=0
 while m<getArrayLength(a)
  if b[n]==a[m]
   i=i+1
  end
 m=m+1
 end
 c[n]=i
 d[n]=b[n]+"番のアイテムが"+c[n]+"個。"
n=n+1
end

speak("a=",a,"\nb=",b,"\nc=",c,"\nd=",d)

アイテムのID番号（b[n]）からアイテムパラメータを取得してアイテム名を表示する、てのはリファレンス見ればできる筈

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

rurun9(投稿日：2011/12/25 01:12/25/11)

あー思ってたよりもややこしくて、ワケわからんねｗ

とりあえずランダムでアイテムをくれる人を用意

case speakWithSelect(2,"ひとつもらう","リセット","どーする？")
when 0
 case rand(3)
 when 0 giveItem(5142) #番号は自分で用意したのに変えてね
 when 1 giveItem(7493)
 when 2 giveItem(2029)
 end

when 1
 n=0; a=getItemIdArray()
 while n<getArrayLength(a)
  removeItemWithIndex(0)
 n=n+1
 end

end

んでコレが本体

a=getItemIdArray()
b=createArray(); b[0]=a[0]
c=createArray()
d=createArray()

n=0 #まずは所持配列aから各１個ずつの配列bを作成
while n<getArrayLength(a)
 m=0; judge=true
 while m<getArrayLength(b)
  if a[n]==b[m]
   judge=false #ダブりを発見したらフラグ変更
  end
 m=m+1
 end
 if judge #フラグが残ってる＝ダブり無しなので加える
  pushArray(b,a[n])
 end
n=n+1
end

n=0 #今度はそれぞれをいくつ持ってるのか数える
while n<getArrayLength(b)
 m=0; i=0
 while m<getArrayLength(a)
  if b[n]==a[m]
   i=i+1
  end
 m=m+1
 end
 c[n]=i
 d[n]=b[n]+"番のアイテムが"+c[n]+"個。"
n=n+1
end

speak("a=",a,"\nb=",b,"\nc=",c,"\nd=",d)

アイテムのID番号（b[n]）からアイテムパラメータを取得してアイテム名を表示する、てのはリファレンス見ればできる筈