雙道館問題

恆ˇ

請問一下各位大大
我把一館腳本複製到二館
改了變數 跟 地圖 跟 裁判名字
那為什麼在二館打到XX關時候，又會跳回10關勒= ="

二館腳本

1. //---------------設定--------------
   
2. ayothaya.gat,209,275,4 script mocaOnInit 790,{
   
3. OnInit:
   
4. //------開道費用----
   
5. set $@paymoney,1000000;
   
6. //------隊友進場費用---
   
7. set $@paypartm,500000;
   
8. //--------MVPid-------
   
9. setarray $@monmvpary[1],1038,1039,1583,1492,1190,1087,1112,1115,1147,1511,1157,1046,1086,1272,1251,1373,1389,1418,1059,1312;
   
10. //-------休息關數------
    
11. setarray $@thekenbrea[1],15,20,35;
    
12. //-------放出mvp數量---
    
13. //這里設了多少他就有多少關
    
14. //最多127關
    
15. setarray $@qstagmo[1],1,1,1,1,1,1,1,1,1,2,
    
16.         1,1,1,1,1,1,1,1,1,2,
    
17.         2,2,2,2,2,2,2,2,2,2,
    
18.         3,3,3,3,3,3,3,3,3,3,
    
19.         3,3,3,3,3,3,3,3,3,4,
    
20.         3,3,3,3,3,3,3,3,3,3,
    
21.         3,3,3,3,3,3,3,3,3,4,
    
22.         3,3,3,3,3,3,3,3,3,3,
    
23.         3,3,3,3,3,3,3,3,3,4,
    
24.         5,5,5,5,5,5,5,5,5,6;
    
25. }   
    
26. hugel.gat,133,156,3 script 道場管理員[2] 856,{
    
27. if (getcharid(1) == 0) {
    
28. mes "[道場-管理員]";
    
29. mes "您沒有隊伍";
    
30. mes "無法參賽";
    
31. close;
    
32. end;
    
33. }
    
34. if (Llv!=20) {
    
35. mes "[道場管理員]";
    
36. mes "您還未20轉";
    
37. mes "不得參賽";
    
38. close;
    
39. end;
    
40. }
    
41. set @MnM,1;
    
42. cada: if (@MnM<5) {
    
43. if(getmapusers("pvp_n_"+@MnM+"-5.gat")==0 ) set $party[@MnM],0;
    
44. set @MnM,@MnM+1;
    
45. goto cada;
    
46. }
    
47. set @MnM,1;
    
48. cbda: if (@MnM<5) {
    
49. if (getcharid(1) == $party[@MnM]){
    
50. mes "[道場-管理員]";
    
51. mes "您是^22DD22" +getpartyname(getcharid(1))+ "^000000的隊員吧";
    
52. mes "你的隊員已報名挑戰,你要參與嗎？";
    
53. next;
    
54. menu "好的",cas1,"不用了",cas2;
    
55. cas1:
    
56.   if($@partywait[@MnM]==0) {
    
57.    mes "[道場-管理員]";
    
58.    mes "你的隊友已經先開始了";
    
59.    mes "請你等待或換個隊伍另外挑戰！";
    
60.    close;
    
61.    end;
    
62.   }
    
63.   if (zeny<$@paypartm) {
    
64.   mes "金錢不夠^22DD22"+$@paypartm+"^000000";
    
65.   close;
    
66.   end;
    
67.   }
    
68.   set zeny,zeny-$@paypartm;
    
69.   warp "pvp_n_"+@MnM+"-5.gat",99,99;
    
70.   end;
    
71. cas2:   
    
72.   mes "[道場-管理員]";
    
73.   mes "歡迎下次再來。";
    
74.   close;
    
75.   end;
    
76. }
    
77. set @MnM,@MnM+1;
    
78. goto cbda;
    
79. }
    
80. mes "[道場-管理員]";
    
81. mes "您和您的隊伍想參加嗎？";
    
82. mes "須先繳納 ^22DD22"+$@paymoney+"^000000 元的報名費";
    
83. next;
    
84. menu "報名",smit,"不了",nosmit;
    
85. smit: if (zeny<$@paymoney) {
    
86.   mes "金錢不夠^22DD22"+$@paymoney+"^000000";
    
87.   close;
    
88.   end;
    
89.   }
    
90.   set @MnM,1;
    
91. ccda: if(@MnM<5) {
    
92.    if (getmapusers("pvp_n_"+@MnM+"-5.gat")==0 ) {
    
93.    set zeny,zeny-$@paymoney;
    
94.    killmonsterall "pvp_n_"+@MnM+"-5.gat";
    
95.    set $@partywait[@MnM],1;
    
96.    set $stage[@MnM],1;
    
97.    set $party[@MnM],getcharid(1);
    
98.    set $@charid[@MnM],getcharid(0);
    
99.    announce "請 [" + getpartyname($party[@MnM]) + "] 隊伍的隊員,要進入就在毀葛主城右方 找 [道場管理員[2]",16;
    
100.    enablenpc "2館裁判"+@MnM;
     
101.    warp "pvp_n_"+@MnM+"-5.gat",99,99;
     
102.    end;
     
103.    }
     
104.   set @MnM,@MnM+1;
     
105.   goto ccda;
     
106.   }
     
107.   mes "全部場地都有人在挑戰中~,請稍後再試";
     
108.   close;
     
109.   end;
     
110. nosmit:
     
111.   mes "[道場-管理員]";
     
112.   mes "歡迎下次再來。";
     
113.   close;
     
114. OnInit:
     
115. waitingroom "★道場挑戰★",0;
     
116. end;
     
117. }
     
