Leaderboard

Family Gangs (updated for rAthena) This script is a full wedding & family system, it allow you to get married and have lots of childrens (Baby Novices and Normal Players) using a 100% custom method, better than the original offered by Ragnarok Online. Families are able to send private communications, useful transportation services... and much more. Discover this system and you can be sure you will disable the original wedding system of Ragnarok Online, this is much better. Note: The current version uses the command @family (no more npc:family) Once you get married, you can level up your family and use exclusive Family Commands, compete with other families and make yours the most powerful. Downloads: Please help the community translating this script to your native language, just send me the translated version and i will update this post with your credits. English: FamilyGangs (Very poor & incomplete translation by Myzter, any help?) Spanish: FamilyGangs (Myzter) Standard Commands: propose: Allows propose marriage to another player adopt: Starts the process of adopting a child say: Send a global message to all your family info: Displays the current status of your family (level, experience, members, etc.) Additional Command Pack: jawaii: Warps a parent directly to Jawaii. select: Select the name of a random member of the family rank: Show the Family Ranking. love: Offer your life to give a super dope to the near members of your family. warp: Warps directly to the location of the selected member. (admins can set map restriccions) English: AdditionalCommands01 (Myzter) Spanish: AdditionalCommands01 (Myzter) Comment and Enjoy this +1,500 lines script ^^! Myzter familygangs_cmd1_en.txt familygangs_cmd1_es.txt familygangs_en.txt familygangs_es.txt

File Name: (HANSIP) Skill Spam Protection File Submitter: Kichi File Submitted: 29 May 2014 File Category: Source Modifications Content Author: Kichi Info & History Info: HANSIP Protection is a src modification to make sure NDG,speed hack, WPE Users still follow the rules. History: This is a simple code, which we have made since long to minimize the NDG User. The first way to solve NDG, we add a cooldown for skills that dosn't has a fixed cooldown (Sonic Blow, Cross Impact, etc). But the player doesn't allowed to do double cast. Finaly we made this code that minimize the NDG users, but still keep the original feature that is double cast for some skills (Sonic Blow, Cross Impact, etc). Implementation & Feature Implementation: Download the file Apply manual "rA - Hansip Protection.diff" to your src. Paste "battle_conf.txt" to conf/import/ Don't forget to recompile your server. All done Features: The user still able to use double SB / CI / etc. You may switch on and off. Very simple Skill Packet Spam detector . Note: 2013 client already detect modified file (after act delay). so i've tested this using WPE. i got the number from comparing with and without *cheat. Supported Skills: Bash Sonic Blow Arrow Vulcan Double Strave Bowling Bash Ninja Kouenka Ninja Hyousensou Jupitel Thunder Cross Impact Dragon Breath Fire & Water Change Log: 1.1 -Add archer double strave skill 1.2 -Add support for some skills 1.3 -Change name from NDG to Hansip -Add skill packet spam detector & punishment -Support PRE-RE Click here to download this file

File Name: BG Eamod File Submitter: Anubis-K File Submitted: 13 Sep 2014 File Category: Source Modifications Content Author: Zephyrus, recode AnubisK Hi, I'm not the autor, I just made the code compatible with rathena. All the credits go to the guy that developed Eamod, whoever Zephyrus is. I found this (original file): https://code.google.com/p/eamod-retail/source/browse/trunk/eAmod-A/Diffs/battleground/eAthena.patch And I was informed that the same file can be dowloaded from: http://eamod.wordpress.com/ The BG NPCs are in: https://code.google.com/p/eamod-retail/source/browse/#svn%2Ftrunk%2FeAmod-A%2FDiffs%2Fbattleground%2Fnpc%2Fbattleground Compare with rathena NPCs and modify acoording you need. I Just made it compatible and compilable, please inform any bug you find. Have fun. Note: compatible with 20ff69e Click here to download this file Note: This version does not have the guild system... yet

