Jump to content

furry

Members
  • Posts

    27
  • Joined

  • Last visited

Posts posted by furry

  1.  

    I need help with the item_db script for the required class of every items.

    Example:

    all jobs = 0xFFFFFFFF 

    Lord Knight =?
    paladin =?

    master smith =?

    creator =?

    sniper =?

    clown =?

    gypsy =?

    high priest =? 

    monk =?

    sinx =?

    stalker = ?

    high wiz =?

    prof =?

     

    thankyou in advance guys!

  2. @Zeiyan @BeWan hi  do you have a full script for every class?
    like this this:

    0FFFFFFF = all jobs right?

    i need for 

    Lord Knight =?
    paladin =?

    master smith =?

    creator =?

    sniper =?

    clown =?

    gypsy =?

    high priest =? 

    monk =?

    sinx =?

    stalker = ?

    high wiz =?

    prof =?

     

    thankyou in advance guys!

     

  3. Gusto ko sana lagyan ng bayad na 10m to bago sila maka laro pano po kaya please help po




    //===== eAthena Script =======================================
    //= Rock Scissors Roulette Script
    //===== By: ==================================================
    //= acky (1.1)
    //===== Current Version: =====================================
    //= 1.2
    //===== Compatible With: =====================================
    //= Any eAthena Version
    //===== Description: =========================================
    //= Plays a hybrid Russian Roulette Rock Scissors Paper game.
    //===== Additional Comments: =================================
    //= Prizes customisable, Added emotions.
    //= 1.2 Fixes by Blackthunder and me [Poki#3]
    //============================================================


    prontera,164,164,3 script Asiong Salonga 85,{
    mes "Crazy Boris";
    set @counter,1;
    mes "Hey you! Up for Rock Scissors Roulette?";
    next;
    menu "Let me play.",PLAY,"Explain the rules.",RULES,"Leave",LEAVE;
    SAME:
    mes "Draw! Again!";
    next;
    goto PLAY;


    WIN:
    mes "Damnit, You Win!";
    emotion 19;
    next;
    goto OPPPULL;


    LOSE:
    emotion 18;
    mes "Boorah! You Lose!";
    next;
    goto YOUPULL;


    PLAY:
    mes "Rock... Paper...";
    set @opp,rand (1,3);
    menu "^0000FFROCK!",ROCK,"^FF0000SCISSORS!",SCISSORS,"^00FF00PAPER!^000000",PAPER;


    ROCK:
      if (@lastchoice == 1) set @opp,rand (1,3);
      if (@opp == 1) emotion 11;
      if (@opp == 2) emotion 10;
      if (@opp == 3) emotion 12;
      set @lastchoice,1;
    if (@opp == 1) goto SAME;
    if (@opp == 2) goto WIN;
    if (@opp == 3) goto LOSE;


    SCISSORS:
    if (@lastchoice == 2) set @opp,rand (1,2);
      if (@opp == 1) emotion 11;
      if (@opp == 2) emotion 10;
      if (@opp == 3) emotion 12;
      set @lastchoice,2;
    if (@opp == 1) goto LOSE;
    if (@opp == 2) goto SAME;
    if (@opp == 3) goto WIN;


    PAPER:
    if (@lastchoice == 3) set @opp,rand (2,3);
      if (@opp == 1) emotion 11;
      if (@opp == 2) emotion 10;
      if (@opp == 3) emotion 12;
      set @lastchoice,3;
    if (@opp == 1) goto WIN;
    if (@opp == 2) goto LOSE;
    if (@opp == 3) goto SAME;


    YOUPULL:
    if (@counter == 1) goto ONE;
    if (@counter == 2) goto TWO;
    if (@counter == 3) goto THREE;
    if (@counter == 4) goto FOUR;
    if (@counter == 5) goto FIVE;
    if (@counter == 6) goto SIX;


    OPPPULL:
    if (@counter == 1) goto ONEa;
    if (@counter == 2) goto TWOa;
    if (@counter == 3) goto THREEa;
    if (@counter == 4) goto FOURa;
    if (@counter == 5) goto FIVEa;
    if (@counter == 6) goto SIXa;


    ONE:
    set @counter,2;
    mes "1 of 6";
    set @pull,rand (1,6);
    next;
    if (@pull == 1) goto DIE;
    if (@pull != 1) goto SAFE;


    TWO:
    set @counter,3;
    mes "2 of 6";
    set @pull,rand (1,5);
    next;
    if (@pull == 1) goto DIE;
    if (@pull != 1) goto SAFE;


    THREE:
    set @counter,4;
    mes "3 of 6";
    set @pull,rand (1,4);
    next;
    if (@pull == 1) goto DIE;
    if (@pull != 1) goto SAFE;


    FOUR:
    set @counter,5;
    mes "4 of 6";
    set @pull,rand (1,3);
    next;
    if (@pull == 1) goto DIE;
    if (@pull != 1) goto SAFE;


    FIVE:
    set @counter,6;
    mes "5 of 6";
    set @pull,rand (1,2);
    if (@pull == 1) set @pull,rand (1,2);
    next;
    if (@pull == 1) goto DIE;
    if (@pull != 1) goto SAFE;


    SIX:
    mes "6 of 6";
    mes "Say your prayers";
    set @pull,1;
    next;
    if (@pull == 1) goto DIE;
    if (@pull != 1) goto SAFE;


    ONEa:
    set @counter,2;
    mes "1 of 6";
    set @pull,rand (1,6);
    next;
    if (@pull == 1) goto KILL;
    if (@pull != 1) goto SAFE;


    TWOa:
    set @counter,3;
    mes "2 of 6";
    set @pull,rand (1,5);
    next;
    if (@pull == 1) goto KILL;
    if (@pull != 1) goto SAFE;


    THREEa:
    set @counter,4;
    mes "3 of 6";
    set @pull,rand (1,4);
    next;
    if (@pull == 1) goto KILL;
    if (@pull != 1) goto SAFE;


    FOURa:
    set @counter,5;
    mes "4 of 6";
    set @pull,rand (1,3);
    next;
    if (@pull == 1) goto KILL;
    if (@pull != 1) goto SAFE;


    FIVEa:
    set @counter,6;
    mes "5 of 6";
    set @pull,rand (1,2);
    next;
    if (@pull == 1) goto KILL;
    if (@pull != 1) goto SAFE;


    SIXa:
    mes "6 of 6";
    mes "Say your prayers";
    set @pull,1;
    next;
    if (@pull == 1) goto KILL;
    if (@pull != 1) goto SAFE;


    SAFE:
    emotion 32;
    mes "*^0000FFClick^000000* whew...";
    goto PLAY;


    DIE:
    specialeffect2 183;
    emotion 29;
    percentheal -100,-100;
    mes "*^0000FFClick^000000* *^FF0000BANG^000000*";
    mes "You're dead!";
    close;


    KILL:
    specialeffect 183;
    emotion 23;
    mes "*^0000FFClick^000000* *^FF0000BANG^000000*";
    mes "OWWW @#$%^!! THAT HURT LIKE HELL!!";
    next;
    goto PRIZE;


    RULES:
    mes "Ok here are the rules:";
    mes "I have with me a ^FF00006^000000 chamber pistol with ^FF00001^000000 round. First we play ^FF0000Scissors ^00FF00Paper ^0000FFRock^000000. The loser pulls the trigger. The winner is whoever comes out best.";
    mes "Beat me to win a random prices and Jackpot Price random Castle Drops:";
    menu "Let me play.",CONT,"No thanks.",LEAVE;


    CONT:
    mes "Ok here we go...";
    next;
    goto PLAY;


    PRIZE:
    mes "Congratulations! You have won...";
    set @prize,rand (1,10);
    if (@prize == 1) goto P1;
    if (@prize == 2) goto P2;
    if (@prize == 3) goto P3;
    if (@prize == 4) goto P4;
    if (@prize == 5) goto P5;
    if (@prize == 6) goto P6;
    if (@prize == 7) goto P7;
    if (@prize == 8) goto P8;
    if (@prize == 9) goto P9;
    if (@prize == 10) goto P10;


    P1:
    mes "5x Mithril Coin";
    getitem 674,5;
    close;


    P2:
    mes "30x YGG!";
    getitem 607,30;
    close;


    P3:
    mes "iron maiden!";
    getitem 7075,1;
    close;


    P4:
    mes "8x Old Blue Box!";
    getitem 603,8;
    close;


    P5:
    mes "4x Old Violet Box!";
    getitem 617,4;
    close;


    P6:
    mes "1x Freya's Jewel!";
    getitem 7073,1;
    close;


    P7:
    mes "10x Dead Branch!";
    getitem 604,10;
    close;


    P8:
    mes "10x lottery ticket!";
    getitem 7528,10;
    close;


    P9:
    mes "Billow!";
    getitem 7091,1;
    close;


    P10:
    mes "Thor's gauntlet!";
    getitem 7074,1;
    close;


    LEAVE:
    mes "Pansy.";
    close;
    }

  4. pa help naman po about sa battleground. kasi po nung pinalitan ko ng TCG ung reward nung CTF battle Ground wala napong nalabas na reward..

     

     

    thanks in advance....

    // (c) 2008 - 2012 eAmod Project; Andres Garbanzo / Zephyrus
    //
    //  - [email protected]
    //  - MSN [email protected]
    //  - Skype: Zephyrus_cr
    //  - Site: http://dev.terra-gaming.com
    //
    // This file is NOT public - you are not allowed to distribute it.
    // Authorized Server List : http://dev.terra-gaming.com/index.php?/topic/72-authorized-eamod-servers/
    // eAmod is a non Free, extended version of eAthena Ragnarok Private Server.
    
    // ==============================================================================
    // BattleGround System - Flavius Capture the Flag
    // ==============================================================================
    
    // Battleground Flags
    // *********************************************************************
    
    bat_b02,328,150,0	script	Alpha Crystal::Team1_Flag	1914,1,1,{
    	end;
    
    OnTouch:
    	if( $@BG_Status != 1 || getvariableofnpc(.BG_Arena$,"BG_Queue_Join") != "Flavius_CTF" || HP < 1 )
    		end;
    
    	if( getcharid(4) == $@BG_Team2 && .Flag_Status < 2 )
    	{ // Flag Captured
    		set .Flag_Status, 2; // Taken
    		set .Flag_Carrier, getcharid(0);
    
    		sc_end SC_HIDING;
    		sc_end SC_CLOAKING;
    		sc_end SC_CHASEWALK;
    		// Renewal invisibility
    		sc_end SC_CLOAKINGEXCEED;
    		sc_end SC_CAMOUFLAGE;
    		sc_end SC__INVISIBILITY;
    
    		pcblock 1,1; // Block Skills/Items
    
    		mapannounce "bat_b02","Alpha Crystal Taken by [ " + strcharinfo(0) + " ]",1,bg_get_data($@BG_Team1,4);
    		bg_rankpoints "ctf_taken",1;
    		disablenpc "Team1_Flag";
    		addtimer 2000, "Flavius_CTF::OnAlphaFlash";
    		stopnpctimer;
    	}
    	else if( getcharid(4) == $@BG_Team1 )
    	{
    		if( .Flag_Status == 0 && getvariableofnpc(.Flag_Carrier,"Team2_Flag") == getcharid(0) )
    		{
    			set getvariableofnpc(.Flag_Carrier,"Team2_Flag"),0;
    			set .Flag_Carrier, 0;
    			mapannounce "bat_b02","Omega Crystal Captured by [ " + strcharinfo(0) + " ]!!",1,bg_get_data($@BG_Team2,4);
    			bg_rankpoints "ctf_captured",1;
    			pcblock 1,0; // UnBlock Skills/Items
    			stopnpctimer;
    			donpcevent "Flavius_CTF::OnTeam1Score";
    		}
    		else if( .Flag_Status == 1 )
    		{
    			mapannounce "bat_b02","Alpha Crystal Returned by [ " + strcharinfo(0) + " ]!!",1,bg_get_data($@BG_Team1,4);
    			bg_rankpoints "fame",1;
    			disablenpc "Team1_Flag";
    			sleep 2000;
    			movenpc "Team1_Flag",328,150; // Back to Base
    			set .Flag_Status, 0;
    			initnpctimer;
    			enablenpc "Team1_Flag";
    		}
    	}
    	end;
    
    OnTimer2000:
    	stopnpctimer;
    	if( .Flag_Status < 2 )
    	{
    		getmapxy .@m$, .@x, .@y, 1;
    		viewpointmap "bat_b02",1, .@x, .@y, 1, bg_get_data($@BG_Team1,4);
    		specialeffect 223;
    		initnpctimer;
    	}
    	end;
    
    OnBase:
    	movenpc "Team1_Flag",328,150;
    	set .Flag_Status, 0;
    	set .Flag_Carrier, 0;
    	initnpctimer;
    	enablenpc "Team1_Flag";
    	end;
    }
    
    bat_b02,62,150,0	script	Omega Crystal::Team2_Flag	1915,1,1,{
    	end;
    
    OnTouch:
    	if( $@BG_Status != 1 || getvariableofnpc(.BG_Arena$,"BG_Queue_Join") != "Flavius_CTF" || HP < 1 )
    		end;
    
    	if( getcharid(4) == $@BG_Team1 && .Flag_Status < 2 )
    	{ // Flag Captured
    		set .Flag_Status, 2; // Taken
    		set .Flag_Carrier, getcharid(0);
    
    		sc_end SC_HIDING;
    		sc_end SC_CLOAKING;
    		sc_end SC_CHASEWALK;
    		// Renewal invisibility
    		sc_end SC_CLOAKINGEXCEED;
    		sc_end SC_CAMOUFLAGE;
    		sc_end SC__INVISIBILITY;
    
    		pcblock 1,1; // Block Skills/Items
    
    		mapannounce "bat_b02","Omega Crystal Taken by [ " + strcharinfo(0) + " ]",1,bg_get_data($@BG_Team2,4);
    		bg_rankpoints "ctf_taken",1;
    		disablenpc "Team2_Flag";
    		addtimer 2000, "Flavius_CTF::OnOmegaFlash";
    		stopnpctimer;
    	}
    	else if( getcharid(4) == $@BG_Team2 )
    	{
    		if( .Flag_Status == 0 && getvariableofnpc(.Flag_Carrier,"Team1_Flag") == getcharid(0) )
    		{
    			set getvariableofnpc(.Flag_Carrier,"Team1_Flag"),0;
    			set .Flag_Carrier, 0;
    			mapannounce "bat_b02","Alpha Crystal Captured by [ " + strcharinfo(0) + " ]!!",1,bg_get_data($@BG_Team1,4);
    			bg_rankpoints "ctf_captured",1;
    			pcblock 1,0; // UnBlock Skills/Items
    			stopnpctimer;
    			donpcevent "Flavius_CTF::OnTeam2Score";
    		}
    		else if( .Flag_Status == 1 )
    		{
    			mapannounce "bat_b02","Omega Crystal Returned by [ " + strcharinfo(0) + " ]!!",1,bg_get_data($@BG_Team2,4);
    			bg_rankpoints "fame",1;
    			disablenpc "Team2_Flag";
    			sleep 2000;
    			movenpc "Team2_Flag",62,150; // Back to Base
    			set .Flag_Status, 0;
    			initnpctimer;
    			enablenpc "Team2_Flag";
    		}
    	}
    	end;
    
    OnTimer2000:
    	stopnpctimer;
    	if( .Flag_Status < 2 )
    	{
    		getmapxy .@m$, .@x, .@y, 1;
    		viewpointmap "bat_b02",1, .@x, .@y, 2, bg_get_data($@BG_Team2,4);
    		specialeffect 223;
    		initnpctimer;
    	}
    	end;
    
    OnBase:
    	movenpc "Team2_Flag",62,150;
    	set .Flag_Status, 0;
    	set .Flag_Carrier, 0;
    	initnpctimer;
    	enablenpc "Team2_Flag";
    	end;
    }
    
    // Battleground Engine
    // *********************************************************************
    
    -	script	Flavius_CTF	-1,{
    	end;
    
    OnAlphaFlash:
    	if( getvariableofnpc(.Flag_Carrier,"Team1_Flag") == getcharid(0) && $@BG_Status == 1 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" )
    	{
    		getmapxy .@m$, .@x, .@y, 0;
    		viewpointmap "bat_b02",1, .@x, .@y, 1, bg_get_data($@BG_Team1,4);
    		specialeffect2 73;
    		emotion e_hlp,1;
    		addtimer 2000, "Flavius_CTF::OnAlphaFlash";
    		percentheal -5,-5;
    	}
    	end;
    
    OnOmegaFlash:
    	if( getvariableofnpc(.Flag_Carrier,"Team2_Flag") == getcharid(0) && $@BG_Status == 1 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" )
    	{
    		getmapxy .@m$, .@x, .@y, 0;
    		viewpointmap "bat_b02",1, .@x, .@y, 2, bg_get_data($@BG_Team2,4);
    		specialeffect2 73;
    		emotion e_hlp,1;
    		addtimer 2000, "Flavius_CTF::OnOmegaFlash";
    		percentheal -5,-5;
    	}
    	end;
    
    OnInit:
    	disablenpc "Team1_Flag";
    	disablenpc "Team2_Flag";
    	end;
    
    OnTeam1Quit:
    	setquest 8506; // Deserter
    	set @killer_bg_src, 0;
    	if( $@BG_Status != 0 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" )
    		donpcevent "BG_Queue_Join::OnJoinEvent";
    OnTeam1Die:
    	if( $@BG_Status == 1 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" && getvariableofnpc(.Flag_Carrier,"Team2_Flag") == getcharid(0) )
    	{ // Drop Flag
    		set getvariableofnpc(.Flag_Carrier,"Team2_Flag"), 0;
    		pcblock 1,0; // UnBlock Skills/Items
    		getmapxy .@m$, .@x, .@y, 0;
    		movenpc "Team2_Flag", .@x, .@y;
    		mapannounce "bat_b02","Omega Flag Droped by [ " + strcharinfo(0) + " ]",1,bg_get_data($@BG_Team2,4);
    		bg_rankpoints "ctf_droped",1;
    		bg_rankpoints "fame",1,@killer_bg_src;
    		set getvariableofnpc(.Flag_Status,"Team2_Flag"), 1; // OnFloor
    		initnpctimer "Team2_Flag";
    		enablenpc "Team2_Flag";
    	}
    	end;
    	
    OnTeam2Quit:
    	setquest 8506; // Deserter
    	set @killer_bg_src, 0;
    	if( $@BG_Status != 0 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" )
    		donpcevent "BG_Queue_Join::OnJoinEvent";
    OnTeam2Die:
    	if( $@BG_Status == 1 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" && getvariableofnpc(.Flag_Carrier,"Team1_Flag") == getcharid(0) )
    	{ // Drop Flag
    		set getvariableofnpc(.Flag_Carrier,"Team1_Flag"), 0;
    		pcblock 1,0; // UnBlock Skills/Items
    		getmapxy .@m$, .@x, .@y, 0;
    		movenpc "Team1_Flag", .@x, .@y;
    		mapannounce "bat_b02","Alpha Flag Droped by [ " + strcharinfo(0) + " ]",1,bg_get_data($@BG_Team1,4);
    		bg_rankpoints "ctf_droped",1;
    		bg_rankpoints "fame",1,@killer_bg_src;
    		set getvariableofnpc(.Flag_Status,"Team1_Flag"), 1; // OnFloor
    		initnpctimer "Team1_Flag";
    		enablenpc "Team1_Flag";
    	}
    	end;
    
    OnBuildTeams:
    	set $@BG_Team1,bg_team_create("bat_b02",390,10,0,"Flavius_CTF::OnTeam1Quit","Flavius_CTF::OnTeam1Die");
    	set $@BG_Team2,bg_team_create("bat_b02",10,290,1,"Flavius_CTF::OnTeam2Quit","Flavius_CTF::OnTeam2Die");
    	end;
    
    OnReady:
    	if( getvariableofnpc(.BG_Arena$,"BG_Queue_Join") != "Flavius_CTF" )
    		end;
    
    	initnpctimer;
    	// BG Variables
    	set .Team1_Score, 0;
    	set .Team2_Score, 0;
    	sleep 2000;
    	bg_warp $@BG_Team1,"bat_b02",311,224;
    	bg_warp $@BG_Team2,"bat_b02",87,75;
    	sleep 2000;
    	// Respawn NPC's
    	donpcevent "#guictf_respawn::OnBGStart";
    	donpcevent "#croctf_respawn::OnBGStart";
    	// Start Match!!
    	donpcevent "Flavius_CTF::OnMatchStart";
    	end;
    
    OnMatchStart:
    	if( $@BG_Status != 1 || getvariableofnpc(.BG_Arena$,"BG_Queue_Join") != "Flavius_CTF" )
    		end;
    
    	// Flags2Base
    	donpcevent "Team1_Flag::OnBase";
    	donpcevent "Team2_Flag::OnBase";
    	mapannounce "bat_b02","The Flags have been set to their Bases!!",8;
    	end;
    
    OnTeam1Score:
    	set .Team1_Score, .Team1_Score + 1;
    	donpcevent "Flavius_CTF::OnMatchStop";
    	end;
    
    OnTeam2Score:
    	set .Team2_Score, .Team2_Score + 1;
    	donpcevent "Flavius_CTF::OnMatchStop";
    	end;
    
    OnMatchStop:
    	disablenpc "Team1_Flag";
    	disablenpc "Team2_Flag";
    	bg_updatescore "bat_b02",.Team1_Score,.Team2_Score;
    
    	viewpointmap "bat_b02",2, 0, 0, 1, 0x0000FF;
    	viewpointmap "bat_b02",2, 0, 0, 2, 0xFF0000;
    	
    	if( .Team1_Score > 2 )
    	{ // Team 1 Won
    		mapannounce "bat_b02","The " + bg_get_data($@BG_Team1,2) + " army has won the Battle of Flavius CTF!",1,bg_get_data($@BG_Team1,4);
    		donpcevent "Flavius_CTF::OnMatchEnd";
    	}
    	else if( .Team2_Score > 2 )
    	{ // Team 2 Won
    		mapannounce "bat_b02","The " + bg_get_data($@BG_Team2,2) + " army has won the Battle of Flavius CTF!",1,bg_get_data($@BG_Team2,4);
    		donpcevent "Flavius_CTF::OnMatchEnd";
    	}
    	else
    	{ // Keep Playing
    		sleep 8000;
    		donpcevent "Flavius_CTF::OnMatchStart";
    	}
    	end;
    
    OnTimer600000:
    	mapannounce "bat_b02","The Battle will ends in 5 minutes!!",1,0xA0522D;
    	end;
    
    OnTimer840000:
    	mapannounce "bat_b02","The Battle will ends in 1 minute!!",1,0xA0522D;
    	end;
    
    OnTimer900000:
    	disablenpc "Team1_Flag";
    	disablenpc "Team2_Flag";
    
    	viewpointmap "bat_b02",2, 0, 0, 1, bg_get_data($@BG_Team1,4);
    	viewpointmap "bat_b02",2, 0, 0, 2, bg_get_data($@BG_Team2,4);
    
    	if( .Team1_Score > .Team2_Score )
    		mapannounce "bat_b02","The " + bg_get_data($@BG_Team1,2) + " army has won the Battle of Flavius CTF!",1,bg_get_data($@BG_Team1,4);
    	else if( .Team1_Score < .Team2_Score )
    		mapannounce "bat_b02","The " + bg_get_data($@BG_Team2,2) + " army has won the Battle of Flavius CTF!",1,bg_get_data($@BG_Team2,4);
    	else
    		mapannounce "bat_b02","The battle is over. This is a Tie...!",1,0xA0522D;
    	donpcevent "Flavius_CTF::OnMatchEnd";
    	end;
    
    OnMatchEnd:
    	stopnpctimer;
    	disablenpc "Team1_Flag";
    	disablenpc "Team2_Flag";
    	donpcevent "#guictf_respawn::OnBGStop";
    	donpcevent "#croctf_respawn::OnBGStop";
    	set $@BG_Status, 2;
    	// =======================================================
    	// Team Rewards
    	// =======================================================
    	if( .Team1_Score > .Team2_Score )
    	{
    		bg_reward $@BG_Team1,7227,30 + .Team1_Score,0,0,"BG_CTF",1,3,0;
    		bg_reward $@BG_Team2,7227,10 + .Team2_Score,0,0,"BG_CTF",1,3,2;
    	}
    	else if( .Team2_Score > .Team1_Score )
    	{
    		bg_reward $@BG_Team1,7227,30 + .Team1_Score,0,0,"BG_CTF",1,3,2;
    		bg_reward $@BG_Team2,7227,10 + .Team2_Score,0,0,"BG_CTF",1,3,0;
    	}
    	else
    	{
    		bg_reward $@BG_Team1,7227,10 + .Team1_Score,0,0,"BG_CTF",1,3,1;
    		bg_reward $@BG_Team2,7227,10 + .Team2_Score,0,0,"BG_CTF",1,3,1;
    	}
    	// =======================================================
    	set .Team1_Score, 0;
    	set .Team2_Score, 0;
    	sleep 5000;
    	donpcevent "BG_Queue_Join::OnRotate";
    	bg_updatescore "bat_b02",0,0;
    	end;
    }
    
    // Battleground Therapist
    // *********************************************************************
    
    bat_b02,390,13,5	script	Therapist in battle#ctf1	95,{
    	mes "[Therapist in battle]";
    	mes "Just close your eyes, and take a deep breathe.";
    	mes "You can be free from pain.";
    	specialeffect2 312;
    	percentheal 100,100;
    	repairall;
    	close2;
    	openstorage;
    	end;
    }
    
    bat_b02,10,293,5	script	Therapist in battle#ctf2	95,{
    	mes "[Therapist in battle]";
    	mes "Just close your eyes, and take a deep breathe.";
    	mes "You can be free from pain.";
    	specialeffect2 312;
    	percentheal 100,100;
    	repairall;
    	close2;
    	openstorage;
    	end;
    }
    
    // Battleground Respawn
    // *********************************************************************
    
    bat_b02,390,10,0	script	#guictf_respawn	139,{
    	end;
    
    OnBGStart:
    	initnpctimer;
    	end;
    
    OnBGStop:
    	stopnpctimer;
    	end;
    
    OnTimer24000:
    	misceffect 83;
    	end;
    
    OnTimer25000:
    	areapercentheal "bat_b02",382,2,397,17,100,100;
    	areawarp "bat_b02",382,2,397,17,"bat_b02",311,224;
    	initnpctimer;
    	end;
    }
    
    bat_b02,10,290,0	script	#croctf_respawn	139,{
    	end;
    
    OnBGStart:
    	initnpctimer;
    	end;
    
    OnBGStop:
    	stopnpctimer;
    	end;
    
    OnTimer24000:
    	misceffect 83;
    	end;
    
    OnTimer25000:
    	areapercentheal "bat_b02",2,282,17,297,100,100;
    	areawarp "bat_b02",2,282,17,297,"bat_b02",87,75;
    	initnpctimer;
    	end;
    }
    
    // Flags
    // *********************************************************************
    
    bat_b02,304,231,1	duplicate(Base Flag#bg)	Alpha Base#bat23	973
    bat_b02,319,231,1	duplicate(Base Flag#bg)	Alpha Base#bat24	973
    bat_b02,304,218,1	duplicate(Base Flag#bg)	Alpha Base#bat25	973
    bat_b02,319,218,1	duplicate(Base Flag#bg)	Alpha Base#bat26	973
    bat_b02,304,231,1	duplicate(Base Flag#bg)	Alpha Base#bat27	973
    bat_b02,304,231,1	duplicate(Base Flag#bg)	Alpha Base#bat28	973
    bat_b02,335,142,1	duplicate(Base Flag#bg)	Alpha Base#bat29	973
    bat_b02,335,157,1	duplicate(Base Flag#bg)	Alpha Base#bat30	973
    bat_b02,390,16,1	duplicate(Base Flag#bg)	Alpha Base#bat31	973
    bat_b02,292,163,1	duplicate(Base Flag#bg)	Alpha Base#bat32	973
    bat_b02,292,136,1	duplicate(Base Flag#bg)	Alpha Base#bat33	973
    bat_b02,241,185,1	duplicate(Base Flag#bg)	Alpha Base#bat34	973
    bat_b02,247,179,1	duplicate(Base Flag#bg)	Alpha Base#bat35	973
    
    bat_b02,96,81,1	duplicate(Base Flag#bg)	Omega Base#bat22	974
    bat_b02,96,68,1	duplicate(Base Flag#bg)	Omega Base#bat23	974
    bat_b02,79,81,1	duplicate(Base Flag#bg)	Omega Base#bat24	974
    bat_b02,79,68,1	duplicate(Base Flag#bg)	Omega Base#bat25	974
    bat_b02,96,81,1	duplicate(Base Flag#bg)	Omega Base#bat26	974
    bat_b02,96,81,1	duplicate(Base Flag#bg)	Omega Base#bat27	974
    bat_b02,59,164,1	duplicate(Base Flag#bg)	Omega Base#bat28	974
    bat_b02,59,137,1	duplicate(Base Flag#bg)	Omega Base#bat29	974
    bat_b02,10,296,1	duplicate(Base Flag#bg)	Omega Base#bat30	974
    bat_b02,110,162,1	duplicate(Base Flag#bg)	Omega Base#bat31	974
    bat_b02,110,137,1	duplicate(Base Flag#bg)	Omega Base#bat32	974
    bat_b02,152,120,1	duplicate(Base Flag#bg)	Omega Base#bat33	974
    bat_b02,158,114,1	duplicate(Base Flag#bg)	Omega Base#bat34	974
    
    // MapFlags
    // *********************************************************************
    
    bat_b02	mapflag	battleground	2
    bat_b02	mapflag	nomemo
    bat_b02	mapflag	nosave	SavePoint
    bat_b02	mapflag	noteleport
    bat_b02	mapflag	nowarp
    bat_b02	mapflag	nowarpto
    bat_b02	mapflag	noreturn
    bat_b02	mapflag	nobranch
    bat_b02	mapflag	nopenalty
    bat_b02	mapflag	noemergencycall
    
    

     

  5. //===== eAthena Script =======================================
    //= War Of Rune
    //===== By: ==================================================
    //= WanMan or Katazui or Kaji
    //===== Server ==============================================
    //= For lightrogaming-network.tk
    //===== Current Version: =====================================
    //= 1.0
    //===== Compatible With: =====================================
    //= eAthena 7.15 +
    //===== Description: =========================================
    //= War of Rune is for Party of 10
    //===== Additional Comments: =================================
    //= Starts Every 2 Hours
    //= Edit Lines 144 and 34
    //============================================================
    -    script    WoR#disable    -1,{
    
    OnInit:
        disablenpc "War of Rune#WoR";
        disablenpc "War of Rune#banker";
        end;
    }
    
    -    script    WoRannouncer    -1,{
        L_play:
        OnHour2:
        pvpoff "guild_vs1";
        killmonsterall "guild_vs1";
        announce "WoR: Hello! It's time again for War of Rune (AKA: WoR)",0;
        sleep2 10000;
        announce "WoR: Please Register and talk to me in Prontera!",0;
        sleep2 10000;
        announce "WoR: I will not let anyone register after 1 minute. Prize will be <PRIZE AMOUNT> <PRIZE>.",0;
        hideonnpc "War of Rune#WoR";
        OnMinute1:
        announce "WoR: Closed. Next Round is in 2 Hours.",0;
        hideoffnpc "War of Rune#WoR";
        donpcevent "War of Rune#banker::L_playwor";
        end;
    }
    
    
    prontera,147,167,6    script    War of Rune#WoR    753,{
        mes "[War of Rune]";
        mes "Hello!";
        mes "Would you like to register for ^FF0000 War of Rune ^000000?";
        menu "Sure",L_yes,"No Thanks",L_close,"Information",L_info;
            L_info:
            next;
            mes "Script Made by: Katazui";
            next;
            mes "[War of Rune]";
            mes "Well, you need a Party of 7. And another Party of 7.";
            mes "All you have to do is Kill the each other.";
            mes "Last Party standing, Wins.";
            mes "Would you like to register?";
            menu "Sure",L_yes,"No Thanks",L_close;
            L_yes:
            next;
            mes "[War of Rune]";
            mes "Okay. You need a Party of 7.";
            mes "Also, make sure you have another party of 7.";
            mes "Just make sure you have a party of 7 yourself.";
            mes "Do you have a party of 7?";
            menu "Yup",L_p10,"Umm... I need to re-count",L_close;
                L_p10:
                getpartymember getcharid(1);
                set .@partymembercount, $@partymembercount;
                if(.@partymembercount == 7) goto L_p11;
                next;
                mes "[War of Rune]";
                mes "You are not in a Party of 7...";
                next;
                close;
                end;
    
    
    L_close:
        mes "[War of Rune]";
        mes "Okay, Come back later!";
        next;
        close;
        end;
    L_p11:
        mes "[War of Rune]";
        mes "Alrightly!";
        mes "Please wait till the other people comes to the WoR.";
        next;
        warpparty "guild_vs1",50,50,getcharid(1);
        end;
    
    }
    
    guild_vs1,50,57    script    War of Rune#banker    753,{
        mes "[War of Rune]";
        mapannounce "guild_vs1","WoR: You won. Tell me you Party Name. 1 Person only or you will error.",0;
        mes "Input Party Name";
        input $@n;
        next;
        mes "[War of Rune]";
        mes "Congrats";
        close2;
        hideoffnpc "War of Rune#banker";
        mapannounce "guild_vs1","WoR: To get your prize please kill 1 Poring. If you don't kill it after 1 minute. You will not get your prize.",0;
        monster guild_vs1,0,0,"Prize",1002,150,"prize::OnMobKilled";
        sleep2 10000;
        announce "WoR: "+$@n+" has won the War of Rune! Congrats!",0;
        OnMinute1:
        warpparty "prontera",150,150,getcharid(1);
        donpcevent "WoRannouncer::L_play";
        end;
    //playTime
        L_playwor:
        mapannounce "guild_vs1","WoR: Welcome to WoR!",0;
        sleep2 10000;
        mapannounce "guild_vs1","WoR: It's Simple... All you have to do it kick each other asses.",0;
        sleep2 10000;
        mapannounce "guild_vs1","WoR: You may use Ygg Berrys, and make sure you buff up...",0;
        sleep2 10000;
        mapannounce "guild_vs1","WoR: If one of your Party mates dies, and the rest wins. The one who dies doesn't get the prize.",0;
        sleep2 10000;
        mapannounce "guild_vs1","WoR: Okay... That's that....",0;
        sleep2 10000;
        mapannounce "guild_vs1","WoR: Ready... Set...",0;
        sleep2 10000;
        mapannounce "guild_vs1","WoR: FIGHT!!!",0;
        pvpon "guild_vs1";
        goto L_if;
            L_if:
            if (getmapusers("guild_vs1") <= 7) goto L_champ;
            if (getmapusers("guild_vs1") == 0) goto L_no1;
            goto L_if;
            end;
                L_no1:
                announce "WoR: Aww! No one won! Or No one joined... What a Pity.",0;
                donpcevent "WoRannouncer::L_play";
                end;
                L_champ:
                hideonnpc "War of Rune#banker";
                mapannounce "guild_vs1","WoR: Come to me and tell me your party.",0;
                end;
    }
    
    -    script    prize    -1,{
        OnMobKilled:
        warp prontera,150,150;
        getitem <PRIZE ID>,<PRIZE AMOUNT>;
        end;
    
    }
    
    guild_vs1    mapflag    nowarp
    guild_vs1    mapflag    nowarpto
    guild_vs1    mapflag    noteleport
    guild_vs1    mapflag    nosave
    guild_vs1    mapflag    nomemo
    guild_vs1    mapflag    nobranch
    
    
    }
     

     

     

     

     

     

     

    Please make it to 3vs3

  6. Try this

    prontera,156,185,5	script	Party vs Party	100,{
    	
    	if( !getcharid(1) ) {
    		mes "You need a party";
    		close;
    	}
    	getpartymember getcharid(1), 1;
    	getpartymember getcharid(1), 2;
    	for( .@i = 0; .@i < $@partymembercount; .@i++ )
    		if( isloggedin( $@partymemberaid[ .@i ], $@partymembercid[ .@i ] ) ) .@j++;
    
    	if ( .@j != 1 ) {
    		mes "You need 3 players in the party";
    		close;
    	}
    	if ( getpartyleader( getcharid(1),2 ) != getcharid(0) ) {
    		mes "Only Leader Party can Registre!";
    		close;
    	}
    	mes "You Wanna Sign Up";
    	if ( select( "yes", "no" ) == 2 ) close;
    	else if ( .signup_count == 128 ) {
    		mes "Sorry the whole queue is full";
    		close;
    	}
    	while ( .signup_aid[.@i] != getcharid(3) && .@i < .signup_count )
    		set .@i, .@i +1;
    	if ( .@i < .signup_count ) {
    		mes "you have already sign up in this event";
    		mes "You have ^FF0000"+ (.signup_count-1) +"^000000 Peoples in your front.";
    		close;
    	}
    	set .signup_aid[ .signup_count ], getcharid(3);
    	set .signup_pid[ .signup_count ], getcharid(1);
    	set .signup_count, .signup_count +1;
    	mes "You are now signed to the BG event";
    	dispbottom "You have  "+(.signup_count-1)+" Peoples in your front !";
    	close2;
    L_start:
    	if ( .signup_count < .min2start ) end;
    	for ( set .@i, 0; .@i < .signup_count; set .@i, .@i +1 ) {
    		if ( attachrid( .signup_aid[.@i] ) ) {
    			if ( getmapflag( strcharinfo(3), mf_nowarp ) || !callsub( L_checkp, .signup_pid[.@i] ) ) { // player has went into another event
    				deletearray .signup_aid[.@i], 1;
    				deletearray .signup_pid[.@i], 1;
    				set .signup_count, .signup_count -1;
    				set .@i, .@i -1;
    			}
    		}
    		else {
    			deletearray .signup_aid[.@i], 1;
    			deletearray .signup_pid[.@i], 1;
    			set .signup_count, .signup_count -1;
    			set .@i, .@i -1;
    		}	
    	}
    	if ( .start || .signup_count < .min2start ) end;
    	announce "event started", 0;
    	set .start, 1;
    	set .pvsp_kill1,0;
    	set .pvsp_kill2,0;
    	for ( set .@i, 0; .@i < .signup_count; set .@i, .@i +1 ) {
    		setbgid ( .@i %2 )? .red : .blue, .signup_aid[.@i];
    		set .team_p[.@i], .signup_pid[.@i];
    	}
    	deletearray .signup_aid, .min2start;
    	deletearray .signup_pid, .min2start;
    	set .signup_count, .signup_count - .min2start;
    	bg_warp .red, "guild_vs3", 13,50;
    	bg_warp .blue, "guild_vs3", 86,50;
    	warpparty "guild_vs3",13,50,getcharid(1);
    	warpparty "guild_vs3",13,50,getcharid(1);
    	cleararray .score[1], .startingscore, 2;
    	bg_updatescore "guild_vs3", .score[1], .score[2];
    	sleep .eventlasting * 1000;
    	if ( .start == 1 ) {
    		if ( .score[1] == .score[2] )
    			mapannounce "guild_vs3", "Draw !", 0;
    		else if ( .score[1] > .score[2] ) {
    			mapannounce "guild_vs3", " Red side wins !", 0;
    			sleep 2000;
    			bg_warp .red, "lhz_cube",66,192;
    			bg_warp .blue, "prontera", 158,182;
    			// callsub L_reward, .red;
    		}
    		else if ( .score[1] < .score[2] ) {
    			mapannounce "guild_vs3", " Blue side wins !", 0;
    			sleep 2000;
    			bg_warp .red, "prontera", 155,182;
    			bg_warp .blue, "lhz_cube",66,192;
    			// callsub L_reward, .blue;
    		}
    	}
    	bg_kickall .red;
    	bg_kickall .blue;
    	set .start, 0;
    	deletearray .score;
    	goto L_start;
    L_reward:
    	getbgusers getarg(0);
    	for ( set .@i, 0; .@i < $@arenamembersnum; set .@i, .@i +1 )
    		getitem 501, 1, $@arenamembers[.@i]; // item reward
    	return;
    OnredDead: callsub L_dead, 1;
    OnblueDead: callsub L_dead, 2;
    L_dead:
    //warp "guild_vs3", 13,50;
    	set .score[ getarg(0) ], .score[ getarg(0) ] -1;
    	bg_updatescore "guild_vs3", .score[1], .score[2];
    	if ( !.score[ getarg(0) ] )
    		awake strnpcinfo(0);
    	sleep2 1250;
    	percentheal 100,100;
    	end;
     
    OnredQuit: callsub L_quit, 1, .red;
    OnblueQuit: callsub L_quit, 2, .blue;
    L_quit:
    	if ( bg_get_data( getarg(1), 0 ) ) end;
    	set .score[ getarg(0) ], 0;
    	awake strnpcinfo(0);
    	end;
    L_checkp:
    	if( !getcharid(1) || getcharid(1) != getarg(0) ) return 0;
    	getpartymember getcharid(1), 1;
    	getpartymember getcharid(1), 2;
    	for( .@i = 0; .@i < $@partymembercount; .@i++ )
    		if( isloggedin( $@partymemberaid[ .@i ], $@partymembercid[ .@i ] ) ) .@j++;
    	if( .@j != 1 ) return 0;
    	return 1;
    
    OnInit:
    	set .eventlasting, 30 * 60; // how long would the event last or it auto-reset. 30 *60 = 30 mins
    	set .min2start, 2; // minimum player to start
    	set .startingscore, 3; // score at start
    	set .red, createbgid( "guild_vs3", 13,50, strnpcinfo(0)+"::OnredQuit", strnpcinfo(0)+"::OnredDead" );
    	set .blue, createbgid( "guild_vs3", 86,50, strnpcinfo(0)+"::OnblueQuit", strnpcinfo(0)+"::OnblueDead" );
    	set .psvp_map$, "guild_vs3";
    	end;
     
    OnPCKillEvent:
    	if( strcharinfo(3) == .psvp_map$ ) {
    		if( getcharid(1) == .team_p[0] ) {
    			set .pvsp_kill1, .pvsp_kill1 + 1;
    			mapannounce .psvp_map$,"O grupo ["+ getpartyname( .team_p[0] ) +"] matou "+ .pvsp_kill1 +"/"+ .startingscore +" players do grupo ["+ getpartyname( .team_p[1] ) +"]!",bc_all;
    		}
    		else if( getcharid(1) == .team_p[1] ) {
    			set .pvsp_kill2, .pvsp_kill2 + 1;
    			mapannounce .psvp_map$,"O grupo ["+getpartyname( .team_p[1] )+"] matou "+ .pvsp_kill2 +"/"+ .startingscore +" players do grupo ["+ getpartyname( .team_p[0] ) +"]!",bc_all;
    		}
    	}
    	end;
    }
    

    d po nag wowork pag click ko d nagana

  7. Please post the script.

     

    // (c) 2008 - 2012 eAmod Project; Andres Garbanzo / Zephyrus
    
    //
    //  - [email protected]
    //  - MSN [email protected]
    //  - Skype: Zephyrus_cr
    //  - Site: http://dev.terra-gaming.com
    //
    // This file is NOT public - you are not allowed to distribute it.
    // Authorized Server List : http://dev.terra-gaming.com/index.php?/topic/72-authorized-eamod-servers/
    // eAmod is a non Free, extended version of eAthena Ragnarok Private Server.
    
    
    // ==============================================================================
    // BattleGround System - Flavius Capture the Flag
    // ==============================================================================
    
    
    // Battleground Flags
    // *********************************************************************
    
    
    bat_b02,328,150,0    script    Alpha Crystal::Team1_Flag    1914,1,1,{
        end;
    
    
    OnTouch:
        if( $@BG_Status != 1 || getvariableofnpc(.BG_Arena$,"BG_Queue_Join") != "Flavius_CTF" || HP < 1 )
            end;
    
    
        if( getcharid(4) == $@BG_Team2 && .Flag_Status < 2 )
        { // Flag Captured
            set .Flag_Status, 2; // Taken
            set .Flag_Carrier, getcharid(0);
    
    
            sc_end SC_HIDING;
            sc_end SC_CLOAKING;
            sc_end SC_CHASEWALK;
            // Renewal invisibility
            sc_end SC_CLOAKINGEXCEED;
            sc_end SC_CAMOUFLAGE;
            sc_end SC__INVISIBILITY;
    
    
            pcblock 1,1; // Block Skills/Items
    
    
            mapannounce "bat_b02","Alpha Crystal Taken by [ " + strcharinfo(0) + " ]",1,bg_get_data($@BG_Team1,4);
            bg_rankpoints "ctf_taken",1;
            disablenpc "Team1_Flag";
            addtimer 2000, "Flavius_CTF::OnAlphaFlash";
            stopnpctimer;
        }
        else if( getcharid(4) == $@BG_Team1 )
        {
            if( .Flag_Status == 0 && getvariableofnpc(.Flag_Carrier,"Team2_Flag") == getcharid(0) )
            {
                set getvariableofnpc(.Flag_Carrier,"Team2_Flag"),0;
                set .Flag_Carrier, 0;
                mapannounce "bat_b02","Omega Crystal Captured by [ " + strcharinfo(0) + " ]!!",1,bg_get_data($@BG_Team2,4);
                bg_rankpoints "ctf_captured",1;
                pcblock 1,0; // UnBlock Skills/Items
                stopnpctimer;
                donpcevent "Flavius_CTF::OnTeam1Score";
            }
            else if( .Flag_Status == 1 )
            {
                mapannounce "bat_b02","Alpha Crystal Returned by [ " + strcharinfo(0) + " ]!!",1,bg_get_data($@BG_Team1,4);
                bg_rankpoints "fame",1;
                disablenpc "Team1_Flag";
                sleep 2000;
                movenpc "Team1_Flag",328,150; // Back to Base
                set .Flag_Status, 0;
                initnpctimer;
                enablenpc "Team1_Flag";
            }
        }
        end;
    
    
    OnTimer2000:
        stopnpctimer;
        if( .Flag_Status < 2 )
        {
            getmapxy .@m$, .@x, .@y, 1;
            viewpointmap "bat_b02",1, .@x, .@y, 1, bg_get_data($@BG_Team1,4);
            specialeffect 223;
            initnpctimer;
        }
        end;
    
    
    OnBase:
        movenpc "Team1_Flag",328,150;
        set .Flag_Status, 0;
        set .Flag_Carrier, 0;
        initnpctimer;
        enablenpc "Team1_Flag";
        end;
    }
    
    
    bat_b02,62,150,0    script    Omega Crystal::Team2_Flag    1915,1,1,{
        end;
    
    
    OnTouch:
        if( $@BG_Status != 1 || getvariableofnpc(.BG_Arena$,"BG_Queue_Join") != "Flavius_CTF" || HP < 1 )
            end;
    
    
        if( getcharid(4) == $@BG_Team1 && .Flag_Status < 2 )
        { // Flag Captured
            set .Flag_Status, 2; // Taken
            set .Flag_Carrier, getcharid(0);
    
    
            sc_end SC_HIDING;
            sc_end SC_CLOAKING;
            sc_end SC_CHASEWALK;
            // Renewal invisibility
            sc_end SC_CLOAKINGEXCEED;
            sc_end SC_CAMOUFLAGE;
            sc_end SC__INVISIBILITY;
    
    
            pcblock 1,1; // Block Skills/Items
    
    
            mapannounce "bat_b02","Omega Crystal Taken by [ " + strcharinfo(0) + " ]",1,bg_get_data($@BG_Team2,4);
            bg_rankpoints "ctf_taken",1;
            disablenpc "Team2_Flag";
            addtimer 2000, "Flavius_CTF::OnOmegaFlash";
            stopnpctimer;
        }
        else if( getcharid(4) == $@BG_Team2 )
        {
            if( .Flag_Status == 0 && getvariableofnpc(.Flag_Carrier,"Team1_Flag") == getcharid(0) )
            {
                set getvariableofnpc(.Flag_Carrier,"Team1_Flag"),0;
                set .Flag_Carrier, 0;
                mapannounce "bat_b02","Alpha Crystal Captured by [ " + strcharinfo(0) + " ]!!",1,bg_get_data($@BG_Team1,4);
                bg_rankpoints "ctf_captured",1;
                pcblock 1,0; // UnBlock Skills/Items
                stopnpctimer;
                donpcevent "Flavius_CTF::OnTeam2Score";
            }
            else if( .Flag_Status == 1 )
            {
                mapannounce "bat_b02","Omega Crystal Returned by [ " + strcharinfo(0) + " ]!!",1,bg_get_data($@BG_Team2,4);
                bg_rankpoints "fame",1;
                disablenpc "Team2_Flag";
                sleep 2000;
                movenpc "Team2_Flag",62,150; // Back to Base
                set .Flag_Status, 0;
                initnpctimer;
                enablenpc "Team2_Flag";
            }
        }
        end;
    
    
    OnTimer2000:
        stopnpctimer;
        if( .Flag_Status < 2 )
        {
            getmapxy .@m$, .@x, .@y, 1;
            viewpointmap "bat_b02",1, .@x, .@y, 2, bg_get_data($@BG_Team2,4);
            specialeffect 223;
            initnpctimer;
        }
        end;
    
    
    OnBase:
        movenpc "Team2_Flag",62,150;
        set .Flag_Status, 0;
        set .Flag_Carrier, 0;
        initnpctimer;
        enablenpc "Team2_Flag";
        end;
    }
    
    
    // Battleground Engine
    // *********************************************************************
    
    
    -    script    Flavius_CTF    -1,{
        end;
    
    
    OnAlphaFlash:
        if( getvariableofnpc(.Flag_Carrier,"Team1_Flag") == getcharid(0) && $@BG_Status == 1 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" )
        {
            getmapxy .@m$, .@x, .@y, 0;
            viewpointmap "bat_b02",1, .@x, .@y, 1, bg_get_data($@BG_Team1,4);
            specialeffect2 73;
            emotion e_hlp,1;
            addtimer 2000, "Flavius_CTF::OnAlphaFlash";
            percentheal -5,-5;
        }
        end;
    
    
    OnOmegaFlash:
        if( getvariableofnpc(.Flag_Carrier,"Team2_Flag") == getcharid(0) && $@BG_Status == 1 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" )
        {
            getmapxy .@m$, .@x, .@y, 0;
            viewpointmap "bat_b02",1, .@x, .@y, 2, bg_get_data($@BG_Team2,4);
            specialeffect2 73;
            emotion e_hlp,1;
            addtimer 2000, "Flavius_CTF::OnOmegaFlash";
            percentheal -5,-5;
        }
        end;
    
    
    OnInit:
        disablenpc "Team1_Flag";
        disablenpc "Team2_Flag";
        end;
    
    
    OnTeam1Quit:
        setquest 8506; // Deserter
        set @killer_bg_src, 0;
        if( $@BG_Status != 0 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" )
            donpcevent "BG_Queue_Join::OnJoinEvent";
    OnTeam1Die:
        if( $@BG_Status == 1 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" && getvariableofnpc(.Flag_Carrier,"Team2_Flag") == getcharid(0) )
        { // Drop Flag
            set getvariableofnpc(.Flag_Carrier,"Team2_Flag"), 0;
            pcblock 1,0; // UnBlock Skills/Items
            getmapxy .@m$, .@x, .@y, 0;
            movenpc "Team2_Flag", .@x, .@y;
            mapannounce "bat_b02","Omega Flag Droped by [ " + strcharinfo(0) + " ]",1,bg_get_data($@BG_Team2,4);
            bg_rankpoints "ctf_droped",1;
            bg_rankpoints "fame",1,@killer_bg_src;
            set getvariableofnpc(.Flag_Status,"Team2_Flag"), 1; // OnFloor
            initnpctimer "Team2_Flag";
            enablenpc "Team2_Flag";
        }
        end;
        
    OnTeam2Quit:
        setquest 8506; // Deserter
        set @killer_bg_src, 0;
        if( $@BG_Status != 0 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" )
            donpcevent "BG_Queue_Join::OnJoinEvent";
    OnTeam2Die:
        if( $@BG_Status == 1 && getvariableofnpc(.BG_Arena$,"BG_Queue_Join") == "Flavius_CTF" && getvariableofnpc(.Flag_Carrier,"Team1_Flag") == getcharid(0) )
        { // Drop Flag
            set getvariableofnpc(.Flag_Carrier,"Team1_Flag"), 0;
            pcblock 1,0; // UnBlock Skills/Items
            getmapxy .@m$, .@x, .@y, 0;
            movenpc "Team1_Flag", .@x, .@y;
            mapannounce "bat_b02","Alpha Flag Droped by [ " + strcharinfo(0) + " ]",1,bg_get_data($@BG_Team1,4);
            bg_rankpoints "ctf_droped",1;
            bg_rankpoints "fame",1,@killer_bg_src;
            set getvariableofnpc(.Flag_Status,"Team1_Flag"), 1; // OnFloor
            initnpctimer "Team1_Flag";
            enablenpc "Team1_Flag";
        }
        end;
    
    
    OnBuildTeams:
        set $@BG_Team1,bg_team_create("bat_b02",390,10,0,"Flavius_CTF::OnTeam1Quit","Flavius_CTF::OnTeam1Die");
        set $@BG_Team2,bg_team_create("bat_b02",10,290,1,"Flavius_CTF::OnTeam2Quit","Flavius_CTF::OnTeam2Die");
        end;
    
    
    OnReady:
        if( getvariableofnpc(.BG_Arena$,"BG_Queue_Join") != "Flavius_CTF" )
            end;
    
    
        initnpctimer;
        // BG Variables
        set .Team1_Score, 0;
        set .Team2_Score, 0;
        sleep 2000;
        bg_warp $@BG_Team1,"bat_b02",311,224;
        bg_warp $@BG_Team2,"bat_b02",87,75;
        sleep 2000;
        // Respawn NPC's
        donpcevent "#guictf_respawn::OnBGStart";
        donpcevent "#croctf_respawn::OnBGStart";
        // Start Match!!
        donpcevent "Flavius_CTF::OnMatchStart";
        end;
    
    
    OnMatchStart:
        if( $@BG_Status != 1 || getvariableofnpc(.BG_Arena$,"BG_Queue_Join") != "Flavius_CTF" )
            end;
    
    
        // Flags2Base
        donpcevent "Team1_Flag::OnBase";
        donpcevent "Team2_Flag::OnBase";
        mapannounce "bat_b02","The Flags have been set to their Bases!!",8;
        end;
    
    
    OnTeam1Score:
        set .Team1_Score, .Team1_Score + 1;
        donpcevent "Flavius_CTF::OnMatchStop";
        end;
    
    
    OnTeam2Score:
        set .Team2_Score, .Team2_Score + 1;
        donpcevent "Flavius_CTF::OnMatchStop";
        end;
    
    
    OnMatchStop:
        disablenpc "Team1_Flag";
        disablenpc "Team2_Flag";
        bg_updatescore "bat_b02",.Team1_Score,.Team2_Score;
    
    
        viewpointmap "bat_b02",2, 0, 0, 1, 0x0000FF;
        viewpointmap "bat_b02",2, 0, 0, 2, 0xFF0000;
        
        if( .Team1_Score > 2 )
        { // Team 1 Won
            mapannounce "bat_b02","The " + bg_get_data($@BG_Team1,2) + " army has won the Battle of Flavius CTF!",1,bg_get_data($@BG_Team1,4);
            donpcevent "Flavius_CTF::OnMatchEnd";
        }
        else if( .Team2_Score > 2 )
        { // Team 2 Won
            mapannounce "bat_b02","The " + bg_get_data($@BG_Team2,2) + " army has won the Battle of Flavius CTF!",1,bg_get_data($@BG_Team2,4);
            donpcevent "Flavius_CTF::OnMatchEnd";
        }
        else
        { // Keep Playing
            sleep 8000;
            donpcevent "Flavius_CTF::OnMatchStart";
        }
        end;
    
    
    OnTimer600000:
        mapannounce "bat_b02","The Battle will ends in 5 minutes!!",1,0xA0522D;
        end;
    
    
    OnTimer840000:
        mapannounce "bat_b02","The Battle will ends in 1 minute!!",1,0xA0522D;
        end;
    
    
    OnTimer900000:
        disablenpc "Team1_Flag";
        disablenpc "Team2_Flag";
    
    
        viewpointmap "bat_b02",2, 0, 0, 1, bg_get_data($@BG_Team1,4);
        viewpointmap "bat_b02",2, 0, 0, 2, bg_get_data($@BG_Team2,4);
    
    
        if( .Team1_Score > .Team2_Score )
            mapannounce "bat_b02","The " + bg_get_data($@BG_Team1,2) + " army has won the Battle of Flavius CTF!",1,bg_get_data($@BG_Team1,4);
        else if( .Team1_Score < .Team2_Score )
            mapannounce "bat_b02","The " + bg_get_data($@BG_Team2,2) + " army has won the Battle of Flavius CTF!",1,bg_get_data($@BG_Team2,4);
        else
            mapannounce "bat_b02","The battle is over. This is a Tie...!",1,0xA0522D;
        donpcevent "Flavius_CTF::OnMatchEnd";
        end;
    
    
    OnMatchEnd:
        stopnpctimer;
        disablenpc "Team1_Flag";
        disablenpc "Team2_Flag";
        donpcevent "#guictf_respawn::OnBGStop";
        donpcevent "#croctf_respawn::OnBGStop";
        set $@BG_Status, 2;
        // =======================================================
        // Team Rewards
        // =======================================================
        if( .Team1_Score > .Team2_Score )
        {
            bg_reward $@BG_Team1,7227,30 + .Team1_Score,0,0,"BG_CTF",1,3,0;
            bg_reward $@BG_Team2,7227,10 + .Team2_Score,0,0,"BG_CTF",1,3,2;
        }
        else if( .Team2_Score > .Team1_Score )
        {
            bg_reward $@BG_Team1,7227,30 + .Team1_Score,0,0,"BG_CTF",1,3,2;
            bg_reward $@BG_Team2,7227,10 + .Team2_Score,0,0,"BG_CTF",1,3,0;
        }
        else
        {
            bg_reward $@BG_Team1,7227,10 + .Team1_Score,0,0,"BG_CTF",1,3,1;
            bg_reward $@BG_Team2,7227,10 + .Team2_Score,0,0,"BG_CTF",1,3,1;
        }
        // =======================================================
        set .Team1_Score, 0;
        set .Team2_Score, 0;
        sleep 5000;
        donpcevent "BG_Queue_Join::OnRotate";
        bg_updatescore "bat_b02",0,0;
        end;
    }
    
    
    // Battleground Therapist
    // *********************************************************************
    
    
    bat_b02,390,13,5    script    Therapist in battle#ctf1    95,{
        mes "[Therapist in battle]";
        mes "Just close your eyes, and take a deep breathe.";
        mes "You can be free from pain.";
        specialeffect2 312;
        percentheal 100,100;
        repairall;
        close2;
        openstorage;
        end;
    }
    
    
    bat_b02,10,293,5    script    Therapist in battle#ctf2    95,{
        mes "[Therapist in battle]";
        mes "Just close your eyes, and take a deep breathe.";
        mes "You can be free from pain.";
        specialeffect2 312;
        percentheal 100,100;
        repairall;
        close2;
        openstorage;
        end;
    }
    
    
    // Battleground Respawn
    // *********************************************************************
    
    
    bat_b02,390,10,0    script    #guictf_respawn    139,{
        end;
    
    
    OnBGStart:
        initnpctimer;
        end;
    
    
    OnBGStop:
        stopnpctimer;
        end;
    
    
    OnTimer24000:
        misceffect 83;
        end;
    
    
    OnTimer25000:
        areapercentheal "bat_b02",382,2,397,17,100,100;
        areawarp "bat_b02",382,2,397,17,"bat_b02",311,224;
        initnpctimer;
        end;
    }
    
    
    bat_b02,10,290,0    script    #croctf_respawn    139,{
        end;
    
    
    OnBGStart:
        initnpctimer;
        end;
    
    
    OnBGStop:
        stopnpctimer;
        end;
    
    
    OnTimer24000:
        misceffect 83;
        end;
    
    
    OnTimer25000:
        areapercentheal "bat_b02",2,282,17,297,100,100;
        areawarp "bat_b02",2,282,17,297,"bat_b02",87,75;
        initnpctimer;
        end;
    }
    
    
    // Flags
    // *********************************************************************
    
    
    bat_b02,304,231,1    duplicate(Base Flag#bg)    Alpha Base#bat23    973
    bat_b02,319,231,1    duplicate(Base Flag#bg)    Alpha Base#bat24    973
    bat_b02,304,218,1    duplicate(Base Flag#bg)    Alpha Base#bat25    973
    bat_b02,319,218,1    duplicate(Base Flag#bg)    Alpha Base#bat26    973
    bat_b02,304,231,1    duplicate(Base Flag#bg)    Alpha Base#bat27    973
    bat_b02,304,231,1    duplicate(Base Flag#bg)    Alpha Base#bat28    973
    bat_b02,335,142,1    duplicate(Base Flag#bg)    Alpha Base#bat29    973
    bat_b02,335,157,1    duplicate(Base Flag#bg)    Alpha Base#bat30    973
    bat_b02,390,16,1    duplicate(Base Flag#bg)    Alpha Base#bat31    973
    bat_b02,292,163,1    duplicate(Base Flag#bg)    Alpha Base#bat32    973
    bat_b02,292,136,1    duplicate(Base Flag#bg)    Alpha Base#bat33    973
    bat_b02,241,185,1    duplicate(Base Flag#bg)    Alpha Base#bat34    973
    bat_b02,247,179,1    duplicate(Base Flag#bg)    Alpha Base#bat35    973
    
    
    bat_b02,96,81,1    duplicate(Base Flag#bg)    Omega Base#bat22    974
    bat_b02,96,68,1    duplicate(Base Flag#bg)    Omega Base#bat23    974
    bat_b02,79,81,1    duplicate(Base Flag#bg)    Omega Base#bat24    974
    bat_b02,79,68,1    duplicate(Base Flag#bg)    Omega Base#bat25    974
    bat_b02,96,81,1    duplicate(Base Flag#bg)    Omega Base#bat26    974
    bat_b02,96,81,1    duplicate(Base Flag#bg)    Omega Base#bat27    974
    bat_b02,59,164,1    duplicate(Base Flag#bg)    Omega Base#bat28    974
    bat_b02,59,137,1    duplicate(Base Flag#bg)    Omega Base#bat29    974
    bat_b02,10,296,1    duplicate(Base Flag#bg)    Omega Base#bat30    974
    bat_b02,110,162,1    duplicate(Base Flag#bg)    Omega Base#bat31    974
    bat_b02,110,137,1    duplicate(Base Flag#bg)    Omega Base#bat32    974
    bat_b02,152,120,1    duplicate(Base Flag#bg)    Omega Base#bat33    974
    bat_b02,158,114,1    duplicate(Base Flag#bg)    Omega Base#bat34    974
    
    
    // MapFlags
    // *********************************************************************
    
    
    bat_b02    mapflag    battleground    2
    bat_b02    mapflag    nomemo
    bat_b02    mapflag    nosave    SavePoint
    bat_b02    mapflag    noteleport
    bat_b02    mapflag    nowarp
    bat_b02    mapflag    nowarpto
    bat_b02    mapflag    noreturn
    bat_b02    mapflag    nobranch
    bat_b02    mapflag    nopenalty
    bat_b02    mapflag    noemergencycall
     

     

    napalitan ko na kasi ng TCG yan ung 7227 kaso wala namanng reward ngayon na nalabas

×
×
  • Create New...