118. job_wiz.gat,46,96,4 script 道場管理員 767,{
     
119. if (getcharid(1) == 0) {
     
120. mes "[道場-管理員]";
     
121. mes "您沒有隊伍";
     
122. mes "無法參賽";
     
123. close;
     
124. end;
     
125. }
     
126. if (Llv!=20) {
     
127. mes "[道場管理員]";
     
128. mes "您還未20轉";
     
129. mes "不得參賽";
     
130. close;
     
131. end;
     
132. }
     
133. set @MnM,1;
     
134. cada: if (@MnM<5) {
     
135. if(getmapusers("pvp_n_"+@MnM+"-5.gat")==0 ) set $party[@MnM],0;
     
136. set @MnM,@MnM+1;
     
137. goto cada;
     
138. }
     
139. set @MnM,1;
     
140. cbda: if (@MnM<5) {
     
141. if (getcharid(1) == $party[@MnM]){
     
142. mes "[道場-管理員]";
     
143. mes "您是^22DD22" +getpartyname(getcharid(1))+ "^000000的隊員吧";
     
144. mes "你的隊員已報名挑戰,你要參與嗎？";
     
145. next;
     
146. menu "好的",cas1,"不用了",cas2;
     
147. cas1:
     
148.   if($@partywait[@MnM]==0) {
     
149.    mes "[道場-管理員]";
     
150.    mes "你的隊友已經先開始了";
     
151.    mes "請你等待或換個隊伍另外挑戰！";
     
152.    close;
     
153.    end;
     
154.   }
     
155.   if (zeny<$@paypartm) {
     
156.   mes "金錢不夠^22DD22"+$@paypartm+"^000000";
     
157.   close;
     
158.   end;
     
159.   }
     
160.   set zeny,zeny-$@paypartm;
     
161.   warp "pvp_n_"+@MnM+"-5.gat",99,99;
     
162.   end;
     
163. cas2:   
     
164.   mes "[道場-管理員]";
     
165.   mes "歡迎下次再來。";
     
166.   close;
     
167.   end;
     
168. OnInit:
     
169. waitingroom "★挑戰100關★",0;
     
170. end;
     
171. }
     
172. set @MnM,@MnM+1;
     
173. goto cbda;
     
174. }
     
175. mes "[道場-管理員]";
     
176. mes "您和您的隊伍想參加闖100關嗎？";
     
177. mes "須先繳納 ^22DD22"+$@paymoney+"^000000 元的報名費";
     
178. next;
     
179. menu "報名",smit,"不了",nosmit;
     
180. smit: if (zeny<$@paymoney) {
     
181.   mes "金錢不夠^22DD22"+$@paymoney+"^000000";
     
182.   close;
     
183.   end;
     
184.   }
     
185.   set @MnM,1;
     
186. ccda: if(@MnM<5) {
     
187.    if (getmapusers("pvp_n_"+@MnM+"-5.gat")==0 ) {
     
188.    set zeny,zeny-$@paymoney;
     
189.    killmonsterall "pvp_n_"+@MnM+"-5.gat";
     
190.    set $@partywait[@MnM],1;
     
191.    set $stage[@MnM],11;
     
192.    set $party[@MnM],getcharid(1);
     
193.    set $@charid[@MnM],getcharid(0);
     
194.    announce "請 [" + getpartyname($party[@MnM]) + "] 隊伍的隊員, 在２分鐘內集合,地點在 毀葛主城右方 找 [道場管理員[2]",16;
     
195.    enablenpc "2館裁判"+@MnM;
     
196.    warp "pvp_n_"+@MnM+"-5.gat",99,99;
     
197.    end;
     
198.    }
     
199.   set @MnM,@MnM+1;
     
200.   goto ccda;
     
201.   }
     
202.   mes "全部場地都有人在挑戰中~,請稍後再試";
     
203.   close;
     
204.   end;
     
205. nosmit:
     
206.   mes "[道場-管理員]";
     
207.   mes "歡迎下次再來。";
     
208.   close;
     
209.   end;
     
210. }
     
