ItsFree

Buenas c: posiblemente este poniendo esto en el lado que no es... si es asi decirme donde ponerlo porfa ya que ni en el support de ingles supe donde ponerlo.... [If you only understand english check below] Tengo un problema... actualmente uso un Rathena SVN r.17708 tengo problemas con un usuario... posiblemente alguno ya paso por eso... el tipico usuario que no se cansa de cambiar ip y crear cuenta... anteriormente en otro server donde era admin, tenian implementado el ban por MAC Address buscando informacion supe que solo Harmony poseia algo asi, sin embargo leyendo me percate que segun Harmony ya esta algo desactualizado... asi que me duda o pregunta seria si alguno tiene el conocimiento de como implementar esto a mi servidor o bien... alguna manera de conseguir el harmony funcional... del harmony solo me interesa por esto... y me resulta molestozo andar baneado ip a cada rato... me resulta mejor con MAC Address.. Well i've a problem im using atm Rathena SVN r.17708, my problem is with an user that myb you know that exist some people that can reset their IP easily make a new account and keeping doing spam and everything on main town.... some time ago when i was admin of another server there were implemented that "MAC Address ban" so i tried to bought harmony but without an answer from their support.... so.... anyone here know any way to add this system to my server? im really need add this... or anyone here know how can i contact the harmony's owner or something like... well thx for at least read... ^^ Un gusto y gracias c:

Hi.... i tried to edit some stuff on source but at the end i solved everything without the stuff i edit, now when i try to restart login. char & mapserver i got a problem, the problem is this.... should i delete and put the 'channel.h' & atcommand.o as default? http://www.subeimagenes.com/img/problem-with-source-1299723.html Fixed~

i found that can be edited with battle.c but im still new on that field anyone know how edit the damage? or at least reduce the max lvl

