UID172204
帖子
精華
主題
積分5
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限5
註冊時間2009-7-10
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 開心 2015-12-30 12:38 AM |
---|
簽到天數: 24 天 連續簽到: 4 天 [LV.4]偶爾看看III
|
本帖最後由 jeff1908 於 2014-4-16 04:55 PM 編輯
最近剛開始學習修改私服
NPC已經放上去了 也有出現 但是點他卻無法對話 這是我的腳本 麻煩各位幫忙檢查一下是發生什麼問題- amatsu.gat,110,202,3 script 煉造大師 813,{
-
- setarray .@refine_price[0],
- ($ref_cost10down[0]*80/100),
- ($ref_cost10down[1]*80/100),
- ($ref_cost10down[2]*80/100),
- ($ref_cost10down[3]*80/100),
- ($ref_cost10down[4]*80/100);
- setarray .@refine_price10up[0],
- ($ref_cost10up[0]),
- ($ref_cost10up[1]),
- ($ref_cost10up[2]),
- ($ref_cost10up[3]),
- ($ref_cost10up[4]);
-
- mes "[煉造大師 呼可憐]";
- if(countitem(35000)<1)
- mes "擁有學生的證明的話有"+(100-$refine_stid)+"%折扣喔!";
- mes "防具每+1要^BB3355"+.@refine_price[0]+"^000000,一個的鋁";
- mes "一級武器每+1要^BB3355"+.@refine_price[1]+"^000000,一個強化金屬級數一";
- mes "二級武器每+1要^BB3355"+.@refine_price[2]+"^000000,一個強化金屬級數二";
- mes "三級武器每+1要^BB3355"+.@refine_price[3]+"^000000,一個神之金屬";
- mes "四級武器每+1要^BB3355"+.@refine_price[4]+"^000000,一個神之金屬";
- next;
- mes "[煉造大師 呼可憐]";
- if(countitem(35000)<1)
- mes "擁有學生的證明的話有"+(100-$refine_stid)+"%折扣喔!";
- mes "防具每+1要^BB3355"+.@refine_price[0]+"^000000,一個的鋁";
- mes "一級武器每+1要^BB3355"+.@refine_price[1]+"^000000,一個強化金屬級數一";
- mes "二級武器每+1要^BB3355"+.@refine_price[2]+"^000000,一個強化金屬級數二";
- mes "三級武器每+1要^BB3355"+.@refine_price[3]+"^000000,一個神之金屬";
- mes "四級武器每+1要^BB3355"+.@refine_price[4]+"^000000,一個神之金屬";
- next;*/
- mes "[煉造大師 呼可憐]";
- mes "請選擇要精煉的項目。";
- mes "未顯示的部位代表該位置未裝備物品,";
- mes "或者是該項裝備無法精煉";
- mes "或者已精煉至+20,";
- mes "無法再往上提高精煉。";
- next;
- goto equ_menu;
-
- //裝備選單
- equ_menu:
- if (getequipisequiped(1) == 0 || getequipisenableref(1) == 0 || getequipisidentify(1)==0 || getequiprefinerycnt(1)>=20 ){ set .@haveeq[1],0; } else{ set .@eqn$[1],"頭上-["+getequipname(1)+"]"; set .@haveeq[1],1; }
- if (getequipisequiped(2) == 0 || getequipisenableref(2) == 0 || getequipisidentify(2)==0 || getequiprefinerycnt(2)>=20 ){ set .@haveeq[2],0; } else{ set .@eqn$[2],"身體-["+getequipname(2)+"]"; set .@haveeq[2],1; }
- if (getequipisequiped(3) == 0 || getequipisenableref(3) == 0 || getequipisidentify(3)==0 || getequiprefinerycnt(3)>=20 ){ set .@haveeq[3],0; } else{ set .@eqn$[3],"左手-["+getequipname(3)+"]"; set .@haveeq[3],1; }
- if (getequipisequiped(4) == 0 || getequipisenableref(4) == 0 || getequipisidentify(4)==0 || getequiprefinerycnt(4)>=20 ){ set .@haveeq[4],0; } else{ set .@eqn$[4],"右手-["+getequipname(4)+"]"; set .@haveeq[4],1; }
- if (getequipisequiped(5) == 0 || getequipisenableref(5) == 0 || getequipisidentify(5)==0 || getequiprefinerycnt(5)>=20 ){ set .@haveeq[5],0; } else{ set .@eqn$[5],"外袍-["+getequipname(5)+"]"; set .@haveeq[5],1; }
- if (getequipisequiped(6) == 0 || getequipisenableref(6) == 0 || getequipisidentify(6)==0 || getequiprefinerycnt(6)>=20 ){ set .@haveeq[6],0; } else{ set .@eqn$[6],"鞋子-["+getequipname(6)+"]"; set .@haveeq[6],1; }
- //if (getequipisequiped(7) == 0 || getequipisenableref(7) == 0 || getequipisidentify(7)==0 || getequiprefinerycnt(7)>=20 ){ set .@haveeq[7],0; } else{ set .@eqn$[7],"裝飾品1-["+getequipname(7)+"]"; set .@haveeq[7],1; }
- //if (getequipisequiped(8) == 0 || getequipisenableref(8) == 0 || getequipisidentify(8)==0 || getequiprefinerycnt(8)>=20 ){ set .@haveeq[8],0; } else{ set .@eqn$[8],"裝飾品2-["+getequipname(8)+"]"; set .@haveeq[8],1; }
- if (getequipisequiped(9) == 0 || getequipisenableref(9) == 0 || getequipisidentify(9)==0 || getequiprefinerycnt(9)>=20 ){ set .@haveeq[9],0; } else{ set .@eqn$[9],"頭中-["+getequipname(9)+"]"; set .@haveeq[9],1; }
- //if (getequipisequiped(10) == 0 || getequipisenableref(10) == 0 || getequipisidentify(10)==0 || getequiprefinerycnt(10)>=20 ){ set .@haveeq[10],0; } else{ set .@eqn$[10],"頭下-["+getequipname(10)+"]"; set .@haveeq[10],1; }
-
- set .@eq_amount,(.@haveeq[1]+.@haveeq[2]+.@haveeq[3]+.@haveeq[4]+.@haveeq[5]+.@haveeq[6]+.@haveeq[9]);
- switch(.@eq_amount){
- case 0:
- goto L_CLOSE_1;
- close; end;
- case 1:
- for(set .@u,0;.@u<=9;set .@u,.@+1){
- if(.@haveeq[.@u]==1){
- menu .@eqn$[.@u],-;
- set .@part,.@u;
- break;
- }
- }
- break;
- case 2:
- for(set .@u,0;(.@u<=9 && .@s!=.@eq_amount);set .@u,.@u+1){
- if(.@haveeq[.@u]==1){
- set .@eq_show$[.@s],.@eqn$[.@u];
- set .@eq_show[.@s],.@u;
- set .@s,.@s+1;
- }
- }
- switch(select(.@eq_show$[0],.@eq_show$[1])){
- case 1: set .@part,.@eq_show[0]; break;
- case 2: set .@part,.@eq_show[1]; break;
- }
- break;
- case 3:
- for(set .@u,0;(.@u<=9 && .@s!=.@eq_amount);set .@u,.@u+1){
- if(.@haveeq[.@u]==1){
- set .@eq_show$[.@s],.@eqn$[.@u];
- set .@eq_show[.@s],.@u;
- set .@s,.@s+1;
- }
- }
- switch(select(.@eq_show$[0],.@eq_show$[1],.@eq_show$[2])){
- case 1: set .@part,.@eq_show[0]; break;
- case 2: set .@part,.@eq_show[1]; break;
- case 3: set .@part,.@eq_show[2]; break;
- }
- break;
- case 4:
- for(set .@u,0;(.@u<=9 && .@s!=.@eq_amount);set .@u,.@u+1){
- if(.@haveeq[.@u]==1){
- set .@eq_show$[.@s],.@eqn$[.@u];
- set .@eq_show[.@s],.@u;
- set .@s,.@s+1;
- }
- }
- switch(select(.@eq_show$[0],.@eq_show$[1],.@eq_show$[2],.@eq_show$[3])){
- case 1: set .@part,.@eq_show[0]; break;
- case 2: set .@part,.@eq_show[1]; break;
- case 3: set .@part,.@eq_show[2]; break;
- case 4: set .@part,.@eq_show[3]; break;
- }
- break;
- case 5:
- for(set .@u,0;(.@u<=9 && .@s!=.@eq_amount);set .@u,.@u+1){
- if(.@haveeq[.@u]==1){
- set .@eq_show$[.@s],.@eqn$[.@u];
- set .@eq_show[.@s],.@u;
- set .@s,.@s+1;
- }
- }
- switch(select(.@eq_show$[0],.@eq_show$[1],.@eq_show$[2],.@eq_show$[3],.@eq_show$[4])){
- case 1: set .@part,.@eq_show[0]; break;
- case 2: set .@part,.@eq_show[1]; break;
- case 3: set .@part,.@eq_show[2]; break;
- case 4: set .@part,.@eq_show[3]; break;
- case 5: set .@part,.@eq_show[4]; break;
- }
- break;
- case 6:
- for(set .@u,0;(.@u<=9 && .@s!=.@eq_amount);set .@u,.@u+1){
- if(.@haveeq[.@u]==1){
- set .@eq_show$[.@s],.@eqn$[.@u];
- set .@eq_show[.@s],.@u;
- set .@s,.@s+1;
- }
- }
- switch(select(.@eq_show$[0],.@eq_show$[1],.@eq_show$[2],.@eq_show$[3],.@eq_show$[4],.@eq_show$[5])){
- case 1: set .@part,.@eq_show[0]; break;
- case 2: set .@part,.@eq_show[1]; break;
- case 3: set .@part,.@eq_show[2]; break;
- case 4: set .@part,.@eq_show[3]; break;
- case 5: set .@part,.@eq_show[4]; break;
- case 6: set .@part,.@eq_show[5]; break;
- }
- break;
- case 7:
- switch(select(.@eqn$[1],.@eqn$[2],.@eqn$[3],.@eqn$[4],.@eqn$[5],.@eqn$[6],.@eqn$[9])){
- case 1: set .@part,1; break;
- case 2: set .@part,2; break;
- case 3: set .@part,3; break;
- case 4: set .@part,4; break;
- case 5: set .@part,5; break;
- case 6: set .@part,6; break;
- case 7: set .@part,9; break;
- }
- break;
- }
-
- set .@ref_lv,getequipweaponlv(.@part);
- refine_equ:
- mes "[煉造大師 呼可憐]";
- if(getequiprefinerycnt(.@part)>=10)
- set .@over10,1;
- else
- set .@over10,0;
-
- switch(.@over10){
- case 0:
- set .@item,$ref_met10down[.@ref_lv];
- set .@cost_zeny,.@refine_price[.@ref_lv];
- break;
- case 1:
- set .@item,$ref_met10up[.@ref_lv];
- set .@cost_zeny,.@refine_price10up[.@ref_lv];
- break;
- }
- switch(.@ref_lv){
- case 0:
- mes "要精煉你所選擇的這項裝備,";
- break;
- case 1:
- case 2:
- case 3:
- case 4:
- mes "你想要精煉武器等級"+.@ref_lv+"的武器啊?";
- break;
- }
- mes "要精煉的話需要^ff9999"+getitemname(.@item)+"^000000";
- mes "以及費用"+.@cost_zeny+"Zeny,";
- mes "一毛都不能少,";
- mes "確定要精煉嗎?";
- next;
- if(select("確定:離開")==2) {
- goto leave;
- }
- if(getequippercentrefinery(.@part) < 100) {
- mes "[煉造大師 呼可憐]";
- mes "...你在哪兒弄到這麼麻煩的東西...";
- mes "這個有精煉上的危險";
- mes "你要繼續嗎?";
- next;
- if(select("確定:離開")==2) {
- goto leave;
- }
- }
- if(countitem(.@item)<1){
- mes "[煉造大師 呼可憐]";
- mes "物品^FF5533"+getitemname(.@item)+"^000000不足。";
- close; end;
- }
- if(Zeny<.@cost_zeny){
- mes "[煉造大師 呼可憐]";
- mes "金額不足。";
- close; end;
- }
- delitem .@item,1;
- set Zeny,Zeny-.@cost_zeny;
- mes "[煉造大師 呼可憐]";
- mes "嘿咻!嘿咻!嘿咻!";
- mes "鏘! 鏘! 鏘!!";
- if(getequippercentrefinery(.@part) > rand(100)) {
- successrefitem .@part;
- next;
- emotion 0;
- mes "[煉造大師 呼可憐]";
- mes "終於精煉完成啦!";
- mes "妳要繼續打造這件裝備嗎?";
- next;
- switch(select("繼續","離開")){
- case 1:
- goto refine_equ;
- case 2:
- goto leave;
- }
- }
- else {
- if(getequippercentrefinery(.@part) > rand(100) && getequiprefinerycnt(.@part) >= 10) { // 精煉度-3的大約概率 = 精煉成功率 ^ 3
- failedrefitem2 .@part,3;
- next;
- mes "[煉造大師 呼可憐]";
- mes "唉...";
- mes "可惡啊!";
- mes "就差那麼一點點就能成功了說,";
- mes "不過好在裝備還在。";
- mes "真是抱歉呀!";
- close; end;
- }
- failedrefitem .@part;
- next;
- emotion 32;
- mes "[煉造大師 呼可憐]";
- mes "唉...";
- next;
- mes "[煉造大師 呼可憐]";
- mes "真是遺憾...";
- mes "人生有時就是這樣啊";
- mes "不要太低落了...";
- close; end;
- }
- close; end;
- L_CLOSE_1:
- mes "[煉造大師 呼可憐]";
- mes "沒有任何可以精煉的裝備!";
- close; end;
- leave:
- callfunc("掰掰","[煉造大師 呼可憐]");
- OnInit:
- waitingroom "衝裝服務員",0;
- end;
- }
複製代碼 |
評分
-
查看全部評分
|