211. pvp_n_1-5.gat,99,100,0 script chala_1 -1,{ Onka: callfunc "daran",1; }
     
212. pvp_n_2-5.gat,99,100,0 script chala_2 -1,{ Onka: callfunc "daran",2; }
     
213. pvp_n_3-5.gat,99,100,0 script chala_3 -1,{ Onka: callfunc "daran",3; }
     
214. pvp_n_4-5.gat,99,100,0 script chala_4 -1,{ Onka: callfunc "daran",4; }
     
215. pvp_n_5-5.gat,99,100,0 script chala_5 -1,{ Onka: callfunc "daran",5; }
     
216. function script daran {
     
217. set $@dba[getarg(0)],0;
     
218. moda: if($@dba[getarg(0)]<$@qstagmo[$stage[getarg(0)]]){
     
219. set $@mvpp,rand(1,18);
     
220. monster "pvp_n_"+getarg(0)+"-5.gat",99,100,"--ja--",$@monmvpary[$@mvpp],1,"npce"+getarg(0)+"::Onvs";
     
221. set $@dba[getarg(0)],$@dba[getarg(0)]+1;
     
222. goto moda;
     
223. }
     
224. if($stage[getarg(0)]==getarraysize($@qstagmo)){
     
225.   announce "最後一關挑戰開始,請好好加油！",17;
     
226. end;}
     
227. announce "魔物放出！挑戰開始！",1;
     
228. end;
     
229. }
     
230. pvp_n_1-5.gat,99,100,0 script npce1 -1,{ Onvs: callfunc "vsran",1; }
     
231. pvp_n_2-5.gat,99,100,0 script npce2 -1,{ Onvs: callfunc "vsran",2; }
     
232. pvp_n_3-5.gat,99,100,0 script npce3 -1,{ Onvs: callfunc "vsran",3; }
     
233. pvp_n_4-5.gat,99,100,0 script npce4 -1,{ Onvs: callfunc "vsran",4; }
     
234. pvp_n_5-5.gat,99,100,0 script npce5 -1,{ Onvs: callfunc "vsran",5; }
     
235. function script vsran {
     
236. set $@dba[getarg(0)],$@dba[getarg(0)] -1;
     
237. if( $@dba[getarg(0)] > 0 ) end;
     
238. if($stage[getarg(0)]<getarraysize($@qstagmo)){announce  "隊伍:"  +getpartyname($party[getarg(0)]) + ", 在二館 第" + $stage[getarg(0)] + "關挑戰成功！",1;}
     
239. if($stage[getarg(0)]==10){announce "恭喜！！隊伍:"  +getpartyname($party[getarg(0)]) + ", 在二館 成功闖過十關！！",15;}
     
240. set @dmd,0;
     
241. dkens: if(getarraysize($@thekenbrea)>@dmd){
     
242.   if($stage[getarg(0)]==$@thekenbrea[@dmd]){
     
243.   enablenpc "2館裁判"+getarg(0);
     
244.    announce "休息時間..你的同伴可進場..",17;
     
245.   set $@partywait[getarg(0)],1;
     
246.   set $stage[getarg(0)],$stage[getarg(0)] +1;
     
247.   end;
     
248.   }
     
249. set @dmd,@dmd+1;
     
250. goto dkens;
     
251. }
     
252. 
     
253. if($stage[getarg(0)]==10){
     
254. areawarp "pvp_n_"+getarg(0)+"-5.gat",0,0,300,300,"job_wiz",46,99;
     
255. end;
     
256. }
     
257. if($stage[getarg(0)]==100){
     
258. areawarp "pvp_n_"+getarg(0)+"-5.gat",0,0,300,300,"new_2-2",99,102;
     
259. end;
     
260. }
     
261. set $stage[getarg(0)],$stage[getarg(0)] +1;
     
262. addtimer 4000,"chala_"+getarg(0)+"::Onka";
     
263. end;
     
264. }
     
265. //####################################2館裁判####################################
     
266. pvp_n_1-5.gat,99,101,4 script 2館裁判1 758,{ callfunc "make",1; }
     
267. pvp_n_2-5.gat,99,101,4 script 2館裁判2 758,{ callfunc "make",2; }
     
268. pvp_n_3-5.gat,99,101,4 script 2館裁判3 758,{ callfunc "make",3; }
     
269. pvp_n_4-5.gat,99,101,4 script 2館裁判4 758,{ callfunc "make",4; }
     
270. pvp_n_5-5.gat,99,101,4 script 2館裁判5 758,{ callfunc "make",5; }
     
