關於一些腳本

welin8154

小弟又來發問了((汗
懇請大大在次位小弟解惑=]
Q1.如何修改轉生所贈點數?
Q2.是否可在某特定點設置自動加速天賜
Q3.

1. prontera.gat,153,187,1    script    回血站    139,6,6,{
   
2. STA:
   
3. addtimer 1000,"回血站::OnGi";
   
4. addtimer 2000,"回血站::OnGi";
   
5. addtimer 3000,"回血站::OnGi";
   
6. addtimer 4000,"回血站::OnGo";
   
7. end;
   
8. OnGi:
   
9. percentheal 3,3;
   
10. end;
    
11. 
    
12. OnGo:
    
13. goto STA;
    
14. end;
    
15. }
    
16. 
    
17. prontera.gat,153,187,3    script    休息區    857,{
    
18. OnInit:
    
19. waitingroom "坐在這裡會快速回血",0;
    
20. end;
    
21. }

複製代碼

此腳本是不是設置在範圍內會快速回血，
那我是不是有辦法改成在範圍內自動加速.天賜.祈福??

Q4.如何在某地圖限制特定技能無法釋放?
EX:我想要在中央禁止一切大法，但卻可以施放加速.天賜.或蓄氣.爆氣等
Q5.如何在特定地圖限制無法丟棄物品?
Q6.如何限制某些物品只能在特定地圖使用?
EX:我有設置一個放怪區，因此我想將枯樹枝，血跡樹枝改在該地圖才可使用
Q7.
   

1. switch(select("精煉裝備","修理裝備","拆除卡片","選購材料")) {
   
2. case 1:
   
3.     callfunc "RefineMain";    end;
   
4. case 2:
   
5.     callfunc "RepairMain";    end;
   
6. case 3:
   
7.     callfunc "CardMain";    end;
   
8. case 4:
   
9.     callfunc "ShopMain";    end;    }    }
   
10. 
    
11. //====================================================//
    
12. 
    
13. function    script    RefineMain    {
    
14. 
    
15.     mes"[阿呆工匠]";
    
16.     mes"請選擇您要精煉的物品選項。";
    
17.     next;
    
18.     set .@RItem,select(getequipname(1),getequipname(2),getequipname(3),getequipname(4),
    
19.                 getequipname(5),getequipname(6),getequipname(7),getequipname(8),
    
20.                 getequipname(9),getequipname(10));
    
21. 
    
22.     if ( getequipisequiped(.@RItem) == 0 ) {    mes"[阿呆工匠]";
    
23.                             mes"您還沒有裝備要精煉物品唷!";
    
24.                             close;    }
    
25.     if ( getequipisenableref(.@RItem) == 0 ) {    mes"[阿呆工匠]";
    
26.                             mes"這個物品是無法精煉的唷!";
    
27.                             close;    }
    
28.     if ( getequipisidentify(.@RItem) == 0 ) {    mes"[阿呆工匠]";
    
29.                             mes"未鑒定的物品是無法精煉的唷!";
    
30.                             close;    }
    
31.     if ( getequiprefinerycnt(.@RItem) >= 10 ) {    mes"[阿呆工匠]";
    
32.                             mes"這個物品已經精煉到最高等級了唷!";
    
33.                             close;    }
    
34.     switch(getequipweaponlv(.@RItem)) {
    
35.     case 0:    set .@Item,985;        set .@Zeny,20000;    break;
    
36.     case 1:    set .@Item,1010;    set .@Zeny,500;        break;
    
37.     case 2:    set .@Item,1011;    set .@Zeny,2000;    break;
    
38.     case 3:    set .@Item,984;        set .@Zeny,25000;    break;
    
39.     case 4:    set .@Item,984;        set .@Zeny,50000;    break;    }
    
40.     mes "[阿呆工匠]";
    
41.     mes "精煉 ^0000FF"+getequipname(.@RItem)+"^000000 這項物品";
    
42.     mes "需要 ^FF0000"+getitemname(.@Item)+" 1^000000 個";
    
43.     mes "　和 ^FF0000金錢 "+.@Zeny+"^000000 z";
    
44.     next;
    
45.     if (select("是的!","不了!")==2) {
    
46.                     close;
    
47.                     }
    
48.     if ( getequippercentrefinery(.@RItem) < 100 ) {
    
49.     mes"[阿呆工匠]";
    
50.     mes"物品已經達到它的^FF0000安定值^000000，";
    
51.     mes"繼續精煉可能會使裝備損壞，";
    
52.     mes"即使這樣您還要繼續精煉嗎？";
    
53.     next;
    
54.     if (select("是的!","不了!")==2) {
    
55.                     close;
    
56.                     }    }
    
57.     mes"[阿呆工匠][^0000FF計算機^000000] [^FF0000"+getequippercentrefinery(.@RItem)+"%^000000]";
    
58.     mes"鏘！鏘！鏘！";
    
59.     next;
    
60. 
    
61. Refine_Ing:
    
62. 
    
63.     if ( countitem(.@Item) < 1 || Zeny < .@Zeny ) {    mes "[阿呆工匠]";
    
64.                             mes "抱歉您身上的物品不足!";
    
65.                             close;    }
    
66.     delitem .@Item,1;
    
67.     set Zeny,Zeny - .@Zeny;
    
68.     if ( getequippercentrefinery(.@RItem) >= rand(100) ) {
    
69.     Successrefitem .@RItem;
    
70.     if ( getequiprefinerycnt(.@RItem) < 10 ) {
    
71.     set .@RStr$,"請問";
    
72.     mes"[阿呆工匠][^0000FF計算機^000000] [^FF0000"+getequippercentrefinery(.@RItem)+"%^000000]";
    
73.     if ( getequippercentrefinery(.@RItem) != 100 ) {    mes"物品已經達到它的^FF0000安定值^000000，";
    
74.                                 mes"繼續精煉可能會使裝備損壞，";
    
75.                                 set .@RStr$,"即使這樣";    }
    
76.     mes ""+.@RStr"您還要繼續精煉嗎？";
    
77.     next;
    
78.     if (select("是的!","不了!")==1) {
    
79.                     goto Refine_Ing;
    
80.                     }    }
    
81.     mes"[阿呆工匠]";
    
82.     mes"恭喜您物品已精煉成功了!";
    
83.     close;
    
84.     } else {
    
85.     failedrefitem .@RItem;
    
86.     mes"[阿呆工匠]";
    
87.     mes"抱歉您的物品精煉失敗了!";
    
88.     close;
    
89.     }
    
90. }

