UID90197
帖子
精華
主題
積分9
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限5
註冊時間2008-6-1
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 開心 2017-3-11 12:22 AM |
---|
簽到天數: 13 天 連續簽到: 1 天 [LV.3]偶爾看看II
|
EA
私服版號: |
3CEAM R720 |
問題內容: |
腳本問題 |
本帖最後由 q87269 於 2014-2-11 04:42 PM 編輯
我原本已經有兩個道館
我想新增第3個
但我修改完後
測試一切都很正常
但唯一就是裁判開始放怪時
有時後會跑出來 雖然無法點他對話
但感覺就是怪怪的
不知道為何
這是我的腳本- ra_temple.gat,109,49,4 script 高階道場管理員 852,{
- mes "[高階道場管理員]";
- next;
- switch(select( "隊伍報名","查看報名"
- )){
- case 1:
- if (!getcharid(1)) {
- mes "[高階道場管理員]";
- mes "- ^C63131您沒有隊伍,無法參加^000000";
- close;
- }
- mes "[高階道場管理員]";
- mes "- 報名費 : "+$@Dc_In_Zeny3+"z";
- next;
- menu "想參加",-;
- if ( Zeny<$@Dc_In_Zeny3 ){
- mes "[道場管理員]";
- mes "- ^C63131金錢不足^000000";
- close;
- }
- set .@s,rand(1);
- mes "[高階道場管理員]";
- mes "報名中...";
- progressbar "ffff00",.@s;
- if (getmapusers("06guild_01")==0 ){
- killmonster "06guild_01","Dc_Main_9::OnKillMob";
- warpparty "06guild_01",49,47,getcharid(1);
- set Zeny,Zeny-$@Dc_In_Zeny3;
- set $@Dc_Truns_9,1;
- set $@Dc_Party_9,getcharid(1);
- set $@Party_9$,strcharinfo(0);
- enablenpc "裁判#9";
- announce "[ 道館廣播 ] 高階道場 1 已有隊伍參加挑戰中。",15,0xEFA2A1;
- }else if (getmapusers("06guild_02")==0 ){
- killmonster "06guild_02","Dc_Main_10::OnKillMob";
- warpparty "06guild_02",49,47,getcharid(1);
- set Zeny,Zeny-$@Dc_In_Zeny3;
- set $@Dc_Truns_10,1;
- set $@Dc_Party_10,getcharid(1);
- set $@Party_10$,strcharinfo(0);
- enablenpc "裁判#10";
- announce "[ 道館廣播 ] 高階道場 2 已有隊伍參加挑戰中。",15,0xEFA2A1;
- }else if (getmapusers("06guild_03")==0 ){
- killmonster "06guild_03","Dc_Main_11::OnKillMob";
- warpparty "06guild_03",49,47,getcharid(1);
- set Zeny,Zeny-$@Dc_In_Zeny3;
- set $@Dc_Truns_11,1;
- set $@Dc_Party_11,getcharid(1);
- set $@Party_11$,strcharinfo(0);
- enablenpc "裁判#11";
- announce "[ 道館廣播 ] 高階道場 3 已有隊伍參加挑戰中。",15,0xEFA2A1;
- }else{
- mes "[高階道場]";
- mes "請稍後再試";
- close;
- }
- end;
- case 2:
- mes "[高階道場]";
- if ( getmapusers("06guild_01")==0 ){mes "[場地一]隊伍: [無人報名]";}else{mes "[場地一]隊伍: ["+getpartyname($@Dc_Party_9)+"]";}
- if ( getmapusers("06guild_02")==0 ){mes "[場地二]隊伍: [無人報名]";}else{mes "[場地二]隊伍: ["+getpartyname($@Dc_Party_10)+"]";}
- if ( getmapusers("06guild_03")==0 ){mes "[場地三]隊伍: [無人報名]";}else{mes "[場地三]隊伍: ["+getpartyname($@Dc_Party_11)+"]";}
- close;
- end;
- }
- OnInit:
- waitingroom "【高階道場】", 0;
- set $@Dc_In_Zeny3,500000;
- set $@Dc_Conf_Turns3,10;
- set $@Dc_Conf_Nums3,1;
- setarray $@Dc_Mob3[0],1768,1719,1708,1874,1832,1751,1779,1990,1991,1583,1623,1685,1734,1785,2068,2087;
- end;
- }
- /**************
- [場地一]
- **************/
- 06guild_01,0,0,0 script Dc_Main_9 -1,{
- OnMain:
- killmonsterall "06guild_01";
- set $@Dc_Mob3_9,0;
- for(set $@Dc9,1;$@Dc9<=$@Dc_Conf_Nums3;set $@Dc9,$@Dc9 +1) {
- monster "06guild_01",50,49,"--ja--",$@Dc_Mob3[rand(getarraysize($@Dc_Mob3))],1,"Dc_Main_9::OnKillMob";
- set $@Dc_Mob3_9,$@Dc_Mob3_9 +1;
- }
- if ($@Dc_Truns_9 != $@Dc_Conf_Turns3)
- mapannounce "06guild_01","[ 道場 ] 魔物放出!挑戰開始!",15,0xFFEBEB;
- else
- mapannounce "06guild_01","[ 道場 ] 最後一關挑戰開始,請好好加油!",15,0xFFEBEB;
- end;
- OnKillMob:
- set $@Dc_Mob3_9, $@Dc_Mob3_9 - 1;
- if( $@Dc_Mob3_9 > 0 ) end;
- mapannounce "06guild_01","[ 道場 ] 恭喜你,挑戰成功!",15,0xFFF5EB;
- mapannounce "06guild_01","[ 道場 ] "+getpartyname($@Dc_Party_9) +" 隊伍, 第"+$@Dc_Truns_9+"關挑戰成功!",15,0xFFFFEB;
- if($@Dc_Truns_9 == $@Dc_Conf_Turns3) {
- addtimer 5000,"Dc_Main_9::OnEnd";
- end;
- }
- set $@Dc_Truns_9,$@Dc_Truns_9 + 1;
- addtimer 5000,"Dc_Main_9::OnMain";
- end;
- OnEnd:
- areawarp "06guild_01",0,0,300,300,"guild_room",142,285;
- set $@Dc_Party_9,"null";
- end;
- }
- /**************
- [場地二]
- **************/
- 06guild_02,0,0,0 script Dc_Main_10 -1,{
- OnMain:
- killmonsterall "06guild_02";
- set $@Dc_Mob3_10,0;
- for(set $@Dc10,1;$@Dc10<=$@Dc_Conf_Nums3;set $@Dc10,$@Dc10 +1) {
- monster "06guild_02",50,49,"--ja--",$@Dc_Mob3[rand(getarraysize($@Dc_Mob3))],1,"Dc_Main_10::OnKillMob";
- set $@Dc_Mob3_10,$@Dc_Mob3_10 +1;
- }
- if ($@Dc_Truns_10 != $@Dc_Conf_Turns3)
- mapannounce "06guild_02","[ 道場 ] 魔物放出!挑戰開始!",15,0xFFEBEB;
- else
- mapannounce "06guild_02","[ 道場 ] 最後一關挑戰開始,請好好加油!",15,0xFFEBEB;
- end;
- OnKillMob:
- set $@Dc_Mob3_10, $@Dc_Mob3_10 - 1;
- if( $@Dc_Mob3_10 > 0 ) end;
- mapannounce "06guild_02","[ 道場 ] 恭喜你,挑戰成功!",15,0xFFF5EB;
- mapannounce "06guild_02","[ 道場 ] "+getpartyname($@Dc_Party_10) +" 隊伍, 第"+$@Dc_Truns_10+"關挑戰成功!",15,0xFFFFEB;
- if($@Dc_Truns_10 == $@Dc_Conf_Turns3) {
- addtimer 5000,"Dc_Main_10::OnEnd";
- end;
- }
- set $@Dc_Truns_10,$@Dc_Truns_10 + 1;
- addtimer 5000,"Dc_Main_10::OnMain";
- end;
- OnEnd:
- areawarp "06guild_02",0,0,300,300,"guild_room",142,285;
- set $@Dc_Party_10,"null";
- end;
- }
- /**************
- [場地三]
- **************/
- 06guild_03,0,0,0 script Dc_Main_11 -1,{
- OnMain:
- killmonsterall "06guild_03";
- set $@Dc_Mob3_11,0;
- for(set $@Dc11,1;$@Dc11<=$@Dc_Conf_Nums3;set $@Dc11,$@Dc11 +1) {
- monster "06guild_03",50,49,"--ja--",$@Dc_Mob3[rand(getarraysize($@Dc_Mob3))],1,"Dc_Main_11::OnKillMob";
- set $@Dc_Mob3_11,$@Dc_Mob3_11 +1;
- }
- if ($@Dc_Truns_11 != $@Dc_Conf_Turns3)
- mapannounce "06guild_03","[ 道場 ] 魔物放出!挑戰開始!",15,0xFFEBEB;
- else
- mapannounce "06guild_03","[ 道場 ] 最後一關挑戰開始,請好好加油!",15,0xFFEBEB;
- end;
- OnKillMob:
- set $@Dc_Mob3_11, $@Dc_Mob3_11 - 1;
- if( $@Dc_Mob3_11 > 0 ) end;
- mapannounce "06guild_03","[ 道場 ] 恭喜你,挑戰成功!",15,0xFFF5EB;
- mapannounce "06guild_03","[ 道場 ] "+getpartyname($@Dc_Party_11) +" 隊伍, 第"+$@Dc_Truns_11+"關挑戰成功!",15,0xFFFFEB;
- if($@Dc_Truns_11 == $@Dc_Conf_Turns3) {
- addtimer 5000,"Dc_Main_11::OnEnd";
- end;
- }
- set $@Dc_Truns_11,$@Dc_Truns_11 + 1;
- addtimer 5000,"Dc_Main_11::OnMain";
- end;
- OnEnd:
- areawarp "06guild_03",0,0,300,300,"guild_room",142,285;
- set $@Dc_Party_11,"null";
- end;
- }
- //裁判
- 06guild_01,50,49,4 script 裁判#9 758,{
- if ($@Party_9$!=strcharinfo(0)){mes "[裁判]";mes "你不是報名的人,無法開啟";close;end;}
- mes "[裁判]";
- mes "您準備要開始挑戰了嗎?";
- next;
- menu "是的",-;
- mes "[裁判]";
- mes "挑戰開始!";
- close2;
- doevent "Dc_Main_9::OnMain";
- disablenpc "裁判#9";
- end;
- }
- 06guild_02,50,49,4 script 裁判#10 758,{
- if ($@Party_10$!=strcharinfo(0)){mes "[裁判]";mes "你不是報名的人,無法開啟";close;end;}
- mes "[裁判]";
- mes "您準備要開始挑戰了嗎?";
- next;
- menu "是的",-;
- mes "[裁判]";
- mes "挑戰開始!";
- close2;
- doevent "Dc_Main_10::OnMain";
- disablenpc "裁判#10";
- end;
- }
- 06guild_03,50,49,4 script 裁判#11 758,{
- if ($@Party_11$!=strcharinfo(0)){mes "[裁判]";mes "你不是報名的人,無法開啟";close;end;}
- mes "[裁判]";
- mes "您準備要開始挑戰了嗎?";
- next;
- menu "是的",-;
- mes "[裁判]";
- mes "挑戰開始!";
- close2;
- doevent "Dc_Main_11::OnMain";
- disablenpc "裁判#11";
- end;
- }
- //獎品
- guild_room,128,285,4 script 獎品發放員#2 984,{
- if(BaseLevel<99){warp "anger",135,207;}
- mes "[獎品發放員]";
- mes "讓我給你一些獎勵吧!";
- percentheal 100,100;
- next;
- mes "[獎品發放員]";
- mes "我是負責發放獎品的";
- mes "你將會隨機獲得一種獎品";
- mes "你確定你要選擇獎品嗎?";
- next;
- menu "對,我要領獎品!",-,"不了,讓我在考慮一下!",cancel;
- if((Weight*100)/MaxWeight >= 70) goto Tooweight;
- set .@gi,rand(1,32);
- set .@pic,rand(10,20);
- set .@pic2,rand(10,20);
- set .@pic3,rand(10,100);
- set .@pic4,rand(10,15);
- set .@pic5,rand(1,5);
- if (.@gi ==1)getitem 7426,.@pic;
- if (.@gi ==2)getitem 7224,.@pic2;
- if (.@gi ==3)getitem 7430,.@pic2;
- if (.@gi ==4)getitem 607,.@pic3;
- if (.@gi ==5)getitem 607,.@pic3;
- if (.@gi ==6)getitem 607,.@pic3;
- if (.@gi ==7)getitem 608,.@pic3;
- if (.@gi ==8)getitem 608,.@pic3;
- if (.@gi ==9)getitem 608,.@pic3;
- if (.@gi ==10)getitem 608,.@pic3;
- if (.@gi ==11)getitem 608,.@pic3;
- if (.@gi ==12)getitem 12214,.@pic4;
- if (.@gi ==13)getitem 12214,.@pic4;
- if (.@gi ==14)getitem 12214,.@pic4;
- if (.@gi ==15)getitem 12214,.@pic4;
- if (.@gi ==16)getitem 12221,.@pic4;
- if (.@gi ==17)getitem 12221,.@pic4;
- if (.@gi ==18)getitem 12221,.@pic4;
- if (.@gi ==19)getitem 7086,.@pic5;
- if (.@gi ==20)getitem 7087,.@pic5;
- if (.@gi ==21)getitem 7089,.@pic5;
- if (.@gi ==22)getitem 7090,.@pic5;
- if (.@gi ==23)getitem 7091,.@pic5;
- if (.@gi ==24)getitem 7092,.@pic5;
- if (.@gi ==25)getitem 607,.@pic3;
- if (.@gi ==26)getitem 607,.@pic3;
- if (.@gi ==27)getitem 607,.@pic3;
- if (.@gi ==28)getitem 608,.@pic3;
- if (.@gi ==29)getitem 608,.@pic3;
- if (.@gi ==30)getitem 608,.@pic3;
- if (.@gi ==31)getitem 608,.@pic3;
- if (.@gi ==32)getitem 608,.@pic3;
- warp "anger",135,207;
- cancel:
- close;
- Tooweight:
- mes "[獎品發放員]";
- mes "你身上太重了";
- mes "請低於70%負重";
- mes " ";
- mes "使用@storage指令開啟倉庫";
- close;
- }
- guild_room,151,285,4 script 獎金發放員#2 986,{
- if(BaseLevel<99){warp "anger",135,207;}
- mes "[點數發放員]";
- mes "我是負責發放點數的,";
- mes "隨機發放300~500點!";
- next;
- menu "我要領點數!",cashgive;
-
- cashgive:
- set @GERCASH,rand(300,500);
- set #CASHPOINTS,#CASHPOINTS+@GERCASH;
- warp "anger",135,207;
- close;
- end;
- }
- 06guild_01 mapflag nomemo
- 06guild_01 mapflag noteleport
- 06guild_01 mapflag nosave SavePoint
- 06guild_01 mapflag nopenalty
- 06guild_01 mapflag nobranch
- 06guild_01 mapflag monster_noteleport
- 06guild_01 mapflag nomobloot
- 06guild_01 mapflag nobaseexp
- 06guild_01 mapflag nojobexp
- 06guild_01 mapflag nomobloot
- 06guild_02 mapflag nomemo
- 06guild_02 mapflag noteleport
- 06guild_02 mapflag nosave SavePoint
- 06guild_02 mapflag nopenalty
- 06guild_02 mapflag nobranch
- 06guild_02 mapflag monster_noteleport
- 06guild_02 mapflag nomobloot
- 06guild_02 mapflag nobaseexp
- 06guild_02 mapflag nojobexp
- 06guild_02 mapflag nomobloot
- 06guild_03 mapflag nomemo
- 06guild_03 mapflag noteleport
- 06guild_03 mapflag nosave SavePoint
- 06guild_03 mapflag nopenalty
- 06guild_03 mapflag nobranch
- 06guild_03 mapflag monster_noteleport
- 06guild_03 mapflag nomobloot
- 06guild_03 mapflag nobaseexp
- 06guild_03 mapflag nojobexp
- 06guild_03 mapflag nomobloot
- guild_room mapflag nomemo
- guild_room mapflag noteleport
- guild_room mapflag nosave SavePoint
- guild_room mapflag nopenalty
- guild_room mapflag nobranch
- guild_room mapflag monster_noteleport
複製代碼 |
|