271. function script make {
     
272. if (getcharid(0) != $@charid[getarg(0)]) {
     
273.   mes "[2館裁判]";
     
274.   mes "你不是報名的人";
     
275.   close;
     
276.   end;
     
277. }
     
278. mes "[2館裁判]";
     
279. mes "您準備要開始挑戰了嗎？";
     
280. next;
     
281. menu "準備好!!",redyok,"等等~",noready;
     
282. redyok: killmonsterall "pvp_n_"+getarg(0)+"-5.gat";
     
283.   set $@partywait[getarg(0)],0;
     
284.   disablenpc "2館裁判"+getarg(0);
     
285.   doevent "chala_"+getarg(0)+"::Onka";
     
286.   close;
     
287.   end;
     
288. noready: mes "[2館裁判]";
     
289.   mes "好的, 請盡速開始!!";
     
290.   close;
     
291.   end;
     
292. }
     

複製代碼

請問有什麼地方沒改到會因此而衝到呀= =?

哆啦ˇ

請問一下各位大大
我把一館腳本複製到二館
改了變數 跟 地圖 跟 裁判名字
那為什麼在二館打到XX關時候，又會跳回10關勒= ="

看不懂

恆ˇ

2# 哆啦ˇ

就是假如說他們那隊在二館打到59關
接下來不是要打60關嗎??
結果又跳回10關了=  ="

哆啦ˇ

好長- 口 -..
有點懶的看∼
先來去吃飯
可給我txt檔嗎？！

恆ˇ

4# 哆啦ˇ

好的，我上傳一館跟二館  等喔!!

恆ˇ

上傳囉!!點我下載

哆啦ˇ

#6
已下載..
晚點給倪答案~  ))抱怨~"~為什麼不直接用OK上傳

恆ˇ

7# 哆啦ˇ

= =

我記得OK上傳的下載的話不是都要-10金錢= ="

感謝大大，等你答案!!

哆啦ˇ

我不缺金錢牙˙ˇ˙
金錢1萬多>///<
可是金錢不能換積分ˊˋ

哆啦ˇ

                        set $@partywait[@da],1;
                        set $stage[@da],11;
                        set $party[@da],getcharid(1);
                        set $@charid[@da],getcharid(0);
                        announce "請 [" + getpartyname($party[@da]) + "] 隊伍的隊員, 在２分鐘內集合,地點在 毀葛主城左上方 找 [道場管理員[1]",16;

                        set $@partywait[@MnM],1;
                        set $stage[@MnM],11;
                        set $party[@MnM],getcharid(1);
                        set $@charid[@MnM],getcharid(0);
                        announce "請 [" + getpartyname($party[@MnM]) + "] 隊伍的隊員, 在２分鐘內集合,地點在 毀葛主城右方 找 [道場管理員[2]",16;

重複~

哆啦ˇ

第二館的..

        if($stage[getarg(0)]==10){announce "恭喜！！隊伍:"  +getpartyname($party[getarg(0)]) + ", 在二館 成功闖過十關！！",15;}
        set @dmd,0;
dkens:        if(getarraysize($@thekenbrea)>@dmd){
                if($stage[getarg(0)]==$@thekenbrea[@dmd]){
                enablenpc "2館裁判"+getarg(0);
                announce "休息時間..你的同伴可進場..",17;
                set $@partywait[getarg(0)],1;
                set $stage[getarg(0)],$stage[getarg(0)] +1;
                end;
                }
        set @dmd,@dmd+1;
        goto dkens;
        }


        if($stage[getarg(0)]==10){
        areawarp "pvp_n_"+getarg(0)+"-5.gat",0,0,300,300,"job_wiz",46,99;
        end;
        }

應該就是錯這個..我不知道job_wiz是什麼地方..

°–蓓★﹐

妳這樣子的話有好多好多東西要改。也很麻煩，


我的建議是



再去下載另一種道管腳本，修改裡面獎品跟地圖比較快唷^^

恆ˇ

第二館的..

應該就是錯這個..我不知道job_wiz是什麼地方..
哆啦ˇ 發表於 2009-7-21 01:11 PM

job_wiz 這地方是領獎品的

1. if($stage[getarg(0)]==10){
   
2.         areawarp "pvp_n_"+getarg(0)+"-5.gat",0,0,300,300,"job_wiz",46,99;
   
3.         end;

複製代碼

這是打完10關全傳去領獎，有什麼錯誤嗎@@?

恆ˇ

妳這樣子的話有好多好多東西要改。也很麻煩，


我的建議是



再去下載另一種道管腳本，修改裡面獎品跟地圖比較快唷^^
°–蓓★﹐ 發表於 2009-7-21 01:43 PM

如果還沒有辦法  我會再去用別的來改  現在人不在家
回去再改@@"

恆ˇ

剛剛看了一下，發現還有些沒改到

現在已經ok了^^~

感謝大大的解答