UID139661
帖子
精華
主題
積分33646
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限30
註冊時間2009-3-22
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 無聊 2025-2-26 12:31 PM |
---|
簽到天數: 73 天 連續簽到: 1 天 [LV.6]常住居民II
|
發表於 2011-3-5 18:47:54
|
顯示全部樓層
本帖最後由 sb66665112 於 2011-3-5 06:57 PM 編輯
:91:
怪了
我的波利足球bug很多的版本為什麼還在呢...
我記得不是N個月前就刪掉了嗎(?)
欣雅不是也有發波利足球嗎(冏)
(看會不會自己回到原點吧)- ra_temsky.gat,59,145,3 script 波利足球 報名人員 1894,{
- set $teammax,1;//每一組的人數
- set @teamm,getpartymember(getcharid(1));//請勿更動
- set @teamle,getcharid(1);//請勿更動
- mes"[波利足球報名人員]";
- mes"每隊伍比賽人數:"+$teammax+"人-不能多也不能少";
- mes"你想要做甚麼服務?";
- if( getgmlevel()>50 ){
- menu "報名",m1,"清除函數",m2,"離開",bye;
- }
- menu "報名",m1,"離開",bye;
- m1:
- sleep2 1000;
- next;
- if(!getcharid(1)){
- mes "您沒有隊伍";
- close;
- }
- if ($@nomm == 1){
- mes"比賽已經開始";
- close;
- }
- if(@teamle==$@party1 && $@start==1){
- mes"你是"+getpartyname($@party1)+"的吧~快進來";
- warp "jupe_ele.gat",114,169;
- close;
- }
- if(@teamle==$@party2 && $@start==1){
- mes"你是"+getpartyname($@party2)+"的吧~快進來";
- warp "jupe_ele.gat",114,169;
- close;
- }
- set @partymembercount,$@partymembercount;
- if(getpartyleader (@teamle,2)!=getcharid(0)){
- mes"只有隊長才有權利報名";
- close;
- }
- if(@partymembercount != $teammax){
- mes"每一隊伍只能有"+$teammax+"人-不能多也不能少";
- close;
- }
- if ($@party1 != 0){
- if(getmapusers("jupe_ele.gat")<$teammax){
- announce "【 波利足球 】:比賽場地人數錯誤-取消資格",15;
- set $@start,0;
- set $@P1Win,0;
- set $@P2Win,0;
- set $@nomm,0;
- set $@party1,0;
- set $@party2,0;
- setnpctimer 0;
- areawarp "jupe_ele.gat",0,0,400,400,"ra_temsky.gat",44,135;
- close;
- }
- set $@party2,@teamle;
- warpparty "jupe_ele.gat",114,169,getcharid(1);
- announce "【 波利足球 】:隊伍"+getpartyname($@party2)+"進場-比賽場地已滿人",16;
- set @nomm$,1;
- donpcevent "startmm::OnStart";
- initnpctimer "outtimer";
- close;
- }
- set $@party1,@teamle;
- warpparty "jupe_ele",114,169,getcharid(1);
- announce "【 波利足球 】:隊伍"+getpartyname($@party1)+"進場",16;
- set $@start,1;
- sleep2 20000;
- if(getmapusers("jupe_ele.gat")<=$teammax){
- announce "【 波利足球 】:30秒後沒有另外一個隊伍參賽-取消資格",15;
- set $@start,0;
- set $@P1Win,0;
- set $@P2Win,0;
- set $@nomm,0;
- set $@party1,0;
- set $@party2,0;
- setnpctimer 0;
- areawarp "jupe_ele.gat",0,0,400,400,"ra_temsky.gat",44,135;
- close;
- }
- close;
- m2:
- set $@P1Win,0;
- set $@P2Win,0;
- set $@nomm,0;
- set $@party1,0;
- set $@party2,0;
- close;
- bye:
- close;
- }
- jupe_ele,0,0,1 script startmm -1,{
- end;
- OnStart:
- sleep2 2000;
- mapannounce "jupe_ele.gat","【 波利足球 】:現在為您解說遊戲",15;
- sleep2 3000;
- mapannounce "jupe_ele.gat","【 波利足球 】:首先-比賽分成兩隊",15;
- sleep2 3000;
- mapannounce "jupe_ele.gat","【 波利足球 】:每一隊各有不同的得分地點",15;
- sleep2 3000;
- mapannounce "jupe_ele.gat","【 波利足球 】:只要把球踢進該隊的得分點就算得分",15;
- sleep2 3000;
- mapannounce "jupe_ele.gat","【 波利足球 】:如果踢錯地方-也只是幫對方得分",15;
- mapannounce "jupe_ele.gat","【 波利足球 】:十秒後傳送到比賽地點",15;
- if(getmapusers("jupe_ele.gat")<=$teammax){
- announce "【 波利足球 】:比賽場地人數錯誤-取消資格",15;
- set $@start,0;
- set $@P1Win,0;
- set $@P2Win,0;
- set $@nomm,0;
- set $@party1,0;
- set $@party2,0;
- setnpctimer 0;
- areawarp "jupe_ele.gat",0,0,400,400,"ra_temsky.gat",44,135;
- end;
- }
- sleep2 10000;
- initnpctimer "outtimer";
- areawarp "jupe_ele",0,0,400,400,"06guild_08",70,60;
- movenpc "Poring",49,49;
- set $@start,1;
- sleep2 1000;
- end;
- }
- 06guild_08,0,0,1 script outtimer -1,{
- OnTimer180000:
- if(getmapusers("06guild_08.gat") <= $teammax ) {
- announce "【 波利足球 】:比賽場地人數錯誤-發送獎品取消",15;
- areawarp "06guild_08",0,0,400,400,"Poring.gat",150,239;
- set $@start,0;
- set $@P1Win,0;
- set $@P2Win,0;
- set $@nomm,0;
- set $@party1,0;
- set $@party2,0;
- setnpctimer 0;
- end;
- }
- donpcevent "OnFinishNpc::OnFinish";
- end;
- OnTimer1000:
- sleep2 2000;
- mapannounce "06guild_08.gat","3分鐘後結束比賽",15;
- sleep2 2000;
- mapannounce "06guild_08.gat","上方為隊伍"+getpartyname(@party1$)+"得分點",15;
- mapannounce "06guild_08.gat","下方為隊伍"+getpartyname(@party2$)+"得分點",15;
- end;
- }
- //上方得分點提示
- 06guild_08.gat,45,73,1 script 球門#1 1002,{
- npctalk"我是隊伍"+getpartyname($@party1)+"的球門";
- end;
- }
- 06guild_08.gat,45,71,1 script 球門#2 1002,{
- npctalk"我是隊伍"+getpartyname($@party1)+"的球門";
- end;
- }
- 06guild_08.gat,54,73,1 script 球門#3 1002,{
- npctalk"我是隊伍"+getpartyname($@party1)+"的球門";
- end;
- }
- 06guild_08.gat,54,71,1 script 球門#4 1002,{
- npctalk"我是隊伍"+getpartyname($@party1)+"的球門";
- end;
- }
- //下方得分點提示
- 06guild_08.gat,45,26,1 script 球門#5 1002,{
- npctalk"我是隊伍"+getpartyname($@party2)+"的球門";
- end;
- }
- 06guild_08.gat,54,26,1 script 球門#6 1002,{
- npctalk"我是隊伍"+getpartyname($@party2)+"的球門";
- end;
- }
- 06guild_08.gat,54,28,1 script 球門#7 1002,{
- npctalk"我是隊伍"+getpartyname($@party2)+"的球門";
- end;
- }
- 06guild_08.gat,45,28,1 script 球門#8 1002,{
- npctalk"我是隊伍"+getpartyname($@party2)+"的球門";
- end;
- }
- //波利足球
- 06guild_08,49,49,1 script Poring 1894,2,2,{
- end;
- OnTouch:
- getmapxy(@mapname$,@mapx,@mapy,1);
- npcspeed 65;
- getmapxy .@map$,.@x,.@y,0;
- getmapxy .map$,.x,.y,1;
- npcwalkto .x+rand(2,3)*(.x-.@x),.y+rand(2,3)*(.y-.@y);
- if(checkcell(.@map$,.x+rand(2,3)*(.x-.@x),.y+rand(2,3)*(.y-.@y),cell_walkable))movenpc "Poring",49,49;
- getmapxy .mapx$,.x2,.y2,1;
- if(distance(50,72,.x,.y)<=5){
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- set $@P1Win,$@P1Win+1;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party1)+"得分",15;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party1)+"目前得分為"+$@P1Win+"喔",15;
- npcspeed 1;
- npcwalkto 49,49;
- end;
- }
- if(distance(50,24,.x,.y)<=5){
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- set $@P2Win,$@P2Win+1;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party2)+"得分",15;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party2)+"目前得分為"+$@P2Win+"喔",15;
- npcspeed 1;
- npcwalkto 49,49;
- end;
- }
- if(distance(50,72,.x,.y)<=5){
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- set $@P2Win,$@P2Win+1;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party2)+"得分",15;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party2)+"目前得分為"+$@P2Win+"喔",15;
- npcspeed 1;
- npcwalkto 49,49;
- end;
- }
- if(distance(50,24,.x,.y)<=5){
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- set $@P2Win,$@P2Win+1;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party2)+"得分",15;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party2)+"目前得分為"+$@P2Win+"喔",15;
- npcspeed 1;
- npcwalkto 49,49;
- end;
- }
- if(distance(50,72,.x,.y)<=5){
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- specialeffect2 144;
- set $@P2Win,$@P2Win+1;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party2)+"得分",15;
- mapannounce "06guild_08.gat","【 波利足球 】:隊伍"+getpartyname($@party2)+"目前得分為"+$@P2Win+"喔",15;
- npcspeed 1;
- npcwalkto 49,49;
- end;
- }
- end;
- }
- 06guild_08,0,0,1 script OnFinishNpc -1,{
- end;
- OnFinish:
- if(@P1Win$>@P2Win$){
- mapannounce "06guild_08.gat","【 波利足球 】:時間終了--恭喜隊伍一獲勝",15;
- announce "【 波利足球 】:隊伍"+getpartyname($@party1)+"以"+$@P1Win+"分獲勝來獲勝"+$@P2Win+"分的隊伍"+getpartyname($@party2)+"喔",16;
- warpparty "guild_room",53,285,$@party1;
- warpparty "payon",156,175,$@party2;
- movenpc "Poring",49,49;
- set $@start,0;
- set $@P1Win,0;
- set $@P2Win,0;
- set $@nomm,0;
- set $@party1,0;
- set $@party2,0;
- setnpctimer 0;
- end;
- }
- if(@P2Win$>@P1Win$){
- mapannounce "06guild_08.gat","【 波利足球 】:時間終了--恭喜隊伍二獲勝",15;
- announce "【 波利足球 】:隊伍"+getpartyname($@party2)+"以"+$@P2Win+"分獲勝來獲勝"+$@P1Win+"分的隊伍"+getpartyname($@party1)+"喔",15;
- warpparty "guild_room",53,285,$@party2;
- warpparty "payon",156,175,$@party1;
- movenpc "Poring",49,49;
- set $@start,0;
- set $@P1Win,0;
- set $@P2Win,0;
- set $@nomm,0;
- set $@party1,0;
- set $@party2,0;
- setnpctimer 0;
- end;
- }
- mapannounce "06guild_08.gat","【 波利足球 】:時間終了--兩隊伍平手",15;
- areawarp "06guild_08",0,0,400,400,"ra_temsky.gat",44,135;
- movenpc "Poring",49,49;
- set $@start,0;
- set $@P1Win,0;
- set $@P2Win,0;
- set $@nomm,0;
- set $@party1,0;
- set $@party2,0;
- setnpctimer 0;
- end;
- }
- - script OnDieFix -1,{
- end;
- OnPCDieEvent:
- getmapxy(@mapname$,@mapx,@mapy,0,strcharinfo(0));
- if (@mapname$=="06guild_08"){
- sleep2 5000;
- atcommand strcharinfo(0)+":@alive";
- end;
- }
- end;
- }
複製代碼 |
|