Jump to content

erby

Members
 View Profile  See their activity

  • Posts

    41

  • Joined

  • Last visited

 Content Type 

Posts posted by erby

    Pa help sa disguise event.

    in Tulong para sa Script at Database

    Posted

    Bakit hindi mo gamitin ang original script ng rathena?

     

    https://github.com/rathena/rathena/blob/master/npc/custom/events/disguise.txt

    Sir kapag ginagamit ko yang script ng disguise event ng rathena.. lalo hindi gumagana eh.. kht wala space at meron space bago itype ang monster name.. wala hindi tumutugma sa monster.. ano kaya possible na problema? kapag naman ung athena gamit ko need ko pa mag space para lang gumana.. ito naman sa rathena kht may space at wala space hindi tinatangap ung answer... pa help pa po.. thx

    Pa help sa disguise event.

    in Tulong para sa Script at Database

    Posted

    Hindi gumagana mga boss kapag sumasagot ng walang space sa una..

    kapag may space naman chaka siya gumagana..

    Papano kaya alisin o fix ung space s script na ito?

     

    Example : Disguise ay Poring

    Poring - hindi tangapin

     Poring - ito ang tama ung may space sa una

     

     

    Sana matulongan nyo ako.. salamat.

     

    Ito ang Script

     

    //===== Athena Script ========================================

    //= Disguise event NPC
    //===== Credits to ===========================================
    //= Created by : GmOcean
    //= Re-Edit  : --
    //===== Current Version: =====================================
    //= 5.0
    //===== Compatible With: =====================================
    //= Any Athena Version
    //===== Description: =========================================
    //= You may modify this script at your own risk
    //===== Additional Comments: =================================
     
    prontera,97,174,5 script Disguise Event 795,{
    //--- Basic Script Configuration Options ---//
    set [email protected]$,"[^0000FFDisguise NPC^000000]"; //<- NPC Name.
    set [email protected],60; //<- GM Level needed to be considered a GM.
    //--- The Script ---//
    if (getgmlevel()>[email protected]){goto GM_Player;}
     
    mes "Welcome, how may i be of assistance.";
    menu "Information",iInfo,"Nothing, just passing through.",iNothing;
      iInfo:
      next;
      mes "This event is actually quite simple";
      mes "At the start of the event, I will disguise myself";
      mes "into a monster randomly. You will then merely have to shout that monsters name outloud.";
      next;
      mes "If you get it correct, you get a prize. If not, then keep trying.";
    mes "Thatis all there is to know about this event.";
    close;
    iNothing:
    close;
    GM_Player:
    mes "Please select an Option to modify.";
    menu "Turn ON/OFF Event",iEvent,"Event Settings",iSettings;
      iEvent:
      next;
      if ([email protected]){mes "The Event is currently: [^0000FFON^000000]";
      mes "Would you like to turn it OFF?";}
      if ([email protected]){mes "The Event is currently: [^FF0000OFF^000000]";
      mes "Would you like to turn it ON?";}
      menu "Yes",iYes,"No",iNothing;
        iYes:
       setnpctimer 0; stopnpctimer;
     announce "A GM has decided to turn the Disguise Event off. As a result no prizes will be given.",bc_map | bc_blue;
       deletepset 1;
     setnpcdisplay "Disguise Event",795;
     close;}
     set [email protected],1; set [email protected],1; setnpctimer 0; initnpctimer;
     announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue;
     announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
     close;
    iSettings:
    next;
    mes "Please select a setting to modify.";
    menu "Monster Display",iMonster,"Number of Rounds",iRounds,"Prize Settings",iPrize;
     iMonster:
     callfunc "Monster_Display";
     iRounds:
     callfunc "Rounds";
     iPrize:
     callfunc "Prize";
     
    OnInit:
    defpattern 1,"([^:]+):.*\\sOMFGBBQLEETSAUCEGMOCEANRULESHAI!!.*", "iCorrect";
    activatepset 1;
    set $Points,$Points;
    set $Rounds,$Rounds;
    set $Prize,$Prize;
    set $PrizeAmt,$PrizeAmt;
    set $Rule,$Rule;
    setarray [email protected][0],1511,1674,1785,1039,1874,1272,1719,1046,1389,1112,1115,1658,1957,1418,1871,1252,1786,1086,1885,1649,1651,1832,1492,1734,1251,1779,1688,1646,1373,1147,1059,1150,1956,1087,1190,1038,1157,1159,1052,1623,1916,1650,1583,1389,1312,1751,1685,1630,1648;
    setarray [email protected][0],1003,1006,1017,1021,1022,1027,1043,1136,1168,1171,1172,1173,1181,1210,1217,1218,1223,1284,1407,1411,1414,1495,1501,1900;
    end;
    OnClock0000:
    OnClock0200:
    OnClock0400:
    OnClock0600:
    OnClock0800:
    OnClock1000:
    OnClock1200:
    OnClock1400:
    OnClock1600:
    OnClock1800:
    OnClock2000:
    OnClock2200:
    announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue;
    announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
    setnpctimer 0;
    initnpctimer;
    end;
    OnTimer10000:
    goto iDisguise;
    //donpcevent "DisguiseEvent::OnDisguise";
    end;
    OnTimer30000:
    setnpcdisplay "Disguise Event",795;
    npctalk "You took too long to guess what i was. Please wait 10 seconds while i disguise again.";
    specialeffect 725;
    set $MonsterName$,"OMFGBBQLEETSAUCEGMOCEANRULESHAI!!";
    deletepset 1;
    stopnpctimer;
    setnpctimer 0;
    initnpctimer;
    end;
    OnTimer60000:
    if ([email protected]!=1){end;}
     {announce "The Disguise Event will begin in 2 minutes.",bc_all | bc_blue;
      announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
    end;}
    OnTimer120000:
    if ([email protected]!=1){end;}
     {announce "The Disguise Event will begin 1 minute.",bc_all | bc_blue;
      announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
    end;}
    OnTimer180000:
    if ([email protected]!=1){end;}
     {announce "The Disguise Event has begun!",bc_all | bc_blue;
      announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
    set [email protected],0; stopnpctimer; 
    setnpctimer 0; initnpctimer;
    goto iDisguise;
    //donpcevent "DisguiseEvent::OnDisguise";
    end;}
    announce "Something went wrong with the Disguise Event.",bc_all | bc_blue;
    announce "Please notify a GM ASAP. Thank you.",bc_all | bc_blue;
    end;
    iDisguise:
    if ($Rule==1)
      set [email protected],1000+rand(1,995);
      {goto iDisguise;}}
      if ([email protected][email protected]){goto iDisguise;}
      set $MonsterName$,getmonsterinfo([email protected],0);}
    if ($Rule==2)
      set [email protected],rand(49);
      set $MonsterName$,getmonsterinfo([email protected][[email protected]],0);}
    deletepset 1;
    defpattern 1,"([^:]+):.*\\s"+$MonsterName$+".*", "iCorrect";
    activatepset 1;
    if ($Rule==1){setnpcdisplay "Disguise Event",[email protected];}
    if ($Rule==2){setnpcdisplay "Disguise Event",[email protected][[email protected]];}
    setnpctimer 0;
    //npctalk ""[email protected]+", "+$MonsterName$+"";
    end;
    iCorrect:
    if ([email protected]){dispbottom "Someone has already won this round."; end;}
    deletepset 1;
    defpattern 1,"([^:]+):.*\\sOMFGBBQLEETSAUCEGMOCEANRULESHAI!!.*", "iFailCheater";
    activatepset 1;
    getitem $Prize,$PrizeAmt;
    announce ""+strcharinfo(0)+" is correct! I was disguised as: "+$MonsterName$+"",bc_map | bc_blue;
    if ([email protected]>=$Rounds)
      {setnpcdisplay "Disguise Event",795;
       setnpctimer 0; stopnpctimer;
       npctalk "Thank you all for playing. That was the last round of the Disguise Event. Come play again later.";
    end;}
    setnpcdisplay "Disguise Event",795;
    setnpctimer 0;
    end;
    }
    //--- The Functions ---//
    function script Rounds {
    next;
    mes "Please Input the number of rounds you want the event to last.";
    mes "Current Number of Roudns: [^0000FF"+$Rounds+"^000000]";
    set $Rounds,[email protected];
    next;
    mes "The number of rounds has been changed successfully.";
    mes "Number of Rounds: [^0000FF"+$Rounds+"^000000]";
    mes "Come again.";
    close;
    }
    function script Prize {
    next;
    mes "Please Input the ItemID of the prize that will be given each round.";
    mes "Current Items is: [^0000FF"+getitemname($Prize)+"^000000] ItemID - ^0000FF"+$Prize+"^000000";
    if (getitemname([email protected])=="" || getitemname([email protected])=="null")
     {next; mes "That item does not exist. Please try again."; close;}
    set $Prize,[email protected];
    next;
    mes "Please Input the Ammount that is to be given.";
     {next; mes "That ammount is invalid. Using default ammount of 1.";}
    set $PrizeAmt,[email protected];
    next;
    mes "The Prize has been changed successfully.";
    mes "Prize: [^0000FF"+getitemname($Prize)+"^000000]x(^0000FF"+$PrizeAmt+"^000000)";
    close;
    }
    function script Monster_Display {
    setarray [email protected][0],0,1,2;
    setarray [email protected]$[0],"","Transform as all monsters.","Transform as MvP's only.";
    next;
    mes "Please select a Disguise Rule.";
    mes "Rule 1 - Transform as all monsters.";
    mes "Rule 2 - Transform as MvP's only.";
    menu "Rule 1:Rule 2",iRule;
    iRule:
    set $Rule,[email protected][@menu];
    next;
    mes "The Disguise Rule, has been changed successfully.";
    mes "Current Rule: ^0000FF"+$Rule+"^000000 - ^0000FF"[email protected]$[@menu]+"^000000";
    close;
    }

     

    Help guys, Disguise Event bug

    in Scripting Support

    Posted · Edited by Emistry
    codebox

    How can fix this bug,?

     

    Not working if you answer without space of the correct name of monster..?

     

    Thanks Guys..godbless /no1

    //===== Athena Script ========================================
