jaBote

this is quite taking longer than I expected, to show some movement/give you guys another sneak peek:
the upcoming universal queue script commands that the new battleground scripts will be using (can be used for anything else as well, e.g. custom events)
10 new script commands
[*]queue()
[*]creates a new queue instance, returns created queue id
set .@id,queue();

[*]queuesize(<queue_id>)
[*]returns the amount of entries in queue instance of <queue_id>.
set .@length,queuesize(.@queue_id);

[*]queueadd(<queue_id>,<var_id>)
[*]adds <var_id> to queue of <queue_id>, returns 1 if <var_id> is already present in the queue, 0 otherwise.
queueadd(.@queue_id,.@var_id);

[*]queueremove(<queue_id>,<var_id>)
[*]removes <var_id> from queue of <queue_id>, returns 1 if <var_id> is not present in the queue, 0 otherwise.
queueremove(.@queue_id,.@var_id);

[*]queueopt(<queue_id>,<optionType>,{Optional <option val>})
[*]modifies <queue_id>'s <optionType>, when <option val> is not present, <optionType> is removed from <queue_id>, when present it modifies <queue_id>'s <optionType> with the new <option val> value.
Currently 3 options are available, HQO_OnDeath, HQO_OnLogout, HQO_OnMapChange (the constant names are not final).
queueopt(.@queue_id,HQO_OnDeath,"MyNPC::MyOnQueueMemberDeathEventName");It allows you to hook npc events to be triggered by specific actions that may happen to a player in the queue (when the queue in question is used for account ids)

[*]queuedel(<queue_id>)
[*]deletes <queue_id> returns 1 when <queue_id> is not found, 0 otherwise.
queuedel(.@queue_id);

[*]queueiterator(<queue_id>)
[*]creates a new queue iterator instance, a queue iterator is not a reference to a queue's actual members, it copies the queues members when initialized, this way you can loop through them even if you remove them from the queue
set .@it,queueiterator(.@queue_id);

[*]qicheck(<queue_iterator_id>)
[*]checks whether there is a next member in the iterator's queue, 1 when it does, 0 otherwise.
qicheck(.@queue_iterator_id);

[*]qiget(<queue_iterator_id>)
[*]obtains the next member in the iterator's queue, returns the next member's id or 0 when it doesnt exist.
for( set .@elem,qiget(.@queue_iterator_id); qicheck(.@queue_iterator_id); set .@elem,qiget(.@queue_iterator_id) )

[*]qiclear(<queue_iterator_id>)
[*]deletes a queue iterator from memory, returns 1 when it fails, 0 otherwise.
qiclear(.@queue_iterator_id)


