UID77103
帖子
精華
主題
積分7333
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限20
註冊時間2008-4-10
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 奮斗 2013-11-12 11:31 AM |
---|
簽到天數: 27 天 連續簽到: 1 天 [LV.4]偶爾看看III
|
道館怎改上限人數進入?
mes "[道場挑戰]";
mes "歡迎您參加道場的挑戰";
mes "須先繳納 ^22DD22"+1000+"^000000 元的報名費";
next;
menu "道場報名",-;
mes "[道場挑戰]";
if (!getcharid(1) || Zeny<$@Dc_In_Zeny)
{
mes "您沒有隊伍或金錢不足 "+$@Dc_In_Zeny+" Zeny";
close;
}
for (set @t,1;@t<6;set @t,@t+1)
{
if ( getmapusers("guild_vs"+@t+".gat")==0 )
{
killmonster "guild_vs"+@t+".gat","Dc_Main_"+@t+"::OnKillMob";
set Zeny,Zeny-$@Dc_In_Zeny;
set $@Dc_Truns[@t],1;
set $@Dc_Party[@t],getcharid(1);
set $@Dc_timer[@t],$@Dc_Delay[0];
enablenpc "裁判#"+@t+"";
initnpctimer "Dc_Timer_"+@t+"";
warpparty "guild_vs"+@t+".gat",49,47,getcharid(1);
if (!sleep2(3000))
end;
mapannounce "guild_vs"+@t+".gat","[ 道場 ] 請在 "+$@Dc_Delay[0]+" 分鐘內開始比賽,否則將強制退出!",15;
end;
}
}
for (set @t,1;@t<6;set @t,@t+1)
mes "[場地"+@t+"]隊伍: ["+getpartyname($@Dc_Party[@t])+"]";
mes "全部場地都有人在挑戰了,請稍後再試";
close;
OnInit:
set $@Dc_In_Zeny,0; //設置入場金錢
set $@Dc_Misson,100; //道場關數
setarray $@Dc_Mob_Id[0],1038,1039,1046,1059,1086,1087,1112,1115,1147,1150,1157,1159,1190,1272,1312,1373,1389,1492; //設置怪物ID
setarray $@Dc_Mob_Num[1],1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2; //每關刷怪數量
setarray $@Dc_Delay[0],3,10,10,10,10,10,10,10,10,10,10; //開始比賽的等待時間,第一關時間,第二關時間,……,單位:分鐘
setarray $@Dc_Space[1],5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5; //每關間隔時間,單位:秒
setarray $@Dc_Item_Id[0],663,7037,607,663,663,7037,7037,7037,7037,7037; //獎勵道具ID
setarray $@Dc_Item_Num[0],150,50,20,150,100,50,40,45,60,50; //獎勵道具數量
set $@Dc_Win_Zeny,500000; //獎勵金錢
end;
}
guild_vs1.gat,0,0,0 script Dc_Timer_1 -1,{ OnTimer60000: callfunc "Dc_Timer",1; }
guild_vs2.gat,0,0,0 script Dc_Timer_2 -1,{ OnTimer60000: callfunc "Dc_Timer",2; }
guild_vs3.gat,0,0,0 script Dc_Timer_3 -1,{ OnTimer60000: callfunc "Dc_Timer",3; }
guild_vs4.gat,0,0,0 script Dc_Timer_4 -1,{ OnTimer60000: callfunc "Dc_Timer",4; }
guild_vs5.gat,0,0,0 script Dc_Timer_5 -1,{ OnTimer60000: callfunc "Dc_Timer",5; }
function script Dc_Timer {
setnpctimer 0,"Dc_Timer_"+getarg(0)+"";
set $@Dc_timer[getarg(0)],$@Dc_timer[getarg(0)]-1;
if ($@Dc_timer[getarg(0)]>0)
end;
set $@Dc_timer[getarg(0)],0;
stopnpctimer "Dc_Timer_"+getarg(0)+"";
areawarp "guild_vs"+getarg(0)+".gat",1,1,300,300,"prontera.gat",156,108;
end;
}
guild_vs1.gat,0,0,0 script Dc_Main_1 -1,{ OnMain: callfunc "Dc_Main",1; OnKillMob: callfunc "Dc_Kill",1; }
guild_vs2.gat,0,0,0 script Dc_Main_2 -1,{ OnMain: callfunc "Dc_Main",2; OnKillMob: callfunc "Dc_Kill",2; }
guild_vs3.gat,0,0,0 script Dc_Main_3 -1,{ OnMain: callfunc "Dc_Main",3; OnKillMob: callfunc "Dc_Kill",3; }
guild_vs4.gat,0,0,0 script Dc_Main_4 -1,{ OnMain: callfunc "Dc_Main",4; OnKillMob: callfunc "Dc_Kill",4; }
guild_vs5.gat,0,0,0 script Dc_Main_5 -1,{ OnMain: callfunc "Dc_Main",5; OnKillMob: callfunc "Dc_Kill",5; }
function script Dc_Main {
stopnpctimer "Dc_Timer_"+getarg(0)+"";
initnpctimer "Dc_Timer_"+getarg(0)+"";
set $@Dc_timer[getarg(0)],$@Dc_Delay[$@Dc_Truns[getarg(0)]];
for (set @num,0;@num<$@Dc_Mob_Num[$@Dc_Truns[getarg(0)]];set @num,@num+1)
monster "guild_vs"+getarg(0)+".gat",50,49,"--ja--",$@Dc_Mob_Id[rand(getarraysize($@Dc_Mob_Id))],1,"Dc_Main_"+getarg(0)+"::OnKillMob";
set $@Dc_Mob[getarg(0)],$@Dc_Mob_Num[$@Dc_Truns[getarg(0)]];
mapannounce "guild_vs"+getarg(0)+".gat","[ 道場 ] 魔物放出!第 "+$@Dc_Truns[getarg(0)]+" 關挑戰開始!",15;
mapannounce "guild_vs"+getarg(0)+".gat","[ 道場 ] 請在 "+$@Dc_Delay[$@Dc_Truns[getarg(0)]]+" 分鐘內完成本關,否則將強制退出!",15;
end;
}
function script Dc_Kill {
set $@Dc_Mob[getarg(0)], $@Dc_Mob[getarg(0)] - 1;
if( $@Dc_Mob[getarg(0)] > 0 ) end;
mapannounce "guild_vs"+getarg(0)+".gat","[ 道場 ] "+getpartyname($@Dc_Party[getarg(0)]) +" 隊伍, 第 "+$@Dc_Truns[getarg(0)]+" 關挑戰成功!",15;
if (!sleep2($@Dc_Space[$@Dc_Truns[getarg(0)]]*1000))
end;
if($@Dc_Truns[getarg(0)] == $@Dc_Misson)
{
stopnpctimer "Dc_Timer_"+getarg(0)+"";
areawarp "guild_vs"+getarg(0)+".gat",1,1,300,300,"guild_room.gat",42,285;
}
else
{
set $@Dc_Truns[getarg(0)],$@Dc_Truns[getarg(0)] + 1;
doevent "Dc_Main_"+getarg(0)+"::OnMain";
}
end;
}
guild_vs1.gat,50,49,4 script 裁判#1 758,{ callfunc "dc_doevent",1; }
guild_vs2.gat,50,49,4 script 裁判#2 758,{ callfunc "dc_doevent",2; }
guild_vs3.gat,50,49,4 script 裁判#3 758,{ callfunc "dc_doevent",3; }
guild_vs4.gat,50,49,4 script 裁判#4 758,{ callfunc "dc_doevent",4; }
guild_vs5.gat,50,49,4 script 裁判#5 758,{ callfunc "dc_doevent",5; }
function script dc_doevent {
mes "[裁判]";
mes "您準備要開始挑戰了嗎?";
menu "是的",-;
close2;
doevent "Dc_Main_"+getarg(0)+"::OnMain";
disablenpc "裁判#"+getarg(0)+"";
end;
}
guild_room.gat,53,285,4 script 獎品發放員 737,{ callfunc "Dc_Pay","獎品"; }
function script Dc_Pay {
mes "["+getarg(0)+"發放員]";
mes "我是負責發放"+getarg(0)+"的";
if (getarg(0)=="獎金")
mes "你將會獲得"+$@Dc_Win_Zeny+"z";
next;
menu "我要領"+getarg(0)+"",-;
if (getarg(0)=="獎金")
set Zeny,Zeny+$@Dc_Win_Zeny;
else
{
set @Pay,rand(getarraysize($@Dc_Item_Id));
getitem $@Dc_Item_Id[@Pay],$@Dc_Item_Num[@Pay];
}
warp "amatsu.gat",113,147;
end;
}
guild_vs1.gat mapflag nomemo dummy
guild_vs1.gat mapflag noteleport dummy
guild_vs1.gat mapflag nosave amatsu.gat,113,147
guild_vs1.gat mapflag nopenalty dummy
guild_vs1.gat mapflag nobranch dummy
guild_vs1.gat mapflag monster_noteleport dummy
guild_vs2.gat mapflag nomemo dummy
guild_vs2.gat mapflag noteleport dummy
guild_vs2.gat mapflag nosave amatsu.gat,113,147
guild_vs2.gat mapflag nopenalty dummy
guild_vs2.gat mapflag nobranch dummy
guild_vs2.gat mapflag monster_noteleport dummy
guild_vs3.gat mapflag nomemo dummy
guild_vs3.gat mapflag noteleport dummy
guild_vs3.gat mapflag nosave amatsu.gat,113,147
guild_vs3.gat mapflag nopenalty dummy
guild_vs3.gat mapflag nobranch dummy
guild_vs3.gat mapflag monster_noteleport dummy
guild_vs4.gat mapflag nomemo dummy
guild_vs4.gat mapflag noteleport dummy
guild_vs4.gat mapflag nosave amatsu.gat,113,147
guild_vs4.gat mapflag nopenalty dummy
guild_vs4.gat mapflag nobranch dummy
guild_vs4.gat mapflag monster_noteleport dummy
guild_vs5.gat mapflag nomemo dummy
guild_vs5.gat mapflag noteleport dummy
guild_vs5.gat mapflag nosave amatsu.gat,113,147
guild_vs5.gat mapflag nopenalty dummy
guild_vs5.gat mapflag nobranch dummy
guild_vs5.gat mapflag monster_noteleport dummy
guild_room.gat mapflag nomemo dummy
guild_room.gat mapflag noteleport dummy
guild_room.gat mapflag nosave amatsu.gat,113,147
guild_room.gat mapflag nopenalty dummy
guild_room.gat mapflag nobranch dummy
guild_room.gat mapflag monster_noteleport dummy |
評分
-
查看全部評分
|