UID288228
帖子
精華
主題
積分1065
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限10
註冊時間2010-9-30
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 無聊 2019-8-20 03:32 PM |
---|
簽到天數: 743 天 連續簽到: 1 天 [LV.9]以壇為家II
|
發表於 2014-4-21 22:00:52
|
顯示全部樓層
本帖最後由 coolboy0423 於 2014-4-21 10:07 PM 編輯
雖然有些麻煩 不過應該是可以用
在 要開的物品db 後面 加上- ,,,{callfunc "abcd",601;}
複製代碼 跟轉蛋那個類似 , 只是這個 只能限定10個物品 , 機率總和100 , 而只有開到 第10個物品 會廣播- function script abcd {
- switch(getArg(0)) {
- case 601:
- setarray .@item[0],602,603,604,605,606,607,608,609,610,611;
- setarray .@amt[0],1,1,1,1,1,1,1,1,1,1;
- setarray .@rt1[0],10,10,10,10,10,10,10,10,10,10;
- break;
- }
- copyarray .@rt2[0],.@rt1[0],getarraysize(.@rt1);
- for( set @i,0; @i<getarraysize(.@rt1) ; set @i,@i+1 ) {
- if( @i != 0 ) {
- set .@rt2[@i],.@rt2[@i-1]+.@rt1[@i];
- }
- }
- set .@j,getarraysize(.@rt2);
- set .@k,rand(100);
- for( set .@s,0; .@s<=.@j ; set .@s,.@s+1 ) {
- set .@a,.@k-.@rt2[.@s];
- if (.@a < 0) { getitem .@item[.@s],.@amt[.@s]; end; } else {}
- if ( .@item[.@s] == .@item[1]+7 ) { announce "A [ "+strcharinfo(0)+" ] B "+getitemname(getarg(0))+" C "+getitemname(.@item[.@s+1])+"!",bc_all,0xFFFF00; }
- }
- }
複製代碼 |
|