Sample Usage:
/* say create a queue */set .@id,queue();queueadd(.@id,getcharid(3));/* ... add as many entries ... (no limit) */if( queuesize(.@id) == 999 ) { /* whatever */}/* anywhere in the code */set .@it,queueiterator(.@id);for( set .@elem,qiget(.@it); qicheck(.@it); set .@elem,qiget(.@it) ) { //do anything e.g. /* attachrid .@elem; */ /* mes "ID:"+.@elem; */}qiclear(.@it);

oh i see o-o I added a maxDuration setting for each arena we can later modify when we find out the values.
sneak peek:
//====================================================//= _ _ _ //= | | | | | | //= | |_| | ___ _ __ ___ _ _| | ___ ___ //= | _ |/ _ '__/ __| | | | |/ _ / __|//= | | | | __/ | | (__| |_| | | __/__ //= _| |_/___|_| ___|__,_|_|___||___///= //= http://herc.ws/board/ //====================================================//= Link~u! <description> <link to wiki/topic>battlegrounds: ({ /* character variable for global bg delay */ global_delay_var: "BG_Delay_Tick" /* how many seconds to consider a player "afk" and kick him out? */ maximum_afk_seconds: 30 /* str used by the feature */ queue_invalid_name: "(Invalid Name)" queue_individual_name: "Individual" queue_party_name: "Party" queue_guild_name: "Guild" /* one can add as many as he wishes */ /* for custom ones, need to edit "lua files/entryqueue/entryqueuelist.lua" [Ind/Hercules] */ arenas: ({ name: "Tierra Gorge" //must match the name in client files event: "Tierra_BG2::OnPlayerListReady" minLevel: 80 maxLevel: 150 reward: {/* amount of badges awarded on each case */ win: 3 loss: 1 draw: 1 } minPlayers: 6 /* minimum amount of players to start */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 6 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "Tierra_BG_Tick" /* npc variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ },{ name: "Flavius" //must match the name in client files event: "Flavius_BG1::OnPlayerListReady" minLevel: 80 maxLevel: 150 reward: {/* amount of badges awarded on each case */ win: 9 loss: 3 draw: 3 } minPlayers: 6 /* minimum amount of players to start */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 6 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "Flavius_BG_Tick" /* npc variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ },{ name: "KVM (Level 80 and up)" //must match the name in client files event: "KvM03_BG::OnPlayerListReady" minLevel: 80 maxLevel: 150 reward: {/* amount of badges awarded on each case */ win: 5 loss: 1 draw: 1 } minPlayers: 4 /* minimum amount of players to start */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 5 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "KVM_BG_Tick" /* npc variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ },{ name: "KVM (Level 60~79)" //must match the name in client files event: "KvM03_BG::OnPlayerListReady" minLevel: 60 maxLevel: 79 reward: {/* amount of badges awarded on each case */ win: 2 loss: 0 draw: 1 } minPlayers: 4 /* minimum amount of players to start */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 5 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "KVM_BG_Tick" /* npc variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ },{ name: "KVM (Level 59 and below)" //must match the name in client files event: "KvM03_BG::OnPlayerListReady" minLevel: 1 maxLevel: 59 reward: {/* amount of badges awarded on each case */ win: 1 loss: 0 draw: 0 } minPlayers: 4 /* minimum amount of players to start */ maxPlayers: 60 /* maximum amount of players */ minTeamPlayers: 5 /* minimum amount of team members required for a team (party or guild) to join */ delay_var: "KVM_BG_Tick" /* npc variable name that will store the delay for this match */ maxDuration: 30 /* maximum duration in minutes, if reached game ends and highest score wins (or calls a draw if scores are equal) */ } )})

Scratched everything I said. It is now available.
 
http://herc.ws/board/files/file/9-hax/
 
Hope it helps

Hello,
 
While we do not mind that rAthena developers, staff members and regular members register an account, post or send PM's on our forums, we do not take kindly to 'rAthena is better because x y and z' posts, or anything promoting rAthena as a superior emulator because of such and such. There is no such post on rAthena made by a Hercules staff member about Hercules and we intend to keep it that way, we would appreciate the same respect.
 
Those who do not follow this simple clause listed above will have their post(s) deleted and/or hidden from view. Repeat offenders will be suspended from our forum with no further warnings or post manipulation.
 
We do not appreciate, nor welcome drama here. While criticism is welcome in the form of 'why doesn't Hercules have such and such a feature', drama and belittling a project (hercules or not) will not be tolerated. This is a collaboration, not a drama infested 12 year old's contest.
 
Thank you.

I don't see anything saying: our rivals from rathena..
 
It's only that some users are like oh wtf rathena is diying it's hercules relationed with this?, hercules rathena hercules rathena blabla..
 
All the users are doing this over the forum.. We're only another emulator, hard to understand?
Use Hercules if you like it and post if you want contribute but why all the people is talking about this? Because rAthena is down? Wait untill it goes up again :/
 
There's no need for pointing Hercules is blabla.. I know i do that but it's my user point of view.. Because im only a user ouside the spanish section..
 
So please can .. Stop making drama over the forum and go on?
 
This only generates confusion ..

File Name: Sealed MVP Cards
File Submitter: ToiletMaster
File Submitted: 24 May 2013
File Category: Other Graphics
 
Hi guys!
 
Seeing that rAthena is down and the time I uploaded the file it got deleted,
 
Here's the cards that I have currently for the Sealed MVP Cards!
 
More power to Hercules!
 
If you have more pictures to be added in, do let me know and I'll add them in!
 
Right now these are what I have only.
 
Anyways the names are the same as the item_db so it should be working fine!
 
I have 22 cards here. It's not fully done yet though! Pictures such as Sealed Valkyrie aren't in yet and I can't get them through our grf files.
 
So if someone does have the files, do let me know!
 
-It seems that Hercules does not supports RAR files therefore I can't place all the files together. Sorry guys)
 
Click here to download this file

setarray .maps_1$[0],"mymap1","mymap2","mymap3";setarray .maps_2$[0],"mymap129","mymap130";// Other settings for mapsset .num_map_arrays, 2; // Set this to the number of arrays you have for maps. set .@randarray, rand(1, .num_map_arrays); this method break the equiprobability i.e. user put 100 maps in array 1 and only 1 in array 2 but 50% to select map on array 2
 
 
 
// Maths for avoiding using quest_exp_rate but base_exp_rate. We substract 100 because the first 100% is given by the mob. set .@bonusbexprate, (.mob_base_exp_multiplier - 100) * getbattleflag("base_exp_rate") / getbattleflag("quest_exp_rate"); set .@bonusjexprate, (.mob_job_exp_multiplier - 100) * getbattleflag("base_exp_rate") / getbattleflag("quest_exp_rate"); I don't get why you use quest_exp_rate, do you mind to explain me ?

drama and hate speech are not welcome here on hercules.
To rAthena staff: you're more than welcome to join us or remain as a community member if you wish to, however if you're here to crap around, get lost. I'll not allow hate speech and/or drama to take place in Hercules, our staff has been advised to delete such posts on sight.

Lo que menciona M45T3R es correcto. La implementación de Iteminfo.lua corresponde a 2012-04-18. 2012-04-10 sigue funcionando con las descripciones en base a texto plano. 
 
Saludos. 

oh grow up. you guys own incompetence started the rumors, by keeping everyone in the dark for so long. if backups truly exist, this 2 week delay to use them just further demonstrates rathena admins ineptness.yes it would, much more can be achieved together.

cat_0: { //New Valkyrja's_Shield:70 3D_Glasses:250         Bapho_Jr._Egg:10 }   The format above is not working Please confirm. Thanks

I'd like to congratulate whoever started the rumor, even I believed it for a while. xP
 
rAthena will be back up and running in a few days, and yes, we did indeed have backups.

Probabbly, but I've always thought the best way to learn how something works, is to break it first. 
There was only one line that matched the correction, ctrl+f and copy/paste would've managed. 
 
I belive most of the community here has no issues helping when needing and has the best will when it comes to teaching, but doing someone else's stuff because they have no will to learn is something I personally don't like and I believe its almost rude, as we're taking the time to help, so the other person should at least try to take the time to understand how they're being helped and learn something out of it (And this applies as a general rule in life)

cellphone:
 
should be "delitem .@armadura, 1;". Forgot that 1, sorry

go to your Hercules/db/mob_item_ratio.txt . the instructions are already there
 
SlashGeeGee

For flee, you need to try this:
bonus bFlee,n; Flee + n   
 
For draining sp, try this:
bonus2 bSPDrainRate,n,x; n/10 % probability to drain x% SP when attacking   
 
And for increasing damage received by Demi-Humans, you would want to try this:
bonus2 bSubRace,n,x; +x% damage reduction against race n n: 0=Formless, 1=Undead, 2=Brute, 3=Plant, 4=Insect, 5=Fish, 6=Demon, 7=Demi-Human, 8=Angel, 9=Dragon, 10=Boss monster, 11=Other than (normal monster) boss monster  But keep in mind, if you leave it as a positive number, it'll help reduce damage from a race, but if you use a negative, it'll increase damage from race.

Edited LINE 25 as jaBote stated:
 
switch(select("Start Event:End Event")) {
 
Your script now will be:
 
quiz_00,72,36,3 script Poring Summoner 99,{.ItemID = 7227;.Map$ = "prontera";.SpecialPorings[1] = 20;.NormalPorings[0] = 100;mes "[Poring Summoner]";if(getgmlevel() < 99) { if(.Event) mes "There is no Poring Summon Event on now."; else { mes "There is a Poring Summon Event on now!"; mes "Location: " + .Map$; mes "Special Porings: " + .SpecialPorings[1]; mes "Normal Porings: " + .NormalPorings[0]; } close;}mes "Please customize the Poring Summon Event:";Main:next;mes "[Poring Summoner]";mes "- Item: "+getitemname(.ItemID);mes "- Location: "+.Map$;mes "- Special Porings: "+.SpecialPorings; mes "- Normal Porings: "+.NormalPorings;switch(select("Start Event:End Event")) { case 1: mes "Starting the event now..."; set .Event,1; monster .Map$,0,0,"Poring Event",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill"; monster .Map$,0,0,"Poring Event",1002,.NormalPorings,"Poring Summoner::OnNormalKill"; set .SpecialPorings[1],.SpecialPorings; set .NormalPorings[1],.NormalPorings; announce "The Poring Event has begun!",bc_all; announce "Location: " + .Map$,bc_all; announce "Special Porings: " + .SpecialPorings,bc_all; announce "Normal Porings: " + .NormalPorings,bc_all; close; case 2: mes "Ending the event now..."; goto EndEvent; }OnSpecialKill: set .SpecialPorings[1],.SpecialPorings[1]-1; announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_all; getitem .ItemID,1; goto PoringCount;OnNormalKill: set .NormalPorings[1],.NormalPorings[1]-1; goto PoringCount;PoringCount: announce "Special Porings: " + .SpecialPorings[1] + " || Normal Porings: " + .NormalPorings[1],bc_all; if(!.SpecialPorings[1]) goto EndEvent; end;EndEvent: if(.Event) announce "The Poring Summon Event is now over!",bc_all; killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; close;}

I do not like eAmod...

You basically need to remove the different cases that allow to change the event options and pre-set the variables in order to disable their change.
This is what it'd end up looking like, keep in mind I have not tested this script. 
 
quiz_00,72,36,3 script Poring Summoner 99,{.ItemID = 7227;.Map$ = "prontera";.SpecialPorings[1] = 20;.NormalPorings[0] = 100;mes "[Poring Summoner]";if(getgmlevel() < 99) { if(.Event) mes "There is no Poring Summon Event on now."; else { mes "There is a Poring Summon Event on now!"; mes "Location: " + .Map$; mes "Special Porings: " + .SpecialPorings[1]; mes "Normal Porings: " + .NormalPorings[0]; } close;}mes "Please customize the Poring Summon Event:";Main:next;mes "[Poring Summoner]";mes "- Item: "+getitemname(.ItemID);mes "- Location: "+.Map$;mes "- Special Porings: "+.SpecialPorings; mes "- Normal Porings: "+.NormalPorings;switch(select(Start Event:End Event")) { case 1: mes "Starting the event now..."; set .Event,1; monster .Map$,0,0,"Poring Event",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill"; monster .Map$,0,0,"Poring Event",1002,.NormalPorings,"Poring Summoner::OnNormalKill"; set .SpecialPorings[1],.SpecialPorings; set .NormalPorings[1],.NormalPorings; announce "The Poring Event has begun!",bc_all; announce "Location: " + .Map$,bc_all; announce "Special Porings: " + .SpecialPorings,bc_all; announce "Normal Porings: " + .NormalPorings,bc_all; close; case 2: mes "Ending the event now..."; goto EndEvent; }OnSpecialKill: set .SpecialPorings[1],.SpecialPorings[1]-1; announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_all; getitem .ItemID,1; goto PoringCount;OnNormalKill: set .NormalPorings[1],.NormalPorings[1]-1; goto PoringCount;PoringCount: announce "Special Porings: " + .SpecialPorings[1] + " || Normal Porings: " + .NormalPorings[1],bc_all; if(!.SpecialPorings[1]) goto EndEvent; end;EndEvent: if(.Event) announce "The Poring Summon Event is now over!",bc_all; killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; close;}

You should install msysgit, then TortoiseGit, and then try to clone your repository. If you run into any problems, feel free to ask me here or in another forum section.
 
You could use Subversion (SVN) and TortoiseSVN for downloading and upgrading Hercules, however, neither all its features nor the Git capabilities are functional.

*Wild Capuche approach*
 
I believe you don't need freeloop(1);
 
if (.init) donpcevent strnpcinfo(3)+"::OnInit"; // Faction data from OnInit MUST be loaded must be
if (!.init) donpcevent strnpcinfo(3)+"::OnInit"; // Faction data from OnInit MUST be loaded to load OnInit when it's not

Well, this is my old Emperium Breaker Room Script, I don't know for sure if it still works or not with Hercules since it was made for rAthena, plus it also uses the pvp_n_4-5 map, but if you would like to use another map, then just replace the pvp_n_4-5 map with your desired map of choice, this will take you only one minute to do with Notepad++ ^^
 
And of course you'd need to change some coordinates in the script to adjust it to the new map, this will probably take a while (30 Minutes max. I guess).
 
 
emp_break_room.txt

Nice work! I tried to make my own Spanish, Spain translation. You may want to have error messages untranslated since people can address you with the translated error message, so you can revert that part of the translation (or whatever other, it's your program after all) if you want.
 
Here it is:
RO open setup spanish.txt
 
Hope you like it!

RO Open Setup


About
Enhanced alternative for the default game setup application shipped with every RagnarokOnline installation. Comes in several languages, is free of cost and works on every 32-bit and 64-bit Microsoft* Windows* platform.

Known Issues
None.

Download & Website
http://ai4rei.net/p/opensetup

License

This work is licensed under a Creative Commons Attribution-Noncommercial 3.0 Unported License.

File Name: Special Shop
File Submitter: Dastgir
File Submitted: 15 May 2013
File Category: Source Modifications

As Per This Topic: http://herc.ws/board/topic/3204-special-shop/#entry21298
Example of usage:

For using ItemID x for buying Items
<map name>,<x>,<y>,<facing> itemshop <npc name> <spriteid>,<item_id><itemid>:<amount>,.....
This shop will use item id mentioned in the NPC.

For Using Variable for buying items
 
 
 
<map name>,<x>,<y>,<facing> pointshop <npc name> <spriteid>,"<variable_name>":"<variable_description>",<itemid>:<amount>,.....  

Variable_Name will be deducted from your variable,and it will show variable_description when click npc.

Please See ScreenShot for More information.


NOTE:
Please Do Not Share without Credit.Please Do not Share this as Paid Service.

Click here to download this file