EA道館的傳送與裁判...

a350bc

1. 
   
2. //---------------設定--------------
   
3. xmas.gat,120,211,0        script        modaOnInit        -1,{
   
4. OnInit:
   
5. 
   
6. //------開道費用----
   
7.         set $@camoney,1500000;
   
8. 
   
9. //------隊友進場費用---
   
10.         set $@capartm,0;
    
11. 
    
12. //-------mvp--------
    
13.         setarray $@mvpary
    
14. 
    
15. [1],1874,1779,1786,1871,1734,1847,1502,1719,1708;
    
16. 
    
17. 
    
18. //-------放出mvp數量---
    
19.         setarray $@stagmo[1],1,1,1,1,1,1,1,1,2,3;
    
20. 
    
21. //-------可抽得的獎品id-----
    
22.         setarray $@ken0609
    
23. 
    
24. [1],607,607,607,607,984,984,984,984,985,985,985,985,5349,5361,5362,51
    
25. 
    
26. 02,12103,12221,7621,5068;
    
27. 
    
28. 
    
29. //------1次領獎數目----
    
30. //對應-可抽得的獎品id-設定
    
31.         setarray $@ken
    
32. 
    
33. [1],20,30,40,50,20,30,40,50,20,30,40,50,1,1,1,1,250,15,5,1;
    
34. 
    
35. }                        
    
36. xmas.gat,151,125,4        script        道場管理員        757,{
    
37. 
    
38.         if (getcharid(1) == 0) {
    
39.         mes "[道場-管理員]";
    
40.         mes "您沒有隊伍";
    
41.         mes "無法參賽";
    
42.         close;
    
43.         end;
    
44.         }
    
45.         set @da,1;
    
46. cada:        if (@da<3) {
    
47.         if(getmapusers("que_qsch0"+@da+".gat")==0 ) set $party
    
48. 
    
49. [@da],0;
    
50.         set @da,@da+1;
    
51.         goto cada;
    
52.         }
    
53.         set @da,1;
    
54. cbda:        if (@da<3) {
    
55.         if (getcharid(1) == $party[@da]){
    
56.         mes "[道場-管理員]";
    
57.         mes "您是^22DD22" +getpartyname(getcharid(1))+ "^000000的隊員
    
58. 
    
59. 吧";
    
60.         mes "你的隊員已報名挑戰,你要參與嗎？";
    
61.         next;
    
62.         menu "好的",cas1,"不用了",cas2;
    
63.         cas1:
    
64.                 if($@partywait[@da]==0) {
    
65.                         mes "[道場-管理員]";
    
66.                         mes "你的隊友已經先開始了";
    
67.                         mes "請你等待或換個隊伍另外挑戰！";
    
68.                         close;
    
69.                         end;
    
70.                 }
    
71.                 if (zeny<$@capartm) {
    
72.                 mes "金錢不夠^22DD22"+$@capartm+"^000000";
    
73.                 close;
    
74.                 end;
    
75.                 }
    
76.                 set zeny,zeny-$@capartm;
    
77.                 warp "que_qsch0"+@da+".gat",251,339;
    
78.                 end;
    
79.         cas2:                 
    
80.                 mes "[道場-管理員]";
    
81.                 mes "歡迎下次再來。";
    
82.                 close;
    
83.                 end;
    
84.         }
    
85.         set @da,@da+1;
    
86.         goto cbda;
    
87.         }
    
88.         mes "[道場-管理員]";
    
89.         mes "您和您的隊伍想參加嗎？";
    
90.         mes "須先繳納 ^22DD22"+$@camoney+"^000000 元的報名費";
    
91.         next;
    
92.         menu "報名",smit,"不了",nosmit;
    
93.         smit:        if (zeny<$@camoney) {
    
94.                 mes "金錢不夠^22DD22"+$@camoney+"^000000";
    
95.                 close;
    
96.                 end;
    
97.                 }
    
98.                 set @da,1;
    
99.         ccda:        if(@da<3) {
    
100.                         if (getmapusers("que_qsch0"+@da+".gat")==0 )
     
101. 
     
102. {
     
103.                         set zeny,zeny-$@camoney;
     
104.                         killmonsterall "que_qsch0"+@da+".gat";
     
105.                         set $@partywait[@da],1;
     
106.                         set $stage[@da],1;
     
107.                         set $party[@da],getcharid(1);
     
108.                         set $@charid[@da],getcharid(0);
     
109.                         announce "請 [" + getpartyname($party[@da]) +
     
110. 
     
111. "] 隊伍的隊員,要進入就在商城 找 [道場-管理員]",16;
     
112.                         enablenpc "裁判"+@da;
     
113.                         warp "que_qsch0"+@da+".gat",251,339;
     
114.                         end;
     
115.                         }
     
116.                 set @da,@da+1;
     
117.                 goto ccda;
     
118.                 }
     
119.                 mes "全部場地都有人在挑戰中~,請稍後再試";
     
120.                 close;
     
121.                 end;
     
122. 
     
123.         nosmit:        
     
124.                 mes "[道場-管理員]";
     
125.                 mes "歡迎下次再來。";
     
126.                 close;
     
127.                 end;
     
128. }
     
