UID299913
帖子
精華
主題
積分3959
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限20
註冊時間2011-2-8
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 開心 2014-6-12 04:58 PM |
---|
簽到天數: 202 天 連續簽到: 2 天 [LV.7]常住居民III
|
發表於 2013-6-16 01:16:54
|
顯示全部樓層
首先添加一個安全精煉券道具:- 22000,English_Name,安全精炼券,2,20,,10,,,,,0xFFFFFFFF,7,2,,,,,,{ callfunc "安全精煉券"; end; },{},{}
複製代碼 再添加以下腳本:- function script 安全精煉券 {
- set @max,6;
- set @part,1;
- set @part_max,7;
- set @ngp,1;
- set @ygp,1;
- set @ngpmx,7;
- set @ygpmx,7;
- mes "[ 安全精煉券 ] ";
- mes "- 你要把裝備安全精煉+^FF0000+"+@max+"^000000吗?";
- next;
- menu "- 確定精煉",OKJL,"- 取消選項",QXJL;
- OKJL:
- if (@ngp == @ngpmx) goto MZB;
- if (@ygp == @ygpmx) goto MJL;
- if (@part == @part_max) goto MJL;
- if ( getequipisequiped(@part) > 0) goto OKJL1;
- set @ngp,@ngp+1;
- set @part,@part+1;
- goto OKJL;
- OKJL1:
- if ( getequiprefinerycnt(@part) < @max) goto OKJL2;
- set @ygp,@ygp+1;
- set @part,@part+1;
- goto OKJL;
- OKJL2:
- if ( getequipisenableref(@part) > 0 ) goto OKJL3;
- set @part,@part+1;
- goto OKJL;
- OKJL3:
- if ( getequiprefinerycnt(@part) >= @max) goto MJL;
- goto OKJL4;
- OKJL4:
- successrefitem @part;
- goto OKJL;
- MZB:
- mes "[ 安全精煉券 ] ";
- mes "- 你身上沒有可以精煉的裝備!";
- close;
- MJL:
- mes "[ 安全精煉券 ] ";
- mes "- 你全身的裝備已經精煉^FF0000+"+@max+"^000000以上!";
- mes "- 繼續精煉只能找鐵匠精煉!";
- close;
- QXJL: close;
- }
複製代碼 |
|