//= Disguise event NPC
//===== Credits to ===========================================
//= Created by : GmOcean
//= Re-Edit  : --
//===== Current Version: =====================================
//= 5.0
//===== Compatible With: =====================================
//= Any Athena Version
//===== Description: =========================================
//= You may modify this script at your own risk
//===== Additional Comments: =================================

prontera,97,174,5 script Disguise Event 795,{
//--- Basic Script Configuration Options ---//
set [email protected]$,"[^0000FFDisguise NPC^000000]"; //<- NPC Name.
set [email protected],60; //<- GM Level needed to be considered a GM.
//--- The Script ---//
if (getgmlevel()>[email protected]){goto GM_Player;}
if ([email protected]){end;}

mes [email protected]$;
mes "Welcome, how may i be of assistance.";
menu "Information",iInfo,"Nothing, just passing through.",iNothing;
  iInfo:
  next;
  mes [email protected]$;
  mes "This event is actually quite simple";
  mes "At the start of the event, I will disguise myself";
  mes "into a monster randomly. You will then merely have to shout that monsters name outloud.";
  next;
  mes "If you get it correct, you get a prize. If not, then keep trying.";
mes "Thatis all there is to know about this event.";
close;
iNothing:
close;
GM_Player:
mes [email protected]$;
mes "Please select an Option to modify.";
menu "Turn ON/OFF Event",iEvent,"Event Settings",iSettings;
  iEvent:
  next;
  mes [email protected]$;
  if ([email protected]){mes "The Event is currently: [^0000FFON^000000]";
  mes "Would you like to turn it OFF?";}
  if ([email protected]){mes "The Event is currently: [^FF0000OFF^000000]";
  mes "Would you like to turn it ON?";}
  menu "Yes",iYes,"No",iNothing;
    iYes:
    if ([email protected])
  {set [email protected],0; set [email protected],0;
   setnpctimer 0; stopnpctimer;
 announce "A GM has decided to turn the Disguise Event off. As a result no prizes will be given.",bc_map | bc_blue;
   deletepset 1;
 setnpcdisplay "Disguise Event",795;
 close;}
 set [email protected],1; set [email protected],1; setnpctimer 0; initnpctimer;
 set [email protected],[email protected]+1;
 announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue;
 announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
 close;
iSettings:
next;
mes [email protected]$;
mes "Please select a setting to modify.";
menu "Monster Display",iMonster,"Number of Rounds",iRounds,"Prize Settings",iPrize;
 iMonster:
 callfunc "Monster_Display";
 iRounds:
 callfunc "Rounds";
 iPrize:
 callfunc "Prize";

OnInit:
defpattern 1,"([^:]+):.*\\sOMFGBBQLEETSAUCEGMOCEANRULESHAI!!.*", "iCorrect";
activatepset 1;
set [email protected],0;
set [email protected],0;
set [email protected],0;
set $Points,$Points;
set [email protected],0;
set $Rounds,$Rounds;
set $Prize,$Prize;
set $PrizeAmt,$PrizeAmt;
set $Rule,$Rule;
setarray [email protected][0],1511,1674,1785,1039,1874,1272,1719,1046,1389,1112,1115,1658,1957,1418,1871,1252,1786,1086,1885,1649,1651,1832,1492,1734,1251,1779,1688,1646,1373,1147,1059,1150,1956,1087,1190,1038,1157,1159,1052,1623,1916,1650,1583,1389,1312,1751,1685,1630,1648;
setarray [email protected][0],1003,1006,1017,1021,1022,1027,1043,1136,1168,1171,1172,1173,1181,1210,1217,1218,1223,1284,1407,1411,1414,1495,1501,1900;
end;
OnClock0000:
OnClock0200:
OnClock0400:
OnClock0600:
OnClock0800:
OnClock1000:
OnClock1200:
OnClock1400:
OnClock1600:
OnClock1800:
OnClock2000:
OnClock2200:
set [email protected],[email protected]+1;
set [email protected],1;
set [email protected],1;
set [email protected],1;
announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue;
announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
setnpctimer 0;
initnpctimer;
end;
OnTimer10000:
if ([email protected]){end;}
if ([email protected]){end;}
set [email protected],0;
goto iDisguise;
//donpcevent "DisguiseEvent::OnDisguise";
end;
OnTimer30000:
if ([email protected]){end;}
set [email protected],0;
setnpcdisplay "Disguise Event",795;
npctalk "You took too long to guess what i was. Please wait 10 seconds while i disguise again.";
specialeffect 725;
set $MonsterName$,"OMFGBBQLEETSAUCEGMOCEANRULESHAI!!";
deletepset 1;
stopnpctimer;
setnpctimer 0;
initnpctimer;
end;
OnTimer60000:
if ([email protected]!=1){end;}
if ([email protected]==1)
 {announce "The Disguise Event will begin in 2 minutes.",bc_all | bc_blue;
  announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
end;}
OnTimer120000:
if ([email protected]!=1){end;}
if ([email protected]==1)
 {announce "The Disguise Event will begin 1 minute.",bc_all | bc_blue;
  announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
end;}
OnTimer180000:
if ([email protected]!=1){end;}
if ([email protected]==1)
 {announce "The Disguise Event has begun!",bc_all | bc_blue;
  announce "The Event is being held in Event Area, go if you want to join, thank you.",bc_all | bc_blue;
set [email protected],0; stopnpctimer; 
setnpctimer 0; initnpctimer;
goto iDisguise;
//donpcevent "DisguiseEvent::OnDisguise";
end;}
announce "Something went wrong with the Disguise Event.",bc_all | bc_blue;
announce "Please notify a GM ASAP. Thank you.",bc_all | bc_blue;
end;
iDisguise:
if ($Rule==1)
 {set [email protected],0;
  set [email protected],1000+rand(1,995);
for(set [email protected],0; [email protected]<getarraysize([email protected]); set [email protected],[email protected]+1)
{if ([email protected][email protected][[email protected]])
  {goto iDisguise;}}
  if ([email protected][email protected]){goto iDisguise;}
  set [email protected],[email protected];
  set $MonsterName$,getmonsterinfo([email protected],0);}
if ($Rule==2)
 {set [email protected],0;
  set [email protected],rand(49);
  set $MonsterName$,getmonsterinfo([email protected][[email protected]],0);}
deletepset 1;
defpattern 1,"([^:]+):.*\\s"+$MonsterName$+".*", "iCorrect";
activatepset 1;
if ($Rule==1){setnpcdisplay "Disguise Event",[email protected];}
if ($Rule==2){setnpcdisplay "Disguise Event",[email protected][[email protected]];}
set [email protected],1;
setnpctimer 0;
//npctalk ""[email protected]+", "+$MonsterName$+"";
end;
iCorrect:
if ([email protected]){dispbottom "Someone has already won this round."; end;}
set [email protected],1;
set [email protected],[email protected]+1;
deletepset 1;
defpattern 1,"([^:]+):.*\\sOMFGBBQLEETSAUCEGMOCEANRULESHAI!!.*", "iFailCheater";
activatepset 1;
getitem $Prize,$PrizeAmt;
announce ""+strcharinfo(0)+" is correct! I was disguised as: "+$MonsterName$+"",bc_map | bc_blue;
if ([email protected]>=$Rounds)
  {setnpcdisplay "Disguise Event",795;
   set [email protected],0; set [email protected],0;
   setnpctimer 0; stopnpctimer;
   npctalk "Thank you all for playing. That was the last round of the Disguise Event. Come play again later.";
end;}
setnpcdisplay "Disguise Event",795;
set [email protected],0;
setnpctimer 0;
end;
}
//--- The Functions ---//
function script Rounds {
next;
mes "Please Input the number of rounds you want the event to last.";
mes "Current Number of Roudns: [^0000FF"+$Rounds+"^000000]";
input [email protected];
set $Rounds,[email protected];
next;
mes "The number of rounds has been changed successfully.";
mes "Number of Rounds: [^0000FF"+$Rounds+"^000000]";
mes "Come again.";
close;
}
function script Prize {
next;
mes "Please Input the ItemID of the prize that will be given each round.";
mes "Current Items is: [^0000FF"+getitemname($Prize)+"^000000] ItemID - ^0000FF"+$Prize+"^000000";
input [email protected];
if (getitemname([email protected])=="" || getitemname([email protected])=="null")
 {next; mes "That item does not exist. Please try again."; close;}
set $Prize,[email protected];
next;
mes "Please Input the Ammount that is to be given.";
input [email protected];
if ([email protected]<=0 || [email protected]>=10000)
 {next; mes "That ammount is invalid. Using default ammount of 1.";}
set $PrizeAmt,[email protected];
next;
mes "The Prize has been changed successfully.";
mes "Prize: [^0000FF"+getitemname($Prize)+"^000000]x(^0000FF"+$PrizeAmt+"^000000)";
close;
}
function script Monster_Display {
setarray [email protected][0],0,1,2;
setarray [email protected]$[0],"","Transform as all monsters.","Transform as MvP's only.";
next;
mes "Please select a Disguise Rule.";
mes "Rule 1 - Transform as all monsters.";
mes "Rule 2 - Transform as MvP's only.";
menu "Rule 1:Rule 2",iRule;
iRule:
set $Rule,[email protected][@menu];
next;
mes "The Disguise Rule, has been changed successfully.";
mes "Current Rule: ^0000FF"+$Rule+"^000000 - ^0000FF"[email protected]$[@menu]+"^000000";
close;
}

     

    help BG script

    in Scripting Support

    Posted

    How to change emblem?

    because its the same emblem while fight, blue sword only (team1)and(team2)

     

    this is the script..

     

    thx godbless

     

     

    - script bg_pvp_round#control -1,{

    OnInit:
    .minplayer2start = 3; // minimum player to start
    .winningscore = 5; // how many rounds to win
    .eventlasting = 10*60; // event last 20 minutes or the system abort itself
    setarray .rewardwin, 7773,5, 7829,5, 7828,5, 673,5; // reward to winning team
    setarray .rewardlose, 673,5; // reward to losing team
     
    .rewardwinsize = getarraysize( .rewardwin );
    .rewardlosesize = getarraysize( .rewardlose );
    end;
    OnStart:
    if ( getwaitingroomstate( 0, .rednpcname$ ) < .minplayer2start || getwaitingroomstate( 0, .bluenpcname$ ) < .minplayer2start ) {
    announce "[ Battle Ground DeathMatch System ]  Blue Team : "+ getwaitingroomstate( 0, .bluenpcname$ ) + "/" + .minplayer2start + ". Red Team : "+ getwaitingroomstate( 0, .rednpcname$ ) + "/" + .minplayer2start,bc_all,0x00CED1;
    end;
    }
    announce "[ Battle Ground DeathMatch System ]  Battleground has started", bc_all, 0x00CED1;
    .red = waitingroom2bg( "prontera", 158,180, strnpcinfo(0)+"::OnRedQuit", strnpcinfo(0)+"::OnRedDead", .rednpcname$ );
    copyarray .team1aid, [email protected], [email protected];
    .team1count = .minplayer2start;
    .blue = waitingroom2bg( "prontera", 158,180, strnpcinfo(0)+"::OnBlueQuit", strnpcinfo(0)+"::OnBlueDead", .bluenpcname$ );
    copyarray .team2aid, [email protected], [email protected];
    .team2count = .minplayer2start;
    .life[1] = .life[2] = .minplayer2start;
    delwaitingroom .rednpcname$;
    delwaitingroom .bluenpcname$;
    disablenpc .rednpcname$;
    disablenpc .bluenpcname$;
    callsub L_setwall;
    bg_updatescore "pvp_n_1-5", 0, 0;
    bg_warp .red, "pvp_n_1-5", 65,99;
    bg_warp .blue, "pvp_n_1-5", 134,99;
    sleep 4000 * !.skip;
    mapannounce "pvp_n_1-5", "Kill all opponent team to gain 1 point, score "+ .winningscore +" points to win !", 0;
    sleep 2000 * !.skip;
    while (1) {
    mapannounce "pvp_n_1-5", "["+ [email protected] +"]", 0;
    sleep 1000 * !.skip;
    }
    if ( .score[1] == .winningscore -1 && .score[2] == .winningscore -1 )
    mapannounce "pvp_n_1-5", "Final Round start!", 0;
    else
    mapannounce "pvp_n_1-5", "Round "+ .round++ +" start!", 0;
    callsub L_delwall;
    .life[1] = .team1count;
    .life[2] = .team2count;
    sleep .eventlasting * 1000 * !.skip;
    bg_updatescore "pvp_n_1-5", .score[1], .score[2];
    if ( .score[1] == .winningscore || .score[2] == .winningscore || !.winside ) break;
    sleep 5000 * !.skip;
    callsub L_make_player_move;
    bg_warp .red, "pvp_n_1-5", 65,99;
    bg_warp .blue, "pvp_n_1-5", 134,99;
    callsub L_setwall;
    sleep 1000 * !.skip;
    .winside = 0;
    }
    if ( .winside ) {
    mapannounce "pvp_n_1-5", " "+ ( ( .winside == 1 )? "Red" : "Blue" ) +" side wins !", 0;
    callsub L_reward, .winside, .rewardwin, .rewardwinsize;
    callsub L_reward, ( .winside == 1 )? 2:1, .rewardlose, .rewardlosesize;
    } else
    mapannounce "pvp_n_1-5", "Time Out. Aborting the match.", 0;
    sleep 5000;
    callsub L_make_player_move;
    bg_warp .red, "prontera", 156,180;
    bg_warp .blue, "prontera", 156,180;
    bg_destroy .red;
    bg_destroy .blue;
    callsub L_delwall;
    deletearray .team1aid;
    deletearray .team2aid;
    .round = .winside = .skip = .score[1] = .score[2] = .team1count = .team2count = .life[1] = .life[2] = 0;
    enablenpc .rednpcname$;
    enablenpc .bluenpcname$;
    donpcevent .rednpcname$ +"::OnStart";
    donpcevent .bluenpcname$ +"::OnStart";
    end;
    L_reward:
    [email protected] = getarraysize( getd(".team"+ getarg(0) +"aid") );
    getitem getelementofarray( getarg(1), [email protected] ), getelementofarray( getarg(1), [email protected] +1 ), getd(".team"+ getarg(0) +"aid["+ [email protected] +"]" );
    return;
    L_setwall:
    setwall "pvp_n_1-5", 71,101, 6, 6, 0, "bg_pvp_round_red_1";
    setwall "pvp_n_1-5", 71,100, 6, 4, 0, "bg_pvp_round_red_2";
    setwall "pvp_n_1-5", 71,99, 6, 2, 0, "bg_pvp_round_red_3";
    setwall "pvp_n_1-5", 71,98, 6, 0, 0, "bg_pvp_round_red_4";
    setwall "pvp_n_1-5", 127,101, 6, 6, 0, "bg_pvp_round_blue_1";
    setwall "pvp_n_1-5", 127,100, 6, 4, 0, "bg_pvp_round_blue_2";
    setwall "pvp_n_1-5", 127,99, 6, 2, 0, "bg_pvp_round_blue_3";
    setwall "pvp_n_1-5", 127,98, 6, 0, 0, "bg_pvp_round_blue_4";
    return;
    L_delwall:
    delwall "bg_pvp_round_red_1";
    delwall "bg_pvp_round_red_2";
    delwall "bg_pvp_round_red_3";
    delwall "bg_pvp_round_red_4";
    delwall "bg_pvp_round_blue_1";
    delwall "bg_pvp_round_blue_2";
    delwall "bg_pvp_round_blue_3";
    delwall "bg_pvp_round_blue_4";
    return;
    L_make_player_move:
    attachrid getd(".team"+ [email protected] +"aid["+ [email protected] +"]" );
    }
    }
    return;
    OnRedQuit: callsub L_quit, 1, "Red", 2, "Blue";
    OnBlueQuit: callsub L_quit, 2, "Blue", 1, "Red";
    L_quit:
    percentheal 100, 100;
    while ( getd( ".team"+ getarg(0) +"aid["+ [email protected] +"]" ) != getcharid(3) && [email protected] < getd(".team"+ getarg(0) +"count") ) [email protected]++;
    deletearray getd( ".team"+ getarg(0) +"aid["+ [email protected] +"]" ), 1;
    setd ".team"+ getarg(0) +"count", getd(".team"+ getarg(0) +"count") -1;
    .life[ getarg(0) ]--;
    if ( !getd(".team"+ getarg(0) +"count") ) {
    mapannounce "pvp_n_1-5", "All "+ getarg(1) +" team members has Quit !", 0, 0xff3333; // purposely use different color
    .score[ getarg(2) ] = .winningscore;
    .winside = getarg(2);
    .skip = 1;
    awake strnpcinfo(0);
    }
    else if ( !.life[ getarg(0) ] ) {
    .winside = getarg(2);
    mapannounce "pvp_n_1-5", " "+ getarg(3) +" team has defeated the opponent team, "+ getarg(3) +" team score a point !", 0;
    .score[ getarg(2) ]++;
    awake strnpcinfo(0);
    }
    end;
    OnRedDead: callsub L_dead, 1, 2, "Blue";
    OnBlueDead: callsub L_dead, 2, 1, "Red";
    L_dead:
    .life[ getarg(0) ]--;
    if ( !.life[ getarg(0) ] ) {
    .winside = getarg(1);
    mapannounce "pvp_n_1-5", " "+ getarg(2) +" team has defeated the opponent team, "+ getarg(2) +" team score a point !", 0;
    .score[ getarg(1) ]++;
    awake strnpcinfo(0);
    }
    sleep2 1250;
    percentheal 100,100;
    end;
    }
     
    prontera,164,161,4 script Red side#bg_pvp_r 100,{
    end;
    OnInit:
    sleep 1;
    set getvariableofnpc( .rednpcname$, "bg_pvp_round#control" ), strnpcinfo(0);
    OnStart:
    waitingroom "Red Team", getvariableofnpc( .minplayer2start, "bg_pvp_round#control" ) +1, "bg_pvp_round#control::OnStart", 1;
    end;
    }
     
    prontera,147,161,5 script Blue side#bg_pvp_r 100,{
    end;
    OnInit:
    sleep 1;
    set getvariableofnpc( .bluenpcname$, "bg_pvp_round#control" ), strnpcinfo(0);
    OnStart:
    waitingroom "Blue Team", getvariableofnpc( .minplayer2start, "bg_pvp_round#control" ) +1, "bg_pvp_round#control::OnStart", 1;
    end;
    }
     
    pvp_n_1-5 mapflag battleground 2
    pvp_n_1-5 mapflag nosave SavePoint
    pvp_n_1-5 mapflag nowarp
    pvp_n_1-5 mapflag nowarpto
    pvp_n_1-5 mapflag noteleport
    pvp_n_1-5 mapflag nomemo
    pvp_n_1-5 mapflag nopenalty
    pvp_n_1-5 mapflag nobranch
    pvp_n_1-5 mapflag noicewall

     

     

    pa help mga kababayan..!

    in Tulong para sa Script at Database

    Posted · Edited by erby

    pano ichange emblem ung guilds dito sa battleground?

    parahas kasi ng emblem ung 2teams kaya nakakalito siya.. same blue sword..

     

    e2 ang script

     

    salamat po

     

     

    - script bg_pvp_round#control -1,{

    OnInit:
    .minplayer2start = 3; // minimum player to start
    .winningscore = 5; // how many rounds to win
    .eventlasting = 10*60; // event last 20 minutes or the system abort itself
    setarray .rewardwin, 7773,5, 7829,5, 7828,5, 673,5; // reward to winning team
    setarray .rewardlose, 673,5; // reward to losing team
     
    .rewardwinsize = getarraysize( .rewardwin );
    .rewardlosesize = getarraysize( .rewardlose );
    end;
    OnStart:
    if ( getwaitingroomstate( 0, .rednpcname$ ) < .minplayer2start || getwaitingroomstate( 0, .bluenpcname$ ) < .minplayer2start ) {
    announce "[ Battle Ground DeathMatch System ]  Blue Team : "+ getwaitingroomstate( 0, .bluenpcname$ ) + "/" + .minplayer2start + ". Red Team : "+ getwaitingroomstate( 0, .rednpcname$ ) + "/" + .minplayer2start,bc_all,0x00CED1;
    end;
    }
    announce "[ Battle Ground DeathMatch System ]  Battleground has started", bc_all, 0x00CED1;
    .red = waitingroom2bg( "prontera", 158,180, strnpcinfo(0)+"::OnRedQuit", strnpcinfo(0)+"::OnRedDead", .rednpcname$ );
    copyarray .team1aid, [email protected], [email protected];
    .team1count = .minplayer2start;
    .blue = waitingroom2bg( "prontera", 158,180, strnpcinfo(0)+"::OnBlueQuit", strnpcinfo(0)+"::OnBlueDead", .bluenpcname$ );
    copyarray .team2aid, [email protected], [email protected];
    .team2count = .minplayer2start;
    .life[1] = .life[2] = .minplayer2start;
    delwaitingroom .rednpcname$;
    delwaitingroom .bluenpcname$;
    disablenpc .rednpcname$;
    disablenpc .bluenpcname$;
    callsub L_setwall;
    bg_updatescore "pvp_n_1-5", 0, 0;
    bg_warp .red, "pvp_n_1-5", 65,99;
    bg_warp .blue, "pvp_n_1-5", 134,99;
    sleep 4000 * !.skip;
    mapannounce "pvp_n_1-5", "Kill all opponent team to gain 1 point, score "+ .winningscore +" points to win !", 0;
    sleep 2000 * !.skip;
    while (1) {
    mapannounce "pvp_n_1-5", "["+ [email protected] +"]", 0;
    sleep 1000 * !.skip;
    }
    if ( .score[1] == .winningscore -1 && .score[2] == .winningscore -1 )
    mapannounce "pvp_n_1-5", "Final Round start!", 0;
    else
    mapannounce "pvp_n_1-5", "Round "+ .round++ +" start!", 0;
    callsub L_delwall;
    .life[1] = .team1count;
    .life[2] = .team2count;
    sleep .eventlasting * 1000 * !.skip;
    bg_updatescore "pvp_n_1-5", .score[1], .score[2];
    if ( .score[1] == .winningscore || .score[2] == .winningscore || !.winside ) break;
    sleep 5000 * !.skip;
    callsub L_make_player_move;
    bg_warp .red, "pvp_n_1-5", 65,99;
    bg_warp .blue, "pvp_n_1-5", 134,99;
    callsub L_setwall;
    sleep 1000 * !.skip;
    .winside = 0;
    }
    if ( .winside ) {
    mapannounce "pvp_n_1-5", " "+ ( ( .winside == 1 )? "Red" : "Blue" ) +" side wins !", 0;
    callsub L_reward, .winside, .rewardwin, .rewardwinsize;
    callsub L_reward, ( .winside == 1 )? 2:1, .rewardlose, .rewardlosesize;
    } else
    mapannounce "pvp_n_1-5", "Time Out. Aborting the match.", 0;
    sleep 5000;
    callsub L_make_player_move;
    bg_warp .red, "prontera", 156,180;
    bg_warp .blue, "prontera", 156,180;
    bg_destroy .red;
    bg_destroy .blue;
    callsub L_delwall;
    deletearray .team1aid;
    deletearray .team2aid;
    .round = .winside = .skip = .score[1] = .score[2] = .team1count = .team2count = .life[1] = .life[2] = 0;
    enablenpc .rednpcname$;
    enablenpc .bluenpcname$;
    donpcevent .rednpcname$ +"::OnStart";
    donpcevent .bluenpcname$ +"::OnStart";
    end;
    L_reward:
    [email protected] = getarraysize( getd(".team"+ getarg(0) +"aid") );
    getitem getelementofarray( getarg(1), [email protected] ), getelementofarray( getarg(1), [email protected] +1 ), getd(".team"+ getarg(0) +"aid["+ [email protected] +"]" );
    return;
    L_setwall:
    setwall "pvp_n_1-5", 71,101, 6, 6, 0, "bg_pvp_round_red_1";
    setwall "pvp_n_1-5", 71,100, 6, 4, 0, "bg_pvp_round_red_2";
    setwall "pvp_n_1-5", 71,99, 6, 2, 0, "bg_pvp_round_red_3";
    setwall "pvp_n_1-5", 71,98, 6, 0, 0, "bg_pvp_round_red_4";
    setwall "pvp_n_1-5", 127,101, 6, 6, 0, "bg_pvp_round_blue_1";
    setwall "pvp_n_1-5", 127,100, 6, 4, 0, "bg_pvp_round_blue_2";
    setwall "pvp_n_1-5", 127,99, 6, 2, 0, "bg_pvp_round_blue_3";
    setwall "pvp_n_1-5", 127,98, 6, 0, 0, "bg_pvp_round_blue_4";
    return;
    L_delwall:
    delwall "bg_pvp_round_red_1";
    delwall "bg_pvp_round_red_2";
    delwall "bg_pvp_round_red_3";
    delwall "bg_pvp_round_red_4";
    delwall "bg_pvp_round_blue_1";
    delwall "bg_pvp_round_blue_2";
    delwall "bg_pvp_round_blue_3";
    delwall "bg_pvp_round_blue_4";
    return;
    L_make_player_move:
    attachrid getd(".team"+ [email protected] +"aid["+ [email protected] +"]" );
    }
    }
    return;
    OnRedQuit: callsub L_quit, 1, "Red", 2, "Blue";
    OnBlueQuit: callsub L_quit, 2, "Blue", 1, "Red";
    L_quit:
    percentheal 100, 100;
    while ( getd( ".team"+ getarg(0) +"aid["+ [email protected] +"]" ) != getcharid(3) && [email protected] < getd(".team"+ getarg(0) +"count") ) [email protected]++;
    deletearray getd( ".team"+ getarg(0) +"aid["+ [email protected] +"]" ), 1;
    setd ".team"+ getarg(0) +"count", getd(".team"+ getarg(0) +"count") -1;
    .life[ getarg(0) ]--;
    if ( !getd(".team"+ getarg(0) +"count") ) {
    mapannounce "pvp_n_1-5", "All "+ getarg(1) +" team members has Quit !", 0, 0xff3333; // purposely use different color
    .score[ getarg(2) ] = .winningscore;
    .winside = getarg(2);
    .skip = 1;
    awake strnpcinfo(0);
    }
    else if ( !.life[ getarg(0) ] ) {
    .winside = getarg(2);
    mapannounce "pvp_n_1-5", " "+ getarg(3) +" team has defeated the opponent team, "+ getarg(3) +" team score a point !", 0;
    .score[ getarg(2) ]++;
    awake strnpcinfo(0);
    }
    end;
    OnRedDead: callsub L_dead, 1, 2, "Blue";
    OnBlueDead: callsub L_dead, 2, 1, "Red";
    L_dead:
    .life[ getarg(0) ]--;
    if ( !.life[ getarg(0) ] ) {
    .winside = getarg(1);
    mapannounce "pvp_n_1-5", " "+ getarg(2) +" team has defeated the opponent team, "+ getarg(2) +" team score a point !", 0;
    .score[ getarg(1) ]++;
    awake strnpcinfo(0);
    }
    sleep2 1250;
    percentheal 100,100;
    end;
    }
     
    prontera,164,161,4 script Red side#bg_pvp_r 100,{
    end;
    OnInit:
    sleep 1;
    set getvariableofnpc( .rednpcname$, "bg_pvp_round#control" ), strnpcinfo(0);
    OnStart:
    waitingroom "Red Team", getvariableofnpc( .minplayer2start, "bg_pvp_round#control" ) +1, "bg_pvp_round#control::OnStart", 1;
    end;
    }
     
    prontera,147,161,5 script Blue side#bg_pvp_r 100,{
    end;
    OnInit:
    sleep 1;
    set getvariableofnpc( .bluenpcname$, "bg_pvp_round#control" ), strnpcinfo(0);
    OnStart:
    waitingroom "Blue Team", getvariableofnpc( .minplayer2start, "bg_pvp_round#control" ) +1, "bg_pvp_round#control::OnStart", 1;
    end;
    }
     
    pvp_n_1-5 mapflag battleground 2
    pvp_n_1-5 mapflag nosave SavePoint
    pvp_n_1-5 mapflag nowarp
    pvp_n_1-5 mapflag nowarpto
    pvp_n_1-5 mapflag noteleport
    pvp_n_1-5 mapflag nomemo
    pvp_n_1-5 mapflag nopenalty
    pvp_n_1-5 mapflag nobranch
    pvp_n_1-5 mapflag noicewall

    Compounding Card

    in Tulong para sa Server

    Posted

    Pa help naman po sa problemang ito.. first time ko ma incounter ito.. im using r17702..

     

    Paliwanag ko po..

     

    Nag change po ako ng rversion to 17484 to 17702..

    May bug po sa pag lalagay ng card sa shield.. all card and all shiled na tinesting ko hindi po talaga maialgay ang card...

    ano kaya po problema nito?? sana matulongan nyo ako.. salamat.. godbless


    may isa pa palang bug.. ang card na pang shield.. pwde sa pang weapon???? ano kaya problema??

×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use and Privacy Policy.

  I accept