複製代碼

===========================
是否有辦法讓NPC使用濃鋁鍊金?
並且設為可選擇是否使用濃鋁
同理，那濃神呢?
還有，是否可以將濃鋁、濃神成功率改為100%??

Q8.
公會戰是否有辦法設定只開放一個城堡?
PS:小弟目前方法是將傳送點關閉，只開放一個
還有哪裡可修改攻城時間?

Q9.

1. script    世亞布連::打洞    84,{
   
2. 
   
3.     mes "[世亞布連]";
   
4.     mes "我是在一般武器或防具上";
   
5.     mes "進行打洞的技術員，嗯，";
   
6.     mes "雖然也有人說這只是";
   
7.     mes "打洞的小事情而已，";
   
8.     mes "不過這一切都是外行人的";
   
9.     mes "偏頗說詞罷了";
   
10.     next;
    
11.     mes "[世亞布連]";
    
12.     mes "那證據就是，除了我之外";
    
13.     mes "無人擁有這種技術啊?";
    
14.     mes "那意思就是打洞的技術";
    
15.     mes "沒那麼簡單啦，總之，";
    
16.     mes "你有帶打洞的裝備嗎?";
    
17.     mes "會依照裝備的不同手續費或必須材料，";
    
18.     mes "成功機率也會有所不同，你先挑挑看";
    
19.     next;
    
20.     switch(select("武器:防具:再聽聽說明:取消")) {
    
21.     case 1:
    
22.         mes "[世亞布連]";
    
23.         mes "武器嘛... OK，武器○○";
    
24.         mes "依作業的難易度來看，嗯";
    
25.         mes "約分成4種，C級是最容易的，";
    
26.         mes "S級是最困難的，首先挑選";
    
27.         mes "難易度水準吧";
    
28.         next;
    
29.         switch(select("C級:B級:A級:S級")) {
    
30.         case 1:
    
31.             mes "[世亞布連]";
    
32.             mes "你選C級，那麼希望我為你修飾";
    
33.             mes "哪一種C級的武器呢?";
    
34.             next;
    
35.             switch(select("德瑞尹長戟:鞭子:小提琴:水靈之書:地靈之書:火靈之書:風靈之書")) {
    
36.             case 1: setarray .@SK[0],1,1460,1461,40,66,200,1010,10; break;
    
37.             case 2: setarray .@SK[0],1,1950,1951,40,66,200,1010,10; break;
    
38.             case 3: setarray .@SK[0],1,1901,1902,40,66,200,1010,10; break;
    
39.             case 4: setarray .@SK[0],1,1553,1568,40,66,200,1010,10; break;
    
40.             case 5: setarray .@SK[0],1,1554,1569,40,66,200,1010,10; break;
    
41.             case 6: setarray .@SK[0],1,1555,1570,40,66,200,1010,10; break;
    
42.             case 7: setarray .@SK[0],1,1556,1571,40,66,200,1010,10; break;
    
43.             }
    
44.             break;

複製代碼

===============================
此為部分腳本，
請問如何在裡面新增我想要打洞的物品?
以及設置該物品打洞成功率。


Q10.
NPC的外觀怎麼換?
EX:我想將NPC"孫燕姿"的外觀改成原RO轉生人員外觀
再者，是否可將NPC外觀改成怪物的?

Q11.如何將消耗類改成不會消耗?
EX:蒼蠅翅膀不消耗.蝴蝶翅膀不消耗

Q12.哪裡可以修改使MVP無線重生
且不定點重生?
===============================================
小弟這次問題頗多@@
懇請會以上問題的大大可以略予指點
您的教學是小弟研究的動力
在此感激不盡

lendlice0001

不是不教你
你用功一點，你的問題裡很多都可以找到、解決
爬爬文後，確定不知道再來問唄
你的問題裡多半都是爬文問題！

米克斯

很多問題都是基本的= =..

您可以用搜索找您要的答案

sinya

打洞成功率問題
因為

1. 
   
2. set .@SKrand,rand(1,100);
   
3. if((.@SKrand > .@SK[3]) && (.@SKrand < .@SK[4]))
   
4. {成功打洞}
   

複製代碼

所以調紅色的位置 .@sk[3]  .@sk[4]
setarray .@SK[0],1,2343,2360,40,51,1000,985,2;


其他就如版主所說爬文問題 都可以找到

welin8154

我用搜索找過關鍵字"轉生"
並未有人教導如何設置轉生時所贈點數0..0
只看到一堆關於轉生後重製問題耶.....
還是說轉生所贈點數並不是在CONF設置?
而是再轉生腳本修改!?

welin8154

關於踩點加速天賜
小弟也搜索不到......
只能找到加速天賜員

sinya

如何設置轉生時所贈點數

在腳本寫

1. 
   
2. jobchange 4001;
   
3. resetskill;
   
4. resetstatus;
   
5. set BaseLevel,1;
   
6. set JobLevel,1;
   
7. set StatusPoint,100;  //這裡
   

複製代碼

踩點加速天賜

1. 
   
2. prontera.gat,153,187,1    script    輔助人員   111,6,6,{
   
3. sc_start SC_INCREASEAGI,1800000,10;
   
4. sc_start SC_BLESSING,1800000,10;
   
5. sc_start SC_ASSUMPTIO,1800000,5;
   
6. sc_start SC_IMPOSITIO,18000000,5;
   
7. }
   

複製代碼

b482365

補充　　　111,6,6,{


6,6  就是X,Y的作用距離

1. prontera.gat,153,187,1    script    輔助人員   111,6,6,{
   
2. sc_start SC_INCREASEAGI,1800000,10;
   
3. sc_start SC_BLESSING,1800000,10;
   
4. sc_start SC_ASSUMPTIO,1800000,5;
   
5. sc_start SC_IMPOSITIO,18000000,5;
   
6. }

複製代碼

注意 set


跑到什麼變數設定什麼


再次轉生就會在跑到另外一個


素質就會跟著腳本加了

1.         mes "[轉生人員]";
   
2.         mes "" + strcharinfo(0) + " ，您好";
   
3.         mes "總共可以幫您轉生五次";
   
4.         mes "每次轉生後會多150點的屬性點哦";
   
5.         mes "但轉生後，您的人生就要重頭來過一次";
   
6.         mes "要轉生嗎？";
   
7.         next;
   
8.         menu
   
9.               "是的，我想清楚了",L_job,
   
10.               "不了，我滿於現狀",L_no;
    
11. 
    
12. L_job:
    
13.         if (BaseLevel < 99) goto NotYet;
    
14.         if(Llv==2) goto L_job2;
    
15.         if(Llv==3) goto L_job3;
    
16.         if(Llv==4) goto L_job4;
    
17.         if(Llv==5) goto L_job5;
    
18.         if(Llv==6) goto L_job6;
    
19.         mes "[轉生人員]";
    
20.         mes "恭喜，" + strcharinfo(0) + " ";
    
21.         mes "您已經是一轉人物";
    
22. 
    
23.         jobchange 0,1;
    
24.         resetskill;
    
25.         set SkillPoint,0;
    
26.         resetstatus;
    
27.         set StatusPoint,0;
    
28.         set BaseLevel,1;
    
29.         set JobLevel,1;
    
30.         set Reclass,class;
    
31.         set StatusPoint,150;
    
32.         set Llv,2;
    
33.         set bLlv,2;
    
34.         close;
    
35. 
    
36. L_job2:
    
37. 
    
38.         mes "[轉生人員]";
    
39.         mes "恭喜，" + strcharinfo(0) + " ";
    
40.         mes "您已經是二轉人物";
    
41.         jobchange 0,1;
    
42.         resetskill;
    
43.         set SkillPoint,0;
    
44.         resetstatus;
    
45.         set StatusPoint,0;
    
46.         set BaseLevel,1;
    
47.         set JobLevel,1;
    
48.         set StatusPoint,300;
    
49.         set Llv,3;
    
50.         set bLlv,3;
    
51.         close;

複製代碼

b482365

Q4
利用Mapflag noskill 技能編號


Q5.如何在特定地圖限制無法丟棄物品?
利用 mapflag  nodrop


Q8.
利用腳本開啟
把其他地圖設置刪除即可


Q10.
請爬文


Q11.
前幾天才有人問過


Q12.
moc_fild14,0,0,0,0        monster        死靈        1046,2,0,0,0