hi, thx for reply i tried everything fine but i got a problem... when i try to buy a item it said "You can't purchase that many ....." but when i try with the normal script i mean make a "grape juice" it works :/ i edit the script like this: //===== rAthena Script ======================================= //= Euphy's Quest Shop //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.6 //===== Compatible With: ===================================== //= rAthena SVN r16862+ //===== Description: ========================================= //= A dynamic quest shop based on Lunar's, with easier config. //= Includes support for multiple shops & cashpoints. //= Item Preview script by ToastOfDoom. //============================================================ // Shop NPCs -- supplying no argument displays entire menu. // callfunc "qshop"{,<shop ID>{,<shop ID>{,...}}}; //============================================================ poring_w02,102,197,6 script Quest Shop#1 998,{ callfunc "qshop"; } // Script Core //============================================================ - script quest_shop -1,{ function Add; function Chk; function Slot; function A_An; OnInit: freeloop(1); // ----------------------------------------------------------- // Basic shop settings. // ----------------------------------------------------------- set .Announce,0; // Announce quest completion? (1: yes / 0: no) set .ShowSlot,1; // Show item slots? (2: all equipment / 1: if slots > 0 / 0: never) set .ShowID,0; // Show item IDs? (1: yes / 0: no) set .ShowZeny,0; // Show Zeny cost, if any? (1: yes / 0: no) set .MaxStack,5000; // Max number of quest items purchased at one time. // ----------------------------------------------------------- // Points variable -- optional quest requirement. // setarray .Points$[0],"<variable name>","<display name>"; // ----------------------------------------------------------- setarray .Points$[0],"#CASHPOINTS","Cash Points"; // ----------------------------------------------------------- // Shop IDs -- to add shops, copy dummy data at bottom of file. // setarray .Shops$[1],"<Shop 1>","<Shop 2>"{,...}; // ----------------------------------------------------------- setarray .Shops$[1],"Headgears","Weapons","Other"; // ----------------------------------------------------------- // Quest items -- do NOT use a reward item more than once! // Add(<shop ID>,<reward ID>,<reward amount>, // <Zeny cost>,<point cost>, // <required item ID>,<required item amount>{,...}); // ----------------------------------------------------------- Add(1,29199,1,0,2000,0,0,0,0,0,0,0,0,0,0); Add(1,29200,1,0,3000,0,0,0,0,0,0,0,0,0,0); Add(1,292001,1,0,3000,0,0,0,0,0,0,0,0,0,0); Add(2,1224,1,0,0,7297,30,969,10,999,50,714,10); Add(2,1225,1,0,0,7292,30,969,10,999,50,714,10); Add(3,531,1,3,0,512,1,713,1); Add(3,532,1,3,0,513,1,713,1); Add(3,533,1,3,0,514,1,713,1); Add(3,534,1,3,0,515,1,713,1); // ----------------------------------------------------------- freeloop(0); set .menu$,""; for(set .@i,1; .@i<=getarraysize(.Shops$); set .@i,.@i+1) { set .menu$, .menu$+.Shops$[.@i]+":"; npcshopdelitem "qshop"+.@i,909; } end; OnMenu: set .@size, getarraysize(@i); if (!.@size) set .@i, select(.menu$); else if (.@size == 1) set .@i, @i[0]; else { for(set .@j,0; .@j<.@size; set .@j,.@j+1) set .@menu$, .@menu$+.Shops$[@i[.@j]]+":"; set .@i, @i[select(.@menu$)-1]; } deletearray @i[0],getarraysize(@i); if (.Shops$[.@i] == "") { message strcharinfo(0),"An error has occurred."; end; } dispbottom "Select one item at a time."; callshop "qshop"+.@i,1; npcshopattach "qshop"+.@i; end; OnBuyItem: // .@q[] : RewardID, BoughtAmt, RewardAmt, BaseAmt, ReqZeny, ReqPts, { ReqItem, ReqAmt, ... } setarray .@q[0],@bought_nameid[0],((@bought_quantity[0] > .MaxStack)?.MaxStack:@bought_quantity[0]); copyarray .@q[3],getd(".q_"+.@q[0]+"[0]"),getarraysize(getd(".q_"+.@q[0])); set .@q[2],.@q[1]*.@q[3]; if (!.@q[2] || .@q[2] > 30000) { message strcharinfo(0),"You can't purchase that many "+getitemname(.@q[0])+"."; end; } mes "[Quest Shop]"; mes "Reward: ^0055FF"+((.@q[2] > 1)?.@q[2]+"x ":"")+Slot(.@q[0])+"^000000"; mes "Requirements:"; if (.@q[4]) mes " > "+Chk(Zeny,.@q[4]*.@q[1])+(.@q[4]*.@q[1])+" Zeny^000000"; if (.@q[5]) mes " > "+Chk(getd(.Points$[0]),.@q[5]*.@q[1])+(.@q[5]*.@q[1])+" "+.Points$[1]+" ("+getd(.Points$[0])+"/"+(.@q[5]*.@q[1])+")^000000"; if (.@q[6]) for(set .@i,6; .@i<getarraysize(.@q); set .@i,.@i+2) mes " > "+Chk(countitem(.@q[.@i]),.@q[.@i+1]*.@q[1])+((.ShowID)?"{"+.@q[.@i]+"} ":"")+Slot(.@q[.@i])+" ("+countitem(.@q[.@i])+"/"+(.@q[.@i+1]*.@q[1])+")^000000"; next; setarray @qe[1], getiteminfo(.@q[0],5), getiteminfo(.@q[0],11); if (((@qe[1] & 1) || (@qe[1] & 256) || (@qe[1] & 512)) && @qe[2] > 0) set .@preview,1; addtimer 1000, strnpcinfo(0)+"::OnEnd"; while(1) { switch(select(" ~ Purchase ^0055FF"+getitemname(.@q[0])+"^000000:"+((.@preview && !@qe[6])?" ~ Preview...":"")+": ~ ^777777Cancel^000000")) { case 1: if (@qe[0]) { mes "[Quest Shop]"; mes "You're missing one or more quest requirements."; close; } if (!checkweight(.@q[0],.@q[2])) { mes "[Quest Shop]"; mes "^FF0000You need "+(((.@q[2]*getiteminfo(.@q[0],6))+Weight-MaxWeight)/10)+" additional weight capacity to complete this trade.^000000"; close; } if (.@q[4]) set Zeny, Zeny-(.@q[4]*.@q[1]); if (.@q[5]) setd .Points$[0], getd(.Points$[0])-(.@q[5]*.@q[1]); if (.@q[6]) for(set .@i,6; .@i<getarraysize(.@q); set .@i,.@i+2) delitem .@q[.@i],.@q[.@i+1]*.@q[1]; getitem .@q[0],.@q[2]; if (.Announce) announce strcharinfo(0)+" has created "+((.@q[2] > 1)?.@q[2]+"x "+getitemname(.@q[0]):A_An(getitemname(.@q[0])))+"!",0; specialeffect2 699; close; case 2: setarray @qe[3], getlook(LOOK_HEAD_BOTTOM), getlook(LOOK_HEAD_TOP), getlook(LOOK_HEAD_MID), 1; if (@qe[1] & 1) changelook LOOK_HEAD_BOTTOM, @qe[2]; if (@qe[1] & 256) changelook LOOK_HEAD_TOP, @qe[2]; if (@qe[1] & 512) changelook LOOK_HEAD_MID, @qe[2]; break; case 3: close; } } OnEnd: if (@qe[6]) { changelook LOOK_HEAD_BOTTOM, @qe[3]; changelook LOOK_HEAD_TOP, @qe[4]; changelook LOOK_HEAD_MID, @qe[5]; } deletearray @qe[0],7; end; function Add { if (getitemname(getarg(1)) == "null") { debugmes "Quest reward #"+getarg(1)+" invalid (skipped)."; return; } setarray .@j[0],getarg(2),getarg(3),getarg(4); for(set .@i,5; .@i<getargcount(); set .@i,.@i+2) { if (getitemname(getarg(.@i)) == "null") { debugmes "Quest requirement #"+getarg(.@i)+" invalid (skipped)."; return; } else setarray .@j[.@i-2],getarg(.@i),getarg(.@i+1); } copyarray getd(".q_"+getarg(1)+"[0]"),.@j[0],getarraysize(.@j); npcshopadditem "qshop"+getarg(0),getarg(1),((.ShowZeny)?getarg(3):0); return; } function Chk { if (getarg(0) < getarg(1)) { set @qe[0],1; return "^FF0000"; } else return "^00FF00"; } function Slot { set .@s$,getitemname(getarg(0)); switch(.ShowSlot) { case 1: if (!getitemslots(getarg(0))) return .@s$; case 2: if (getiteminfo(getarg(0),2) == 4 || getiteminfo(getarg(0),2) == 5) return .@s$+" ["+getitemslots(getarg(0))+"]"; default: return .@s$; } } function A_An { setarray .@A$[0],"a","e","i","o","u"; set .@B$, "_"+getarg(0); for(set .@i,0; .@i<5; set .@i,.@i+1) if (compare(.@B$,"_"+.@A$[.@i])) return "an "+getarg(0); return "a "+getarg(0); } } function script qshop { deletearray @i[0],getarraysize(@i); for(set .@i,0; .@i<getargcount(); set .@i,.@i+1) set @i[.@i],getarg(.@i); doevent "quest_shop::OnMenu"; end; } // Dummy shop data -- copy as needed. //============================================================ - shop qshop1 -1,29199:2000,29200:3000,29201:3000 - shop qshop2 -1,29500:1500 - shop qshop3 -1,29501:2500 - shop qshop4 -1,909:-1 - shop qshop5 -1,909:-1 Ok i used another script and works for me thx anyway ^^ i used this http://svn.code.sf.net/p/rathena/svn/trunk/npc/merchants/cash_trader.txt