129. 
     
130. que_qsch01.gat,251,336,0        script        chal_1        -1,{ Onka: callfunc
     
131. 
     
132. "daryan",1; }
     
133. que_qsch02.gat,251,336,0        script        chal_2        -1,{ Onka: callfunc
     
134. 
     
135. "daryan",2; }
     
136. que_qsch03.gat,251,336,0        script        chal_3        -1,{ Onka: callfunc
     
137. 
     
138. "daryan",3; }
     
139. 
     
140. function        script        daryan        {
     
141.         set $@db[getarg(0)],0;
     
142. moda:        if($@db[getarg(0)]<$@stagmo[$stage[getarg(0)]]){
     
143.         set $@mvp,rand(1,9);
     
144.         monster "que_qsch0"+getarg(0)+".gat",251,339,"--ja-
     
145. 
     
146. -",$@mvpary[$@mvp],1,"npcev"+getarg(0)+"::Onvs";
     
147.         set $@db[getarg(0)],$@db[getarg(0)]+1;
     
148.         goto moda;
     
149.         }
     
150.         if($stage[getarg(0)]==10){
     
151.          announce "最後一關挑戰開始,請好好加油！",17;
     
152.         end;}
     
153.         announce "魔物放出！挑戰開始！",1;
     
154.         end;
     
155. }
     
156. 
     
157. que_qsch01.gat,250,340,0        script        npcev1        -1,{ Onvs: callfunc
     
158. 
     
159. "vsryan",1; }
     
160. que_qsch02.gat,250,340,0        script        npcev2        -1,{ Onvs: callfunc
     
161. 
     
162. "vsryan",2; }
     
163. que_qsch03.gat,250,340,0        script        npcev3        -1,{ Onvs: callfunc
     
164. 
     
165. "vsryan",3; }
     
166. 
     
167. 
     
168. function        script        vsryan        {
     
169.         set $@db[getarg(0)],$@db[getarg(0)] -1;
     
170.         if( $@db[getarg(0)] > 0 ) end;
     
171.         if($stage[getarg(0)]==10){announce "恭喜！！隊伍:"  
     
172. 
     
173. +getpartyname($party[getarg(0)]) + ", 成功闖過十關！！",15;}
     
174. 
     
175.         if($stage[getarg(0)]==10){
     
176.         areawarp "que_qsch0"+getarg(0)+".gat",0,0,300,300,"new_3-
     
177. 
     
178. 2",30,167;
     
179.         end;
     
180.         }
     
181.         set $stage[getarg(0)],$stage[getarg(0)] +1;
     
182.         addtimer 4000,"chal_"+getarg(0)+"::Onka";
     
183.         end;
     
184. }
     
185. //####################################裁判
     
186. 
     
187. ####################################
     
188. que_qsch01.gat,251,338,4        script        裁判6        758,{ callfunc
     
189. 
     
190. "maker",1; }
     
191. que_qsch02.gat,251,338,4        script        裁判7        758,{ callfunc
     
192. 
     
193. "maker",2; }
     
194. que_qsch03.gat,251,338,4        script        裁判8        758,{ callfunc
     
195. 
     
196. "maker",3; }
     
197. 
     
198. 
     
199. function        script        maker        {
     
200.         if (getcharid(0) != $@charid[getarg(0)]) {
     
201.                 mes "[裁判]";
     
202.                 mes "你不是報名的人";
     
203.                 close;
     
204.                 end;
     
205.         }
     
206.         mes "[裁判]";
     
207.         mes "您準備要開始挑戰了嗎？";
     
208.         next;
     
209.         menu "準備好!!",redyok,"等等~",noready;
     
210.         redyok: killmonsterall "que_qsch0"+getarg(0)+".gat";
     
211.                 set $@partywait[getarg(0)],0;
     
212.                 disablenpc "裁判"+getarg(0);
     
213.                 doevent "chal_"+getarg(0)+"::Onka";
     
214.                 close;
     
215.                 end;
     
216.         noready: mes "[裁判]";
     
217.                 mes "好的, 請盡速開始!!";
     
218.                 close;
     
219.                 end;
     
220. 
     
221. }
     
222. //---------------------地圖屬性設定----------------------
     
223. que_qsch01.gat        mapflag        nomemo        dummy
     
224. que_qsch01.gat        mapflag        noteleport        dummy
     
