Hefaisto

Membro
  • Total de itens

    34
  • Registro em

  • Última visita

Reputação

1 Iniciante

Sobre Hefaisto

  1. Eh sim, nao consegui ativar
  2. Ele não ativa, não mostra erros .
  3. Pois é , por isso n coloco agr. Por isso queria ajeitar esse NPC aí, só q eu n consegui
  4. Entendo que não é 100% ou q tem como burlar. Só que é provisório. Alguém poderia me ajudar com esse novo q postei?
  5. Boa tarde, uma conta nao consegue logar no servidor. Chega ate a tela para escolher os personagens, apos isso da recusado pelo servidor. E eh somente essa conta, postarei uma foto do erro
  6. Pois eh, mais pra frente tenho até vontade de colocar algo pago. Mais no momento teria q ser Free. Esse NPC acima n e 100% mais pode dificultar um pouco
  7. Mas esse gerpard e pago ou Free?
  8. Na hora de abrir IG TOOLS ele pede email e senha. Como que resolve isso?
  9. Boa tarde galera, Alguém teria algum anti bot funcional para o brathena? Procurei em todo fórum, só que todos que encontrei não funciona. - script Anti-Bot -1,{ OnInit: //Opções de cores no menu. (Aconselhável não mexer aqui) setarray .cores$," Azul"," Vermelho"," Preto"," Marrom"," Amarelo"," Verde"; set .arraysize,getarraysize(.cores$); //Cor da fala do NPC. (Aconselhável não mexer aqui) setarray .cores2$,"^5379ab","^bd3f44","^000000","^ba8463","^ffec8c","^96ba46"; //Tempo de ban do personagem quando cancela o menu ou quando erra //a resposta algumas vezes. (Tempo em minutos) set .bantime,5; //Quantia de chances que a pessoa tem para responder a pergunta. set .chances,2; //Nível de conta máximo para o anti-bot poder fazer a verificação. set .NvMax,990; //Caso deseje adicionar uma pergunta à verificação 1, basta adicionar às 3 arrays abaixo. //Lembre-se, para fazer isso, é necessário configurar a pergunta, a resposta e a imagem que será exibida //Imagens que serão exibidas juntamente com uma pergunta, no caso da verificação 1. //As imagens devem estar na pasta illust ou na pasta cardbmp. setarray .imges$,"bat_kiyom1","bat_crua1","bard_eland01","hair_f_22","hair_f_12","hair_f_19","kh_kiel01","lhz_diguts02","lhz_diguts02","prt_soldier","wish_maiden11","oliver_hum"; //Perguntas feitas no caso da verificação 1. (Apenas complemente a pergunta) //As perguntas já são antecedidas de "Qual é a cor" e sucedidas por " do personagem?". setarray .pergs$,"do capa","da capa","do chapéu","do cabelo","dos sapatos","do cabelo","da roupa","da gravata","das calças","do chapéu","das asas","do cabelo"; //Número da cor que responde corretamente à pergunta. setarray .resps2,0,1,5,0,3,5,0,1,0,3,2,4; //Número mínimo de monstros que devem ser mortos para ativar o script. //Lembrando que pelo valor adicionado ser aleatório, este é apenas o número minimo. //E que provavelmente o número de monstros mortos que ativará o script é cerca de o dobro do número digitado. //do número colocado abaixo. set .MinMonster,300; end; OnPCLoginEvent: //Tire a '//' da linha de baixo, caso queira que o npc seja ativado também quando o personagem entrar no servidor. //set #antibot,.MinMonster; OnNPCKillEvent: if(set(#antibot,#antibot+rand(2))<.MinMonster || getgmlevel()>.NvMax) end; set [email protected],(checkcart()?128:0)|(checkriding()?32:0)|(checkfalcon()?16:0); set @AccLv,getgmlevel(); atcommand "@adjgmlvl -1 "+strcharinfo(0); atcommand "@option 1 4 2"; setoption 0x40,1; attachnpctimer; initnpctimer; mes set([email protected]$,"[ ^0000FFAnti-Bot^000000 ]"); mes "Olá, "+strcharinfo(0)+"."; mes "Percebi que você anda matando muitos monstros..."; mes "Para evitar jogadores mal intencionados, preciso fazer um teste com você..."; while(1){ next; set [email protected]$,""; mes [email protected]$; for(set @i,0;@i<.arraysize;set @i,@i+1){ set [email protected][@i],rand(.arraysize); for(set @o,0;@o<@i;set @o,@o+1) if([email protected][@i][email protected][@o]){ set [email protected][@i],rand(.arraysize); set @o,-1; } } if(rand(2)){ mes "Qual é a cor "+.pergs$[set([email protected],rand(getarraysize(.resps2)))]+" do personagem?"; cutin .imges$[[email protected]],rand(5); set @resps,.resps2[[email protected]]; }else{ mes .cores2$[set(@resps,rand(.arraysize))]+"Qual é a cor que está a minha fala?"; mes "Selecione a correta no menu..."; } mes "As opções são estas:"; for(set @i,0;@i<.arraysize;set @i,@i+1){ mes .cores2$[@i]+.cores$[@i]; set [email protected]$,[email protected]$+.cores$[[email protected][@i]]+":"; } next; if(prompt([email protected]$)==255) { atcommand "@ban "+.bantime+"mn "+strcharinfo(0); end; } mes [email protected]$; if([email protected][@menu-1][email protected]){ if(set([email protected],[email protected]+1) >= .chances){ mes "Você errou muitas vezes..."; mes "Por motivos de segurança, ficará proibido de jogar por 5 minutos."; atcommand "@ban "+.bantime+"mn "+strcharinfo(0); end; } mes "Você errou..."; mes "Lhe restam ^ff0000"+([email protected])+"^000000 tentativas."; cutin "",255; continue; } mes "Tudo certo..."; mes "Pode continuar a jogar."; cutin "",255; setoption 0x40,0; atcommand "@option 0 0 "[email protected]; atcommand "@adjgmlvl "[email protected]+strcharinfo(0); set #antibot,0; stopnpctimer; close; } //Tempo que a pessoa tem para responder corretamente ao NPC //Em milissegundos (segundos*1000) OnTimer60000: atcommand "@kick "+strcharinfo(0); end; } Esse e um deles, mais se alguém tiver algum outro funcional e puder disponibilizar , ficarei mt grato.
  10. Estou tentando add esse pack guild mais ele nao esta funcionando, alguem pode me ajudar? prontera,164,169,6 script Pack Guild 51,{ set .nn$, "[^D90000"+StrNpcInfo(1)+"^000000]"; set @GID, getcharid(2); query_sql "SELECT `char_id`, `acc_id`, `master`, `guild_id`, `name`, `data`, `pack_guild` FROM `pack_guild` WHERE `char_id` = '"+getcharid(0)+"'", @charid, @accid, @master$, @guildid, @nameg$, @date$, @PKG; mes .nn$; mes "Olá ^0000FF"+StrCharInfo(0)+"^000000 oque Deseja ?"; next; switch(select("- Receber Pack Guild:- Informações:- Nada")){ case 1: if(@GID != 0){ if(getguildmaster(@GID) == StrCharInfo(0)){ if(@guildid != @GID){ query_sql "SELECT `last_ip` FROM `login` WHERE `account_id` = '"+getcharid(3)+"'",@LIP$; query_sql "SELECT `ip` FROM `pack_guild` WHERE `ip` = '"[email protected]$+"'",@GIP$; if(@GIP$ != @LIP$){ mes .nn$; mes "Para Receber o Pack Guild toda sua Guild deve estar Presente."; mes "^FF0000"+StrCharInfo(0)+"^000000 gostaria de Receber seu Pack Guild ?"; next; if(select("- Sim:- Não")==2)close; query_sql "SELECT `char_id`,`account_id`,`name` FROM `char` WHERE `guild_id` = '"[email protected]+"' ORDER BY `char_id`,`account_id`,`name` DESC ", @vCharId, @vAccId, @vName$; set @peso, 0; set @rPeso, MaxWeight - Weight; query_sql "SELECT COUNT(*) FROM `char` WHERE `online` = 1 AND `guild_id` = '"[email protected]+"'", @Cont; set @Cont, @Cont +1; for(set @i, 0; @i < getarraysize(@vCharId); set @i, @i+1){ query_sql "SELECT `last_ip` FROM `login` WHERE `account_id` = '"[email protected][@i]+"'", @vLip$; if(@vLip$ == @LIP$){ set @Cont, @Cont -1; } } if(@Cont <= 14){ mes .nn$; mes "O Mínimo de Player Online para Receber o Pack Guild é 15."; close; } else if(@Cont >= 15){ for(set @i,0; @i < getarraysize($PackGuild1); set @i,@i+1) set @peso, @peso + getiteminfo($PackGuild1,6); if(@peso <= @rPeso){ mes .nn$; mes "Sua Guild contem ^00FF00["[email protected]+"]^000000 Membros Online e ira receber o Pack Guild 1."; close2; set @Time$, gettimestr("%Y-%m/%d %H:%M:%S",21); //for(set @i, 0; @i < getarraysize($PackGuild1); set @i, @i+1) getitem2 $PackGuild1[@i],$PackQnt1[@i],getcharid(2),0,0,0,0,0,0; for(set @i, 0; @i < getarraysize($PackGuild1); set @i, @i+1) query_sql "INSERT INTO `storage` (`id`, `account_id`, `nameid`, `amount`, `identify`, `refine`, `attribute`, `card0`, `card1`, `card2`, `card3`, `expire_time`) VALUES (NULL, '"+getcharid(3)+"', '"+$PackGuild1[@i]+"', '"+$PackQnt1[@i]+"', '"+getcharid(2)+"', '0', '0', '0', '0', '0', '0', '0')"; announce "[AVISO] A Guild ["+strcharinfo(2)+"] acaba de Receber o Pack Guild.",bc_all; query_sql "INSERT INTO `pack_guild` (`char_id`, `acc_id`, `master`, `guild_id`, `name`, `data`, `pack_guild`, `ip`) VALUES ("+getcharid(0)+", "+getcharid(3)+", '"+StrCharInfo(0)+"', "+getcharid(2)+", '"+StrCharInfo(2)+"', '"[email protected]$+"', '"[email protected]+"', '"[email protected]$+"')"; atcommand "@kick "+StrCharInfo(0); end; } else{ mes .nn$; mes "Seu Personagem não suporta o Peso do Pack Guild."; close; } } else if(@Cont >= 20){ for(set @i,0; @i < getarraysize($PackGuild1); set @i,@i+1) set @peso, @peso + getiteminfo($PackGuild1,6); if(@peso <= @rPeso){ mes .nn$; mes "Sua Guild contem ^00FF00["[email protected]+"]^000000 Membros Online e ira receber o Pack Guild 2."; close2; //for(set @i, 0; @i < getarraysize($PackGuild2); set @i, @i+1) getitem2 $PackGuild2[@i],$PackQnt2[@i],getcharid(2),0,0,0,0,0,0; for(set @i, 0; @i < getarraysize($PackGuild2); set @i, @i+1) query_sql "INSERT INTO `storage` (`id`, `account_id`, `nameid`, `amount`, `identify`, `refine`, `attribute`, `card0`, `card1`, `card2`, `card3`, `expire_time`) VALUES (NULL, '"+getcharid(3)+"', '"+$PackGuild2[@i]+"', '"+$PackQnt2[@i]+"', '"+getcharid(2)+"', '0', '0', '0', '0', '0', '0', '0')"; announce "[AVISO] A Guild ["+strcharinfo(2)+"] acaba de Receber o Pack Guild.",bc_all; query_sql "INSERT INTO `pack_guild` (`char_id`, `acc_id`, `master`, `guild_id`, `name`, `data`, `pack_guild`, `ip`) VALUES ("+getcharid(0)+", "+getcharid(3)+", '"+StrCharInfo(0)+"', "+getcharid(2)+", '"+StrCharInfo(2)+"', '"[email protected]$+"', '"[email protected]+"', '"[email protected]$+"')"; end; } else{ mes .nn$; mes "Seu Personagem não suporta o Peso do Pack Guild."; close; } } else if(@Cont > 25){ for(set @i,0; @i < getarraysize($PackGuild1); set @i,@i+1) set @peso, @peso + getiteminfo($PackGuild1,6); if(@peso <= @rPeso){ mes .nn$; mes "Sua Guild contem ^00FF00["[email protected]+"]^000000 Membros Online e ira receber o Pack Guild 3."; close2; //for(set @i, 0; @i < getarraysize($PackGuild3); set @i, @i+1) getitem2 $PackGuild3[@i],$PackQnt3[@i],getcharid(2),0,0,0,0,0,0; for(set @i, 0; @i < getarraysize($PackGuild3); set @i, @i+1) query_sql "INSERT INTO `storage` (`id`, `account_id`, `nameid`, `amount`, `identify`, `refine`, `attribute`, `card0`, `card1`, `card2`, `card3`, `expire_time`) VALUES (NULL, '"+getcharid(3)+"', '"+$PackGuild3[@i]+"', '"+$PackQnt3[@i]+"', '"+getcharid(2)+"', '0', '0', '0', '0', '0', '0', '0')"; announce "[AVISO] A Guild ["+strcharinfo(2)+"] acaba de Receber o Pack Guild.",bc_all; query_sql "INSERT INTO `pack_guild` (`char_id`, `acc_id`, `master`, `guild_id`, `name`, `data`, `pack_guild`, `ip`) VALUES ("+getcharid(0)+", "+getcharid(3)+", '"+StrCharInfo(0)+"', "+getcharid(2)+", '"+StrCharInfo(2)+"', '"[email protected]$+"', '"[email protected]+"', '"[email protected]$+"')"; end; } else{ mes .nn$; mes "Seu Personagem não suporta o Peso do Pack Guild."; close; } } } else { mes .nn$; mes "Você recebeu o Pack Guild Recentemente."; close; } } else { mes .nn$; mes "Sua Guild ja Recebeu o Pack Guild."; close; } } else { mes .nn$; mes "Desculpe mas só converso com Lideres de Guild."; close; } } else { mes .nn$; mes "Desculpe mas só converso com Lideres de Guild."; close; } case 2: mes .nn$; mes "Oque gostaria de Saber Sobre o Pack Guild ?"; next; switch(select("- Oque é Pack Guild:- Como Receber:- Premios:- Nada")){ case 1: mes .nn$; mes "Pack Guild é um Incentivo para que Jogadores de outros Servidores"; mes "e sua Guild venham Jogar em Nosso Servidor."; close; case 2: mes .nn$; mes "Apenas o Lider da Guild Pode Receber o Pack Guild e junto a ele os Membros da Guild."; mes "Para Receber o Pack Guild devem estar Online no minimo 15 Player's."; mes "^FF0000[1]^000000 - 15 Player's ^C90000-^000000 Pack Guild 1."; mes "^FF0000[2]^000000 - 20 Player's ^C90000-^000000 Pack Guild 2."; mes "^FF0000[3]^000000 - 25 Player's ^C90000-^000000 Pack Guild 3."; close; case 3: mes "-----------------------------------"; mes " Informações - Pack 1 "; mes "-----------------------------------"; for(set @i, 0; @i < getarraysize($PackGuild1); set @i, @i + 1) mes "[^FF0000"+$PackQnt1[@i]+"^000000] <-> [^C90000"+getitemname($PackGuild1[@i])+"^000000]."; next; mes "-----------------------------------"; mes " Informações - Pack 2 "; mes "-----------------------------------"; for(set @i, 0; @i < getarraysize($PackGuild2); set @i, @i + 1) mes "[^FF0000"+$PackQnt2[@i]+"^000000] <-> [^C90000"+getitemname($PackGuild2[@i])+"^000000]."; next; mes "-----------------------------------"; mes " Informações - Pack 3 "; mes "-----------------------------------"; for(set @i, 0; @i < getarraysize($PackGuild3); set @i, @i + 1) mes "[^FF0000"+$PackQnt3[@i]+"^000000] <-> [^C90000"+getitemname($PackGuild3[@i])+"^000000]."; close; } case 3: mes .nn$; mes "Volte sempre."; close; } OnInit: waitingroom StrNpcInfo(1),0; //===== Itens do Pack Guild 1: =============================== setarray $PackGuild1[0], 501,501,501,501,501,501,501,501; setarray $PackQnt1[0], 1,1,1,1,1,1,1,1; //============================================================ //===== Itens do Pack Guild 2: =============================== setarray $PackGuild2[0], 501,501,501,501,501,501,501,501; setarray $PackQnt2[0], 1,1,1,1,1,1,1,1; //============================================================ //===== Itens do Pack Guild 3: =============================== setarray $PackGuild3[0], 501,501,501,501,501,501,501,501; setarray $PackQnt3[0], 1,1,1,1,1,1,1,1; //============================================================ End; } - script RMVPI -1,{ OnPCLoginEvent: //===== Itens de Todos os Pack Guild: ======================== setarray [email protected][0], 501,501,501,501,501,501,501,501; //============================================================ query_sql "SELECT `char_id`,`nameid`,`amount`,`identify` FROM `inventory` WHERE `char_id` = '"+getcharid(0)+"' ORDER BY `char_id`,`nameid`,`amount`,`identify` DESC", @charid, [email protected], @AMT, [email protected]; query_sql "SELECT `char_id`,`nameid`,`amount`,`identify` FROM `cart_inventory` WHERE `char_id` = '"+getcharid(0)+"' ORDER BY `char_id`,`nameid`,`amount`,`identify` DESC", @charidCI, [email protected], @AMTci, [email protected]; query_sql "SELECT `account_id`,`nameid`,`amount`,`identify` FROM `storage` WHERE `account_id` = '"+getcharid(3)+"' ORDER BY `account_id`,`nameid`,`amount`,`identify` DESC", @charidS, [email protected], @AMTs, [email protected]; query_sql "SELECT `guild_id`,`nameid`,`amount`,`identify` FROM `guild_storage` WHERE `guild_id` = '"+getcharid(2)+"' ORDER BY `guild_id`,`nameid`,`amount`,`identify` DESC", @guildid, [email protected], @AMTgs, [email protected]; query_sql "SELECT COUNT(*) FROM `inventory`", @CNT; for(set [email protected], 0; [email protected] < @CNT;set [email protected],[email protected] +1){ for(set @n, 0; @n < getarraysize([email protected]);set @n,@n +1){ if([email protected][[email protected]] == [email protected][@n]){ if([email protected][[email protected]] == getcharid(2)){ end;} else if([email protected][[email protected]] <= 1){ end; } else{ dispbottom "Você contem Itens que não lhe Pertencem."; sleep2 2000; dispbottom "Você sera Deslogado para a remoção do Item."; sleep2 2000; for(set [email protected], 10; [email protected] > 0; set [email protected],[email protected] -1) unequip([email protected]); query_sql "DELETE FROM `inventory` WHERE `nameid` = '"[email protected][[email protected]]+"' AND `identify` = '"[email protected][[email protected]]+"' AND `char_id` = '"+getcharid(0)+"'"; atcommand "@kick "+StrCharInfo(0); end; } } else if([email protected][[email protected]] == [email protected][@n]){ if([email protected][[email protected]] == getcharid(2)){ end;} else if([email protected][[email protected]] <= 1){ end; } else{ dispbottom "Você contem Itens que não lhe Pertencem."; sleep2 2000; dispbottom "Você sera Deslogado para a remoção do Item."; sleep2 2000; for(set [email protected], 10; [email protected] > 0; set [email protected],[email protected] -1) unequip([email protected]); query_sql "DELETE FROM `cart_inventory` WHERE `nameid` = '"[email protected][[email protected]]+"' AND `identify` = '"[email protected][[email protected]]+"' AND `char_id` = '"+getcharid(0)+"'"; atcommand "@kick "+StrCharInfo(0); end; } } else if([email protected][[email protected]] == [email protected][@n]){ if([email protected][[email protected]] == getcharid(2)){ end;} else if([email protected][[email protected]] <= 1){ end; } else{ dispbottom "Você contem Itens que não lhe Pertencem."; sleep2 2000; dispbottom "Você sera Deslogado para a remoção do Item."; sleep2 2000; query_sql "DELETE FROM `storage` WHERE `nameid` = '"[email protected][[email protected]]+"' AND `identify` = '"[email protected][[email protected]]+"' AND `account_id` = '"+getcharid(3)+"'"; atcommand "@kick "+StrCharInfo(0); end; } } else if([email protected][[email protected]] == [email protected][@n]){ if([email protected][[email protected]] == getcharid(2)){ end;} else if([email protected][[email protected]] <= 1){ end; } else{ dispbottom "Você contem Itens que não lhe Pertencem."; sleep2 2000; dispbottom "Você sera Deslogado para a remoção do Item."; sleep2 2000; query_sql "DELETE FROM `guild_storage` WHERE `nameid` = '"[email protected][[email protected]]+"' AND `identify` = '"[email protected][[email protected]]+"' AND `guild_id` = '"+getcharid(2)+"'"; atcommand "@kick "+StrCharInfo(0); end; } } } } end; }
  11. Consegui amigo, obrigado! Podem fechar, Resolvido.
  12. Bom dia Pessoal. Ja vi algumas vídeos aulas, so que nenhuma delas me ajudou. Estou tenho problema na conversão do meu arquivo Item_db.conf para Item_db.sql. So que meu servidor esta na hospedagem, e tudo e feito através do programa PUTTY, isso que complicou mais para mim. Alguém poderia me ajudar por favor nesta conversão? Segue abaixo o arquivo, https://pastebin.com/5prcKGXD
  13. consegui resolver essa parte, aproveitando o topico aberto. Poderia me ajudar como transformo o arquivo item_db.conf para item_db.sql ?
  14. Sim, mais também foi add neste local
  15. Boa noite Galera! Estou tendo problema para adicionar os custons itens no meu servidor. Eu adicionei tudo, aparentemente normal, mais o item não aparece quando equipa. Segue Abaixo exemplo só de um item que adicionei. Alguém poderia me ajudar por favor? data\lua files\datainfo\accessoryid.lua ACCESSORY_VISUAL00 = 3000, data\lua files\datainfo\accname.lua [ACCESSORY_IDs.ACCESSORY_VISUAL00] = "_VISUAL00", data\luafiles514\lua files\datainfo\accessoryid.lua ACCESSORY_VISUAL00 = 3000, data\luafiles514\lua files\datainfo\accname.lua [ACCESSORY_IDs.ACCESSORY_VISUAL00] = "_VISUAL00", \Level Up\Ragnarok\System\itemInfo.lua [29000] = { unidentifiedDisplayName = "Visual", unidentifiedResourceName = "VISUAL00", unidentifiedDescriptionName = { }, identifiedDisplayName = "Visual", identifiedResourceName = "VISUAL00", identifiedDescriptionName = { "Visual 00", "Tipo : ^777777Visual^000000", "Equipa em : ^777777Baixo^000000", "Peso : ^7777770^000000", "Nivel necessario : ^7777771^000000", "Classe : ^777777Todas as classes^000000", }, slotCount = 0, ClassNum = 3000 }, item_db { Id: 29000 AegisName: "VISUAL00" Name: "VISUAL00" Type: 4 Buy: 0 Upper: 63 Loc: 4096 EquipLv: 1 View: 3000 },