UID320090
帖子
精華
主題
積分723
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限10
註冊時間2013-3-7
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 怒 2014-3-7 12:00 AM |
---|
簽到天數: 80 天 連續簽到: 2 天 [LV.6]常住居民II
|
樓主 |
發表於 2013-4-15 00:22:24
|
顯示全部樓層
fantasy83115 發表於 2013-4-15 12:13 AM
另外, 你的問題就只有po一個出處說明,
沒辦法看到完整內容, 沒有辦法幫助你。
不好意思- //====================================================//
- //====================================================//
- //==製作人 : 破滅 Eathena ==//
- //==更新日期 : 西元2008/07/05 Script ==//
- //==腳本版號 : 繁體中文 v1.0 正式版 ==//
- //==腳本名稱 : 序號獎勵系統 ==//
- //== ==//
- //==腳本出處 : http://srogm.no-ip.info/forum ==//
- //== ==//
- //==各位大哥大姐轉載請保留以上,萬分感激。 ==//
- //====================================================//
- //====================================================//
- - script SN_System -1,{
- OnInit:
- // 序號列表:請自行新增修改序號。
- setarray $CheckPass$[1],"201304","201305","201306";
- // 序號可兌換的物品獎勵:可自行新增物品。
- setarray $CheckItem_A[1],501,502,503,504,505;
- // 領取物品數量:位置和數量請配合上面的物品編號來對應。
- setarray $CheckItem_B[1],1,2,3,4,5;
- // 每個帳號最大領取次數
- set $BonusMax,50;
- // 取得陣列總數,不需要修改它。
- set $CheckSize,getarraysize($CheckPass$);
- set $CheckItemSize,getarraysize($CheckItem_A);
- // 可以使用GM控制系統的最小GM等級設置(需要大於或等於該等級才可使用)
- set $@GMSystem,99;
- // 是否啟動玩家兌換次數清除工具 ( 1 開啟 - 0 關閉 )
- // 需要玩家重新登入才可以,沒有登入將不會清除。
- set $@SaveOver,0;
- OnPCLoginEvent:
- if ( $@SaveOver == 1 ) {set #CheckEnd,0;} }
- lighthalzen.gat,234,311,3 script 序號兌換員 790,{
- if ( getgmlevel() >= $@GMSystem ) {
- mes "歡迎進入GM管理系統,";
- mes "請選擇您要的服務。";
- switch(select("設定最大領取次數:清除序號使用記錄:正常服務")){
- case 1:
- mes "目前最大領取次數:^0000FF"+$BonusMax+"^000000";
- mes "(請輸入要修改的數量)";
- mes "(低於1將自動調整為1)";
- mes "(高於1萬將自動調整為1萬)";
- input .@BonusMax,1,10000;
- set $BonusMax,.@BonusMax;
- dispbottom "修改完成,目前最大領取次數:"+$BonusMax+" 次";
- close;
- case 2:
- mes "本功能可清除序號使用記錄,";
- mes "讓序號可以再度使用,";
- mes "但是玩家的總共兌換次數依然不會刪除。";
- if (select("不要清除紀錄:確定清除紀錄")==2) {
- for ( set @c,1; @c < 128; set @c,@c+1 ) {
- set $CheckUse[@c],0; }
- dispbottom "序號使用紀錄已經全數清楚";
- }
- close;
- case 3: break; }
- }
- if ( #CheckEnd >= $BonusMax ) {
- mes "[序號兌換機]";
- mes "您已經領滿 ^ff0000"+$BonusMax+" 次了,";
- mes "不可以繼續領取。";
- close; }
- mes "[序號兌換機]";
- mes "請輸入您所取得的獎勵序號,";
- mes "^ff0000請注意身上負重量,過重物品將掉出來";
- next;
- input .@Check$;
- for ( set @i,1; @i < $CheckSize; set @i,@i+1 ) {
- if ( .@Check$ == $CheckPass$[@i] ) {
- if ( $CheckUse[@i] == 1 ) {
- dispbottom "您輸入的序號已經被使用過了!";
- close;
- }
- for ( set @t,1; @t < $CheckItemSize; set @t,@t+1 ) {
- if ( countitem($CheckItem_A[@t]) > 30000-$CheckItem_B[@t] ) {
- mes "[序號兌換機]";
- mes "您身上物品過多,無法領取獎勵,";
- mes "請先將物品存倉庫或移除吧!";
- close;
- }
- }
- set #CheckEnd,#CheckEnd+1;
- set $CheckUse[@i],1;
- mes "[序號兌換機]";
- mes "感謝您使用序號兌換機,";
- mes "獎勵物品已經兌換完成。";
- mes "每個帳號僅可以領取 ^0000ff"+$BonusMax+" ^000000次";
- mes "每個帳號僅可以領取 ^ff0000"+#CheckEnd+" ^000000次";
- for ( set @t,1; @t < $CheckItemSize; set @t,@t+1 ) {
- getitem $CheckItem_A[@t],$CheckItem_B[@t];
- }
- close;
- }
- }
- dispbottom "您輸入的序號是錯誤的,請重新確認!";
- close; }
複製代碼 補上
|
|