Jump to content

DevKira

Members
  • Posts

    54
  • Joined

  • Last visited

Posts posted by DevKira

  1. <?xml version="1.0" encoding="euc-kr" ?>
      <clientinfo>
      <desc>Ragnarok Client Information</desc>
      <servicetype>korea</servicetype>
      <servertype>primary</servertype>
      <connection>
      <display>Local</display>
      <address>IP1</address>
      <port>6900</port>
      <version>55</version>
      <langtype>0</langtype>
      <registrationweb>www.ragnarok.com</registrationweb>
      <loading>
      <image>loading00.jpg</image>
      <image>loading01.jpg</image>
      <image>loading02.jpg</image>
      <image>loading03.jpg</image>
      <image>loading04.jpg</image>
      <image>loading05.jpg</image>
      <image>loading06.jpg</image>
      </loading>
     

    </connection>

      <connection>
      <display>Loca2l</display>
      <address>IP2</address>
      <port>6900</port>
      <version>55</version>
      <langtype>0</langtype>
      <registrationweb>www.ragnarok.com</registrationweb>
      <loading>
      <image>loading00.jpg</image>
      <image>loading01.jpg</image>
      <image>loading02.jpg</image>
      <image>loading03.jpg</image>
      <image>loading04.jpg</image>
      <image>loading05.jpg</image>
      <image>loading06.jpg</image>
      </loading>
      </connection>
      </clientinfo>
  2. Here's the error.

    image.png.661684ef75ed4786cf10869f587af25a.png

     

    Here's my script

    Quote

    //= Poring Catcher - Auto Event Script
    //===== By: =================================================================================
    //= Washi - www.EarthBound-RO.com
    //===== Compatible With: ====================================================================
    //= Any eAthena Version
    //===== Description: ========================================================================
    //= Single NPC that starts automatically starts every hour.
    //===== Additional Comments: ================================================================
    //= This script is a combenation of the Dice Event by [Mahina]
    //= and the origonal Poring Catcher Event by [Wild Karrd]
    //===========================================================================================
    //= OnMinute - Change this to the minute you would like this script to load. [ LINE 22 ]
    //= getitem - Change this to the Item ID of your prize. [ LINE 118 ]
    //===========================================================================================
    -    script    poring#announcer    -1,{

    OnInit:
        disablenpc "poringevent";
        hideonnpc "Poring Catcher#evnt2";
        end;

    OnClock0050:
    OnClock0250:
    OnClock0450:
    OnClock0650:
    OnClock0850:
    OnClock1050:
    OnClock1250:
    OnClock1450:
    OnClock1650:
    OnClock1850:
    OnClock2250:
     // SET THE 30 TO THE MINUTE YOU WANT THE EVENT TO START EACH HOUR.

        announce "Poring Catcher : It's time to play some Poring Catcher!",0;
        killmonster "poring_w01","All";
        sleep2 10000;
        announce "Poring Catcher : Please make your way to Prontera.",0;
        sleep2 10000;
        announce "Poring Catcher : After one minute the portal will close.",0;
        sleep2 10000;
        announce "Poring Catcher : Enter the warp portal now if you want to join.",0;
        enablenpc "poringevent";
        initnpctimer;
        end;

    OnTimer30000:
        announce "Poring Catcher : Last 30 seconds.",0;
        sleep2 5000;
        announce "Poring Catcher : Hurry to Prontera if you want to join.",0;
        end;
        
    OnTimer50000:
        announce "Poring Catcher : Last 10 seconds.",0;
        end;
        
    OnTimer55000:
        announce "Poring Catcher : 5.",0;
        end;
        
    OnTimer56000:
        announce "Poring Catcher : 4.",0;
        end;
        
    OnTimer57000:
        announce "Poring Catcher : 3.",0;
        end;
        
    OnTimer58000:
        announce "Poring Catcher : 2.",0;
        end;
        
    OnTimer59000:
        announce "Poring Catcher : 1.",0;
        end;
        
    OnTimer60000:
        announce "Poring Catcher : Time's up. Portal Will Open again in 2 hours.",0;
        end;
        
    OnTimer67000:
        disablenpc "poringevent";
        donpcevent "Poring Catcher#evnt2::OnEnable";
        stopnpctimer;
        end;
        }
        
    //--------------------------------------------------
        
    prontera,156,177,0    warp    poringevent    2,2,poring_w01,106,129
        
    //--------------------------------------------------

    poring_w01,100,127,4    script    Poring Catcher#evnt2    715,{

    //--------------------------------------------------

        mes "[Poring Catcher]";
        if(PORING == 1) goto L_PORING;
        mes "Please tell me your name";
        next;
        input .@name$;
        if(.@name$ != strcharinfo(0)) {
            mes "[Poring Catcher]";
            mes "Are you sure thats your character name?";
            close;
        }
        mes "[Poring Catcher]";
        mes "Congrats. You've won.";
        close2;
        announce "Poring Catcher : All laugh at, "+.@name$+". - This player tried to cheat the system. Muhahahahaha!",0;
        warp "prontera",156,191;
        end;

    L_PORING:
        mes "Please tell me your name";
        next;
        input .@name$;
        if(.@name$ != strcharinfo(0)) {
            mes "[Poring Catcher]";
            mes "Are you sure thats your character name?";
            close;
        }
        mes "[Poring Catcher]";
        mes "Congrats. You've won.";
        close2;
        announce "Poring Catcher : We have a winner, "+.@name$+". - Event Award Won!",0;

        getitem 8903,5;  // SET THE 20085 TO THE ITEM ID OF YOUR PRIZE
    //    set zeny,zeny+1000000;

        set PORING,0;
        warp "prontera",156,191;
        hideonnpc "Poring Catcher#evnt2";
        end;
        
    OnEnable:
        mapannounce "poring_w01","Poring Catcher : I will be summoning 100 different Porings.",0;
        sleep2 10000;
        mapannounce "poring_w01","Poring Catcher : Only one of these Porings is the correct Poring.",0;
        sleep2 10000;
        mapannounce "poring_w01","Poring Catcher : The correct Poring is called [ Poring ], all the other Porings have different names.",0;
        sleep2 10000;
        mapannounce "poring_w01","Poring Catcher : Take your time because if you kill the wrong Poring, your out of the game.",0;
        sleep2 10000;
        mapannounce "poring_w01","Poring Catcher : The first player to kill the correct Poring wins.",0;
        sleep2 10000;
        mapannounce "poring_w01","Poring Catcher : That's that.. Now let's play...",0;
        goto L_Start;
        end;
        
    L_Start:
        mapannounce "poring_w01","Poring Catcher : 5",0;
        sleep2 1000;
        mapannounce "poring_w01","Poring Catcher : 4",0;
        sleep2 1000;
        mapannounce "poring_w01","Poring Catcher : 3",0;
        sleep2 1000;
        mapannounce "poring_w01","Poring Catcher : 2",0;
        sleep2 1000;
        mapannounce "poring_w01","Poring Catcher : 1",0;
        sleep2 1000;
        mapannounce "poring_w01","Poring Catcher : Lets Do This!",0;
        areamonster "poring_w01",84,119,121,90,"Poring",1002,1,"poringwin::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Pouring",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Proing",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Poiring",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Poing",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"I am not Poring",1002,5,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Gniriop",1002,1,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Porring",1113,1,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Porinng",1062,1,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Poriiing",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"PoriNgg",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Porong",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"P0ring",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Por1ng",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Porng",1002,1,"poringlose::OnMobKilled";
        end;
    }

    -    script    poringwin    -1,{

    OnMobKilled:
        dispbottom "Poring : Congratulations. You've got me.";
        set PORING,1;
        atcommand "@doommap";
        killmonster "poring_w01","All";
        mapannounce "poring_w01","Poring Catcher : Come to me and tell me your name.",0;
        hideoffnpc "Poring Catcher#evnt2";
        end;

    }

    -    script    poringlose    -1,{

    OnMobKilled:
        dispbottom "Poring Catcher : Wahaha, you're a loser! - I wasnt the correct Poring.";
        warp "prontera",156,191;
        end;

    }

    -    script    nostorage2    -1,{
    OnInit:
        bindatcmd "storage",strnpcinfo(0)+"::OnAtcommand";
        end;
    OnAtcommand:
        if( strcharinfo(3) != "poring_w01" ){
            openstorage;
        }
        end;
    }


    // -- Mapflags
    poring_w01    mapflag    nowarp
    poring_w01    mapflag    nowarpto
    poring_w01    mapflag    noteleport
    poring_w01    mapflag    nosave
    poring_w01    mapflag    nomemo
    poring_w01    mapflag    nobranch
    poring_w01    mapflag    nopenalty
    poring_w01    mapflag    noskill

     

  3. //================= Freebies NPC ================//
    // by : pajodex
    prontera,159,193,4	script	Freebies NPC	100,{
    
    
    If(GetFree) { 
    		npctalk "Sorry yo! No more freebies available for yo!";
    		end;
    		 }
    	else {
    	mes "[ ^FF0000System^000000 ]";
    	mes "Welcome ^FF0000"+strcharinfo(0)+"^000000 !";
    	next;
    	mes "[ ^FF0000System^000000 ]";
    	mes "Let me help you start your adventure!";
    	next;
    	mes "[ ^FF0000System^000000 ]";
    	mes "Here you go!";
    	if(.char_bound) {
    	for(.@i = 0; .@i<getarraysize(.char_reward); .@i++)
    		getitem .char_reward[.@i],.char_reward_amt[.@i];
    		}
    	GetFree = 1;
    	if(#freebies == 0 && .account_bound == 1) {
    	next;
    	mes "[ ^FF0000System^000000 ]";
    	mes "It seems to be your first, here!";
    	mes "~ Special Freebies from the [ ^FF0000GM Team^000000 ]";
    	for(.@i = 0; .@i<getarraysize(.acc_reward); .@i++)
    		getitem .acc_reward[.@i],.acc_reward_amt[.@i];
    	#freebies = 1;
    	}
    	next;
    	mes "[ ^FF0000System^000000 ]";
    	mes "Goodluck! Enjoy your Adventure ~";
    	close;
    	}
    	
    OnInit:
    	// settings
    	.char_bound = 1; // enable character bound rewards (1 = on || 0 = off)
    	.account_bound = 1; // enable account bound rewards (1 = on || 0 = off)
    	// set item (char bound)
    	setarray .char_reward, 501, 502, 503; // item
    	setarray .char_reward_amt, 1, 2, 4; // amount
    	// set item (acc bound)
    	setarray .acc_reward, 501, 502, 503; // item
    	setarray .acc_reward_amt, 1, 2, 4; // amount
            OnInit:
            waitingroom "Freebies",0;
    	end;
    }
  4. 15 hours ago, STFU said:

    Hello, do you guys know how friendly-sharpshooting system works? And also I'd like to make the skill Mindbreaker can be casted to your guildmate.

    if you are using pre-renewal check your db/pre-re/skill_db.txt

    if renewal db/re/skill_db.txt

     

    or i can help you with this.

  5. On 10/2/2018 at 1:27 PM, Rebel said:

    Try this..

    In skill.cpp add below:

    
    case WM_SATURDAY_NIGHT_FEVER:
    	if( !mapdata_flag_vs(mapdata) ) {
    		clif_skill_teleportmessage(sd,2); // This skill uses this msg instead of skill fails.
    		return true;
    	}
    break;

    this

    
    case TF_BACKSLIDING:
    case MO_BODYRELOCATION:
    	if( sd && ( sd->sc.data[SC_RG_CCONFINE_S] || sd->sc.data[SC_ANKLESNARE] || sd->sc.data[SC_SPIDERWEB] ) ) {
    		clif_skill_fail(sd,skill_id,USESKILL_FAIL_LEVEL,0);
      		return true;
      	}
    break;

    just add the Charge attack, Flying side kick, High jump and Shadow jump..

    Is this still working on Latest rAthena version? Thanks if you will answer! 

     

    There's an error. @Brahms, anyone can help me with this?

    image.png.d268998c648e67f68acd507886793917.png

  6. hello, @Emistry can you help me with this. please thank you

    @Haruka Mayumi 

    Here's my Dice Script

    //===== rAthena Script ===========================================|
    //= Dice Event ( crazyarashi version )                      =|
    //===== By: ======================================================|
    //= crazyarashi                             =|
    //===== Current Version: =========================================|
    //= 1.0 Initial Version                         =|
    //================================================================|
    //= Dice Event                             =|
    //================================================================|
    -    script    Dice_Event    -1,{
    OnInit:
        $dice_active = 0;
        $dice_enter = 0;
        .dice_map$ = "quiz_01";
        .reward_id = 8903;
        .reward_amount = 5;
        end;
        
    OnClock0000:
    OnClock0300:
    OnClock0600:
    OnClock0900:
    OnClock1200:
    OnClock1500:
    OnClock1800:
    OnClock2100:
    OnStart:
        function count_player;
        function dice_start;
        function roll_dice;
        function select_winner;
        function reward_winner;
        function check_player;
        announce "[ Dice Event ] : The Dice Event will start in 1 minute.",0;
        $dice_enter = 1;
        sleep 4000;
        announce "[ Dice Event ] : Use the @joinevent command to participate in the event.",0;
        sleep 4000;
        announce "[ Dice Event ] : The registration will close in 1 minute.",0;
        sleep 26000;
        announce "[ Dice Event ] : Use the @joinevent command to participate in the event.",0;
        sleep 4000;
        announce "[ Dice Event ] : The registration will close in 30 seconds.",0;
        sleep 30000;
        $dice_enter = 0;
        announce "[ Dice Event ] : The registration has closed.",0;
        count_player(.dice_map$);
        $dice_active = 1;
        dice_start();
        end;
        
    function    dice_start    {
        sleep 3500;
        mapannounce .dice_map$,"[ Dice ] : The dice event rules are simple.",0;
        sleep 4000;
        mapannounce .dice_map$,"[ Dice ] : Pick a number from 1 to 4 and enter the box of the number you choose.",0;
        sleep 4000;
        mapannounce .dice_map$,"[ Dice ] : The players standing in the correct box will win "+.reward_amount+" "+getitemname(.reward_id)+".",0;
        sleep 4000;
        mapannounce .dice_map$,"[ Dice ] : Do not stand outside of the box, you will be automatically disqualified.",0;
        sleep 4000;
        mapannounce .dice_map$,"[ Dice ] : The dice roll will start in 10 seconds.",0;
        sleep 10000;
        mapannounce .dice_map$,"[ Dice ] : Rolling the dice.",0;
        .@dice = roll_dice();
        mapannounce .dice_map$,"[ Dice ] : I'll announce the winning number in 10 seconds, this is your last chance to select your winning number.",0;
        sleep 10000;
        mapannounce .dice_map$,"[ Dice ] : And the winning number is.",0;
        sleep 4000;
        mapannounce .dice_map$,"[ Dice ] : Winning Number : "+.@dice+".",0;
        sleep 1000;
        select_winner(.@dice);
        check_player(.dice_map$);
        sleep 4000;
        reward_winner(.@dice);
        sleep 5000;
        $dice_active = 0;
        $dice_enter = 0;
        mapwarp .dice_map$,"midgard",200,183; 
        end;
    }
    
    function    roll_dice    {
        count_player(.dice_map$);
        .@count = rand(1,4);
        return .@count;
    }
    
    function    check_player    {
        if(getmapusers(getarg(0)) == 0){
            announce "[ Dice Event ] : The Dice Event has ended with no winner. Better luck next time!",0;
            $dice_active = 0;
            $dice_enter = 0;
            end;
        }
    return;
    }
    
    function    count_player    {
        if(getmapusers(getarg(0)) == 0){
            announce "[ Dice Event ] : The event has been cancelled due to lack of registration.",0;
            $dice_active = 0;
            $dice_enter = 0;
            end;
        }
        return;
    }
    
    function    reward_winner    {
    .@box = getarg(0);
        switch(.@box){
            case 1:
                getareaunits(BL_PC,.dice_map$,183,81,191,60,.@player_id$[0]);
                break;
                
            case 2:
                getareaunits(BL_PC,.dice_map$,195,81,203,60,.@player_id$[0]);
                break;
                
            case 3:
                getareaunits(BL_PC,.dice_map$,207,81,215,60,.@player_id$[0]);
                break;
                
            case 4:
                getareaunits(BL_PC,.dice_map$,219,81,227,60,.@player_id$[0]);
                break;
        }
        .@size = getarraysize(.@player_id$);
        if(.@size == 1){
            .@word$ = "winner";
        } else {
            .@word$ = "winners";
        }
        announce "[ Dice Event ] : The Dice Event has ended with "+.@size+" "+.@word$+". Thank you for participating.",0;
        for(.@i = 0; .@i < .@size; .@i++){
            .@char_id = getcharid(0,.@player_id$[.@i]);
            .@account_id = getcharid(3,.@player_id$[.@i]);
            if(isloggedin(.@account_id,.@char_id)){
                getitem .reward_id,.reward_amount,.@account_id;
                warp "SavePoint",0,0,.@char_id;
            } else {
                continue;
            }
        }
    return;
    }
    
    function    select_winner    {
    .@winner = getarg(0);
        switch(.@winner){
            case 1:
                areawarp .dice_map$,195,81,203,60,"midgard",200,183;
                areawarp .dice_map$,207,81,215,60,"midgard",200,183;
                areawarp .dice_map$,219,81,227,60,"midgard",200,183;
                break;                            
                                                  
            case 2:                               
                areawarp .dice_map$,183,81,191,60,"midgard",200,183;
                areawarp .dice_map$,207,81,215,60,"midgard",200,183;
                areawarp .dice_map$,219,81,227,60,"midgard",200,183;
                break;                           
                                                  
            case 3:                               
                areawarp .dice_map$,183,81,191,60,"midgard",200,183;
                areawarp .dice_map$,195,81,203,60,"midgard",200,183;
                areawarp .dice_map$,219,81,227,60,"midgard",200,183;
                break;                            
                                                  
            case 4:                               
                areawarp .dice_map$,183,81,191,60,"midgard",200,183;
                areawarp .dice_map$,195,81,203,60,"midgard",200,183;
                areawarp .dice_map$,207,81,215,60,"midgard",200,183;
                break;
            }
        }
    }
    
    quiz_01    mapflag    nowarp
    quiz_01    mapflag    nowarpto
    quiz_01    mapflag    noteleport
    quiz_01    mapflag    nosave
    quiz_01    mapflag    nomemo
    quiz_01    mapflag    nobranch
    quiz_01    mapflag    noloot
    quiz_01    mapflag    noskill
    quiz_01    mapflag    nopenalty
    quiz_01    mapflag    nodrop

    Here's my Poring catcher script

    //===== rAthena Script ===========================================|
    //= Poring Catcher ( crazyarashi version )             =|
    //===== By: ======================================================|
    //= crazyarashi                                                  =|
    //===== Current Version: =========================================|
    //= 1.0 Initial Version                                          =|
    //================================================================|
    //= Poring Catcher                                               =|
    //================================================================|
    -    script    Poring_Catcher    -1,{    
    OnInit:
        $poring_active = 0;
        $poring_enter = 0;
        $poring_kill = 0;
        .poring_map$ = "poring_c01";
        .poring_multiplier = 2; //= Multiply Poring Per 2 Player. 4 Player = 2 Correct Poring.
        .reward_id = 8903;
        .reward_amount = 5;
        end;
    
    OnClock0000:
    OnClock0300:
    OnClock0600:
    OnClock0900:
    OnClock1200:
    OnClock1500:
    OnClock1800:
    OnClock2100:
    OnStart:
        function count_player;
        function poring_start;
        function get_count;
        killmonster "poring_c01","All";
        announce "[ Poring Catcher ] : Poring Catcher Event will start in 1 minute.",0;
        $poring_enter = 1;
        sleep 4000;
        announce "[ Poring Catcher ] : Use the @joinevent command to participate in the event.",0;
        sleep 4000;
        announce "[ Poring Catcher ] : The registration will close in 1 minute.",0;
        sleep 26000;
        announce "[ Poring Catcher ] : Use the @joinevent command to participate in the event.",0;
        sleep 4000;
        announce "[ Poring Catcher ] : The registration will close in 30 seconds..",0;
        sleep 30000;
        $poring_enter = 0;
        announce "[ Poring Catcher ] : The registration has closed.",0;
        count_player(.poring_map$);
        $poring_active = 1;
        .@poring_count = get_count(.poring_map$);
        $poring_kill = .@poring_count;
        poring_start(.@poring_count);
        end;
    
    OnSummonPoring:
        function anti_error;
        monster .poring_map$,0,0,"Pouring",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"Porong",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"Poringu",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"Pourinq",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"Porinq",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"Por1ng",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"P0ring",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"P@ring",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"POring",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"Puring",1002,10,strnpcinfo(0)+"::OnWrongPoring";
        monster .poring_map$,0,0,"Poring",1002,$poring_kill,strnpcinfo(0)+"::OnRightPoring";
        do {
            sleep 3000;
            anti_error(1);
        }while($poring_active != 0);
        end;
          
    OnWrongPoring:
        mapannounce .poring_map$,"[ Poring Catcher ] : Woooops. "+strcharinfo(0)+" has killed a wrong Poring.",0;
        warp "SavePoint",0,0;    
        sleep 2000;
        anti_error(2);
        end;
        
    OnRightPoring:
        warp "SavePoint",0,0;
        getitem .reward_id,.reward_amount;
        announce "[ Poring Catcher ] : "+strcharinfo(0)+" has won "+.reward_amount+" "+getitemname(.reward_id)+" for killing the right Poring.",0;
        $poring_kill -= 1;
        if($poring_kill == 0){
            announce "[ Poring Catcher ] : The Poring Catcher Event has now ended. Thank you for participating.",0;
            $poring_active = 0;
            $poring_kill = 0;
            $poring_enter = 0;
            mapwarp "poring_c01","midgard",156,191;
            killmonster "novice","All";
            end;
        }
        anti_error(3);
        mapannounce .poring_map$,"[ Poring Catcher ] : Correct Poring left : "+$poring_kill+".",0;
        end;
        
    function    anti_error    {
    .@i = getarg(0);
    switch(.@i){
        case 1:
            if($poring_active == 0) end;
            if(getmapusers(.poring_map$) == 0){
                announce "[ Poring Catcher ] : All participants have been eliminated. There is no winner in this event.",0;
                $poring_active = 0;
                $poring_kill = 0;
                $poring_enter = 0;
                mapwarp "poring_c01","midgard",156,191;
                killmonster "poring_c01","All";
                end;
            }
            return;
        case 2:
            if($poring_active == 0) end;
            if(getmapusers(.poring_map$) == 0){
                announce "[ Poring Catcher ] : All participants have been eliminated. There is no winner in this event.",0;
                $poring_active = 0;
                $poring_kill = 0;
                $poring_enter = 0;
                mapwarp "novice","midgard",156,191;
                killmonster "poring_c01","All";
                end;
            }
            return;
            
        case 3:
            if(getmapusers(.poring_map$) == 0){
                announce "[ Poring Catcher ] : The Poring Catcher Event has now ended. Thank you for participating.",0;
                $poring_active = 0;
                $poring_kill = 0;
                $poring_enter = 0;
                mapwarp "novice","midgard",156,191;
                killmonster "poring_c01","All";
                end;
            }
            return;
        }
    }
    
    function    count_player    {
        if(getmapusers(getarg(0)) == 0){
            announce "[ Poring Catcher ] : The event has been cancelled due to lack of registration.",0;
            end;
        }
        return;
    }
    
    function    get_count    {
        .@count = getmapusers(getarg(0));
        if(.@count <= 4){
            return 1;
        }
        .@count_poring = (.@count/.poring_multiplier);
        return .@count_poring;
    }
    
    function    poring_start    {
        sleep 3500;
        mapannounce .poring_map$,"[ Poring Catcher ] : The event rules are simple.",0;
        sleep 3500;
        mapannounce .poring_map$,"[ Poring Catcher ] : There will be 100 wrong Poring and "+getarg(0)+" correct Poring.",0;
        sleep 3500;
        mapannounce .poring_map$,"[ Poring Catcher ] : Kill the correct Poring to win "+.reward_amount+" "+getitemname(.reward_id)+".",0;
        sleep 3500;
        mapannounce .poring_map$,"[ Poring Catcher ] : If the Poring is not killed in 3 minutes the event will finish without a winner.",0;
        sleep 3500;
        mapannounce .poring_map$,"[ Poring Catcher ] : The event will start in a few seconds.",0;
        sleep 2000;
        mapannounce .poring_map$,"[ Poring Catcher ] : 3.",0;
        sleep 2000;
        mapannounce .poring_map$,"[ Poring Catcher ] : 2.",0;
        sleep 2000;
        mapannounce .poring_map$,"[ Poring Catcher ] : 1.",0;
        donpcevent strnpcinfo(0)+"::OnSummonPoring";
        end;
        }
    }
    
    poring_c01    mapflag    nowarp
    poring_c01    mapflag    nowarpto
    poring_c01    mapflag    noteleport
    poring_c01    mapflag    nosave
    poring_c01    mapflag    nomemo
    poring_c01    mapflag    nobranch
    poring_c01    mapflag    noloot
    poring_c01    mapflag    noskill
    poring_c01    mapflag    nopenalty
    poring_c01    mapflag    nodrop

     

×
×
  • Create New...