Break San

Clientinfo utilize esse aqui
 
<?xml version="1.0" encoding="euc-kr" ?><clientinfo> <servicetype>america</servicetype> <servertype>primary</servertype> <extendedslot></extendedslot> <connection> <display> Help do DOO </display> <desc>DOO</desc> <balloon> Aproveite e Bom jogo!</balloon> <version>1</version> <address>127.0.0.1</address> <port>6900</port> <aid> <admin>20000000</admin> <admin>20000001</admin> <admin>20000002</admin> <admin>20000003</admin> <admin>20000004</admin> <admin>20000005</admin> <admin>20000006</admin> </aid>loadingscreen#10#//file end) <image>loading00.jpg</image> <image>loading01.jpg</image> loadingscreen#10#//file end) </connection> <registrationweb>https://www.facebook.com/RagnaArtOFICIAL/</registrationweb></clientinfo>

@@Break San
http://depositfiles.org/files/624iv9hfc

dude don't use luadec to decompile files, use the grf editor tool or just use the one I posted here

bla bla bla escrevi um monte de coisa e o chrome deu crash e perdi tudo, apenas baixe e seja feliz!
 
atualizado dia: 05/03/2015
 
créditos: GRAVITY
luafiles05032015.zip

disable skill MC_DISCOUNT and RG_COMPULSION from skill_db
 

Try this out.
prontera,154,186,6 script Daddy Christmas 718,{ mes "[Daddy Christmas]"; mes "Hello there!"; mes "Ho! Ho! Ho!"; mes "Have you been naughty or nice this year?"; next; if (select("I've been nice,Daddy Christmas.:Naughty, you fat prick!.") == 2) { mes "[Daddy Christmas]"; mes "See you around."; close; } else { mes "[Daddy Christmas]"; mes "Very well then!Since you have been nice this year, I will let you enjoy the presents I have in my bag. Here, take a look:"; next; mes "[Daddy Christmas]"; mes "So which one would you like to have?"; next; switch(select("10x Santa Bag:1x Goblin Egg:1x Santa Poring Hat")) { case 1: mes "[Daddy Christmas]"; mes "For the Santa Bag, you’ll need to bring me the following:"; mes "^00FF0010x Well-baked cookie^000000"; mes "^00FF0010x Candy Cane^000000"; mes "^00FF0010x Candy^000000"; mes "^00FF005x Poring Doll^000000"; mes "^00FF001x Santa Hat^000000"; next; mes "[Daddy Christmas]"; mes "Let me check if you have all that I need."; if (select("Yes!:Not Yet!.") == 2) { mes "[Daddy Christmas]"; mes "See you around."; close; } if( countitem(2236) < 1 || countitem(538) < 10 || countitem(530) < 10 || countitem(529) < 10 || countitem(741) < 5 ) { mes "You don't have the requirements."; close; } else { mes "[Daddy Christmas]"; mes "Exactly what I wanted. Here’s your present! Merry Christmas! Ho! Ho! Ho"; delitem 2236, 1; delitem 538, 10; delitem 530, 10; delitem 529, 10; delitem 741, 5; getitem 12132, 10; close; } case 2: mes "[Daddy Christmas]"; mes "For the Christmas Goblin Egg, you’ll need to bring me the following:"; mes "^00FF001x Santa Hat^000000"; mes "^00FF0020x Star Dust^000000"; mes "^00FF0020x Old Broom^000000"; mes "^00FF0010x Witched Starsand^000000"; mes "^00FF0010x Rainbow Carrot^000000"; next; mes "[Daddy Christmas]"; mes "Let me check if you have all that I need."; if (select("Yes!:Not Yet!.") == 2) { mes "[Daddy Christmas]"; mes "See you around."; close; } if( countitem(2236) < 1 || countitem(1148) < 20 || countitem(637) < 20 || countitem(1061) < 10 || countitem(622) < 10 ) { mes "You don't have the requirements."; close; } else { mes "[Daddy Christmas]"; mes "Ho ho ho! *cough *cough"; delitem 2236, 1; delitem 1148, 20; delitem 637, 20; delitem 1061, 10; delitem 622, 10; getitem 9029, 1; mes "[Daddy Christmas]"; mes "Exactly what I wanted. Here’s your present! Merry Christmas! Ho! Ho! Ho"; close; } case 3: mes "[Daddy Christmas]"; mes "For the Santa Poring Hat, you’ll need to bring me the following:"; mes "^00FF001x Santa Poring Card^000000"; mes "^00FF0010x Wrapping Paper^000000"; mes "^00FF0010x Wrapping Lace^000000"; mes "^00FF00Santa Hat^000000"; mes "^00FF001x Stellar^000000"; mes "^00FF00100x Fabric^000000"; mes "^00FF001x Event Ticket^000000"; next; mes "[Daddy Christmas]"; mes "Let me check if you have all that I need."; if (select("Yes!:Not Yet!.") == 2) { mes "[Daddy Christmas]"; mes "See you around."; close; } if( countitem(4005) < 1 || countitem(7175) < 10 || countitem(7174) < 10 || countitem(2294) < 1 || countitem(2236) < 1 || countitem(1059) < 100 || countitem(30802) < 1 ) { mes "You don't have the requirements."; close; } else { mes "[Daddy Christmas]"; mes "Exactly what I wanted. Here’s your present! Merry Christmas! Ho! Ho! Ho"; delitem 4005, 1; delitem 7175, 10; delitem 7174, 10; delitem 2294, 1; delitem 2236, 1; delitem 1059, 1; delitem 3082, 1; getitem 5381, 1; close; } } }close;}