September Digest 2014 The following digest covers the month of September, 2014. Staffs Changes None. Development Highlights Cleaned up the first class skill quest NPCs. (caa80ec) Cleaned up and stabilized the autotrade system some more. (8a81940) Updated the Airship NPCs to match official. (77549f7) Fixed the behavior of Devotion to official. (9b4d922) Fixed skill unit effect not displaying correctly for newer clients. (05d3c6b) Added new flags for Skill Unit to remove hardcoded checks: UF_NOKNOCKBACK: Cannot be knocked back (only unit that can be damaged). UF_REM_CRAZYWEED: Removed if be overlapped by GN_CRAZYWEED. UF_REM_FIRERAIN: Removed if be overlapped by RL_FIRE_RAIN. Updated items to newer 2014 data. (8fc758f, 9bde9dc) Updated the EXP tables to the latest. (98c83ee) Summons (Pets, Elementals, Homunculus, Mercenaries) no longer get stuck when the master walks too fast. (60b0ed9) Cast sensor mobs will always target the caster when any skill is used. (60b0ed9) Various fixes for NPCs that used rand(1) always returning the first option. (17bace0) Updated Izlude's Magazine and Bullet Dealer NPC locations. (880903b) Added a check to clear unit group skills that are created by a NPC. (3efe537) Added script checks against equipment swapping using third-party tools. (14fddd3) Changed how the Unique ID System creates and stores IDs for items. (c0ed836) Various script cleanups. (30b4d57) Fixed the remaining skill import tables that were having issues. (51ecd9b) Added rewarp_counter to prevent infinite warps through a warp portal. (ea8ccfc) Minor renewal monster database update. (ea1a247) Removed any remaining TXT references. (2d2991a) Updated documenations. (403c22b, 8bdea5d) Added console commands for the login and character servers. (7cac208) Updated status effect chance to renewal. (9b4d922) Switching arrows no longer stops attacks. (a080117) Looter monsters will now randomly pick items on the ground rather than going for the closest. (a080117) Rewrote the hard monster AI. (cfef8a0) Updated various issues with Super Novices. (8256194) Updated the pathfinding system. (8256194) Fixed various skills that caused server crashes. Various third class skill cleanups. Statistics 5 authors have pushed 20 commits during this period. On master, 158 files have changed. There have been 11,220 additions and 10,204 deletions. Merged 2 pull requests, thanks for submitting those pull requests!

