抽獎品問題

q357741

        setarray $@ken0609[1],20001,20002,20003,20004,20005,20006,20007,20008,20009,20010,
                              5111,5112,5113,5114,5115,5116,5117,5118,5119,5120,5121,5122,
                              18024,18025,18026,18027,18028,18029,18030,18031,18032,18033,18034,18023,
                              20011,20012,20013,20014,20015,20016,20017,20018,20019,20020,
                              5056,5057,5058,5059,5060,5061,5062,5063,5064,5065,5066,5067,
                              20021,20022,20023,20024,20025,20026,20027,20028,20029,20030,
                              5150,5051,5052,5053,5055,5056,5057,5058,5059,5060,5061,5062,
                              5063,5064,5065,5066,5067,5068,5069,5123,5124,5125,5126,5127,
                              20031,20032,20033,20034,20035,20036,20037,20038,20039,20040,
                              18012,18013,18014,18015,18016,18017,18018,18019,18020,18021,18022,18023,
                              20041,20042,20043,20044,20045,20046,20047,20048,20049,20050,
                              20051,20052,5101,5102,5103,5104,5105,5106,5107,5108,5109,5110,
                              5123,5124,5125,5126,5127,5128,5129,5130,5131,5133,5134,5135,
                              5128,5129,5130,5131,5133,5134,5135,5136,5138,5139,5140,5142,
                              18000,18001,18002,18003,18004,18005,18006,18007,18008,18009,18010,18011,
                              5143,5144,5145,5146,5147,5148,5149,5150,5051,5052,5053,5055,
                              5056,5057,5058,5059,5060,5061,5062,5063,5064,5065,5066,5067,
                              5143,5144,5145,5146,5147,5148,5149,5150,5051,5052,5053,5055,
                              5068,5069;

        mes "[頭飾發放員]";
        percentheal 100,100;
        mes "抽頭飾,可能抽到舊的噢!!";
        next;
        if (select("我要！","讓我好好考慮一下！")==1) {
        set @getItem,rand(1,180);
        getitem $@ken0609[@getItem],1;
        mes "[頭飾發放員]";
        mes "頭飾還不錯吧？";
        warp "quiz_02",349,374;
        end;
}

為甚麼...有時抽都會卡住

[ 本帖最後由 q357741 於 2008-8-26 06:18 PM 編輯 ]

£×ＳＫＹ﹋°

array 最多 127

q357741

喔喔    謝謝說明

那有別種方法嘛?

£×ＳＫＹ﹋°

setarray .@item[0][0],........................................;
setarray .@item[1][0],........................................;

set .@p,rand(180);
for(;.@p>127;set .@i,.@i+1;)set .@p,.@p-127;
getitem .@item[.@i][.@p],1;

q357741

感謝指導  不過我適用較簡單的方式


        switch(rand(2)) {
                case 0:        
                                set @getItem,rand($@ken0609Number,102);
                                getitem $@ken0609[@getItem],1;
                                mes "[頭飾發放員]";
                                mes "頭飾還不錯吧？";
                                warp "quiz_02",349,374;
                                close;

                case 1:
                                set @getItem2,rand($@ken0707Number,74);
                                getitem $@ken0707[@getItem2],1;
                                mes "[頭飾發放員]";
                                mes "頭飾還不錯吧？";
                                warp "quiz_02",349,374;
                                close;
}

£×ＳＫＹ﹋°

這樣一來下面的機率會比較大喔~^^