Hi... as the title said anyone here have a dynamic shop that works on rathena r17708 ? i mean i wanna add a "donation system" but im interested to use cash points or at least an X item myb like poring coins... anyone here has something like that i tried to put some dynamic shops but never works myb because alll dynamic's shops i found was kinda old :/ thx

Hi, as the title said... anyone here know how to reduce damage or max level of all star gladiator anger's i mean for formule said.... Anger of the (Stars/Moon/Sun) Lv1: (+BaseLV+LUK+DEX)/9 Lv2: (+BaseLV+LUK+DEX)/6 Lv3: (+BaseLV+LUK+DEX)/3 i want reduce all of em to /9 or... put that the max lvl is 1 for the max lvl of the server and max stats there's alot of damage and i want to reduce that damage Thx for at least come here ant read ^^

Hi, as the title said... anyone here know how to reduce damage or max level of all star gladiator anger's i mean for formule said.... Anger of the (Stars/Moon/Sun) Lv1: (+BaseLV+LUK+DEX)/9 Lv2: (+BaseLV+LUK+DEX)/6 Lv3: (+BaseLV+LUK+DEX)/3 i want reduce all of em to /9 or... put that the max lvl is 1 for the max lvl of the server and max stats there's alot of damage and i want to reduce that damage Thx for at least come here ant read ^^ bump c:

thx it works

Hi... i've a question anyone here know how can i add a cool down to Tarot (clown/gypsy's skills) i mean but that cool down can't be affected by kiel cards ? something like.... 3 segs of that CD.. anyone knows? help plz

Hi im having a trouble with the 99mdef someone reach that... but when someone throw a magic skill he doesnt get any damage reduction what should i do? i guesss i've all ok i never touch anything about "mdef" :c sorry... solved~

