UID104528
帖子
精華
主題
積分747
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限10
註冊時間2008-9-16
在線時間 小時
最後登錄1970-1-1
該用戶從未簽到
|

樓主 |
發表於 2010-4-14 22:52:36
|
顯示全部樓層
2# 傳說中的獅子
e_tower,71,117,5 script 無限之塔看守人 421,{
if( !getcharid(1) )
{
mes "[無限之塔看守人]";
mes "對不起,您沒有隊伍。";
close;
}
if( getgmlevel()>90 )
{
mes "[無限之塔看守人]";
mes "尊貴的來賓";
mes "你想做什麼?";
next;
switch( select( "重新開始","挑戰","我還沒準備好" ) )
{
case 1:
mes "[無限之塔看守人]";
mes "好的,沒問題.";
close2;
goto OnTimer14410000;
case 2:
mes "[無限之塔看守人]";
mes "了不起,讓我們開始吧!";
close2;
for( set [email=.@i,1].@i,1[/email]; [email=.@i<7].@i<7[/email]; set [email=.@i,.@i+1].@i,.@i+1[/email])
killmonsterall [email=.@i+].@i+"@tower[/email]";
set .team,getcharid(1);
set .intest,1;
donpcevent "naght::OnRoom1";
warpparty "[email=1@tower]1@tower",50,355,.team[/email];
initnpctimer;
announce "GM正在測試無限之塔.",bc_all;
close;
case 3:
close;
}
}
if(.intest)
{
mes "[無限之塔看守人]";
mes "GM現在正在測試無限之塔.";
close;
}
if(!.team)
{
if( getcharid(0) != getpartyleader(getcharid(1),2) )
{
mes "[無限之塔看守人]";
mes "對不起,只有隊長才可以登記。";
close;
}
else if( gettimetick(2) - ET_Tower > 43200 )
{
mes "[無限之塔看守人]";
mes "歡迎 "+strcharinfo(0)+".";
mes "你想登記進入無限之塔嗎?";
mes "挑戰需要支付100W";
next;
switch( select( "是的","不要" ) )
{
case 1:
getpartymember(getcharid(1));
if( [email=$@partymembercount]$@partymembercount[/email] < 2 || zeny < 1000000 )
{
mes "[無限之塔看守人]";
mes "對不起,你的隊伍成員必須在二人以上或者金錢不夠.";
close;
}
mes "[無限之塔看守人]";
mes "你只有4個小時的時間.";
mes "4小時後,你和你的全體隊員只有等待12小時後才能重新登記進入無限之塔。";
next;
mes "[無限之塔看守人]";
mes "你確定要登記嗎?";
next;
switch( select( "是的","不要" ) )
{
case 1:
mes "[無限之塔看守人]";
mes "你的隊伍已經成功登記了.";
set zeny,zeny-1000000;
close2;
set .ET_Slot,0;
set .ET_Players$[.ET_Slot],strcharinfo(0);
set .ET_Slot,.ET_Slot+1;
set .team, getcharid(1);
set ET_Tower, gettimetick(2);
set .ET_Tower,1;
getpartymember(getcharid(1));
set .partymembers,$@partymembercount;
announce "無限之塔已經被打開.",bc_all;
mapannounce "e_tower","請"+getpartyname(.team)+"的隊伍成員(不包括隊長),確認登記.",bc_map;
end;
case 2:
close;
}
case 2:
close;
}
}
else
{
mes "[無限之塔看守人]";
mes "對不起,12小時內不能重複挑戰.";
close;
}
}
else
{
for(set [email=.@i,0].@i,0[/email]; [email=.@i<getarraysize(.ET_Players$].@i<getarraysize(.ET_Players$[/email]); set [email=.@i,.@i+1].@i,.@i+1[/email])
{//in case he signed up
if( .ET_Players$[.@i] == strcharinfo(0) )
{
mes "[無限之塔看守人]";
mes "對不起, 你已經登記過了.";
close;
}
}
if(getcharid(1)!=.team)
{
mes "[無限之塔看守人]";
mes "對不起, 隊員 "+getpartyname(.team)+" 已經登記過了.";
mes "請稍後再來.";
close;
}
else if( .ET_Tower < .partymembers)
{
if(gettimetick(2)-ET_Tower>43200)
{
mes "[無限之塔看守人]";
mes "確認你的登記.";
next;
switch( select( "是","否" ) )
{
case 1:
mes "[無限之塔看守人]";
mes "已經登記成功.";
close2;
set .ET_Players$[.ET_Slot],strcharinfo(0);
set .ET_Slot,.ET_Slot+1;
set ET_Tower,gettimetick(2);
set .ET_Tower, .ET_Tower+1;
mapannounce "e_tower","須登記人數:"+.partymembers+" 已登記人數:"+.ET_Tower,bc_map;
if(.ET_Tower==.partymembers)
{
mapannounce "e_tower","所有隊員都登記成功,冒險即將開始.",bc_map;
donpcevent "naght::OnRoom1";
warpparty "[email=1@tower]1@tower",50,355,.team[/email];
initnpctimer;
end;
}
end;
這邊@@? |
|