Oh, I see, sorry I only quickread your post I thought you wanted a different zeny amount. I could get some solution for you, but since I'm just a rookie, It would be way too messy. So someone pz show us some nice solution (If you want to try on your own you may peek form some existing npc dialogs, like the assassin quest final where you are asked what weapon to take) /+ heres my simple switch based one like in assasin quest: mes "Yelect your reward:"; .@prizeid = 516; .@prizename = "Potato"; SelectPrizeBig: switch(select("Item1:Item2:Item3")) { case 1: .@prizeid = 8050; .@prizename = "Item1"; break; case 2: .@prizeid = 8051; .@prizename = "Item2"; break; case 3: .@prizeid = 8052; .@prizename = "Item3"; break; } mes "Are you sure?"; switch(select("Yes:No")) { case 1: getitem .@prizeid,1; break; case 2: goto SelectPrizeBig; break; } Announce "Lottery: " + strcharinfo(0) + " has won " + .@prizename + "!",8; I have put it into the full script, but you need to set the item IDs and names at SelectPrizeBig: //===== rAthena Script ======================================= //= Lottery //===== By: ================================================== //= acky //===== Current Version: ===================================== //= 1.2.1a //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= Daily lottery draw //===== Additional Comments: ================================= //= Numbers drawn daily (Time is configured line 29) //= *Added GM-Riggability //= *Ability to renew ticket //= *Improved interface //= *Fixed minor bug where first load didn't work. //= 1.2.1a fix due to new script engine //============================================================ - script lotterygenerator -1,{ OnInit: set $L_TicketPrice,4750; // TICKET COST set $L_Prize_Money,5000000; // JACKPOT AMOUNT set $L_Prize_Money_Small,1000000; // SECONDARY PRIZE if ($LID == 0) goto L_GenID; end; //Modify for own time OnClock2045: // CHECKS IF LOTTERY IS RIGGED if ($L_Rigged == 1) goto L_Rigged_Draw; // GENERATES RANDOM NUMBERS 1-40 Pick1: set $LW1,rand (1,40); Pick2: set $LW2,rand (1,40); if ($LW2 == $LW1) goto Pick2; Pick3: set $LW3,rand (1,40); if ($LW3 == $LW2) goto Pick3; if ($LW3 == $LW1) goto Pick3; Pick4: set $LW4,rand (1,40); if ($LW4 == $LW2) goto Pick4; if ($LW4 == $LW1) goto Pick4; if ($LW4 == $LW3) goto Pick4; Pick5: set $LW5,rand (1,40); if ($LW5 == $LW1) goto Pick5; if ($LW5 == $LW2) goto Pick5; if ($LW5 == $LW3) goto Pick5; if ($LW5 == $LW4) goto Pick5; Pick6: set $LW6,rand (1,40); if ($LW6 == $LW1) goto Pick6; if ($LW6 == $LW2) goto Pick6; if ($LW6 == $LW3) goto Pick6; if ($LW6 == $LW4) goto Pick6; if ($LW6 == $LW5) goto Pick6; // BROADCASTS DRAW L_Broadcast: Announce "Lottery: Welcome to tonight's lotto draw!",8; Announce "The numbers are as follows: [" + $LW1 + "] [" + $LW2 + "] [" + $LW3 + "] [" + $LW4 + "] [" + $LW5 + "] [" + $LW6 + "]",8; Announce "Congratulations to the winners of tonight!",8; // GENERATES DRAW ID CODE L_GenID: set $LID2,$LID; // SETS TOMORROW'S ID NUMBER set $LID,rand (100000,999999); end; // SETS DRAW TO RIGGED NUMBERS L_Rigged_Draw: set $LW1,$LR1; set $LW2,$LR2; set $LW3,$LR3; set $LW4,$LR4; set $LW5,$LR5; set $LW6,$LR6; set $L_Rigged,0; goto L_Broadcast; } //prontera,141,182,5 script Lottery 76,{ caspen,148,236,5 script Lottery 790,{ L_Begin: mes "[Lottery]"; mes "Winning Lotto Numbers ("+$LID2+"):"; mes "^0000FF[" + $LW1 + "] [" + $LW2 + "] [" + $LW3 + "] [" + $LW4 + "] [" + $LW5 + "] [" + $LW6 + "]^000000"; if ($LID > 99999) mes "Your Ticket ("+#LID+"):"; if ($LID > 99999) mes "^FF0000[" + #LW1 + "] [" + #LW2 + "] [" + #LW3 + "] [" + #LW4 + "] [" + #LW5 + "] [" + #LW6 + "]^000000"; mes "Next Draw-ID: ^FF0000" + $LID + "^000000."; next; if (getgmlevel() > 90) goto L_GM; menu "Claim Prize",L_Claim,"Buy New Ticket",L_Buy,"Cancel",L_Cancel; // PURCHASE TICKET L_Buy: if (#LID == $LID && #L1 != 0) goto L_DoubleTicket; mes "[Lottery]"; mes "Tickets cost ^0000FF" + $L_TicketPrice + "z^000000."; mes "The Jackpot is ^FF0000" + $L_Prize_Money + "z^000000."; next; menu "Buy Ticket",-,"Cancel",L_Cancel; if (Zeny < $L_TicketPrice) goto L_NoZeny; set Zeny, Zeny-$L_TicketPrice; mes "[Lottery]"; mes "Would you like your numbers hand picked or computer generated?"; next; menu "Computer Generated",L_ComputerGen,"Hand Picked",L_HandPick,"Renew Ticket",L_Renew; // RENEW LAST TICKET L_Renew: if ($LID < 99999) goto L_Invalid; set #LID,$LID; goto L_Confirm2; L_ComputerGen: // SELECTS RANDOM NUMBERS set @L1,0; set @L2,0; set @L3,0; set @L4,0; set @L5,0; set @L6,0; Pick1: set @L1,rand (1,40); Pick2: set @L2,rand (1,40); if (@L2 == @L1) goto Pick2; Pick3: set @L3,rand (1,40); if (@L3 == @L2) goto Pick3; if (@L3 == @L1) goto Pick3; Pick4: set @L4,rand (1,40); if (@L4 == @L2) goto Pick4; if (@L4 == @L1) goto Pick4; if (@L4 == @L3) goto Pick4; Pick5: set @L5,rand (1,40); if (@L5 == @L1) goto Pick5; if (@L5 == @L2) goto Pick5; if (@L5 == @L3) goto Pick5; if (@L5 == @L4) goto Pick5; Pick6: set @L6,rand (1,40); if (@L6 == @L1) goto Pick6; if (@L6 == @L2) goto Pick6; if (@L6 == @L3) goto Pick6; if (@L6 == @L4) goto Pick6; if (@L6 == @L5) goto Pick6; mes "[Lottery]"; mes "The computer has selected the following numbers:"; mes "^0000FF" + @L1 + " " + @L2 + " " + @L3 + " " + @L4 + " " + @L5 + " " + @L6 + "^000000"; next; menu "Confirm",L_Confirm,"Re-Generate",L_ComputerGen; // HAND PICK LOTTERY NUMBERS L_HandPick: mes "[Lottery]"; mes "Please pick your numbers (1-40):"; set @L1,0; set @L2,0; set @L3,0; set @L4,0; set @L5,0; set @L6,0; Input1: input @L1; if (@L1 < 1 || @L1 > 40) goto Input1; mes @L1; Input2: input @L2; if (@L2 < 1 || @L2 > 40) goto Input2; if (@L2 == @L1) goto Input2; mes @L2; Input3: input @L3; if (@L3 < 1 || @L3 > 40) goto Input3; if (@L3 == @L1) goto Input3; if (@L3 == @L2) goto Input3; mes @L3; Input4: input @L4; if (@L4 < 1 || @L4 > 40) goto Input4; if (@L4 == @L1) goto Input4; if (@L4 == @L2) goto Input4; if (@L4 == @L3) goto Input4; mes @L4; Input5: input @L5; if (@L5 < 1 || @L5 > 40) goto Input5; if (@L5 == @L1) goto Input5; if (@L5 == @L2) goto Input5; if (@L5 == @L3) goto Input5; if (@L5 == @L4) goto Input5; mes @L5; Input6: input @L6; if (@L6 < 1 || @L6 > 40) goto Input6; if (@L6 == @L1) goto Input6; if (@L6 == @L2) goto Input6; if (@L6 == @L3) goto Input6; if (@L6 == @L4) goto Input6; if (@L6 == @L5) goto Input6; mes @L6; next; mes "[Lottery]"; mes "Your numbers are:"; mes "^0000FF" + @L1 + " " + @L2 + " " + @L3 + " " + @L4 + " " + @L5 + " " + @L6 + "^000000"; next; menu "Confirm",L_Confirm,"Re-Pick",L_HandPick; L_Confirm: set #LW1,@L1; set #LW2,@L2; set #LW3,@L3; set #LW4,@L4; set #LW5,@L5; set #LW6,@L6; set #LID,$LID; L_Confirm2: mes "[Lottery]"; mes "The live broadcasted draw is at 9pm."; mes "You can claim your ticket between then and the next draw."; next; mes "[Lottery]"; mes "Good luck!"; close; L_Claim: // CHECKS TICKET VALIDILITY if (#LID != $LID2) goto L_Invalid; // CHECKS HOW MANY NUMBERS MATCHED set @LPrize,0; if (#LW1 == $LW1) set @LPrize,@LPrize+1; if (#LW1 == $LW2) set @LPrize,@LPrize+1; if (#LW1 == $LW3) set @LPrize,@LPrize+1; if (#LW1 == $LW4) set @LPrize,@LPrize+1; if (#LW1 == $LW5) set @LPrize,@LPrize+1; if (#LW1 == $LW6) set @LPrize,@LPrize+1; if (#LW2 == $LW1) set @LPrize,@LPrize+1; if (#LW2 == $LW2) set @LPrize,@LPrize+1; if (#LW2 == $LW3) set @LPrize,@LPrize+1; if (#LW2 == $LW4) set @LPrize,@LPrize+1; if (#LW2 == $LW5) set @LPrize,@LPrize+1; if (#LW2 == $LW6) set @LPrize,@LPrize+1; if (#LW3 == $LW1) set @LPrize,@LPrize+1; if (#LW3 == $LW2) set @LPrize,@LPrize+1; if (#LW3 == $LW3) set @LPrize,@LPrize+1; if (#LW3 == $LW4) set @LPrize,@LPrize+1; if (#LW3 == $LW5) set @LPrize,@LPrize+1; if (#LW3 == $LW6) set @LPrize,@LPrize+1; if (#LW4 == $LW1) set @LPrize,@LPrize+1; if (#LW4 == $LW2) set @LPrize,@LPrize+1; if (#LW4 == $LW3) set @LPrize,@LPrize+1; if (#LW4 == $LW4) set @LPrize,@LPrize+1; if (#LW4 == $LW5) set @LPrize,@LPrize+1; if (#LW4 == $LW6) set @LPrize,@LPrize+1; if (#LW5 == $LW1) set @LPrize,@LPrize+1; if (#LW5 == $LW2) set @LPrize,@LPrize+1; if (#LW5 == $LW3) set @LPrize,@LPrize+1; if (#LW5 == $LW4) set @LPrize,@LPrize+1; if (#LW5 == $LW5) set @LPrize,@LPrize+1; if (#LW5 == $LW6) set @LPrize,@LPrize+1; if (#LW6 == $LW1) set @LPrize,@LPrize+1; if (#LW6 == $LW2) set @LPrize,@LPrize+1; if (#LW6 == $LW3) set @LPrize,@LPrize+1; if (#LW6 == $LW4) set @LPrize,@LPrize+1; if (#LW6 == $LW5) set @LPrize,@LPrize+1; if (#LW6 == $LW6) set @LPrize,@LPrize+1; if (@LPrize == 6) goto LWinBig; if (@LPrize > 3 && @LPrize < 6) goto LWinSmall; // NO WINNER mes "[Lottery]"; mes "Bad luck, it appears you do not hold a winning ticket."; next; mes "[Lottery]"; mes "Better luck next time!."; close; // MATCHED ALL SIX LWinBig: mes "[Lottery]"; mes "You have matched all six numbers!"; mes "Jackpot!"; mes "Yelect your reward:"; .@prizeid = 516; .@prizename = "Potato"; SelectPrizeBig: switch(select("Item1:Item2:Item3")) { case 1: .@prizeid = 8050; .@prizename = "Item1"; break; case 2: .@prizeid = 8051; .@prizename = "Item2"; break; case 3: .@prizeid = 8052; .@prizename = "Item3"; break; } mes "Are you sure?"; switch(select("Yes:No")) { case 1: getitem .@prizeid,1; break; case 2: goto SelectPrizeBig; break; } Announce "Lottery: " + strcharinfo(0) + " has won " + .@prizename + "!",8; set #LID,0; close; // MATCHED AT LEAST 4 LWinSmall: mes "[Lottery]"; mes "You have matched at least 4 numbers!"; mes "You've won ^0000FF" + $L_Prize_Money_Small + "z^000000."; set Zeny, Zeny+$L_Prize_Money_Small; Announce "Lottery: " + strcharinfo(0) + " has won a prize of " + $L_Prize_Money_Small + "z!",8; set #LID,0; close; // NO ZENY L_NoZeny: mes "[Lottery]"; mes "You can't afford a lottery ticket."; close; // INVALID TICKET L_Invalid: mes "[Lottery]"; mes "I'm sorry but it appears that you have an invalid ticket."; close; // DOUBLE TICKET L_DoubleTicket: mes "[Lottery]"; mes "It appears that you already have a ticket for today."; mes "You may only purchase one ticket per draw."; close; L_Cancel: mes "[Lottery]"; mes "Come back soon!"; close; // GM MENU (Lets you manually do draws) L_GM: menu "Claim Prize",L_Claim,"Buy New Ticket",L_Buy,"[GM]Do Draw Now",-,"[GM]Rig the Lottery",L_GM_Rig,"Cancel",L_Cancel; // CHECKS IF LOTTERY IS RIGGED if ($L_Rigged == 1) goto L_Rigged_Draw; // GENERATES RANDOM NUMBERS 1-40 GMPick1: set $LW1,rand (1,40); GMPick2: set $LW2,rand (1,40); if ($LW2 == $LW1) goto GMPick2; GMPick3: set $LW3,rand (1,40); if ($LW3 == $LW2) goto GMPick3; if ($LW3 == $LW1) goto GMPick3; GMPick4: set $LW4,rand (1,40); if ($LW4 == $LW2) goto GMPick4; if ($LW4 == $LW1) goto GMPick4; if ($LW4 == $LW3) goto GMPick4; GMPick5: set $LW5,rand (1,40); if ($LW5 == $LW1) goto GMPick5; if ($LW5 == $LW2) goto GMPick5; if ($LW5 == $LW3) goto GMPick5; if ($LW5 == $LW4) goto GMPick5; GMPick6: set $LW6,rand (1,40); if ($LW6 == $LW1) goto GMPick6; if ($LW6 == $LW2) goto GMPick6; if ($LW6 == $LW3) goto GMPick6; if ($LW6 == $LW4) goto GMPick6; if ($LW6 == $LW5) goto GMPick6; // BROADCASTS DRAW L_Broadcast: Announce "Lottery: Welcome to the special GM's lotto draw!",8; Announce "The numbers are as follows: [" + $LW1 + "] [" + $LW2 + "] [" + $LW3 + "] [" + $LW4 + "] [" + $LW5 + "] [" + $LW6 + "]",8; Announce "Congratulations to the winners!",8; // GENERATES DRAW ID CODE L_GenID: set $LID2,$LID; // SETS TOMORROW'S ID NUMBER set $LID,rand (100000,999999); close; // SETS DRAW TO RIGGED NUMBERS L_Rigged_Draw: set $LW1,$LR1; set $LW2,$LR2; set $LW3,$LR3; set $LW4,$LR4; set $LW5,$LR5; set $LW6,$LR6; set $L_Rigged,0; goto L_Broadcast; // ALLOWS GM TO DO A RIGGED DRAW L_GM_Rig: mes "[Lottery]"; mes "Please pick your numbers (1-40):"; set $LR1,0; set $LR2,0; set $LR3,0; set $LR4,0; set $LR5,0; set $LR6,0; GMInput1: Input $LR1; if ($LR1 < 1 || $LR1 > 40) goto GMInput1; mes $LR1; GMInput2: Input $LR2; if ($LR2 < 1 || $LR2 > 40) goto GMInput2; if ($LR2 == $LR1) goto GMInput2; mes $LR2; GMInput3: Input $LR3; if ($LR3 < 1 || $LR3 > 40) goto GMInput3; if ($LR3 == $LR1) goto GMInput3; if ($LR3 == $LR2) goto GMInput3; mes $LR3; GMInput4: Input $LR4; if ($LR4 < 1 || $LR4 > 40) goto GMInput4; if ($LR4 == $LR1) goto GMInput4; if ($LR4 == $LR2) goto GMInput4; if ($LR4 == $LR3) goto GMInput4; mes $LR4; GMInput5: Input $LR5; if ($LR5 < 1 || $LR5 > 40) goto GMInput5; if ($LR5 == $LR1) goto GMInput5; if ($LR5 == $LR2) goto GMInput5; if ($LR5 == $LR3) goto GMInput5; if ($LR5 == $LR4) goto GMInput5; mes $LR5; GMInput6: Input $LR6; if ($LR6 < 1 || $LR6 > 40) goto GMInput6; if ($LR6 == $LR1) goto GMInput6; if ($LR6 == $LR2) goto GMInput6; if ($LR6 == $LR3) goto GMInput6; if ($LR6 == $LR4) goto GMInput6; if ($LR6 == $LR5) goto GMInput6; mes $LR6; next; mes "[Lottery]"; mes "Lottery rigged for next draw."; set $L_Rigged,1; close; } You may add or remove items by altering the switch part.

