humble

this script gets in the way when I editing the wiki, so I have to dispose here
ops, I mean, release here
 
Download:
script
 
simple script, the npc announce the name of the card it wants
if the player having this card, can give to this npc for a reward
 
found this idea from rathena script request

better I write out the script to prove which method usable
just do the talking doesn't go everywhere
 

prontera,155,185,5 script kjsdfsjdf 1_F_MARIA,{.@nb = query_sql( "select name, killcount from pvpladder order by killcount desc limit 3", .@name$, .@kill );for ( .@i = 0; .@i < .@nb; ++.@i )mes ( .@i +1 )+". "+ .@name$[.@i] +" -> "+ .@kill[.@i];close;OnPCKillEvent:query_sql "insert into pvpladder values ( "+ getcharid(0) +", '"+ escape_sql( strcharinfo(0) ) +"', "+ getcharid(3) +", 1 ) on duplicate key update killcount = killcount +1";query_sql "select name, aid, cid from pvpladder order by killcount desc", .@name$, .@aid, .@cid;if ( $pvptopcid == .@cid ) end;announce .@name$ +" is top 1", bc_all;if ( isloggedin( $pvptopaid, $pvptopcid ) ) {.@origin = getcharid(3);attachrid $pvptopaid;if ( .@count = countitem(1201) )delitem 1201, .@count;attachrid .@origin;}elsequery_sql "delete from inventory where nameid = 1201 and char_id = "+ $pvptopcid;$pvptopaid = .@aid;$pvptopcid = .@cid;if ( checkweight(1201,1) )getitembound 1201, 1, 4;end;}prontera mapflag pvp
if use an item, if the player failed the checkweight, and didn't use the checkweight script command
the item may drop on the floor
but hmm ... we can't attack at 90% weight anyway so I think this shouldn't be a problem
.
.

prontera,155,185,5 script kjsdfsjdf 1_F_MARIA,{.@nb = query_sql( "select name, killcount from pvpladder order by killcount desc limit 3", .@name$, .@kill );for ( .@i = 0; .@i < .@nb; ++.@i )mes ( .@i +1 )+". "+ .@name$[.@i] +" -> "+ .@kill[.@i];close;OnPCKillEvent:query_sql "insert into pvpladder values ( "+ getcharid(0) +", '"+ escape_sql( strcharinfo(0) ) +"', "+ getcharid(3) +", 1 ) on duplicate key update killcount = killcount +1";query_sql "select name, aid, cid from pvpladder order by killcount desc", .@name$, .@aid, .@cid;if ( $pvptopcid == .@cid ) end;announce .@name$ +" is top 1", bc_all;$pvptopcid = .@cid;end;OnPCStatCalcEvent:if ( $pvptopcid == getcharid(0) )bonus bStr, 100;end;}prontera mapflag pvp hmm ... now I wish the stat_recalc command works
because the stats doesn't update on killing other player
unequip command might work but hercules still doesn't have equip2 script command
 
EDIT: hell yeah the codebox broken again

.@aid = getcharid( 3,rid2name( $pvp_aid ) );if ( .@aid ) { delitem 501,1,.@aid;}else { query_sql( "DELETE FROM `inventory` WHERE `nameid` = 501 AND `char_id` = "+$pvp_aid+" LIMIT 1" );}

I hope I didn't this time
most people would have thought that item bonuses can only gain through equipments, (official)
but there are custom mods like OnPCStatCalcEvent and Charms can also give item bonuses
 
if wanna change sprite, there are always setaura custom mod, or just use changelook script command
 
so I wouldn't think inside the box, always think outside the box !

@@AnnieRuru i think you misunderstood the topic