execute this on your database mate
 
ALTER TABLE `login` ADD COLUMN `last_mac` VARCHAR(18) NOT NULL DEFAULT '' AFTER `pincode_change` ;

Umm, corect me if I'm wrong, but isn't performing queries on online character data is useless? It'll get resaved again on log off. I think you'd be better off kicking the character before sql query.
mes "Okay!";.@account_id = getcharid(3);.@usedPoints = 3;.nivelVip = 1;.diasVip = 1;$verificaVip = 1;query_sql("UPDATE `cp_v4p_voters` SET points=(points-"+.@usedPoints+") WHERE account_id='"+.@account_id+"'");atcommand "@kick " + strcharinfo(0);if (getgroupid() == 0){query_sql "UPDATE `login` SET `group_id` = "+.nivelVip+", `dt_vip` = DATE_ADD(`dt_vip`,INTERVAL "+.diasVip+" DAY) WHERE `group_id` = "+.nivelVip+" AND `account_id` = "+getcharid(3);} else {query_sql "UPDATE `login` SET `group_id` = "+.nivelVip+", `dt_vip` = DATE_ADD(`dt_vip`,INTERVAL "+.diasVip+" DAY) WHERE `group_id` = "+.nivelVip+" AND `account_id` = "+getcharid(3);}end;

I don't know if you get me..
use this
if (getgroupid() == 0){query_sql "UPDATE `login` SET `group_id` = 1, `dt_vip` = DATE_ADD(`dt_vip`,INTERVAL "+$diasVip+" DAY) WHERE `group_id` = 0 AND `account_id` = "+getcharid(3);dispbottom "Relogue para ter seu VIP ativado.";}/** I don't know why it is here is this used for removing group id?else{query_sql "UPDATE `login` SET `group_id` = 1, `dt_vip` = DATE_ADD(`dt_vip`,INTERVAL "+$diasVip+" DAY) WHERE `group_id` = 1 AND `account_id` = "+getcharid(3);}*/  
 

Manually revert all 3 changes mentioned in the comments under the report.
1
2
3

Harmony.

