Jump to content

donkeyg

Members
  • Posts

    1060
  • Joined

  • Last visited

Everything posted by donkeyg

  1. sorry bro. i need a original prontera map but with christmas map edition.. example: the floor all changes to snow color . thats what i want only.
  2. do u have any screenshot pls?? sorry. and also the link u sent to me i cant access to the website.. dont know why..
  3. it worsk fine. but my the event wont start automatically.. ..
  4. its not working.. can u just gie me a complete script pls?=.=
  5. //===== rAthena Script ======================================= //= Domination Event //===== By: ================================================== //= Leertaste //===== Current Version: ===================================== //= 1.0a //===== Compatible With: ===================================== //= Every eAthena or rAthena Version //===== Description: ========================================= //= Automated Event where every click from every char //= increases the Number by 1 (+1) //= The winner is who increases the Number to the max. (for example 1000) //===== Comments: ============================================ //= This Event is automated but can be started from InGame too //= Price/Amount and Amount-to-click is also settable from InGame //= Change (if(getgmlevel() > 60)) // 60 to the wished GM-Level for Setups //============================================================ //===== Changelog: =========================================== //= -1.0a - Addet Current Variables when changing Price/Amount //= - Addet Effects to Show Member which Npc is meant //= - Addet Ingame Menupoint (For Admin) to edit required manage GM-Level //= - Addet Auto protect from Input 0 (Amount/GM Level) //= - Changed NPC ID cause of annoying noise //= - Fixed Bug that comes through Npctalk (changed to Announce) //= //= -1.0 Finshed Scripting //============================================================ alberta,195,141,5 script [Domination] 440,{ OnInit: set $GM_Dom, 60; if ($@domination_start == 1) { set .dom_click,.dom_click+1; specialeffect2 4; announce "Counter: ["+.dom_click+"]",bc_map|bc_blue; if (.dom_click == $@domination_amount) { announce "[Domination]: " + strcharinfo(0) + " is the winner!",bc_all; set .dom_click,0; set $@domination_start,0; getitem $prize_id_dom, $prize_amount_dom; end; } }else{ set .name$, "[Domination]"; set .menu$, "Times:Information:What's the Amount?:What's the Price?:Leave"; if(getgmlevel() > $GM_Dom-1) set .menu$, .menu$ + ":^008000Set Amount ^ff0000[GM]:^008000Set Price ^ff0000[GM]:^008000Start Event ^ff0000[GM]^000000"; if(getgmlevel() > 99) set .menu$, .menu$ + ":^008000Set GM Level ^ff0000[ADMIN]^000000"; mes .name$; mes "What do you want?"; next; h_menu: switch(select(.menu$)) { case 1: mes .name$; mes "^ff0000Domination^000000 starts each day at:"; mes "^Every 2 ~ 3 o'clock"; next; mes .name$; mes "What else?"; next; goto h_menu; case 2: mes .name$; mes "^ff0000Domination^000000"; mes "Is a game where you need"; mes "to click the Number up to:"; mes " -- ^ff0000"+$@domination_amount+"^000000 --"; next; mes .name$; mes "Every click (from everybody)"; mes "will increase the Number by 1"; next; mes .name$; mes "To win you will need to have"; mes "the last click to increase the"; mes "Number up to the set amount"; mes "(-- ^ff0000"+$@domination_amount+"^000000 --)"; next; mes .name$; mes "What else?"; next; goto h_menu; case 3: mes .name$; mes "The amount to click is:"; mes " -- ^ff0000"+$@domination_amount+"^000000 --"; next; mes .name$; mes "What else?"; next; goto h_menu; case 4: mes .name$; mes "The Price is:"; mes " -- ^ff0000"+$prize_amount_dom+" ^008000"+getitemname($prize_id_dom)+"^000000 --"; next; mes .name$; mes "What else?"; next; goto h_menu; case 5: mes .name$; mes "Have a nice day."; close; case 6: // Setting the Amount to click mes .name$; mes "Enter the Amount which"; mes "is needed to reach:"; mes " "; mes "Current is:"; mes " -- ^ff0000"+$@domination_amount+"^000000 --"; input $@domination_amount; if ($@domination_amount == 0){ next; mes .name$; mes "I think it's not a good idea put"; mes "this to 0 because there will be no ending"; mes " -- ^ff0000Automatically set to 100^000000 --"; set $@domination_amount,100; } next; mes .name$; mes "The amount to click is now:"; mes " -- ^ff0000"+$@domination_amount+"^000000 --"; next; mes .name$; mes "What else?"; next; goto h_menu; case 7: // Setting the Price mes .name$; mes "Enter the Item ID of the Price:"; mes " "; mes "Current is:"; mes " -- ^ff0000"+$prize_id_dom+"^000000 --"; mes "(^008000"+getitemname($prize_id_dom)+"^000000)"; input $prize_id_dom; next; mes .name$; mes "Now enter the Amount of items the winner will recieve:"; mes " "; mes "Current is:"; mes " -- ^ff0000"+$prize_amount_dom+"^000000 -- ^008000"+getitemname($prize_id_dom)+"^000000 --"; input $prize_amount_dom; next; mes .name$; mes "The Price ID is: ^ff0000"+$prize_id_dom+"^000000"; mes "The Amount is: ^ff0000"+$prize_amount_dom+"^000000."; mes " "; mes " -- ^ff0000"+$prize_amount_dom+" ^008000"+getitemname($prize_id_dom)+"^000000 --"; next; mes .name$; mes "What else?"; next; goto h_menu; case 8: sleep2 100; close2; goto l_start; end; case 9: mes .name$; mes "Enter the required GM Level"; mes "to manage this Event."; mes " "; mes "Current is:"; mes " -- ^ff0000"+$GM_Dom+"^000000 --"; input $GM_Dom; if ($GM_Dom == 0){ next; mes .name$; mes "I think it's not a good idea let"; mes "GM Level 0 manage this event."; mes " -- ^ff0000Automatically set to 60^000000 --"; set $GM_Dom,60; } next; mes .name$; mes "GM Level = ^ff0000"+$GM_Dom+"^000000"; mes "can now manage this event."; next; mes .name$; mes "What else?"; next; goto h_menu; OnClock0122: OnClock0322: OnClock0522: OnClock0722: OnClock0922: OnClock1222: OnClock1522: OnClock1722: OnClock1922: OnClock2122: OnClock2322: l_start: announce "[Domination]: Domination - Event starts in 1 Minute at Alberta @go alberta!",bc_all; specialeffect 12, SELF; sleep2 30000; announce "[Domination]: We are going to start in 30 Seconds!",bc_all; specialeffect 12, SELF; sleep2 25000; announce "[Domination]: Get Ready only 5 Seconds left!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "[Domination]: 4!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "[Domination]: 3!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "[Domination]: 2!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "[Domination]: 1!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "START! CLICK ME AS FAST AS YOU CAN!",bc_all; set $@domination_start,1; end; end; } } } like this bro?
  6. set .name$, "[Domination]"; set .menu$, "Times:Information:What's the Amount?:What's the Price?:Leave"; OnInit: set $GM_Dom, 60; if(getgmlevel() > $GM_Dom-1) set .menu$, .menu$ + ":^008000Set Amount ^ff0000[GM]:^008000Set Price ^ff0000[GM]:^008000Start Event ^ff0000[GM]^000000"; if(getgmlevel() > 99) set .menu$, .menu$ + ":^008000Set GM Level ^ff0000[ADMIN]^000000"; like this?
  7. thanks EL. how do i disable it during WoE/PvP?
  8. //===== rAthena Script ======================================= //= Domination Event //===== By: ================================================== //= Leertaste //===== Current Version: ===================================== //= 1.0a //===== Compatible With: ===================================== //= Every eAthena or rAthena Version //===== Description: ========================================= //= Automated Event where every click from every char //= increases the Number by 1 (+1) //= The winner is who increases the Number to the max. (for example 1000) //===== Comments: ============================================ //= This Event is automated but can be started from InGame too //= Price/Amount and Amount-to-click is also settable from InGame //= Change (if(getgmlevel() > 60)) // 60 to the wished GM-Level for Setups //============================================================ //===== Changelog: =========================================== //= -1.0a - Addet Current Variables when changing Price/Amount //= - Addet Effects to Show Member which Npc is meant //= - Addet Ingame Menupoint (For Admin) to edit required manage GM-Level //= - Addet Auto protect from Input 0 (Amount/GM Level) //= - Changed NPC ID cause of annoying noise //= - Fixed Bug that comes through Npctalk (changed to Announce) //= //= -1.0 Finshed Scripting //============================================================ alberta,195,141,5 script [Domination] 440,{ if ($@domination_start == 1) { set .dom_click,.dom_click+1; specialeffect2 4; announce "Counter: ["+.dom_click+"]",bc_map|bc_blue; if (.dom_click == $@domination_amount) { announce "[Domination]: " + strcharinfo(0) + " is the winner!",bc_all; set .dom_click,0; set $@domination_start,0; getitem $prize_id_dom, $prize_amount_dom; end; } }else{ set .name$, "[Domination]"; set .menu$, "Times:Information:What's the Amount?:What's the Price?:Leave"; if(getgmlevel() > $GM_Dom-1) set .menu$, .menu$ + ":^008000Set Amount ^ff0000[GM]:^008000Set Price ^ff0000[GM]:^008000Start Event ^ff0000[GM]^000000"; if(getgmlevel() > 99) set .menu$, .menu$ + ":^008000Set GM Level ^ff0000[ADMIN]^000000"; mes .name$; mes "What do you want?"; next; h_menu: switch(select(.menu$)) { case 1: mes .name$; mes "^ff0000Domination^000000 starts each day at:"; mes "^00800014:30^000000, ^00800017:30^000000 and ^00800020:30^000000 o'clock."; next; mes .name$; mes "What else?"; next; goto h_menu; case 2: mes .name$; mes "^ff0000Domination^000000"; mes "Is a game where you need"; mes "to click the Number up to:"; mes " -- ^ff0000"+$@domination_amount+"^000000 --"; next; mes .name$; mes "Every click (from everybody)"; mes "will increase the Number by 1"; next; mes .name$; mes "To win you will need to have"; mes "the last click to increase the"; mes "Number up to the set amount"; mes "(-- ^ff0000"+$@domination_amount+"^000000 --)"; next; mes .name$; mes "What else?"; next; goto h_menu; case 3: mes .name$; mes "The amount to click is:"; mes " -- ^ff0000"+$@domination_amount+"^000000 --"; next; mes .name$; mes "What else?"; next; goto h_menu; case 4: mes .name$; mes "The Price is:"; mes " -- ^ff0000"+$prize_amount_dom+" ^008000"+getitemname($prize_id_dom)+"^000000 --"; next; mes .name$; mes "What else?"; next; goto h_menu; case 5: mes .name$; mes "Have a nice day."; close; case 6: // Setting the Amount to click mes .name$; mes "Enter the Amount which"; mes "is needed to reach:"; mes " "; mes "Current is:"; mes " -- ^ff0000"+$@domination_amount+"^000000 --"; input $@domination_amount; if ($@domination_amount == 0){ next; mes .name$; mes "I think it's not a good idea put"; mes "this to 0 because there will be no ending"; mes " -- ^ff0000Automatically set to 100^000000 --"; set $@domination_amount,100; } next; mes .name$; mes "The amount to click is now:"; mes " -- ^ff0000"+$@domination_amount+"^000000 --"; next; mes .name$; mes "What else?"; next; goto h_menu; case 7: // Setting the Price mes .name$; mes "Enter the Item ID of the Price:"; mes " "; mes "Current is:"; mes " -- ^ff0000"+$prize_id_dom+"^000000 --"; mes "(^008000"+getitemname($prize_id_dom)+"^000000)"; input $prize_id_dom; next; mes .name$; mes "Now enter the Amount of items the winner will recieve:"; mes " "; mes "Current is:"; mes " -- ^ff0000"+$prize_amount_dom+"^000000 -- ^008000"+getitemname($prize_id_dom)+"^000000 --"; input $prize_amount_dom; next; mes .name$; mes "The Price ID is: ^ff0000"+$prize_id_dom+"^000000"; mes "The Amount is: ^ff0000"+$prize_amount_dom+"^000000."; mes " "; mes " -- ^ff0000"+$prize_amount_dom+" ^008000"+getitemname($prize_id_dom)+"^000000 --"; next; mes .name$; mes "What else?"; next; goto h_menu; case 8: sleep2 100; close2; goto l_start; end; case 9: mes .name$; mes "Enter the required GM Level"; mes "to manage this Event."; mes " "; mes "Current is:"; mes " -- ^ff0000"+$GM_Dom+"^000000 --"; input $GM_Dom; if ($GM_Dom == 0){ next; mes .name$; mes "I think it's not a good idea let"; mes "GM Level 0 manage this event."; mes " -- ^ff0000Automatically set to 60^000000 --"; set $GM_Dom,60; } next; mes .name$; mes "GM Level = ^ff0000"+$GM_Dom+"^000000"; mes "can now manage this event."; next; mes .name$; mes "What else?"; next; goto h_menu; OnClock0122: OnClock0322: OnClock0522: OnClock0722: OnClock0922: OnClock1222: OnClock1522: OnClock1722: OnClock1922: OnClock2122: OnClock2322: l_start: announce "[Domination]: Domination - Event starts in 1 Minute at Alberta @go alberta!",bc_all; specialeffect 12, SELF; sleep2 30000; announce "[Domination]: We are going to start in 30 Seconds!",bc_all; specialeffect 12, SELF; sleep2 25000; announce "[Domination]: Get Ready only 5 Seconds left!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "[Domination]: 4!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "[Domination]: 3!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "[Domination]: 2!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "[Domination]: 1!",bc_all; specialeffect 12, SELF; sleep2 1000; announce "START! CLICK ME AS FAST AS YOU CAN!",bc_all; set $@domination_start,1; end; } } } help pls.. even normal player also can set the prizes... what happened?
  9. need a 3rd job sprite npc . only sprite.. not including skills. anyone can help with this? example: Champion sprite can change to sura sprite.
  10. 12118,Resist_Fire,Fireproof Potion,2,2,,10,,,,,0xFFFFFFFF,7,2,,,,,,{ sc_start4 SC_ARMOR_ELEMENT,1200000,-15,0,20,0; },{},{} 12119,Resist_Water,Coldproof Potion,2,2,,10,,,,,0xFFFFFFFF,7,2,,,,,,{ sc_start4 SC_ARMOR_ELEMENT,1200000,20,0,0,-15; },{},{} 12120,Resist_Earth,Earthproof Potion,2,2,,10,,,,,0xFFFFFFFF,7,2,,,,,,{ sc_start4 SC_ARMOR_ELEMENT,1200000,0,20,-15,0; },{},{} 12121,Resist_Wind,Thunderproof Potion,2,2,,10,,,,,0xFFFFFFFF,7,2,,,,,,{ sc_start4 SC_ARMOR_ELEMENT,1200000,0,-15,0,20; },{},{} could someone help me? i used the coldproof potion and hit by storm gust . it doesnt - damage ... someone help me pls?? i had post this topic twice .. no 1 respond.
  11. LMS script is not working.. the npc is not response when i clicked it.. i opened the mapserver and see but theres no error showing prontera,156,152,5 script Last Man Standing 100,{ if ( !.start ) { mes "no event atm"; close; } if ( .start == 2 ) { mes "event is running"; close; } if ( .register_count >= .register_limit ) { mes "this event has reach the maximum player participations"; close; } percentheal 100,100; warp "guild_vs5", 0,0; .register_aid[ .register_count ] = getcharid(3); .register_count+++; end; OnWhisperGlobal: if ( getgmlevel() < 60 ) end; //OnClock0000: // put all your start timer here //OnClock0030: OnClock0144: OnClock0344: OnClock0544: OnClock0744: OnClock0944: OnClock1044: OnClock2144: OnClock1244: OnClock1544: OnClock1844: OnClock2144: OnClock2344: if ( .start == 2 ) callsub L_resetmap; else if ( .start == 1 ) end; announce "Last Man Standing Event registration starts now! Come to bottom of Prontera", 0; .start = 1; sleep 10000; // registration timer here announce "Last Man Standing Event registration is now closed.", 0; .start = 2; sleep 3000; mapannounce "guild_vs5", "THIS IS SPARTA !!!!!", 0; if ( .register_count < .register_min ) { announce "not enough participants for LMS event", 0; mapwarp "guild_vs5", .map$, .x, .y; callsub L_resetmap; end; } pvpon "guild_vs5"; end; OnPCDieEvent: OnPCLogoutEvent: if ( .start != 2 || strcharinfo(3) != "guild_vs5" ) end; while ( .register_aid != getcharid(3) && .@i < .register_count ) .@i++; deletearray .register_aid[.@i], 1; .register_count--; warp "SavePoint", 0,0; if ( .register_count > 1 ) end; killmonsterall "guild_vs5"; announce "congratulations ~ the winner of LMS event is "+ rid2name( .register_aid ), 0; getitem .reward_item_id, .reward_item_amount, .register_aid; // winner prize warpchar "SavePoint", 0,0, getcharid( 0, rid2name( .register_aid ) ); callsub L_reset; end; L_resetmap: mapwarp "guild_vs5", .map$, .x, .y; L_reset: .start = 0; deletearray .register_aid; .register_count = 0; pvpoff "guild_vs5"; return; OnInit: getmapxy .map$, .x, .y, 1; .register_min = 2; // minimum amount of players to start this event, or else it auto-abort .register_limit = 100; // maximum amount of players able to participate in this event .reward_item_id = 969; .reward_item_amount = 5; end; } guild_vs5 mapflag nosave SavePoint guild_vs5 mapflag nowarp guild_vs5 mapflag nowarpto guild_vs5 mapflag noteleport guild_vs5 mapflag nomemo guild_vs5 mapflag nopenalty //guild_vs5 mapflag nobranch guild_vs5 mapflag noicewall guild_vs5 mapflag pvp_noparty guild_vs5 mapflag pvp_noguild
  12. is it okay if i add the setarray into the script and @reloadscript .. after reload the script the pvp ladder was resetted. after that i remove the setarray from the script.. so the pvp rank wont reset after i @reloadscript right?
  13. Thanks.. btw i got a problem, everytime i @reloadscript, the pvp ladder automatically resetted. help
  14. anyone has this script?
  15. how do i add more maps? sorry for making trouble. again
  16. thanks, how do i disable count during WoE?? i wan to make it count only in PVP room.. Guild_vs2 bump
  17. //===== eAthena Script ======================================= //= eAthena PVP-Ladder //===== By: ================================================== //= Terces //===== Current Version: ===================================== //= 1.7.2 //===== Compatible With: ===================================== //= Any Athena Version that has "for" implemented //===== Credits: ============================================= //= The whole eAthena Board and the eAthena Chat //===== Notes: =============================================== //= Note 1: //= Experience gain works like this formula: //= ($@LadderLength-(<new position>-1))*$@LadderExp //= so if someone gets the first place he'll get //= $@LadderLength*$@LadderExp experience points. //============================================================ //= Fixxed by Dante //= V1.7.2 //= Hosted by Dant3 aka Dante // HAFE FUN! READ THE TOPIC! IT DONT WORKS MAYBE ON OLDER REV // // // LAST UPDATE: 12th,February.2008 // // Main Script - Terces (Main Thanks to Terces ) // V1.7.0 - Dant3 // v1.7.1 - AnnieRuRu // v1.7.2 - Dant3 // THIS SCRIPT WORKS ONLY ON THE NEW EATHENA REVISIONS! ENJOY! - script PVPLADDEROPTIONS -1,{ end; OnInit: // 0 = Disabled (NO) // 1 = Enable (YES) set $@languageselect, 0; //Enable/Disable language selection [English/German] (Default: 1) set $@LadderAnnounce, 0; //Enable/Disable the announcement when a char reaches a new position in the ladder (Default: 1) set $@LadderLength, 15; //Set the length of the Ladder [!Not higher than 128!] (Default: 30) set $@LadderSteps, 10; //Set the views per page (Default: 10) set $@LadderExpGain, 100; //Enable/Disable experience gain when reaching a new position in the ladder (*Note1) set $@LadderExp, 150; //Set Experience gain value (*Note1) // Update v1.7.0 set $@LadderZenyGain, 1; //Enable/Disable zeny gain when reaching a new position in the ladder set $@LadderZeny, 100; //Set Zeny gain value set $@LadderChatRoom, 1; //Enable/Disable an Chat Room over the NPC with the message "PvP Ladder" (Users can not enter the Chat room) // Update v1.7.1 (Thanks to AnnieRuRu) // Added GM PvP Ladder Reset Function // Update v1.7.2 // Thanks to for the Feedback set $@LadderAskLogin, 1; //Enable/Disable that the NPC asks about the Broadcast when a Player logins / or with the Npc Chat (0 = Login Ask , 1 = Npc Chat) Related: 0 } - script PVPLADDERS -1,{ OnPCKillEvent: if (terces_PVP_resets != $terces_PVP_resets) { dispbottom "Please relog your character, in order to get the correct kills for you in the PVP ladder."; dispbottom "Because a GM just reset the ladder."; end; } if ( killedrid == getcharid(3) ) { set PVPDeaths, PVPDeaths +1; set #PVPDeathsAccount, #PVPDeathsAccount +1; set @PVPDeathstoday, @PVPDeathstoday +1; end; } set $@PVPcounter,$@PVPcounter+1; set getd("$@PVPKill"+$@PVPcounter),getcharid(3); //getd to avoid errors when more than 1 people kill someone attachrid(killedrid); if ( killedrid != getcharid(3) ) { set PVPDeaths,PVPDeaths+1; set @PVPDeathstoday,@PVPDeathstoday+1; set #PVPDeathsAccount,#PVPDeathsAccount+1; } set getd("$@PVPkilledplayer"+$@PVPcounter+"$"), strcharinfo(0); //again, getd to avoid possible glitches detachrid; attachrid(getd("$@PVPKill"+$@PVPcounter)); CountKills: set PVPKills,PVPKills+1; set @PVPKillstoday,@PVPKillstoday+1; set #PVPKillsAccount,#PVPKillsAccount+1; setarray @playerstats[0],@PVPKillstoday,@PVPDeathstoday,PVPKills,PVPDeaths,#PVPKillsAccount,#PVPDeathsAccount; l_ladder: set @considerdeath,0; for (set @PosinLadder, 0; @PosinLadder < $@LadderLength; set @PosinLadder, @PosinLadder + 1){ if (PVPKills >= $terces_PVP_kills[@PosinLadder]){ //Player deserves to be in the ladder //Check if Death plays a role on the position if ((PVPKills == $terces_PVP_kills[@PosinLadder]) && (PVPDeaths > $terces_PVP_deaths[@PosinLadder])) set @considerdeath,1; //Consider Deaths //Check if the player only topped his own scores if ($terces_PVP_names$[@PosinLadder] == strcharinfo(0)){ set $terces_PVP_kills[@PosinLadder],PVPKills; set $terces_PVP_deaths[@PosinLadder],PVPDeaths; end; } //Moves all characters in the Ladder for (set @beginmoving, $@LadderLength; @beginmoving >= (@PosinLadder+@considerdeath); set @beginmoving, @beginmoving - 1){ if ($terces_PVP_names$[@beginmoving] == strcharinfo(0)){ //If the player already is in the Ladder it only has to move players between characters new position and characters old position callsub L_LadderMove,0; end; } else if (@beginmoving == (@PosinLadder+@considerdeath)){ //Player is not in the Ladder and therefor it has to move all players from characters new position downwards callsub L_LadderMove,1; end; } } end; } } L_LadderMove: if (getarg(0) == 0) set @length,@beginmoving; if (getarg(0) == 1) set @length,$@LadderLength; for (set @movecycle, @length; @movecycle > (@PosinLadder+@considerdeath); set @movecycle, @movecycle - 1){ set $terces_PVP_names$[@movecycle],$terces_PVP_names$[(@movecycle-1)]; set $terces_PVP_kills[@movecycle],$terces_PVP_kills[(@movecycle-1)]; set $terces_PVP_deaths[@movecycle],$terces_PVP_deaths[(@movecycle-1)]; set $terces_PVP_times[@movecycle],$terces_PVP_times[(@movecycle-1)]; } //sets the character's stats in the new position set $terces_PVP_names$[(@PosinLadder+@considerdeath)],strcharinfo(0); set $terces_PVP_kills[(@PosinLadder+@considerdeath)],PVPKills; set $terces_PVP_deaths[(@PosinLadder+@considerdeath)],PVPDeaths; set $terces_PVP_times[(@PosinLadder+@considerdeath)],gettimetick(2); //Experience Gain if ($@LadderExpGain == 1){ set BaseExp,BaseExp+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderExp); dispbottom "You have just been rewarded with "+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderExp)+" base experience points"; } //Zeny Gain if ($@LadderZenyGain == 1){ set Zeny,Zeny+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderZeny); dispbottom "You have just been rewarded with "+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderZeny)+" Zeny"; } //Announcement (Setting for Char) if (pvpbroadcast == 2){ announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16; } //Announcement (Setting for Account) if (#pvpbroadcast == 2){ announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16; } end; OnPCLoginEvent: if (terces_PVP_resets != $terces_PVP_resets){ set PVPDeaths,0; set @PVPDeathstoday,0; set #PVPDeathsAccount,0; set PVPKills,0; set @PVPKillstoday,0; set #PVPKillsAccount,0; set terces_PVP_resets,$terces_PVP_resets; } if ($@LadderAskLogin == 0){ if (#pvpbroadcast == 2) goto L_ignore; if (pvpbroadcast == 2) goto L_ignore; if (#pvpbroadcast == 1) goto L_ignore; if (pvpbroadcast == 1) goto L_ignore; if (pvpbroadcast == 0) mes "Hi, "+strcharinfo(0)+""; mes "Me is the PvP Top Management!"; mes "Let me ask you one Question and i will let you play!"; menu "Later please",L_close,"Okay, fine",L_fine; L_fine: next; mes "Well, do you want read Broadcast Messages when a Player reach a new position on the PvP Ranglist?"; menu "Yeah, why not",L_accept,"No, thanks",L_accept_2,"Wtf is Broadcast?",L_broadcast; L_accept: next; mes "Yay, thank you! ^_^"; mes "Will this Setting work on all your Chars on this account or only this char?"; menu "Account",L_account,"Only this char",L_char; L_account: set #pvpbroadcast,2; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; close; L_char: set pvpbroadcast,2; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; goto access_eng; close; L_accept_2: next; mes "Yay, thank you! ^_^"; mes "Will this Setting work on all your Chars on this account or only this char?"; menu "Account",L_account_2,"Only this char",L_char_2; L_close: close; L_account_2: set #pvpbroadcast,1; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; close; L_char_2: set pvpbroadcast,1; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; goto access_eng; close; L_broadcast: mes "Broadcasts are this yellow messages from the GMs"; goto L_fine; } } prontera,163,189,3 script PvP Ladder 467,{ if ($@LadderChatRoom == 1) { waitingroom "Top "+$@LadderLength+" Players!",0; // Look on the configuration! } set @name$,"[PvP-Ladder]"; //Colour of: Position Name Kills Deaths Time setarray @colour$[0], "^996600", "^006699", "^00AA00", "^FF0000", "^EE8800"; if ($@LadderAskLogin == 1){ if (#pvpbroadcast == 2) goto access_eng; if (pvpbroadcast == 2) goto access_eng; if (#pvpbroadcast == 1) goto access_eng; if (pvpbroadcast == 1) goto access_eng; if (pvpbroadcast == 0) mes "Hi, "+strcharinfo(0)+""; mes "Me is the PvP Top Management!"; mes "Let me ask you one Question and i will let you play!"; menu "Later please",L_close,"Okay, fine",L_fine; L_fine: next; mes "Well, do you want read Broadcast Messages when a Player reach a new position on the PvP Ranglist?"; menu "Yeah, why not",L_accept,"No, thanks",L_accept_2,"Wtf is Broadcast?",L_broadcast; L_accept: next; mes "Yay, thank you! ^_^"; mes "Will this Setting work on all your Chars on this account or only this char?"; menu "Account",L_account,"Only this char",L_char; L_account: set #pvpbroadcast,2; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; close; L_char: set pvpbroadcast,2; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; goto access_eng; close; L_accept_2: next; mes "Yay, thank you! ^_^"; mes "Will this Setting work on all your Chars on this account or only this char?"; menu "Account",L_account_2,"Only this char",L_char_2; L_close: close; L_account_2: set #pvpbroadcast,1; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; close; L_char_2: set pvpbroadcast,1; next; mes "Okay, "+strcharinfo(0)+""; mes "Thank you for your time and have fun!"; goto access_eng; close; L_broadcast: mes "Broadcasts are this yellow messages from the GMs"; goto L_fine; } access_eng: mes @name$; mes "Hello "+strcharinfo(0)+""; mes "If you want to I can show you your PVP stats."; next; M_selection_eng: if ( getgmlevel () < 99 ) menu "Show me the PVP Ladder",M_Ladder_eng,"PvP stats since my login",M_seitLogin_eng,"PvP stats of this Char",M_dieserChar_eng,"Stats of the whole account",M_vomAccount_eng,"Cancel",M_abbrechen_eng; else menu "Show me the PVP Ladder",M_Ladder_eng,"PvP stats since my login",M_seitLogin_eng,"PvP stats of this Char",M_dieserChar_eng,"Stats of the whole account",M_vomAccount_eng,"Reset Ladder",L_reset,"Cancel",M_abbrechen_eng; M_Ladder_eng: mes "Alright...I'll show you the Top "+ $@LadderLength +" with "+$@LadderSteps+" entries per page."; mes "It'll be viewed like this:"; mes @colour$[0]+"Place^000000: "+@colour$[1]+"<name>^000000 :"+@colour$[2]+"<kills>^000000:"+@colour$[3]+"<deaths>^000000 "+@colour$[4]+"<time>"; next; callsub L_Ladder; goto M_selection_eng; M_seitLogin_eng: mes @name$; mes "Your stats since your login:"; mes @PVPKillstoday+"/"+@PVPDeathstoday+"(Kills/Deaths)"; next; goto M_selection_eng; M_dieserChar_eng: mes @name$; mes "Your stats of this Char:"; mes PVPKills+"/"+PVPDeaths+"(Kills/Deaths)"; next; goto M_selection_eng; M_vomAccount_eng: mes @name$; mes "Your stats of the whole account:"; mes #PVPKillsAccount+"/"+#PVPDeathsAccount+"(Kills/Deaths)"; next; goto M_selection_eng; M_abbrechen_eng: mes @name$; mes "OK. You can come back to me and see your stats whenever you want."; close; L_reset: if (getgmlevel() < 99) end; mes "Do you want to reset the ladder?"; if (select ("Yes","No") == 2) goto L_end; mes "Are you really really sure you want to reset it?"; menu "Yes, ffs!!",-,"No",L_end; deletearray $terces_PVP_kills,128; deletearray $terces_PVP_deaths,128; deletearray $terces_PVP_names$,128; deletearray $terces_PVP_times,128; set $terces_PVP_resets,$terces_PVP_resets +1; L_end: mes "Okay...cya"; close; L_Ladder: for (set @y,0; @y < $@LadderLength; set @y,@y+$@LadderSteps){ for (set @x,@y; (@x < (@y+$@LadderSteps)) && (@x < ($@LadderLength)); set @x,@x+1){ if ($terces_PVP_names$[@x] != ""){ mes @colour$[0]+(@x+1)+"^000000: "+@colour$[1]+$terces_PVP_names$[@x]+"^000000 "+@colour$[2]+$terces_PVP_kills[@x]+"^000000:"+@colour$[3]+$terces_PVP_deaths[@x]+"^000000 ~ "+@colour$[4]+callfunc ("Gettime",$terces_PVP_times[@x])+"^000000"; } else { mes "^DD0000"+(@x+1)+": ^006699None^000000 "; } } next; } return; } function script Gettime { if (getarg(0)==0) return; set @difftimedays,(gettimetick(2) - getarg(0)); set @difftimehours,@difftimedays%86400; set @difftimeminutes,@difftimehours%3600; set @difftimeseconds,@difftimeminutes%60; set @days,@difftimedays/86400; set @hours,@difftimehours/3600; set @minutes,@difftimeminutes/60; set @seconds,@difftimeseconds; set @result$,""; if(@days != 0) set @result$,@result$+@days+"d "; if(@hours != 0) set @result$,@result$+@hours+"h "; if(@minutes != 0) set @result$,@result$+@minutes+"m "; if(@seconds != 0) set @result$,@result$+@seconds+"s"; return (@result$); } im using annieruru dota pvp ladder script.. may i know hwo to reset it?
  18. what's the reflect shield u mean? is it reflect shield is Maya card + Shield? bump
×
×
  • Create New...