it is caused because the folder IS NOT a git folder. a git folder shall have .git folder inside it and is hidden. maybe, you want to do SVN transitioning to GIT for this. IDK..http://rathena.org/wiki/Transition_from_SVN_to_GIT or I can suggest you this: 1. git clone from rA's GIT (git clone https://github.com/rathena/rathena.git ~/rAthena) 2. merge the modified files between your old one and the fresh one that's it. google for any references. I can't explain about merging.

[spoiler=pointless to open this]pertamax diamankan :v

hmm, not quite sure about what your question is. if people typed "git commit", it is kept as-is and is knowledge to be "OK" by the local git client. while committing, users need to enter their comment there. if people typed "git push", then it will send all changes to the server. OTHERWISE, server ( https://github.com/rathena ) is (of course) allowed and MUST to reject any pushes from people who are not registered as the developer of rAthena. while committing, users are ought to enter the comment on what they have done, alongside with the name of the modified files does this answer your question. maybe?

morrocc has been rebuilt? *going away checking morrocc* hahaha, know something about adding custom map? it's basically needs you to open mapcache.dat using weemapcache. open it and delete morrocc. extract the destroyed morrocc map from data.grf (yes, data.grf) and rename the 3 files as morrocc.gat, .rsw, .gnd. then, load those 3 maps to your mapcache.dat. save / rebuild it and upload it to the server, and restart the server. you should have it. by doing this, you will no longer have the rebuilt morrocc map unless you make a 'new' map. referrence: http://rathena.org/wiki/Custom_Maps weemapcache: http://rathena.org/board/topic/53424-weemapcache/

try if ( .@atcmd_numparameters == 0 ) .@atcmd_parameters$[0] = "Question";// default value else .@atcmd_parameters$[0] = implode( .@atcmd_parameters$," " );

@Yonko createchatroom works as the following // createchatroom( <char|account|name>, <title>, <password>, {<limit>, <type>} ); the title is the 2nd parameter - script atcmd_example -1,{ OnInit: bindatcmd "question",strnpcinfo(3)+"::OnAtcommand"; end; OnAtcommand: warp "prontera",150,150; if ( .@atcmd_numparameters == 0 ) .@atcmd_parameters$[0] = "Question";// default value createchatroom( getcharid(3), .@atcmd_parameters$[0], "",5 ); sit; end; }