Because it's not SC_SPIRIT, it's SC_SOULLINK.
prontera,156,165,5 script Buff & Link 100,{emotion 47; set .@Price,0; // Zeny requerido. set .@Buffs,1; // Buffar os jogadores? (1: sim / 0: não) set .@Delay,5; // Tempo de espera, em segundos ( Padrão 5 segundos ) set .@level,1; // Level de Player VIP set .@time, 300000; // Duração do Buff Soul Link ( Padrão 5 minutos ) // Padrão VIP ---------------------------------------------------- if (getgroupid() >= .@level) { atcommand "@repairall"; callfunc "F_ClearGarbage",0; if (@HD > gettimetick(2)) end; if (.@Price) { message strcharinfo(0),"Custo: "+.@Price+" Zeny."; if (Zeny < .@Price) end; if(select("^0055FFCurar^000000:^777777Sair^000000") == 2) close; set Zeny, Zeny-.@Price; } specialeffect2 313; percentheal 100,100; if (.@Buffs) { specialeffect2 EF_INCAGILITY; sc_start SC_INC_AGI,240000,10; specialeffect2 EF_BLESSING; sc_start SC_BLESSING,240000,10; // Soul Linker -------------------------------------------------- switch ( BaseJob ) { case 18: set .@spirit, 445; break; case 15: set .@spirit, 447; break; case 4047: set .@spirit, 448; break; case 16: set .@spirit, 449; break; case 14: set .@spirit, 450; break; case 23: set .@spirit, 451; break; case 7: set .@spirit, 452; break; case 9: set .@spirit, 453; break; case 8: set .@spirit, 454; break; case 19: case 20: set .@spirit, 455; break; case 17: set .@spirit, 456; break; case 10: set .@spirit, 458; break; case 11: set .@spirit, 460; break; } if ( .@spirit ) { sc_start2 SC_SOULLINK, .@time, 5, .@spirit; skilleffect .@spirit, 5; } if (.@Delay) set @HD, gettimetick(2)+.@Delay; end; } } else { atcommand "@repairall"; callfunc "F_ClearGarbage",0; if (@HD > gettimetick(2)) end; if (.@Price) { message strcharinfo(0),"Custo: "+.@Price+" Zeny."; if (Zeny < .@Price) end; if(select("^0055FFCurar^000000:^777777Sair^000000") == 2) close; set Zeny, Zeny-.@Price; } specialeffect2 313; percentheal 100,100; if (.@Buffs) { specialeffect2 EF_INCAGILITY; sc_start SC_INC_AGI,240000,10; specialeffect2 EF_BLESSING; sc_start SC_BLESSING,240000,10; } if (.@Delay) set @HD, gettimetick(2)+.@Delay; end; }}

disable player from multi client and kick AFK players ?
that's a frequently asked question until .... I'm sick of it
 
I know how to block same ip address, but dunno how to block same mac address
and for the AFK script
//===== Hercules Script ===========================================//= AFK script//===== By: =======================================================//= AnnieRuru//===== Current Version: ==========================================//= 1.3//===== Compatible With: ==========================================//= Hercules 20140919//===== Description: ==============================================//= warp AFK players in BG maps to SavePoint, leave current team//===== Topic =====================================================//= http://www.eathena.ws/board/index.php?showtopic=272411//===== Additional Comments: ======================================//= repost this script for hercules//=================================================================- script afk_script -1,{// ConfigOnInit: .sleeploop = 2000; // every 1 second .afk = 4; // loop 180 times of 1 second = 3 minutes to execute setarray .@map$, "bat_a01", "bat_a02", "bat_b01", "bat_b02", "bat_c01", "bat_c02", "bat_c03"; // battlegrounds .@size = getarraysize( .@map$ ); for ( .@i = 0; .@i < .@size; .@i++ ) setmapflag .@map$[.@i], mf_loadevent; .map$ = ":"+ implode( .@map$, ":" ) +":"; .idle = .sleeploop * .afk / 1000; end;// what to do when triggeredL_trigger:// dispbottom "you have afk for "+ .idle +" seconds"; if ( getcharid(4) ) bg_leave; warp "SavePoint", 0,0; end;// functionOnPCLoadMapEvent: while ( true ) { if ( compare( .map$, ":"+ strcharinfo(3) +":" ) ) { if ( checkidle() >= .idle ) goto L_trigger;// dispbottom "you have afk for "+ checkidle() +" seconds"; sleep2 .sleeploop; } else break; } end;}wanted to make a release topic, but suddenly realize Ind almost finish the battleground queue systemmight as well use his ... when ready

from topic
 
http://upaste.me/30b95b

maybe you can try my mithril coin shop
http://rathena.org/board/topic/91109-how-to-fix-multi-shop-v12/?p=238863
- shop market2#hidden -1,501:1000prontera,156,172,5 script market 100,{ dispbottom "You currently have "+ countitem(.currency) +" "+ getitemname(.currency); callshop .shopname$, 1; end;OnInit: function addshopitem { npcshopdelitem .shopname$, 501; .@count = getargcount(); for ( .@i = 0; .@i < .@count; .@i++ ) { if ( .@i % 2 == 0 ) .itemid[ .@i /2 ] = getarg( .@i ); else { .itemcost[ .@i /2 ] = getarg( .@i ); npcshopadditem .shopname$, .itemid[ .@i /2 ], getarg( .@i ); } } }// ----- Configuration ------ .shopname$ = "market2#hidden"; // shop name that match the 1st line in this script .currency = 674; // item used for currency addshopitem // adds shop items here 512,10, 513,20, 514,30, 515,40, 516,50, 607,1;// ------------------------- .itemsize = getarraysize( .itemid ); for ( .@i = 0; .@i < .itemsize; .@i++ ) setd ".item"+ .itemid[.@i] +"cost", .itemcost[.@i]; npcshopattach .shopname$; end;OnBuyItem: if ( !@bought_quantity ) end; .@size = getarraysize( @bought_nameid ); for ( .@i = 0; .@i < .@size; .@i++ ) .@itemcost = .@itemcost + getd( ".item"+ @bought_nameid[.@i] +"cost" ) * @bought_quantity[.@i]; if ( .@itemcost > countitem(.currency) ) { mes "you don't have enough "+ getitemname(.currency); close; } if ( !checkweight2( @bought_nameid, @bought_quantity ) ) { mes "you can't carry all these items !"; close; } delitem .currency, .@itemcost; for ( .@i = 0; .@i < .@size; .@i++ ) getitem @bought_nameid[.@i], @bought_quantity[.@i]; end;OnSellItem: if ( !@sold_quantity ) end; .@size = getarraysize( @sold_nameid ); for ( .@i = 0; .@i < .@size; .@i++ ) .@itemgain = .@itemgain + getd( ".item"+ @sold_nameid[.@i] +"cost" ) * @sold_quantity[.@i]; if ( !checkweight( .currency, .@itemgain ) ) { mes "you can't carry all these items !"; close; } for ( .@i = 0; .@i < .@size; .@i++ ) if ( getd( ".item"+ @sold_nameid[.@i] +"cost" ) ) delitem @sold_nameid[.@i], @sold_quantity[.@i]; getitem .currency, .@itemgain; end;}

try this
 
source
http://herc.ws/board/topic/4570-
 
function
http://herc.ws/board/topic/4889-
 
script
http://upaste.me/6473ee

*blush*

sorry but I dunno how to answer your question
 
 
 

File Name: FREE PSD 2
File Submitter: Doo
File Submitted: 21 Aug 2014
File Category: Client Resources
 
FREE PSD
 
Click here to download this file

http://herc.ws/wiki/Hercules_Plugin_Manager

Resolvido, um membro da minha equipe conseguiu a solução em outro fórum.
@credito SoulBlaker
 
prontera,170,189,4 script NPC UnMuteTeste 50,{ if( $@unmutenpc ) sleep2 1000; set $@charunmute$, strcharinfo(0); set $@unmutenpc, 1; initnpctimer; end; OnTimer1000: atcommand "@unmute "+$@charunmute$; set $@unmutenpc, 0; stopnpctimer; end;}

vê se funciona:
Script: <" sc_start SC_PROPERTYFIRE,60000,10; ">

SC_PROPERTYWATER
SC_PROPERTYWIND SC_PROPERTYGROUND     água, vento e terra respectivamente, só copiar do anterior

sc_start SC_ATTHASTE_POTION2,360000,0;sc_start SC_INC_AGI,240000,10;sc_start SC_BLESSING,240000,10;sc_start SC_IMPOSITIO,60000,5;sc_start SC_MAGNIFICAT,90000,5;sc_start SC_FOOD_STR,360000,10;sc_start SC_FOOD_AGI,360000,10;sc_start SC_FOOD_VIT,360000,10;sc_start SC_FOOD_INT,360000,10;sc_start SC_FOOD_DEX,360000,10;sc_start SC_FOOD_LUK,360000,10; 

copia eles do re/item_db.conf e cola no pre-re/item_db.conf