ahhhh ... now I understand
then there is no need an item
just use OnPCStatCalcEvent will do
prontera,155,185,5 script sdkjfhdsfs 1_F_MARIA,{ input $pvpwinner; // debug close;OnPCStatCalcEvent: if ( getcharid(3) == $pvpwinner ) { bonus bStr, 1000; } end;}whoever wins the top ladder, gains bonus +1000 str

@@humble maybe the easiest way to do it is..
 
Since there is only 1 ITEM for Top 1 Player then if the top 1 has been down to top 2 then this is my idea.
 
1. If the former Top 1 Player is OFFLINE ( automatically remove item if he will login in game by using OnPCLoginEvent of course their will be a sql query for that ), then the new TOP 1 player will have the item
 
2. If the Top 1 Player is ONLINE, npc script will sort out the ladder and remove the item on his inventory, since item cannot be put in STORAGE/CART/MAIL/GSTORAGE

you can always send a mail to the offline player
however you mean ... the item is bound ?
seems like hercules still doesn't support get bounded item from mail

Hello all,
 
You might see we don't have quite a lot npc scripts(from official servers), thats mostly because of lack of info, not due to lack of active scripters..
So what can be done?
Well, alot of people does play official servers(iRO,kRO, or any other) and most script matches even if its iRO,jRO,idRO,kRO...
So we can boost the development with your help.
 
Someone might wonder if what would happen if some npc/instances are exclusive to jRO only or any other server, well, we might still need those, those may/may not be added to repository, but that will make a nice release over script release section.
 
Almost all servers have Replay System, we can record the gameplay of any official script, so that can help us get all info we want...
 
So I request you (if you want new official scripts), (and if you play ANY official server), that either record a video or start the replay, and share the replay/video file, so we can get it quickly converted, and release it..
 
Or some of your friends might play those servers?, you can ask them for videos/replays?
 
 
If you don't want to share the replay/video publicly, you can PM me as well with the file.
 
I bet, that we will try our best to implement it quickly.

So here's a cool script I made for a server long long time ago, it should work fine on Hercules as I've tested. Please do let me know if any bugs I'll try fixing them ASAP. Have fun~
 
What it does?
It's a Super Leveling instance where you will be warped to an instance for you and your party to level up. Mobs will spawn at a rate and level of your choice (selectable through an NPC in the dungeon),
there's a monster list for each level range configured in the script, feel free to edit the monsters per level
It also includes a Happy Hour with 50% bonus (default), to change find and configure .HappyHourBonusRate from 150 (150%) to your liking.
The current map used to create an instance is 1@mir, if you wish to change it just find 1@mir and replace every instance of it, it's simple.
 
 
SuperLeveling.txt - v1.2 
- Fixed a slight misplacement of the Happy Hour npc variable.
- Fixed happy hour announcement command [Thanks AphrRO for pointing that out]

UPDATED, NOW HAVE 72 HEADS
 
UPDATED, NOW HAVE 84 HEADS !!!!!
 
Here a Compiliation of basic customs Hairs from Ragnarok Online, This include the 29 oficial heads.
All of these heads aren't made be me, with exception of #68, #69, #70 and #71 male heads and female #70 and #71 heads, this pack cames from internet and a bit of search, the authors put the credit on Spr files...
But who diferent on that pack?
 - Repeated Heads Removed;
 - Missaligned Heads Fixed; (like #48 and #61)
 - 6 Unique Heads.
- Now this pack is mixed with smokim pack (from cronus)
- No Female Heads in Male pack, with exception of classic #43
 
I'm Still Working On this Pack to change female heads into male heads (like #43, #55, #56 etc - Male Hairstyles), to make all heads in Oficial Collors (1~7 to work with them), To Increase this into 100 Hairstyles Pack.
Preview:

 
DOWNLOAD: 84 Heads.zip

Mirror 4Shared
Mirror MediaFire

Hey there, no one known how I am here, but I'm a spriter and these are my Ragnarok Online Works:

Zero (completaly made be Me)

 
Valkyrie Project (almost complete, maybe in a close future I made a custom mob, Randgris Base)

 
Berzebub (50% completed, Some bases are same ou similar has Hyperion Used on his version, like Weding Cloth)


Diabolus Armor (PNG Version Lost)



Half-Life RO Style (PNG Version Lost)

 
Vesper-Mecha


Vampire (Made be me and my brother)

 
El Chapolin Colorado (homage)

 
Mavis (fairy tail, one request from a Friend)


Goku Head (original front view author missing, if you known or are him, tell me!)

 
Evil Morocc Head (Human Version, from future ragnarok Episode)


Yes I'm posting PNG images, Yes You can use it but give credits, No You can't claim it Yours. Diabolus Manteau can't be used for donate. Hairstyles can't be used for donate (hair change tickets, vip npc, etc)

ok another script that should deserve in the script release section
... after having countless fix in script request ...
 
Download: 2.3a
script
Make sure your hercules server is compile after 2015-11-15
 
ok what this event do ...
Run ! or you gonna DIE !
this event will keep spawning Bomb Poring and BOOM and KABOOM every player they came across
until the last player who are still alive on the map will be declare winner
 
this should be a simple script ...
hope you guys know how to edit by your own ...
 
 
 
 
original topic in eathena
it was just a simple script request ... however it went popular for some reason
 
 
 
 

File Name: Soul Link Boost: Single Strip bypass FCP
File Submitter: Happy
File Submitted: 15 Jan 2015
File Category: Source Modifications

This is just an existing source snippet from rathena converted to Hercules Compatible. From this post: https://rathena.org/board/topic/86906-stalker-bypass-fcp/#entry220215
Credits to Patskie, D3vBlaze, and whoever made the one on rathena first post. + the guy who wanted me to convert it to hercules(Hyoru).

What it does:
By passes FCP when you use single strip skills like Strip Weapon, Stip Armor and you have a Rouge Link and Glistening Coat at 15% chance.

Click here to download this file
 
 
If you know any rathena source code you want to be converted to Hercules compatible kindly post them here: http://herc.ws/board/forum/25-source-requests/

Hello Community,
 I am feeling like, there's many plugin on forum, but not been actively used, due to out-of-date plugin
 
I have updated Shikazu's Plugin first(as it was requested on the thread from 25th April), maybe Shikazu busy on his rl.
Also I have included My Plugins there.
 
I would like to add more plugins there(which are not updated on hercules forum <- please suggest if you find some outdated plugin and want me to update it )
 
List of Plugins and Owners:
https://github.com/dastgir/HPM-Plugins/blob/master/README.md  
Repository: https://github.com/dastgir/HPM-Plugins
 
Thanks.

- script LMS -1,{OnMinute52:// Edit this to what ever you want. note : OnClock0000 is 12 midnight and OnClock1200 is 12 Noongoto startlmsevent;startlmsevent:pvpoff "guild_vs5";announce "Mr. Manager: The Last Man Standing event will be starting shortly.",0;sleep2 5000;announce "Mr. Manager: Those who want to play, please proceed to Prontera and Register.",0;sleep2 5000;announce "Mr. Manager: After 1 Minute the Registration will close.",0;enablenpc "All Job Manager";initnpctimer;end;OnTimer30000:pvpoff "guild_vs5";announce "Mr. Manager: Last 30 seconds.",0;sleep2 5000;announce "Mr. Manager: If you want to join please Register in Prontera.",0;end;OnTimer50000:pvpoff "guild_vs5";announce "Mr. Manager: Last 10 seconds.",0;end;OnTimer55000:pvpoff "guild_vs5";announce "Mr. Manager: 5.",0;end;OnTimer56000:pvpoff "guild_vs5";announce "Mr. Manager: 4.",0;end;OnTimer57000:pvpoff "guild_vs5";announce "Mr. Manager: 3.",0;end;OnTimer58000:pvpoff "guild_vs5";announce "Mr. Manager: 2.",0;end;OnTimer59000:pvpoff "guild_vs5";announce "Mr. Manager: 1.",0;end;OnTimer60000:pvpoff "guild_vs5";announce "Mr. Manager: Time's up.",0;end;OnTimer61000:pvpoff "guild_vs5";disablenpc "All Job Manager";donpcevent "Mr. Banker::OnEnable";stopnpctimer;end;}//---------All Job Registration---------------prontera,87,50,5 script All Job Manager 106,{mes "[Mr. Manager]";mes "Hello What can I do for you?";next;menu "Register",-,"What is LMS?",what,"Leave",leave;next;mes "[Mr. Manager]";mes "Thankyou for registering Mr. " + strcharinfo(0) + ", Have fun!";warp "guild_vs5",0,0;end;what:mes "[Mr. Manager]";mes "LMS is also known as Last Man Standing Event";next;mes "[Mr. Manager]";mes "LMS is also like a PvP.";mes "The only difference is at LMS you will get 50 HPRO Point if you are the Last Man Standing at the arena.";next;mes "[Mr. Manager]";mes "That's all";close;leave:mes "[Mr. Manager]";mes "I hope you will register next time";close;OnInit:disablenpc "All Job Manager";end;}//--------------------------//--------------------------guild_vs5,49,49,6 script Mr. Banker 56,{mes "[Banker]";mes "Congrats. You've won.";next;announce "Mr. Manager: We have a winner! well done "+strcharinfo(0)+".",0;getitem 7227,5; // Change This item id to what ever you want . item id,amountdispbottom "You Received 5x TCG Card for winning the LMS Event.";mes "You will return now";warp "prontera",86,51;disablenpc "Mr. Banker";close;end;OnEnable:mapannounce "guild_vs5","Mr. Manager:The Last Man Standing Event will start shortly",0;sleep2 5000;mapannounce "guild_vs5","Mr. Manager:But before we start this is just a few reminders..",0;sleep2 5000;mapannounce "guild_vs5","Mr. Manager:Using Cloaking , Hiding is strictly not allowed..",0;sleep2 5000;mapannounce "guild_vs5","Mr. Manager: Only the Last Man Standing will win this event!!",0;sleep2 5000;mapannounce "guild_vs5","Mr. Manager: What are we waiting for?..Let's Get Ready to Rumble!!...",0;sleep2 5000;goto L_Start;end;L_Start:if(getmapusers("guild_vs5") == 1) goto L_Champ;if(getmapusers("guild_vs5") == 0) goto L_None;if(getmapusers("guild_vs5") > 1) {mapannounce "guild_vs5","Mr. Manager: Get ready at the count of 5 we will start!....",0;sleep2 5000;mapannounce "guild_vs5","Mr. Manager: 5",0;sleep2 5000;mapannounce "guild_vs5","Mr. Manager: 4",0;sleep2 4000;mapannounce "guild_vs5","Mr. Manager: 3",0;sleep2 3000;mapannounce "guild_vs5","Mr. Manager: 2",0;sleep2 2000;mapannounce "guild_vs5","Mr. Manager: 1",0;sleep2 1000;pvpon "guild_vs5";goto timer;end;}timer:initnpctimer;end;OnTimer1000:end;OnTimer1100:if(getmapusers("guild_vs5") == 1) goto L_Champ;if(getmapusers("guild_vs5") > 2) goto timer;if(getmapusers("guild_vs5") == 2) goto champ;stopnpctimer;end;champ:announce "Mr. Manager: Last 2 Brave warriors are still alive!",0;sleep2 10000;if(getmapusers("guild_vs5") == 1) goto L_Champ;if(getmapusers("guild_vs5") > 1) goto timer;end;L_Champ:mapannounce "guild_vs5","Mr. Banker: Please talk to me to get your prize..",0;pvpoff "guild_vs5";enablenpc "Mr. Banker";end;L_None:disablenpc "Mr. Banker";pvpoff "guild_vs5";end;OnInit: disablenpc "Mr. Banker"; end;}//----- Die = warp prt ------ script Killa_warp -1,{OnPCDieEvent: getmapxy(.@map$,.@x,.@y,0); if(.@map$=="guild_vs5") { set #kill_point, 0; announce ""+strcharinfo(0)+" died, and out of the game!.",bc_all; warp "prontera",0,0; end; }OnPCKillEvent: getmapxy(.@map$,.@x,.@y,0); if(.@map$=="guild_vs5") { set #kill_point,#kill_point+1; if ( #kill_point % 4 == 0) { announce ""+strcharinfo(0)+" have made 4 Consecutive Kills!!He will be granted an item",bc_all; getitem 607, 50; end; } }}// == Mapflagsguild_vs5 mapflag nowarpguild_vs5 mapflag nowarptoguild_vs5 mapflag noteleportguild_vs5 mapflag nosaveguild_vs5 mapflag nomemoguild_vs5 mapflag nobranchguild_vs5 mapflag pvp_noparty The NPC which hides on OnInit should be loaded later on (also found an typo where it was disabling "Banker" instead of "Mr. Banker"

Here is your Dice event, I modify it in a working scriupt

 
prontera,141,174,4  script  Dice Event  4W_M_01,{      .@deName$ = "[^FF0000Dice Event^000000]";    .@menu$ = "Join the event:Cancel";  if (getgmlevel() >= .gmsetting) {    .@menu$ =  .@menu$ + ":Start Event";  }  switch(select(.@menu$)){        case 1:      if ( .dEstart == 1 ) {        warp "quiz_01",204,89;        end;      }      else if ( .dEstart == 2 ) {      mes .@deName$;      mes "Too late, the event has already started";      close;      }      mes .@deName$;      mes "No Event right now";      close;          case 2:      close;          case 3:      mes .@deName$;      mes "start the event";      donpcevent strnpcinfo(0)+"::OnStart";      close;  }// Set what time it will Start...OnClock0800:OnClock2000:OnStart:  .dEstart = 1;  hideonnpc "Dice#evnt1";  announce "Dice Event: We are going to have a Dice Event",bc_all,0xFF7F50;  sleep 1 * .seconds;  announce "Dice Event: For those who want to join, please meet me @ the MARKET Place right side.",bc_all,0xFF7F50; //Edit to where would you place the warper  sleep 1 * .seconds;  announce "Dice Event: The Warper would be open for 1 minute",bc_all,0xFF7F50;  sleep 30 * .seconds;  announce "Dice Event: Last 30 Seconds.",bc_all,0xFF7F50;  sleep 30 * .seconds;OnEnable:  if(getmapusers("quiz_01")==1){  mapannounce "quiz_01","Dice: The Game will start minimum of TWO player...",bc_all,0xFF7F50;  sleep 5 * .seconds;  announce "Dice Event: Last Call. We are waiting for another challenger..",bc_all,0xFF7F50;  sleep 10 * .seconds;  announce "Dice Event: For those who want to join, please meet me @ the MARKET Place right side.",bc_all,0xFF7F50; //Edit to where would you place the warper  sleep 20 * .seconds;  announce "Dice Event: The Warper would be open for 1 minute",bc_all,0xFF7F50;  sleep 30 * .seconds;  announce "Dice Event: Last 30 Seconds.",bc_all,0xFF7F50;  sleep 30 * .seconds;  announce "Dice Event: Warper Closed.",bc_all,0xFF7F50;  sleep 5 * .seconds;  if(getmapusers("quiz_01")==1){    mapannounce "quiz_01","Dice: The Dice event is HALTED...",bc_all,0xFF7F50;    warp "prontera",155,183;    end;      }  }    .dEstart = 2;  mapannounce "quiz_01","Dice: We are about to start the Dice event.",0;sleep2 10000;  mapannounce "quiz_01","Dice: But before we start the event here's how to play the game. . .",0;sleep2 10000;  mapannounce "quiz_01","Dice: I'm only gonna say this once so read carefully.",0;sleep2 10000;  mapannounce "quiz_01","Dice: I'm going to pick a number, 1 to 4. Then I'll do a count down from 5 to 0.",0;sleep2 10000;  mapannounce "quiz_01","Dice: All you have to do is go to the box of the number you want.",0;sleep2 10000;  mapannounce "quiz_01","Dice: Example, If I get the number of 4, All the players standing on numbers 1 to 3 will be warped back to town.",0;sleep2 10000;  mapannounce "quiz_01","Dice: We will do it again and again until we only have 1 player left on the map.",0;sleep2 10000;  mapannounce "quiz_01","Dice: Oh yeah! Before I forget you MUST GO INSIDE THE BOX, because if you're caught standing on the stairs you'll be automatically disqualified.",0;sleep2 10000;  mapannounce "quiz_01","Dice: That's it.. Now let's play...",0;sleep2 10000;  goto L_Start;end; L_Start:  if(getmapusers("quiz_01") == 1) goto L_Champ;  if(getmapusers("quiz_01") == 0) goto L_None;  if(getmapusers("quiz_01") > 1) {  announce "Dice: . . . . .",0;  $@number = rand(1,4);sleep2 10000;  announce "Dice: I have a number now. Please go to the box of the number you want.... GO!",0;sleep2 10000;  announce "Dice: 5",0;sleep2 5000;  announce "Dice: 4",0;sleep2 4000;  announce "Dice: 3",0;sleep2 3000;  announce "Dice: 2",0;sleep2 2000;  announce "Dice: 1",0;sleep2 1000;  announce "Dice: Time's up.",0;  donpcevent "evnt#1::OnEnable";  announce "Dice: Winning number "+$@number+".",0;  if(($@number != 1) && ($@number != 2) && ($@number != 3)) goto L_Lose1;  if(($@number != 1) && ($@number != 2) && ($@number != 4)) goto L_Lose2;  if(($@number != 1) && ($@number != 3) && ($@number != 4)) goto L_Lose3;  if(($@number != 2) && ($@number != 3) && ($@number != 4)) goto L_Lose4;  end;} L_Lose1:  areawarp "quiz_01",183,81,191,60,"prontera",155,182;  areawarp "quiz_01",195,81,203,60,"prontera",155,182;  areawarp "quiz_01",207,81,215,60,"prontera",155,182;  .dEstart = 0;  goto L_Start;end; L_Lose2:  areawarp "quiz_01",183,81,191,60,"prontera",155,182;  areawarp "quiz_01",195,81,203,60,"prontera",155,182;  areawarp "quiz_01",219,81,227,60,"prontera",155,182;;  .dEstart = 0;  goto L_Start;end; L_Lose3:  areawarp "quiz_01",183,81,191,60,"prontera",155,182;  areawarp "quiz_01",207,81,215,60,"prontera",155,182;  areawarp "quiz_01",219,81,227,60,"prontera",155,182;  .dEstart = 0;  goto L_Start;end; L_Lose4:  areawarp "quiz_01",195,81,203,60,"prontera",155,182;  areawarp "quiz_01",207,81,215,60,"prontera",155,182;  areawarp "quiz_01",219,81,227,60,"prontera",155,182;  .dEstart = 0;  goto L_Start;end; L_Champ:  mapannounce "quiz_01","Dice: Come to me and get your Prize.",0;  hideoffnpc "Dice#evnt1";  end; L_None:  announce "No One Enters the Dice Event. Closed",0;  hideonnpc "Dice#evnt1";  end;    OnInit:  .gmsetting = 60; // in which level the GMs can control this event ?    .seconds = 1000; // for debug purpose only, how many mili-second = 1 second ?} -  script  evnt#1  -1,{ OnEnable:areawarp "quiz_01",182,94,228,88,"prontera",155,182;areawarp "quiz_01",185,87,188,82,"prontera",155,182;areawarp "quiz_01",197,87,200,82,"prontera",155,182;areawarp "quiz_01",209,87,212,82,"prontera",155,182;areawarp "quiz_01",221,87,224,82,"prontera",155,182;end;} quiz_01,204,93,6  script  Dice#evnt1  715,{  .@dName$ = "[^FF0000Dice^000000]";    mes .@dName$;  mes "Congrats. You've won.";  close2;  announce "Dice: We have a winner, "+.@name$+".",0;  getitem 607,5;  getitem 7711,2;  warp "prontera",155,183;  hideonnpc "Dice#evnt1";  .dEstart = 0;  end; }// -- Mapflagsquiz_01  mapflag  nowarpquiz_01  mapflag  nowarptoquiz_01  mapflag  noteleportquiz_01  mapflag  nosavequiz_01  mapflag  nomemoquiz_01  mapflag  nobranchquiz_01  mapflag  nolootquiz_01  mapflag  noskillquiz_01  mapflag  nopenalty

Status: [Available]
 
PayPal
(Friends & Family only to avoid Chargebacks) 
 Cryptocurrencies
Bitcoin/Litecoin/Ethereum/DOGE/Monero/Stellar/TRON/Energi (supported payments in crypto)
 


What I specialize in:
Scripting - Prices will vary depending on the complexity of the script. - rand(simple script, hard script)

Server Setup (Control Panel, Webhost, VPS, Patcher client, forum, basically everything to create a functioning RO server from Game, Patcher and Web - $25 USD

Hello Hercules Community,
 
Let me explain it first.
It is ExtendedBG, which tends to contain all eAmodBG modes and extra modes(as and when coded).
Some Previews:
http://imgur.com/a/2SSVR
Ohh, and the last thing I forgot to tell,
Its 100% Plugin and Script, no Source Edits ..
 
Special Thanks To:
jaBote co-founded this project(and really thanks to him , that he motivated me at start at provided some functions and idea of how the base should be, and what we should do it to give flavor of Hercules in it).
 
Repository Link: https://github.com/dastgirp/eBG (Please read README.md for installation steps)
 
Leave Comments/Suggestions if you find something.
NOTE:
 There might be some(/many) debug messages left in map-server which will be cleaned up. I will add battle.conf soon (you have to add it yourself for now or edit the plugin) The plugin might be a big mess to read/understand (I did many experiments over the year) There might be some bugs Thanks to @Rebel and @Myriad for testing and providing initial feedback
Contact me on Discord: @Dastgir#1460 if there's some urgent issue or else open the issue in github. keep this topic for support.
 
Want to encourage me??

 

Preview: 
http://goo.gl/GUwpM5

 
Info: Tell you how long you're online.
 
Download:
script - http://pastebin.com/gYVYqgpF
sql - http://pastebin.com/HTL3wEhz

so ... after years of showing up, then inactive, then come back, then inactive,
I come back again .... hahahaha
but I'm not very happy ...
why ?
. 
because I'm in DEBT !
.
I am broke its because of this Malaysia 1MDB scandal ! (please google it)
Malaysia Currency DROP NON-STOP
.
 
I borrow money from my relatives, already RM3500 accumulated
which is nearly USD $900
it is a big amount .... if I don't find a method to increase my income, I'm gonna broke
.

.
so ... I have google some sites on how to earn money online ...
I almost get scam for a 'work at home' scheme
.
its here -> http://www.yyjob.net/display-job/5848/Urgent-Home-Base-Data-Entry-Typists.html?searchId=1445258816.89&page=1
I actually sent my email and my contact number for them
then they reply ....
 
 
I immediately spot 3 error
 
1. where is the company name & address ?
 
2. Data Entry job is ...
of course I already googled it
means that person gives you a shit ton of scanned documents
then you sort it out and digitize them with microsoft excel
now this is the legitimate site for freelancing, and it look like this
there are always more than 50 peoples to bid on any data entry job, no matter how small the payout it
 
what I read in the mail has nothing resemble to what I learn from google
wait ... ADVERTISING ? since when data entry job becomes a salesgirl?
 
3. it ask you to deposit RM50 to start a business ...
ok RM50 is actually small
I just have to eat white bread/plain rice with plain water for 3 days, then I can save RM50 up
but ... it just sound too good ...
 
something fishy already
so I keep on google until I found this site
http://asiaparttime.com/blog/asiaparttime/how-to-tell-if-a-data-entry-job-is-a-scam/
 
end case
there is no follow up, and don't want to talk to them anymore
 

 
so after hours and hours of thinking and searching
http://reviewopedia.com/workathome/7-ways-to-make-money-online/
of course there's more, but the #1 in particular ...
... makes me make a very tough decision
 
I always say that everything on the internet should be free
after all is information age nowadays everyone owns smartphones, and I own 2
but the real life get the better of me
 
I have resort to earn money through selling scripts
... and I hate myself for saying this crap ...
I used to argue and threaten others by reproducing their scripts and release for free
but I don't have a choice now, seems like karma has hit back on me
 
haiz ... so now I'm still in the middle of setting up a test server
probably can start scripting tomorrow
 
I think ... my current stance is
1. continue make free release in hercules script request or script release
---- if anyone wants to me to make it compatible with rathena, let's talk price
2. start making scripts over PM, of course, price negotiable
---- higher price for rathena users ... hahaha
3. if source edit is require, no longer release any patch
---- so there are less rathena users able to convert them
 
I would keep this stance, and view next month (1st Dec) if I'm able to cover my expenses
I just need earn about USD $300 per month to cover this debt
if convert USD $300 into MYR, is about RM1200, that should be enough
and that's also means how small malaysia currency is ... haiz

Utility: Homunculus Evolution
As per themon's request: http://herc.ws/board/topic/2426-humonculus-evolver/

Description:
Allows players to evolve their homunculus in exchange for a catalyst and a fee. If the player has a fully evolved homunculus, an option to mutate it into a Homunculus S will be given if the setting is enabled.
 
Please see the configuration settings under the 'OnInit' label to see what you can change. Do NOT modify the homunculus settings unless you have custom IDs/homunculi.
 
This script is optimised solely for Hercules emulators.
 
Download:
https://github.com/datmumbles/Scripts/raw/master/util/homevo.txt

This is a very simple event script I created for the GM's of my server.
 
Basically, you type one command and it spawns 5 "Wandering Porings" on the map of your choosing.
 
You will want to customize the prizes that you receive from the event (it gives Red/Yellow/Orange/White/Blue Potions by default). It's also extremely easy to add in additional prizes.
 
// Syntax: Item ID / Quantity
if(.@prize == 1) { getitem 501,1; }
if(.@prize == 2) { getitem 502,1; }
if(.@prize == 3) { getitem 503,1; }
if(.@prize == 4) { getitem 504,1; }
if(.@prize == 5) { getitem 505,1; }
// 25 Poring Coins Base Prize
getitem 7539,25;
 
Below is the code; After you change the values noted above in red, you should be able to just save this as a .txt, load it in-game, and voila.
 
Questions, comments? Post as a response to this thread! If you find it useful, please +1 this thread and rate me five stars. Thanks!
 
 
- script poringbind -1,{OnInit: unbindatcmd "poring"; bindatcmd("poring","poringbind::OnAtcommand",20,90); end; OnAtcommand:if(getgroupid() < 20) { end; }set @map$,.@atcmd_parameters$[0]; if(@map$ == "") {dispbottom "Syntax: @poring <mapname>";dispbottom "Five Porings will spawn on the map you choose. Recommended usage for this event is 3-5 times per day.";dispbottom "NOTE: Do NOT use capitals in the map name otherwise no Poring will spawn!";end;} monster @map$,0,0,"Wandering Poring",1002,5,"poringbind::OnKill";announce "[Wandering Poring] : 5x Wandering Porings have been sighted on the map: "+@map$+". The first person to find and kill each will receive an award!",0;end; OnKill:// Update Here!set .@prize,rand(1,5);announce "[Wandering Poring] : "+strcharinfo(0)+" has captured a Wandering Poring on the map "+strcharinfo(3)+"!",0;// Syntax: Item ID / Quantityif(.@prize == 1) { getitem 501,1; }if(.@prize == 2) { getitem 502,1; }if(.@prize == 3) { getitem 503,1; }if(.@prize == 4) { getitem 504,1; }if(.@prize == 5) { getitem 505,1; }// 25 Poring Coins Base Prizegetitem 7539,25;end; }

Utility: Variant Mining
As per xienne15's request: http://herc.ws/board/topic/1886-simple-mining/
 
Description:
A simple mining system; allows for interacting players to excavate minerals by "mining" them with special equipment and tools. Minerals disappear and respawn randomly; chance is determined by configuration.
 
Configuration is mostly done in arrays so that settings may be changed with no modifications to the script. Duplicate in additional locations as needed; update the value of '.var_amount' correspondingly.
 
Download:
https://github.com/datmumbles/Scripts/raw/master/util/mining.txt

I know this is random but it kind of upsets me that I got 129 downloads in one day on my Zombie Massacre instance I created and didn't get a single rep/comment or even a thanks.

The way I feel about my content is that it's special, I put lots of effort and creativity to make it feel official and nice. One day we all will pass on, and everything we keep to ourselves will be forgotten because it'll never be known/released.

Meaning basically I feel nice a lot because it saddens me that if something were to occur and I passed away, that all my work I've done will sit in a hard drive that'll be thrown away or stashed away forever, like I didn't even write the code.

That's how I feel about my free releases, I bring you guys personal content from my mind, in thoughts I might leave earth one day and at least want to see a couple thank you's,


So on topic, how do you feel about your personal content/free releases?