as the title said... i start the woe by command or by agit_controller but there's no a portal and i disable some castles and they have portal but no emperium ._. also the treasure chest can't respawn... i had to add a "customs" treasure chest's respawn what can i do? // -------------------------------------------------------------- // - Guild Wars - // -------------------------------------------------------------- // ----------------------- War of Emperium ---------------------- // - Guild WoE time settings npc: npc/guild/agit_controller.txt // - Guild NPC Template file npc: npc/guild/agit_main.txt // - Al De Baran //npc: npc/guild/aldeg_cas01.txt //npc: npc/guild/aldeg_cas02.txt //npc: npc/guild/aldeg_cas03.txt //npc: npc/guild/aldeg_cas04.txt //npc: npc/guild/aldeg_cas05.txt // - Geffen //npc: npc/guild/gefg_cas01.txt //npc: npc/guild/gefg_cas02.txt //npc: npc/guild/gefg_cas03.txt //npc: npc/guild/gefg_cas04.txt //npc: npc/guild/gefg_cas05.txt // - Payon //npc: npc/guild/payg_cas01.txt //npc: npc/guild/payg_cas02.txt //npc: npc/guild/payg_cas03.txt //npc: npc/guild/payg_cas04.txt //npc: npc/guild/payg_cas05.txt // - Prontera //npc: npc/guild/prtg_cas01.txt //npc: npc/guild/prtg_cas02.txt //npc: npc/guild/prtg_cas03.txt npc: npc/guild/prtg_cas04.txt //npc: npc/guild/prtg_cas05.txt // - Treasure Room Protection npc: npc/guild/trs_rp.txt // --------------- War of Emperium Second Edition --------------- // - WoE SE time settings npc: npc/guild2/agit_start_se.txt // - Guild NPC Template file npc: npc/guild2/agit_main_se.txt // - Town Flags npc: npc/guild2/guild_flags.txt // - Arunafeltz //npc: npc/guild2/arug_cas01.txt //npc: npc/guild2/arug_cas02.txt //npc: npc/guild2/arug_cas03.txt //npc: npc/guild2/arug_cas04.txt //npc: npc/guild2/arug_cas05.txt // - Schwaltzvalt //npc: npc/guild2/schg_cas01.txt //npc: npc/guild2/schg_cas02.txt //npc: npc/guild2/schg_cas03.txt //npc: npc/guild2/schg_cas04.txt //npc: npc/guild2/schg_cas05.txt i just left prtg_cas04 enable but there's no portal... but on cas01 & 03 there're portals :s what should i do?

Hi i'm having some troubles im editing a high rate server but the perfect dodge was disable so i enable but now i want to know if there's any way to reduce the formule from stats for example: if each 10 Luk = 1 Perfect Dodge... i want: each 15 Luk = 1 Perfect Dodge... Also if there's a way to set a max PD i mean still 100 PD to get inmunity to meele attacks, but if there's a way to put that the max character just can have 70 PD.... ? i mean i want PD in the server but i dont want that they can get 100 just 70 c: well are... 2 request on 1 myb with the first im fine i try to search on status.c but i didnt find anything (kinda new with src) anyone understand what did i say? plz help, thx for at least read ^^

wow i understood thx thx bro <3

i tried to edit but im kinda new with this... so idk what should i edit to make impossible get these status resistence by stats i just want that the only way to protec about em be by cards effs or something about get "900" of X Stats

