UID258479
帖子
精華
主題
積分285
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限5
註冊時間2010-5-3
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 開心
2018-7-23 11:59 PM |
|---|
簽到天數: 27 天 連續簽到: 1 天 [LV.4]偶爾看看III
|
樓主 |
發表於 2013-8-1 16:27:40
|
顯示全部樓層
force_1-1.gat,0,0,0 script MVP_OnInit -1,{ OnInit:
//--- Script 執行時的相關設定 , 請各伺服器依情況斟酌 ---
//----- 挑戰賽的參加模式 (預設 單人模式) -----
//----- Ps: 0 為單人模式 -----
//----- 1 為組隊模式 -----
set $@MVPPattern,1;
//----- 組隊模式的最大人數 (預設 3人) -----
//----- Ps:此設定不會影響單人模式 -----
set $@MVPPlayer,8;
//----- 組隊模式的隊員費用 (預設 2500000 Zeny) -----
//----- Ps:此設定不會影響單人模式 -----
set $@MVPPZeny,250000;
//----- 挑戰賽的參加費用 (預設 5000000 Zeny) -----
set $@MVPZeny,500000;
//----- 挑戰賽的MVP編號 -----
setarray $@MVPName[1],1038,1039,1046,1059,1086,1087,1112,1115,1147,1150
,1157,1159,1190,1251,1252,1272,1312,1373,1389,1418
,1492,1511,1518,1583,1623,1646,1647,1648,1649,1650
,1651,1685,1688,1708,1719,1734,1751,1768,1779,1785;
//----- 挑戰賽的MVP總數量 (預設 40隻) -----
//----- Ps:請對應 挑戰賽的MVP編號 的總數後 -1 -----
set $@MVPNumber,39;
//----- 挑戰賽的MVP數量 (預設 1隻) -----
set $@MVPQuantity,1;
//----- 挑戰賽結束時傳送玩家到指定地圖與座標 (預設 prontera,116,73;) -----
//----- 傳送至某地圖的地圖名稱
//----- Ps:地圖名稱後面請勿加上" .gat " -----
set $@MVPWarpMap$,"gonryun";
//----- 傳送至某地圖的地圖X軸
set $@MVPWarpX,159;
//----- 傳送至某地圖的地圖Y軸
set $@MVPWarpY,70;
//====================================================//
//--- 挑戰賽獎勵員的相關設定 , 請各伺服器依情況斟酌 ---
//----- 挑戰賽獎勵的獎金設定 -----
//----- 獎勵金額最少能夠取得多少 (預設 100萬 Zeny)
set $@RewardZeny,1000000;
//----- 獎勵金額最多能夠取得多少 (預設 500萬 Zeny)
set $@RewardZenyMax,5000000;
//----- 挑戰賽獎勵的商城點數設定 -----
//----- 獎勵金額最少能夠取得多少 (預設 1 點)
set $@RewardCash,10;
//----- 獎勵商城點數最多能夠取得多少 (預設 10 點)
set $@RewardCashMax,30;
//----- 挑戰賽獎勵的獎品設定 -----
//----- 獎勵獎品能夠取得的物品
setarray $@RewardItem[0],0,12210,14608,12214,12211,607,608,12197,6380,30016,30026,12259;
//----- 獎勵獎品能夠取得的數量
setarray $@RewardItemMax[0],0,50,50,50,50,50,50,100,1,10,1,5;
//----- 獎勵獎品的總數量 (預設 6個) -----
//----- Ps:請對應 獎勵獎品能夠取得的物品 的總數 -1 -----
set $@RewardItemNumber,11;
//====================================================//
//--- Script 執行時的特殊設定 , 請各伺服器勿亂做更改 ---
set $@MMA_1$,"knight_1-1.gat";
set $@MMA_2$,"knight_2-1.gat";
set $@MMA_3$,"knight_3-1.gat";
set $@MVP_PTimer,0;
set $@MPE_1$,"";
set $@MPE_2$,"";
set $@MPE_0$,"玩家";
if ( $@MVPPattern == 1 ) {
set $@MPE_0$,"隊伍";
set $@MPE_2$,"們";
set $@MPE_1$,"和您的隊伍"; } }
//====================================================//
function script MVP_Time_Script {
if ( $@MVP_PTimer == 1 ) {
announce "挑戰賽傳送員 : 有玩家正在報名中，請稍後或等待 30 秒鐘！",bc_self,0xFF0000;
close; }
set $@MVP_PTimer,1;
initnpctimer "MVP_PTimer";
if ( $@MVPPattern != 1 ) goto MMC;
if ( getcharid(1) == 0 ) {
mes "[挑戰賽傳送員]";
mes "對不起，您沒有加入任何隊伍！";
mes "無法參加挑戰賽。";
set $@MVP_PTimer,0;
close; }
for ( set @MnM,1; @MnM <= 3; set @MnM,@MnM+1 ) {
if ( getmapusers("knight_"+@MnM+"-1.gat") == 0 ) set $PartyID[@MnM],0; }
for ( set @MnM,1; @MnM <= 3; set @MnM,@MnM+1 ) {
if ( getcharid(1) == $PartyID[@MnM] ){
mes "[挑戰賽傳送員]";
mes "您好，我是挑戰賽傳送員。";
mes "您是 [^FF0000"+getpartyname(getcharid(1))+"^000000] 的隊員吧！";
mes "參加前須付^FF0000"+$@MVPPZeny+"^000000的參加費唷！";
mes "請問有需要為您服務嗎？";
next;
if (select("我要參加挑戰！","不小心點到！")==1) {
if ( $@MVP_PTimer == 0 ) {
announce "挑戰賽傳送員 : 已超過報名時間！請您在重新報名一次。",bc_self,0xFF0000;
close; }
set $@MVP_PTimer,0;
if ( $@PartyStart[@MnM] == 1 ) {
mes "[挑戰賽傳送員]";
mes "您的隊友已經開始挑戰了，";
mes "請稍後或加入其他隊伍另外報名參加！";
close; }
if ( zeny < $@MVPPZeny ) {
mes "[挑戰賽傳送員]";
mes "對不起，您沒有足夠的金錢！";
close; }
if ( getmapusers("knight_"+@MnM+"-1.gat") >= $@MVPPlayer ) {
mes "[挑戰賽傳送員]";
mes "隊伍 [^FF0000"+getpartyname(getcharid(1))+"^000000] 參加的人數已滿，";
mes "請稍後或加入其他隊伍另外報名參加！";
close; }
set zeny,zeny - $@MVPPZeny;
warp "knight_"+@MnM+"-1.gat",99,93;
end; }
mes "[挑戰賽傳送員]";
mes "那您以後別在那麼不小心哩！";
set $@MVP_PTimer,0;
close; } }
goto MMC;
MMC: mes "[挑戰賽傳送員]";
mes "您好，我是挑戰賽傳送員。";
mes "您"+$@MPE_1$+"要報名參加挑戰賽嗎？";
mes "參加前須付^FF0000"+$@MVPZeny+"^000000萬的參加費唷！";
mes "請問有需要為您服務嗎？";
next;
if (select("我要參加挑戰！","不小心點到！")==1) {
if ( $@MVP_PTimer == 0 ) {
announce "挑戰賽傳送員 : 已超過報名時間！請您在重新報名一次。",bc_self,0xFF0000;
close; }
set $@MVP_PTimer,0;
if ( Zeny < $@MVPZeny ) {
mes "[挑戰賽傳送員]";
mes "對不起，您沒有足夠的金錢！";
close; }
for ( set @MnM,1; @MnM <= 3; set @MnM,@MnM+1 ) {
if ( getmapusers("knight_"+@MnM+"-1.gat") == 0 ) {
disablenpc "挑戰賽獎勵員#"+@MnM+"";
enablenpc "挑戰賽裁判#"+@MnM+"";
killmonsterall "knight_"+@MnM+"-1.gat";
set Zeny,Zeny - $@MVPZeny;
set $@PartyStart[@MnM],0;
set $PartyID[@MnM],getcharid(1);
set $@PartyCID[@MnM],getcharid(0);
if ( $@MVPPattern == 1 ) announce "請 ["+getpartyname($PartyID[@MnM])+"] 隊伍，在5分鐘內找 [挑戰賽傳送員]",15;
initnpctimer "MVP_Map_Timer#"+@MnM+"";
warp "knight_"+@MnM+"-1.gat",99,93;
end; } }
mes "[挑戰賽傳送員]";
mes "所有場地都有"+$@MPE_0$+"在挑戰中，";
mes "請您稍後再試，謝謝!!";
close; }
mes "[挑戰賽傳送員]";
mes "那您以後別在那麼不小心哩！";
set $@MVP_PTimer,0;
close; }
//====================================================//
- script MVP_PTimer -1,{ OnTimer30000:
set $@MVP_PTimer,0; setnpctimer 0; end; }
- script MVP_Map_Timer#1 -1,{ OnTimer300000:
areawarp "knight_1-1.gat",0,0,300,300,""+$@MVPWarpMap$+".gat",$@MVPWarpX,$@MVPWarpY;
setnpctimer 0; end; }
- script MVP_Map_Timer#2 -1,{ OnTimer300000:
areawarp "knight_2-1.gat",0,0,300,300,""+$@MVPWarpMap$+".gat",$@MVPWarpX,$@MVPWarpY;
setnpctimer 0; end; }
- script MVP_Map_Timer#3 -1,{ OnTimer300000:
areawarp "knight_3-1.gat",0,0,300,300,""+$@MVPWarpMap$+".gat",$@MVPWarpX,$@MVPWarpY;
setnpctimer 0; end; }
//====================================================//
knight_1-1.gat,99,100,3 script 挑戰賽裁判#1 708,{ callfunc "Referee",1; }
knight_2-1.gat,99,100,3 script 挑戰賽裁判#2 708,{ callfunc "Referee",2; }
knight_3-1.gat,99,100,3 script 挑戰賽裁判#3 708,{ callfunc "Referee",3; }
//====================================================//
function script Referee {
mes "[挑戰賽裁判]";
mes "您好，我是挑戰賽裁判。";
mes "請問有需要為您服務嗎？";
next;
switch(select("開始挑戰！","挑戰說明！","不想挑戰了，送我出去！","不小心點到！"))
{ case 1:
if ( getcharid(0) != $@PartyCID[@MnM] ) {
mes "[挑戰賽裁判]";
mes "您不是報名參加挑戰賽的人";
close; }
stopnpctimer "MVP_Map_Timer#"+@MnM+"";
initnpctimer "MVP_Mod_Timer#"+@MnM+"";
set $@PartyStart[@MnM],1;
set $@PQuantity[@MnM],$@MVPQuantity;
set $MVP_PName$[@MnM],strcharinfo(0);
disablenpc "挑戰賽裁判#"+@MnM+"";
doevent "GmMod::OnSummon_Mod";
if ( $@MVPPattern == 1 ) set $MVP_PName$[@MnM],getpartyname($PartyID[@MnM]);
close;
end;
case 2:
mes "[挑戰賽裁判]";
mes "您必須將我召喚出來的^FF0000MVP^000000打倒，";
mes "每個"+$@MPE_0$+"我都只給他^FF00003分鐘^000000時間，";
mes "只要挑戰^FF0000MVP^000000成功即可獲得^FF0000獎勵^000000。";
close;
case 3:
mes "[挑戰賽裁判]";
mes "嗯好吧！我送您出去，";
mes "將退您參加費用的1/2金錢。";
next;
if ( getcharid(0) == $@PartyCID[@MnM] ) {
set zeny,zeny + ($@MVPZeny/2);
} else {
set zeny,zeny + ($@MVPPZeny/2); }
warp ""+$@MVPWarpMap$+".gat",$@MVPWarpX,$@MVPWarpY;
close;
case 4:
mes "[挑戰賽裁判]";
mes "那您以後別在那麼不小心哩！";
close; } }
//====================================================//
- script MVP_Mod::GmMod -1,{
OnSummon_Mod:
set $@MVP,rand(1,$@MVPNumber);
set $@PQuantity[@MnM],$@PQuantity[@MnM]-1;
monster "knight_"+@MnM+"-1.gat",99,100,"--ja--",$@MVPName[$@MVP],1,"GmMod::OnKill_Mod";
end;
OnKill_Mod:
if( $@PQuantity[@MnM] == 0 ) {
enablenpc "挑戰賽獎勵員#"+@MnM+"";
stopnpctimer "MVP_Mod_Timer#"+@MnM+"";
initnpctimer "MVP_Map_Timer#"+@MnM+"";
end; }
announce "還剩餘 ["+$@PQuantity[@MnM]+"] 隻MVP未消滅，請繼續努力！",17;
goto OnSummon_Mod; }
//====================================================//
- script MVP_Mod_Timer#1 -1,{
OnTimer1000:
mapannounce ""+$@MMA_1$+"", "MVP限時挑戰 : MVP限時挑戰賽，挑戰開始！",15;
mapannounce ""+$@MMA_1$+"", "MVP限時挑戰 : 限制時間3分鐘，開始挑戰！",15;
mapannounce ""+$@MMA_1$+"", "MVP限時挑戰 : 請在限制時間內，打倒 ["+$@MVPQuantity+"] 隻MVP怪物！",15;
end;
OnTimer60000:
mapannounce ""+$@MMA_1$+"", "MVP限時挑戰 : 剩下2分鐘！",15;
end;
OnTimer120000:
mapannounce ""+$@MMA_1$+"", "MVP限時挑戰 : 剩下1分鐘！",15;
end;
OnTimer150000:
mapannounce ""+$@MMA_1$+"", "MVP限時挑戰 : 剩下30秒！",15;
end;
OnTimer170000:
mapannounce ""+$@MMA_1$+"", "MVP限時挑戰 : 剩下10秒！",15;
end;
OnTimer180000:
mapannounce ""+$@MMA_1$+"", "MVP限時挑戰 : 挑戰時間終了！",15;
end;
OnTimer181000:
areawarp ""+$@MMA_1$+"",0,0,300,300,""+$@MVPWarpMap$+".gat",$@MVPWarpX,$@MVPWarpY;
end;
OnTimer182000:
setnpctimer 0;
killmonsterall ""+$@MMA_1$+"";
end; } |
|
[複製鏈接]
發表於 2013-8-1 16:08:30
提升卡
變色卡
千斤頂
