オススメ商品ズ

Amazon

  • 鋼の錬金術師(12) 初回限定特装版(\600)
  • コミックスペシャルカレンダー2006 鋼の錬金術師(\2,000)
  • テイルズ オブ ジ アビス 特典 10周年記念ファンディスク テイルズ オブ ファンダム 外伝DVD付(\6,069/\1,071OFF)
  • 機動戦士ガンダムSEED 連合VS.Z.A.F.T 特典 プレイヤーズリファレンスブック付き(\6,069/\1,071OFF)


    • ネットでできる友達の輪     		Click Here!
    日本ファンド
    最短３時間でご融資可能かメールでお答えします。

    スイートボートブログ管理人のブログ     		Click Here!
    月額125円からのレンタルサーバ 　
    Click Here!
    ★可愛いレンタルサーバLOLIPOP!     		Click Here!
    バイクの無料出張買取なら バイク王
    ■掲示板に戻る■ 全部 1- 101- 201- 301- 401- 501- 601- 701- 801- 901- 最新50


    レス数が1000を超えています。残念ながら全部は表示しません。
    どんなくだらねぇ質問にもマジレスするスレPart10

    408 ：名無しさん(ザコ)：2006/03/31(金) 10:30:00 ID:I+AGR6B20
    >>395
    Sortコマンド使ってForEachでループさせるときの順番を変えて、
    ForEachで上位6人を取得すると楽。

    　Sort 撃墜数 降順 文字インデックス
    　i = 1
    　UnSet 撃墜数上位
    　ForEach idx In 撃墜数
    　　撃墜数上位[i] = idx
    　　Incr i
    　　If i > 6 Then
    　　　Break
    　　EndIf
    　Next

    これで「撃墜数上位」に上位6名が入らないかな。
    まだ6位が複数いる場合の処理とか追加せにゃならんけど。


    >>405
    文字列がインデックス変数をランダムに持ってくるのは面倒だね。
    Count関数で求めた配列内の要素の数を最大に、Random関数で先頭から何番目の変数かを決めて、
    上のコードと同じような感じでForEachでRandomの結果までループさせるといいんじゃないかと。

    　R = Random(Count(変数名))
    　i = 1
    　ForEach idx In 変数名
    　　Incr i
    　　If i = R Then
    　　　取得パイロット名 = idx
    　　　Break
    　　EndIf
    　Next

    これでランダムに1人取得できるはずなので、これを元に複数取得する方法を模索すべし。

    227KB
    掲示板に戻る 全部 前100 次100 最新50

    0ch BBS 2005-06-05