OK論壇

 找回密碼
 註冊
查看: 1340|回復: 3

道館怎改上限人數進入?

 關閉 [複製鏈接]
  • TA的每日心情
    奮斗
    2013-11-12 11:31 AM
  • 簽到天數: 27 天

    連續簽到: 1 天

    [LV.4]偶爾看看III

    發表於 2009-6-21 17:10:29 | 顯示全部樓層 |閱讀模式
    道館怎改上限人數進入?




        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

    評分

    參與人數 1積分 -50 現金 -50 積極性 -50 收起 理由
    lendlice0001 -50 -50 -50 請放在一起問,詳見板規

    查看全部評分

    回復

    使用道具 舉報

  • TA的每日心情
    開心
    2021-12-17 05:30 AM
  • 簽到天數: 237 天

    連續簽到: 1 天

    [LV.7]常住居民III

    發表於 2009-6-21 19:04:14 | 顯示全部樓層
    判斷組隊人數
    回復 支持 反對

    使用道具 舉報

  • TA的每日心情
    慵懶
    2020-7-2 07:05 PM
  • 簽到天數: 71 天

    連續簽到: 1 天

    [LV.6]常住居民II

    發表於 2009-6-21 20:59:02 | 顯示全部樓層
    本帖最後由 sb66665112 於 2009-6-21 11:49 PM 編輯


       if (!getcharid(1) || Zeny<$@Dc_In_Zeny)
        {
    改成
       if (@psnparty==0 || Zeny<$@Dc_In_Zeny || @partymembercount != x)
        {
    x=限制人數
    回復 支持 反對

    使用道具 舉報

  • TA的每日心情
    慵懶
    2020-7-2 07:05 PM
  • 簽到天數: 71 天

    連續簽到: 1 天

    [LV.6]常住居民II

    發表於 2009-6-21 23:49:33 | 顯示全部樓層
    以更正解決辦法
    回復 支持 反對

    使用道具 舉報

    您需要登錄後才可以回帖 登錄 | 註冊

    本版積分規則

    Archiver|手機版|小黑屋|OK討論區

    GMT+8, 2024-5-24 07:48 PM , Processed in 0.049368 second(s), 20 queries , Gzip On.

    Powered by Discuz! X3.4

    Copyright © 2001-2020, Tencent Cloud.

    快速回復 返回頂部 返回列表