UID43174
帖子
精華
主題
積分650
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限10
註冊時間2007-12-15
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 開心 2019-5-23 11:06 PM |
---|
簽到天數: 37 天 連續簽到: 1 天 [LV.5]常住居民I
|
我的版本:JA0.94
//
// ---------------------------------------------------------------------
// 說明
// ---------------------------------------------------------------------
//
// 名稱:魔物賽跑
// 類型:遊戲類型
// 版本:JA/JA++
// 修改者:大頭
// 有問題找我回報
// 要修改時間請在OnClock1925 自行修改
// 請勿轉載
// 繁體化:大頭
// ---------------------------------------------------------------------
// 遊戲說明
// ---------------------------------------------------------------------
// 遊戲時間為:7點25分開始報名 7點30分停止 7點35分開始比賽 公佈成績
- script 競跑開啟 -1,{
OnClock2025:
announce "魔物競速場活動開啟,5分鐘後正式比賽進行,請到毀葛參加比賽!",0x00;
set [email=$@mobrungame,1]$@mobrungame,1[/email];
end;
}
- script 暫停買票 -1,{
OnClock2030:
announce "魔物競速場活動暫停買票,但是可以當觀眾,比賽過後再公佈比賽成績!",0x00;
set [email=$@mobrungame,0]$@mobrungame,0[/email];
end;
}
p_track02.gat,73,22,5 script 門票發放助手 60,{
if(@mobwinner==$@rungame && [email=$@rungame!=0]$@rungame!=0[/email])
mes "[門票發放助手]";
mes "這是您的獎金5萬 ROZ請收好!";
set zeny,zeny + 50000;
set @mobwinner,0;
close;
end;
}
if(@mobwinner!=$@rungame && [email=$@rungame!=0]$@rungame!=0[/email] && @mobwinner!=0){
mes "[門票發放助手]";
mes "你沒有押正確";
set @mobwinner,0;
close;
end;
}
mes "[門票發放助手]";
mes "=====[伺服器目前的時間]=====";
mes "【"+gettime(7)+"年"+gettime(6)+"月"+gettime(5)+"日 "+gettime(3)+ "點" +gettime(2)+ "分】";
mes "============================";
mes "^0088FF"+strcharinfo(0)+"^000000你好~";
mes "我是專門管理魔物竟跑門票的管理員,在這裏你可以支援你想支援的魔物獲勝,如果支持的魔物獲勝則可以獲得獎勵!";
next;
if([email=$@mobrungame!=1]$@mobrungame!=1[/email]){
mes "[門票發放助手]";
mes "現在不是賣票時間,請在^0088FF7點25分活動開啟後^000000的^0088FF5分鐘內^000000購買!";
close;
}
mes "[門票發放助手]";
mes "請選擇你支持的魔物選手,並且繳納1萬元的贊助費用!";
mes "比賽期間請不要離開本地圖否則支持無效!";
next;
if(zeny<10000){
mes "[門票發放助手]";
mes "贊助費不夠";
close;
}
set zeny,zeny - 10000;
menu "1號魔物",l1,"2號魔物",l2,"3號魔物",l3,"4號魔物",l4,"5號魔物",l5;
l1:
set @mobwinner,1;
mes "您支援了1號選手!";
close;
l2:
set @mobwinner,2;
mes "您支援了2號選手!";
close;
l3:
set @mobwinner,3;
mes "您支援了3號選手!";
close;
l4:
set @mobwinner,4;
mes "您支援了4號選手!";
close;
l5:
set @mobwinner,5;
mes "您支援了5號選手!";
close;
}
p_track01.gat,58,38,2 script 1號 909,{
end;
OnClock1935:
set [email=$@s1,rand(500,1000]$@s1,rand(500,1000[/email]);
npcspeed [email=$@s1]$@s1[/email];
npcwalkto 30,38;
end;
}
p_track01.gat,58,36,2 script 2號 909,{
end;
OnClock1935:
set [email=$@s2,rand(500,1000]$@s2,rand(500,1000[/email]);
npcspeed [email=$@s2]$@s2[/email];
npcwalkto 30,36;
end;
}
p_track01.gat,58,34,2 script 3號 909,{
end;
OnClock1935:
set [email=$@s3,rand(500,1000]$@s3,rand(500,1000[/email]);
npcspeed [email=$@s3]$@s3[/email];
npcwalkto 30,34;
end;
}
p_track01.gat,58,32,2 script 4號 909,{
end;
OnClock1935:
set [email=$@s4,rand(500,1000]$@s4,rand(500,1000[/email]);
npcspeed [email=$@s4]$@s4[/email];
npcwalkto 30,32;
end;
}
p_track01.gat,58,30,2 script 5號 909,{
end;
OnClock1935:
set [email=$@s5,rand(500,1000]$@s5,rand(500,1000[/email]);
npcspeed [email=$@s5]$@s5[/email];
npcwalkto 30,30;
end;
}
p_track01.gat,0,0,0 script 計算排名並且公佈結果 -1,{
OnClock1935:
//以下計算最小值===========================================================
if([email=$@s1<$@s2]$@s1<$@s2[/email]) { set [email=$@min1,$@s1]$@min1,$@s1[/email]; set [email=$@max1,1]$@max1,1[/email]; } else { set [email=$@min1,$@s2]$@min1,$@s2[/email]; set [email=$@max1,2]$@max1,2[/email]; }
if([email=$@s3<$@s4]$@s3<$@s4[/email]) { set [email=$@min2,$@s3]$@min2,$@s3[/email]; set [email=$@max2,3]$@max2,3[/email]; } else { set [email=$@min2,$@s4]$@min2,$@s4[/email]; set [email=$@max2,4]$@max2,4[/email]; }
if([email=$@min1<$@min2]$@min1<$@min2[/email]) { set [email=$@max,$@max1]$@max,$@max1[/email]; } else { set [email=$@max,$@max2]$@max,$@max2[/email]; }
//以上計算最小值===========================================================
announce "本次魔物賽跑活動的優勝者:"[email=+$@max]+$@max[/email]+"號魔物,請勝出者到[門票發放助手]處領取獎勵!",0x00;
set [email=$@rungame,$@max]$@rungame,$@max[/email];
warpnpc "p_track01.gat",58,38,"1號";
warpnpc "p_track01.gat",58,36,"2號";
warpnpc "p_track01.gat",58,34,"3號";
warpnpc "p_track01.gat",58,32,"4號";
warpnpc "p_track01.gat",58,30,"5號";
end;
}
p_track01.gat,0,0,0 script 過圖變數寄存 -1,{
OnPCMoveMap:
set @mobwinner,0;
end;
}
prontera.gat,152,185,12 script "魔物競速場服務生" 48,{
mes "[魔物競速場服務生]";
mes "你想要去魔物競速場嗎??";
next;
menu
"是",Ltrans,
"否",Lcon;
Ltrans: warp "p_track01.gat",73,28; end;
Lcon:
mes "[魔物競速場服務生]";
mes "有需要在來。";
close;
OnInit:
waitingroom " 魔物競速場",0;
end;
}
p_track01.gat,76,32,4 script 回主城的服務人員 48,{
mes "[回主城的服務人員員]";
mes "你要到回主城嗎?";
next;
menu
"是",Ltrans,
"否",Lcon;
Ltrans: warp "prontera.gat",158,184; end;
Lcon:
mes "[回主城的服務人員]";
mes "有需要在來。";
close;
OnInit:
waitingroom " 回主城的服務",0;
end;
} |
本帖子中包含更多資源
您需要 登錄 才可以下載或查看,沒有帳號?註冊
x
|