Jump to content

John

Members
  • Posts

    9
  • Joined

  • Last visited

Posts posted by John

  1. Hello guys,

     

    I'm using this refiner +25 and I wonder if at the end of the npc script, he added a restriction to that item could not be negotiated, or remain attached to the player's account...

     

    //===== bulhufas Script ======================================
    //= Velho Ferreiro
    //===== Por: =================================================
    //= bulhufas
    //===== Versão Atual: ========================================
    //= 1.0
    //===== Descrição: ===========================================
    //= Refina / Desrefina itens
    //===== Changelog: ===========================================
    //= 1.0 Início do NPC [bulhufas]
    //============================================================
    prontera,147,174,5 script Refinador +25#01 826,{
    // Peças refináveis: Deixe "" para ignorar aquela peça.
    setarray .@_ref_able$,"Cabeça - Topo","Vestimenta","Mão esquerda","Mão direita","Capa","Calçados","Acessório 1","Acessório 2","Cabeça - Meio","Cabeça - Baixo";
    // Preço do Refinador
    set .@_ref_cost,5000000;
    // O Refinador pode refinar itens não-refináveis? 1=Sim / 0=Não
    set .@_ref_ignore,1;
    // Até quanto o Refinador pode refinar os itens?
    set .@_ref_max,25;
    // O refinador pode diminuir a taxa de refinamento dos itens? 1=Sim / 0=Não
    set .@_ref_dec,1;
    // Não altere nada abaixo a não ser que saiba o que está fazendo.
    mes "[ ^FF0000"+strnpcinfo(1)+"^000000 ]";
    mes "Olá, "+strcharinfo(0)+". Como vai você? Veio em busca de meus serviços especiais?";
    next;
    if(select("- Sim, eu vim.:- Por que seus serviços são especiais?")==2){
    mes "[ ^FF0000"+strnpcinfo(1)+"^000000 ]";
    mes "Vários fatores...";
    mes "- Eu NUNCA falho.";
    mes "- Eu posso refinar:";
    for (set .@i, 0; .@i < 10; set .@i, .@i + 1)
    mes "   * "+.@_ref_able$[.@i];
    if(.@_ref_ignore)
    mes "- Eu posso refinar itens que os ferreiros normais não conseguem.";
    if(.@_ref_max > 10)
    mes "- Eu posso refinar itens até +"+.@_ref_max+".";
    if(.@_ref_dec)
    mes "- Eu posso diminuir a taxa de refinamento de itens.";
    next;
    }
    mes "[ ^FF0000"+strnpcinfo(1)+"^000000 ]";
    mes "O que deseja de mim?";
    next;
    setarray .@_ref_temp$[0],"","- Desaprimorar equipamento";
    set @mode, select("- Aprimorar equipamento:"+.@_ref_temp$[.@_ref_dec]+":- Cancelar");
    mes "[ ^FF0000"+strnpcinfo(1)+"^000000 ]";
    if(@mode == 3 || (@mode == 2 && !.@_ref_dec)){ //Anti Hacker
    mes "Siga seu caminho.";
    close;
    }
    mes "Selecione a parte onde deseja que eu realize o trabalho?";
    next;
    set .@menu$,"";
    for (set .@i, 0; .@i < 10; set .@i, .@i + 1)
    set .@menu$, .@menu$ + .@_ref_able$[.@i] + " [" + getequipname((.@i+1)) + "]:";
    set .@menu$, .@menu$ + "Cancelar";
    set @part, select(.@menu$);
    mes "[ ^FF0000"+strnpcinfo(1)+"^000000 ]";
    if(@part > 10 || .@_ref_able$[(@part - 1)] == ""){ //Anti Hacker
    mes "Siga seu caminho.";
    close;
    }
    if(!getequipisequiped(@part)){
    mes "Você quer que eu queime seu corpo no fogo ardente?";
    close;
    }
    if(!getequipisenableref(@part) && !.@_ref_ignore){
    mes "Desculpe, não posso trabalhar nesse item.";
    close;
    }
    setarray .@_ref_temp$[1],"aprimorar","desaprimorar";
    mes "Hmm, e quantas vezes você deseja "+ .@_ref_temp$[@mode] +" esse equipamento?";
    next;
    input @count;
    mes "[ ^FF0000"+strnpcinfo(1)+"^000000 ]";
    if(!@count){
    mes "Se você não quer nada...";
    close;
    }
    if((((@count + getequiprefinerycnt(@part)) > .@_ref_max) && @mode == 1) || (((getequiprefinerycnt(@part) - @count) < 0) && @mode == 2)){
    mes "Nossa, eu sou bom, mas não posso fazer isso...";
    close;
    }
    if(.@_ref_cost){
    mes "Para "+.@_ref_temp$[@mode]+" esse item, precisarei de "+ (@count * .@_ref_cost) + "z, você deseja continuar?";
    next;
    if(select("- Sim:- Não, isso é um roubo!")==2){
    mes "[ ^FF0000"+strnpcinfo(1)+"^000000 ]";
    mes "Então volte para o refinador comum.";
    close;
    }
    mes "[ ^FF0000"+strnpcinfo(1)+"^000000 ]";
    }
    if(Zeny < (@count * .@_ref_cost)){
    mes "Você precisa de mais dinheiro se deseja ficar forte.";
    close;
    }
    set Zeny, Zeny - (@count * .@_ref_cost);
    switch(@mode){
    case 1:
    for (set .@i, 0; .@i < @count; set .@i, .@i + 1)
    successrefitem @part;
    break;
    case 2:
    setarray @cards,getequipcardid(@part,0),getequipcardid(@part,1),getequipcardid(@part,2),getequipcardid(@part,3);
    set @refine, getequiprefinerycnt(@part);
    set @id, getequipid(@part);
    unequip @part;
    delitem2 @id,1,1,@refine,0,@cards[0],@cards[1],@cards[2],@cards[3];
    getitem2 @id,1,1,(@refine - @count),0,@cards[0],@cards[1],@cards[2],@cards[3];
    equip @id;
    specialeffect2 154;
    }
    mes "Clang !! Clang !! Clang !!";
    next;
    mes "[ ^FF0000"+strnpcinfo(1)+"^000000 ]";
    mes "Aqui está! Boa sorte!";
    close;
    } 
    

  2. 1 - Você pode utilizar algum ticket que não é muito utilizado no seu servidor e modificar apenas seu nome e descrição para Ticket Vip e claro, depois procurar o id na item_db e configurar o seu ticket.

     

    2 - A tabela, você pode utilizar :

    ALTER TABLE `login` ADD `diasvip` INT( 11 ) NOT NULL DEFAULT '0';

    Espero ter ajudado,

     

    Abraços,

     

    John.

     

    ######################################################################################################

     

     

    1 - You can use any ticket which is not much used in your server and modify only their name and description for VIP Ticket and, of course, after looking at the id item_db and configure your ticket. 
     
    2 - The table, you can use: 
     
    ALTER TABLE `login` ADD `diasvip` INT (11) NOT NULL DEFAULT '0 '; 
     
    Hope this helps, 
     
    Hugs, 
     
    John.
    • Upvote 2
  3. Cydh, I tried to compile the emulator after making certain changes in the SOURCE folder, more specifically the mmo.h, map.h and renewal.h and realized that this is a problem that has increased by 180 MB memory ... 

  4. Hello people!

    I started my project in rAthena, and I was very happy with the quality of the emulator, very good, loved it. I had just one problem, he is shutting down because the RAM it is giving a host overload, making the map server hang ALL TIME, and when I installed it on the same host, he was overwhelmed, passing gives maximum accepted .. .

    What can I do to reduce this space?

    Thanks in advance!

  5. Olá povo!

    Iniciei meus projetos no rAthena, e fiquei muito contente com a qualidade do emulador, muito bom, adorei. Tive apenas um problema, ele está desligando pois a Memória RAM dele, está dando um overload no host, fazendo o map-server cair TODA HORA, e quando eu instalei no host mesmo, ele já estava sobrecarregado, passando dá quantidade máxima aceita...

    O que eu posso fazer para diminuir esse espaço?

    Obrigado desde já!

×
×
  • Create New...