UID98544
帖子
精華
主題
積分1834
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限10
註冊時間2008-7-29
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 怒 2016-1-17 05:02 PM |
---|
簽到天數: 43 天 連續簽到: 1 天 [LV.5]常住居民I
|
xmas.gat,171,81,5 script 道場管理員 734,{
if (getcharid(1) == 0) {
mes "[道場-管理員]";
mes "您目前 殺怪點數:^FF0000" + kmob + "^000000";
mes "目前殺怪點數的效用未公佈,預計以後達到某個階段";
mes "可以取得特殊物品,所以現在可以先開始累積。";
mes " ";
mes "您沒有隊伍";
mes "無法參賽";
close;
end;
}
set @da2,1;
cada: if ( (@da2<3)||(@da2>6)) {
if(getmapusers("guild_vs1-"[email=+@da2+]+@da2+".gat")==0[/email] ) set $party[@da2],0;
set @da2,@da2+1;
goto cada;
}
set @da2,1;
cbda: if (@da2<4) {
if (getcharid(1) == $party[@da2]){
if(@talk==1){
mes " 嚴禁怪物傭兵進入!!";
mes " 請重新登入!!";
close;
}
mes "[道場-管理員]";
mes "您是^22DD22" +getpartyname(getcharid(1))+ "^000000的隊員吧";
mes "你的隊員已報名挑戰,你要參與嗎?";
next;
menu "好的",cas1,"不用了",cas2;
cas1:
if([email=$@partywait[@da2]==0]$@partywait[@da2]==0[/email]) {
mes "[道場-管理員]";
mes "你的隊友已經先開始了";
mes "請你等待或換個隊伍另外挑戰!";
close;
end;
}
if (zeny<[email=$@capartm2]$@capartm2[/email]) {
mes "金錢不夠^22DD221萬^000000";
close;
end;
}
set zeny,zeny-$@capartm2;
warp "guild_vs1-"[email=+@da2+]+@da2+".gat",49,47[/email];
end;
cas2:
mes "[道場-管理員]";
mes "歡迎下次再來。";
close;
end;
}
set @da2,@da2+1;
goto cbda;
}
if(@talk==1){
mes " 嚴禁怪物傭兵進入!!";
mes " 請重新登入!!";
close;
}
mes "[道場-管理員]";
mes "您和您的隊伍想參加嗎?";
mes "須先繳納 ^22DD22200萬^000000 元的報名費";
next;
menu "報名",smit,"不了",nosmit;
smit: if (zeny<2000000) {
mes "金錢不夠^22DD22200萬^000000";
close;
end;
}
set @da2,1;
ccda: if ( (@da2<3)||(@da2>6)) {
if (getmapusers("guild_vs1-"[email=+@da2+]+@da2+".gat")==0[/email] ) {
set zeny,zeny-2000000;
killmonsterall "guild_vs1-"[email=+@da2+]+@da2+".gat[/email]";
set [email=$@partywait[@da2],1]$@partywait[@da2],1[/email];
set $stage[@da2],1;
set $party[@da2],getcharid(1);
set [email=$@charid[@da2],getcharid(0]$@charid[@da2],getcharid(0[/email]);
announce "請 [" + getpartyname($party[@da2]) + "] 隊伍的隊員,要進入
就在中央主城 找 [道場-管理員]",16;
enablenpc "裁判"[email=+@da2]+@da2[/email];
warp "guild_vs1-"[email=+@da2+]+@da2+".gat",49,47[/email];
end;
}
set @da2,@da2+1;
goto ccda;
}
mes "全部場地都有人在挑戰中~,請稍後再試";
close;
end;
nosmit:
mes "[道場-管理員]";
mes "歡迎下次再來。";
close;
end;
OnInit:
waitingroom "道館挑戰賽",0;
end;
}
guild_vs1-1.gat,50,50,0 script chal_1 -1,{ Onka: callfunc "daryan1",1; }
guild_vs1-2.gat,50,50,0 script chal_2 -1,{ Onka: callfunc "daryan1",2; }
function script daryan1 {
set [email=$@db2[getarg(0)],0]$@db2[getarg(0)],0[/email];
moda: if([email=$@db2[getarg(0)]<$@stagmo2[$stage[getarg(0]$@db2[getarg(0)]<$@stagmo2[$stage[getarg(0[/email])]]){
set [email=$@mvp,rand(1,35]$@mvp,rand(1,35[/email]);
monster "guild_vs1-"+getarg(0)+".gat",50,50,"--ja--",$@mvpary2
[$@mvp2],1,"npcev"+getarg(1)+"::Onvs";
set [email=$@db2[getarg(0)],$@db2[getarg(0)]+1]$@db2[getarg(0)],$@db2[getarg(0)]+1[/email];
goto moda;
}
if($stage[getarg(0)]==10){
announce "最後一關挑戰開始,請好好加油!",17;
end;}
announce "魔物放出!挑戰開始!",1;
end;
}
guild_vs1-1.gat,50,55,0 script npcev1 -1,{ Onvs: callfunc "vsryan1",1; }
guild_vs1-2.gat,50,55,0 script npcev2 -1,{ Onvs: callfunc "vsryan1",2; }
function script vsryan1 {
set [email=$@db2[getarg(0)],$@db2[getarg(0]$@db2[getarg(0)],$@db2[getarg(0[/email])] -1;
if( [email=$@db2[getarg(0]$@db2[getarg(0[/email])] > 0 ) end;
if($stage[getarg(0)]==10){announce "恭喜!!隊伍:" +getpartyname($party[getarg(0)]) + ",
成功闖過十關!!",15;}
if($stage[getarg(0)]==10){
areawarp "guild_vs1-"+getarg(0)+".gat",0,0,300,300,"new_zone02",28,175;
end;
}
set $stage[getarg(0)],$stage[getarg(0)] +1;
addtimer 4000,"chal_"+getarg(0)+"::Onka";
end;
}
//####################################裁判####################################
guild_vs1-1.gat,50,49,4 script 裁判1 758,{ callfunc "maker1",1; }
guild_vs1-2.gat,50,49,4 script 裁判2 758,{ callfunc "maker1",2; }
function script maker1 {
if (getcharid(0) != [email=$@charid[getarg(0]$@charid[getarg(0[/email])]) {
mes "[裁判]";
mes "你不是報名的人";
close;
end;
}
mes "[裁判]";
mes "您準備要開始挑戰了嗎?";
next;
menu "準備好!!",redyok,"等等~",noready;
redyok: killmonsterall "guild_vs1-"+getarg(0)+".gat";
set [email=$@partywait[getarg(0)],0]$@partywait[getarg(0)],0[/email];
disablenpc "裁判"+getarg(0);
doevent "chal_"+getarg(0)+"::Onka";
close;
end;
noready: mes "[裁判]";
mes "好的, 請盡速開始!!";
close;
end;
}
//---------------------地圖屬性設定----------------------
guild_vs1-1.gat mapflag nomemo dummy
guild_vs1-1.gat mapflag nosave ra_temsky.gat,93,60
guild_vs1-2.gat mapflag nomemo dummy
guild_vs1-2.gat mapflag nosave ra_temsky.gat,93,60
guild_room.gat mapflag nomemo dummy
guild_room.gat mapflag noteleport dummy
guild_room.gat mapflag nosave ra_temsky.gat,93,60
guild_room.gat mapflag nopenalty dummy
guild_room.gat mapflag nobranch dummy
//============================發放獎品NPC=======================
new_zone02,38,182,4 script 天果發放員 736,{
mes "[獎品發放員]";
mes "你很厲害!能打到這裡,讓我給你一些獎勵吧!";
percentheal 100,100;
next;
mes "[獎品發放員]";
mes "我是負責發放獎品的";
mes "你將會隨機獲得一種獎品";
mes "你確定你要選擇獎品嗎?";
next;
menu "對,我要領獎品!",yessssss,"不了,讓我在考慮一下!",cancel;
yessssss:
set @gi,rand(6);
if(@gi ==0)getitem 607,100;
if(@gi ==1)getitem 607,300;
if(@gi ==2)getitem 607,50;
if(@gi ==3)getitem 607,70;
if(@gi ==4)getitem 607,90;
if(@gi ==5)getitem 607,110;
set kmob,kmob+1;
dispbottom "殺怪點數+1 目前次數為 : "+kmob;
warp "amatsu.gat",113,146;
close;
cancel:
close;
OnInit:
//------開道費用----
set [email=$@camoney1,2000000]$@camoney1,2000000[/email];
//------隊友進場費用---
set [email=$@capartm2,500000]$@capartm2,500000[/email];
//-------mvp--------
setarray [email=$@mvpary2]$@mvpary2[/email]
[1],1038,1039,1046,1059,1086,1087,1096,1112,1115,1120,1147,1150,1157,1159,1190,1251,1252,1
272,1312,1373,1388,1389,1418,1492,1511,1582,1583,1623,1630,1658,1685,1688,1719,1649,1785;
//-------放出mvp數量---
setarray [email=$@stagmo2[1],2,2,2,2,2,2,2,2,2,3]$@stagmo2[1],2,2,2,2,2,2,2,2,2,3[/email];
//-------可抽得的獎品id-----
setarray [email=$@ken0609[1],501,502,503,504,505,506,507,508,509,510]$@ken0609[1],501,502,503,504,505,506,507,508,509,510[/email],
511,512,513,514,515,516,517,518,1139,1146;
//------1次領獎數目----
//對應-可抽得的獎品id-設定
setarray [email=$@ken[1],1,1,1,1,1,1,1,1,1,1]$@ken[1],1,1,1,1,1,1,1,1,1,1[/email],
1,1,1,1,1,1,1,1,1,1;
}
我這是從我原先的腳本改出來的,可是他放怪每次都會放在guild_vs1.gat這地圖
請問是我哪裡有漏掉嗎? 麻煩大大幫我解答一下 |
評分
-
查看全部評分
|