Hi... im helping a friend to edit some stuff on a rathena server but im kinda outdate about ragnarok and this source.... so i need some help the server max stat is 500, with wings and everything is 600~620 so... i need a way that they got affect from these effects: poison,curse,sleep,silence,etc... and i want that the only way to get "inmunity" its with cards... i got this: switch (type) { case SC_POISON: case SC_DPOISON: sc_def = status->vit*700; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; if (sd) { // For players: 60000 - 450*vit - 100*luk tick_def = status->vit*75; tick_def2 = status->luk*100; } else { // For monsters: 30000 - 200*vit tick>>=1; tick_def = (status->vit*200)/3; } break; case SC_STUN: sc_def = status->vit*700; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; tick_def2 = status->luk*10; break; case SC_SILENCE: #ifndef RENEWAL sc_def = status->vit*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; #else sc_def = status->int_*500; sc_def2 = (status->vit + status->luk) * 5 + status_get_lv(bl)*10 - status_get_lv(src)*10; #endif tick_def2 = status->luk*10; break; case SC_BLEEDING: #ifndef RENEWAL sc_def = status->vit*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; #else sc_def = status->agi*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; #endif tick_def2 = status->luk*10; break; case SC_SLEEP: #ifndef RENEWAL sc_def = status->int_*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; #else sc_def = status->agi*500; sc_def2 = (status->int_ + status->luk) * 5 + status_get_lv(bl)*10 - status_get_lv(src)*10; #endif tick_def2 = status->luk*10; break; case SC_STONE: sc_def = status->mdef*100; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; tick_def = 0; // No duration reduction break; case SC_FREEZE: sc_def = status->mdef*100; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; tick_def2 = status_src->luk*-10; // Caster can increase final duration with luk break; case SC_CURSE: // Special property: immunity when luk is zero if (status->luk == 0) return 0; sc_def = status->luk*500; sc_def2 = status->luk*10 - status_get_lv(src)*10; // Curse only has a level penalty and no resistance tick_def = status->vit*100; tick_def2 = status->luk*10; break; case SC_BLIND: sc_def = (status->vit + status->int_)*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; tick_def2 = status->luk*10; break; case SC_CONFUSION: sc_def = (status->str + status->int_)*500; sc_def2 = status_get_lv(src)*10 - status_get_lv(bl)*10 - status->luk*10; // Reversed sc_def2 tick_def2 = status->luk*10; break; so... anyone have any idea what im talking about? pl i need solve this problem in short words... i want that characters need like... 900 of X Stat for get inmunity... Thx for at least read ^^

Hi... im helping a friend to edit some stuff on a rathena server but im kinda outdate about ragnarok and this source.... so i need some help the server max stat is 500, with wings and everything is 600~620 so... i need a way that they got affect from these effects: poison,curse,sleep,silence,etc... and i want that the only way to get "inmunity" its with cards... i got this: switch (type) { case SC_POISON: case SC_DPOISON: sc_def = status->vit*700; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; if (sd) { // For players: 60000 - 450*vit - 100*luk tick_def = status->vit*75; tick_def2 = status->luk*100; } else { // For monsters: 30000 - 200*vit tick>>=1; tick_def = (status->vit*200)/3; } break; case SC_STUN: sc_def = status->vit*700; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; tick_def2 = status->luk*10; break; case SC_SILENCE: #ifndef RENEWAL sc_def = status->vit*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; #else sc_def = status->int_*500; sc_def2 = (status->vit + status->luk) * 5 + status_get_lv(bl)*10 - status_get_lv(src)*10; #endif tick_def2 = status->luk*10; break; case SC_BLEEDING: #ifndef RENEWAL sc_def = status->vit*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; #else sc_def = status->agi*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; #endif tick_def2 = status->luk*10; break; case SC_SLEEP: #ifndef RENEWAL sc_def = status->int_*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; #else sc_def = status->agi*500; sc_def2 = (status->int_ + status->luk) * 5 + status_get_lv(bl)*10 - status_get_lv(src)*10; #endif tick_def2 = status->luk*10; break; case SC_STONE: sc_def = status->mdef*100; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; tick_def = 0; // No duration reduction break; case SC_FREEZE: sc_def = status->mdef*100; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; tick_def2 = status_src->luk*-10; // Caster can increase final duration with luk break; case SC_CURSE: // Special property: immunity when luk is zero if (status->luk == 0) return 0; sc_def = status->luk*500; sc_def2 = status->luk*10 - status_get_lv(src)*10; // Curse only has a level penalty and no resistance tick_def = status->vit*100; tick_def2 = status->luk*10; break; case SC_BLIND: sc_def = (status->vit + status->int_)*500; sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10; tick_def2 = status->luk*10; break; case SC_CONFUSION: sc_def = (status->str + status->int_)*500; sc_def2 = status_get_lv(src)*10 - status_get_lv(bl)*10 - status->luk*10; // Reversed sc_def2 tick_def2 = status->luk*10; break;

Hi everyone i need some help to find an 'updated' poring_race i found a poring race but.... after the first try it wont work anymore anyone have this script and can provide it to me ? i tried to find checking all forums... and just one of those works... but just works once u.u and yep... is for rathena no hercules or something like that thx for at least... read ^^ bump bump

it works ! thx <3

Hi, thx for reply i tried to test it but doesnt works :c then i try to edit moving: to another place but still not work sorry alot of time that i dont touch any script so atm im kinda new

-Hi... i've about 3~4 days looking for this kind of npc but alot of em are outdate i need a NPC for 100,000,000 Zeny gives you a item i want that npc can give gold coin (671)with 10% to get this silver coin (676) 40% bronze coin (673) 70% (just 1 of 3 items listed b4) -also i need a NPC that count kill on X map and with each kill give +1 point with an exchange points for Y item. i guess are kinda "easy" npc for some people here so plz help & thx for at least read. - also i need kinda help about a NPC that change an item to "costume equipment" i guess you know what im talking about... PD: sorry if i put this on incorrect place move if is necesary.