225. que_qsch01.gat        mapflag        nosave        SavePoint
     
226. que_qsch01.gat        mapflag        nopenalty        dummy
     
227. que_qsch01.gat        mapflag        nobranch        dummy
     
228. 
     
229. que_qsch02.gat        mapflag        nomemo        dummy
     
230. que_qsch02.gat        mapflag        noteleport        dummy
     
231. que_qsch02.gat        mapflag        nosave        SavePoint
     
232. que_qsch02.gat        mapflag        nopenalty        dummy
     
233. que_qsch02.gat        mapflag        nobranch        dummy
     
234. 
     
235. que_qsch03.gat        mapflag        nomemo        dummy
     
236. que_qsch03.gat        mapflag        noteleport        dummy
     
237. que_qsch03.gat        mapflag        nosave        SavePoint
     
238. que_qsch03.gat        mapflag        nopenalty        dummy
     
239. que_qsch03.gat        mapflag        nobranch        dummy
     
240. 
     
241. new_3-2.gat        mapflag        nomemo        dummy
     
242. new_3-2.gat        mapflag        noteleport        dummy
     
243. new_3-2.gat        mapflag        nosave        SavePoint
     
244. new_3-2.gat        mapflag        nopenalty        dummy
     
245. new_3-2.gat        mapflag        nobranch        dummy
     
246. 
     
247. 
     
248. //-------------------------商人NPC設置-----------------------------
     
249. //guild_vs1.gat,47,89,5        shop        物品商人        
     
250. 
     
251. 76,501:50,502:200,503:550,504:1200,505:4200,601:60,610:4000,611:40,64
     
252. 
     
253. 5:800,656:1500,657:3000,717:600,1065:100,1751:200
     
254. //guild_vs2.gat,47,92,5        shop        物品商人        
     
255. 
     
256. 76,501:50,502:200,503:550,504:1200,505:4200,601:60,610:4000,611:40,64
     
257. 
     
258. 5:800,656:1500,657:3000,717:600,1065:100,1751:200
     
259. //guild_vs3.gat,47,86,5        shop        物品商人        
     
260. 
     
261. 76,501:50,502:200,503:550,504:1200,505:4200,601:60,610:4000,611:40,64
     
262. 
     
263. 5:800,656:1500,657:3000,717:600,1065:100,1751:200
     
264. //guild_vs4.gat,47,91,5        shop        物品商人        
     
265. 
     
266. 76,501:50,502:200,503:550,504:1200,505:4200,601:60,610:4000,611:40,64
     
267. 
     
268. 5:800,656:1500,657:3000,717:600,1065:100,1751:200
     
269. //guild_vs5.gat,47,75,5        shop        物品商人        
     
270. 
     
271. 76,501:50,502:200,503:550,504:1200,505:4200,601:60,610:4000,611:40,64
     
272. 
     
273. 5:800,656:1500,657:3000,717:600,1065:100,1751:200
     
274. //============================發放獎品NPC=======================
     
275. 
     
276. guild_room.gat,30,285,4        script        獎品發放員        736,{
     
277. 
     
278.         mes "[獎品發放員]";
     
279.         mes "你很厲害！能打到這裡，讓我給你一些獎勵吧！";
     
280.         percentheal 100,100;
     
281.         next;
     
282.         mes "[獎品發放員]";
     
283.         mes "我是負責發放獎品的";
     
284.         mes "你將會隨機獲得一種獎品";
     
285.         mes "請注意負重問題避免獎品噴出!!";
     
286.         next;
     
287.         menu "對，我要領獎品！",-,"不了，讓我在考慮一下！",cancel;
     
288.         set @ke,rand(1,getarraysize($@ken0609));
     
289.         getitem $@ken0609[@ke],$@ken[@ke];
     
290.         warp "alberta.gat",117,57;
     
291.         end;
     
292. cancel:        mes "[獎品發放員]";
     
293.         mes "那要的時候再來找我!";
     
294.         mes "再見!!";
     
295.         close;
     
296.         end;
     
297. }
     

複製代碼

我設定的打完10關，並不會傳送到獎品區。

開始挑戰裁判也不會消失......

我已爬過文....每個都失敗=ˋ=

傳送如果改成  warp  只會傳送一個人....並不是全隊!!

誰能交交我=ˋ=用哩好多天....

a350bc

回復 1# a350bc

補充一點，裁判的編號無衝突，以測試過....

因為整個開機，只有放一個腳本....沒其他腳本=ˋ=

-樂-

錯誤圖?

a350bc

回復 3# -樂-

開機檔都沒顯示錯誤=ˋ=

裁判從頭到尾都在.....

第10關挑戰成功，也沒傳送....

這是我道館測試的圖...

a350bc

請版主幫忙刪除或移動!!

我已找到問題所在哩.....

謝謝^^!