Jump to content

lLoydxx

Members
  • Posts

    36
  • Joined

  • Last visited

Posts posted by lLoydxx

  1. Bom dia.

    Alguém pode me ajudar com esses pequenos 2 problemas que estou tendo.

    1 - Estou usando WoE controller do emulador mas todas as Guerras tem jogadores que não recebem a recompensa configurada quando termina a WoE, segue em anexo o script se alguém puder me ensinar como faço para as recompensas irem pra todos os jogadores do Clã vencedor ficarei grato. 

    2 - Como faço uma loja com 3 menus de venda sendo elas emblemas de valor, emblemas de bravura e emblemas de guerra?

     

    Good Morning. Can someone help me with these 2 little problems that I'm having.

    1 - I am using the emulator's WoE controller but all Wars have players who do not receive the configured reward when the WoE ends, the script is attached if anyone can teach me how to make the rewards go to all the players of the winning Clan I will be grateful .

    2 - How do I make a store with 3 sales menus, which are badges of value, badges of bravery and badges of war?

    woe_controller.txt

  2. Boa madrugada galera, queria saber se alguém teria disponível o npc sobrevivente arena pvp onde os jogadores se enfrentam e o último que sobreviver ganha o prêmio do evento.

     

    E um narrador PvP que anuncie nos mapas que eu puder selecionar:

    "O Jogador fulano matou cicrano!"

    ou quando o cara se mata...

    "O Jogador joão se suicidou!"

     

    Agradeço toda e qualquer ajuda desde já!

  3. 1 hour ago, Racaae said:

    Vai em src/config/core.h, ache essa parte e tira os // da segunda linha. Recompila o servidor, VIP ativado.

    
    /// Uncomment to enable VIP system.
    //#define VIP_ENABLE

     

    conf/login_athena.conf, acha essa parte e muda o 5 para 1.

    
    // Which group (ID) will be denoted as the VIP group?
    // Default: 5
    vip_group: 5

     

    Em conf/battle/player.conf tem algumas opções de configuração do vip. Por exemplo: rate de EXP e drop, aumentar limite do armazém.

    Em conf/groups.conf você configura os comandos e algumas outras coisas disponíveis para os VIPs.

    Em conf/login_athena.conf também dá para aumentar o número de personagens máximo em contas VIP.

    Obrigado MESTRE!

     

    Fico te devendo uma não recuse em cobrar. ?

  4. 3 hours ago, Racaae said:

    Boa noite. Sim, é possível criar um NPC que pede um item em troca de algo. Aí depende do seu sistema VIP se é fácil de criar isso ou não. Aqui tem um exemplo de um NPC que faz exatamente isso, usando o vip oficial do rAthena.

    
    prontera,159,170,3	script	Moça do VIP	4_F_KAFRA1,{
    	mes "[" + strnpcinfo(1) + "]";
    	if (vip_status(VIP_STATUS_ACTIVE))
    		mes "Olá, você já é VIP.";
    	else {
    		mes "Olá, quer se tornar VIP? São vários benefícios!";
    		mes "Escolha quanto tempo você quer contratar.";
    		next;
    		for( .@i = 0; .@i < getarraysize( .day ); .@i++ )
    			.@menu$ += (.day[.@i] + " dia(s):");
    		.@i = select(.@menu$) - 1;
    		mes "[" + strnpcinfo(1) + "]";
    		mes "O custo de "+.day[.@i]+" dia(s) de VIP é:";
    		if (.cash_cost[.@i])
    			mes "- " + callfunc("F_InsertComma",.cash_cost[.@i]) + " CASH";
    		if (.cash_cost[.@i] && .item_qtd[.@i])
    			mes "ou";
    		if (.item_qtd[.@i])
    			mes "- " + .item_qtd[.@i]+"x <ITEM>" + getitemname( .item_id ) + "<INFO>" + .item_id + "</INFO></ITEM>";
    		if (.zeny_cost[.@i] && .item_qtd[.@i] || .cash_cost[.@i] && .zeny_cost[.@i])
    			mes "ou";
    		if (.zeny_cost[.@i])
    			mes "- " + callfunc("F_InsertComma",.zeny_cost[.@i]) + "z";
    		next;
    		.@menu$ = "";
    		if (.cash_cost[.@i])
    			.@menu$ += "Pagar com CASH";
    		.@menu$ += ":";
    		if (.item_qtd[.@i])
    			.@menu$ += "Pagar com "+getitemname(.item_id);
    		.@menu$ += ":";
    		if (.zeny_cost[.@i])
    			.@menu$ += "Pagar com zeny";
    		switch(select(.@menu$ + ":Deixa pra lá.")) {
    		case 1:
    			mes "[" + strnpcinfo(1) + "]";
    			if ( #CASHPOINTS < .cash_cost[.@i] ) {
    				mes "Você não tem CASH suficiente.";
    			}
    			else {
    				#CASHPOINTS -= .cash_cost[.@i];
    				vip_time ( .day[.@i] * 1440 );
    				mes "VIP adquirido com sucesso!";
    				mes "Você pode usar o comando ^00FF00@tempovip^000000 para ver a duração do seu VIP.";
    			}
    			break;
    		case 2:
    			mes "[" + strnpcinfo(1) + "]";
    			if ( countitem( .item_id ) < .item_qtd[.@i] ) {
    				mes getitemname( .item_id ) + " insuficiente.";
    			}
    			else {
    				delitem .item_id, .item_qtd[.@i];
    				vip_time ( .day[.@i] * 1440 );
    				mes "VIP adquirido com sucesso!";
    				mes "Você pode usar o comando ^00FF00@tempovip^000000 para ver a duração do seu VIP.";
    			}
    			break;
    		case 3:
    			mes "[" + strnpcinfo(1) + "]";
    			if ( Zeny < .zeny_cost[.@i] ) {
    				mes "Você não tem Zeny suficiente.";
    			}
    			else {
    				Zeny -= .zeny_cost[.@i];
    				vip_time ( .day[.@i] * 1440 );
    				mes "VIP adquirido com sucesso!";
    				mes "Você pode usar o comando ^00FF00@tempovip^000000 para ver a duração do seu VIP.";
    			}
    			break;
    		case 4:
    			mes "[" + strnpcinfo(1) + "]";
    			mes "Até mais.";
    		}
    	}
    	close;
    
    OnCheck:
    	if (vip_status(VIP_STATUS_ACTIVE))
    		dispbottom "SISTEMA: Você é VIP até "+ gettimestr("%d/%m/%Y %H:%M",21,vip_status(VIP_STATUS_EXPIRE));
    	else
    		dispbottom "SISTEMA: Você não é VIP.";
    	end;
    
    OnInit:
    //== CONFIGURAÇÕES ==================
    	setarray .day,7,14,30;	//Opções de dias de VIP
    	//setarray .cash_cost,4000,7000,10000;	//Custo em Cash de cada opção (use // para desabilitar CASH)
    	//setarray .zeny_cost,10000000,15000000,30000000;	//Custo em Zeny de cada opção (use // para desabilitar Zeny)
    	.item_id = 7929;	//ID do item usado para troca
    	setarray .item_qtd,3,5,10;	//Custo (em item) para cada opção de tempo (use // para desabilitar item)
    //===================================
    	bindatcmd("tempovip", strnpcinfo(3)+"::OnCheck");
    	end;
    }

     

    O refinador 100% é mais simples que os refinadores comuns já que não tem nenhuma chance de falha. Aqui vai o exemplo:

    
    prontera,161,170,3	script	Refinador Barra Pesada	4_M_REPAIR,{
    	disable_items;
    	mes "[" + strnpcinfo(1) + "]";
    	mes "Olá! Eu aceito CASH para refinar seus equipamentos com 100% de chance de sucesso!";
    	next;
    	if(select("Informações.:Refinar.") == 1) {
    		mes "[" + strnpcinfo(1) + "]";
    		mes "Eu refino equipamentos ^0000FFaté o nível " + .max + "^000000. O valor em CASH que eu peço depende do nível do equipamento.";
    		mes "Você pode ver a tabela com os preços abaixo.";
    		next;
    		mes "[TABELA DE PREÇOS]";
    		for( .@i = 0; .@i < .max; .@i++ )
    			mes "+" + .@i + ">+" + (.@i+1) + " - " + callfunc("F_InsertComma", .cost[.@i]) + " CASH";
    		close;
    	}
    	mes "[" + strnpcinfo(1) + "]";
    	mes "Já estou animado!";
    	mes "Que equipamento você quer refinar?";
    	next;
    	setarray .@position$[1],"Topo","Armadura","Mão esquerda","Mão direita","Capa","Sapatos","Acessório 1","Acesório 2","Cabeça meio","Cabeça baixo";
    	setarray .@indices[1], EQI_HEAD_TOP, EQI_ARMOR, EQI_HAND_L, EQI_HAND_R, EQI_GARMENT, EQI_SHOES, EQI_ACC_L, EQI_ACC_R, EQI_HEAD_MID, EQI_HEAD_LOW;
    	for(set .@i,1; .@i<=10; set .@i,.@i+1)
    		set .@menu$, .@menu$+((getequipisequiped(.@indices[.@i]))?"+"+getequiprefinerycnt(.@indices[.@i])+" "+getequipname(.@indices[.@i]):.@position$[.@i]+"- [VAZIO]")+":";
    	set .@part, .@indices[ select(.@menu$) ];
    	if (!getequipisequiped(.@part)) {
    		mes "[" + strnpcinfo(1) + "]";
    		mes "Você deve equipar o item que quer refinar.";
    		close;
    	}
    	if (!getequipisenableref(.@part)) {
    		emotion ET_OTL;
    		mes "[" + strnpcinfo(1) + "]";
    		mes "Me desculpe.";
    		mes "É impossível refinar esse item.";
    		close;
    	}
    	.@item_refine = getequiprefinerycnt(.@part); //save refinery count
    	
    	if (getequiprefinerycnt(.@part) >= .max) {
    		emotion ET_PROFUSELY_SWEAT;
    		mes "[" + strnpcinfo(1) + "]";
    		mes "Esse item já é poderoso demais até para mim. É melhor deixar para lá.";
    		close;
    	}
    	mes "[" + strnpcinfo(1) + "]";
    	mes "Refinar ^006400"+getequipname(.@part)+"^8B4513 vai custar " + callfunc("F_InsertComma", .cost[.@item_refine]) + " CASH.";
    	mes "Devo continuar?";
    	next;
    	if(select("Não.:Sim.") == 1) {
    		emotion ET_THINK;
    		mes "[" + strnpcinfo(1) + "]";
    		mes "Oh, você mudou de ideia.";
    		mes "Ok.";
    		mes "Você pode voltar depois.";
    		close;
    	}
    	if (#CASHPOINTS < .cost[.@item_refine]) {
    		mes "[" + strnpcinfo(1) + "]";
    		mes "Você não tem CASH suficiente.";
    		close;
    	}
    	mes "[" + strnpcinfo(1) + "]";
    	mes "Ótimo.";
    	mes "Como desejar!";
    	mes "Eu tenho um jeito especial para refinar...";
    	mes ".......ka boom!";
    	specialeffect EF_SUI_EXPLOSION;
    	#CASHPOINTS -= .cost[.@item_refine];
    	successrefitem .@part;
    	next;
    	emotion ET_DELIGHT;
    	mes "[" + strnpcinfo(1) + "]";
    	mes "Certo, aqui está~";
    	mes "Adeus~!";
    	close;
    
    OnInit:
    //== CONFIGURAÇÕES ==================
    	.max = 15;	//refino máximo
    
    	//custo de cada nv de refinamento
    	setarray .cost,100,100,100,100,500,1000,2000,4000,5000,6000,10000,18000,19000,20000,21000,22000,40000,50000,70000,100000;
    //===================================
    	end;
    }

     

    Poderia me informar como faço para usar o sistema vip do próprio emulador? Onde ativo e onde posso por para vip ser do grupo 1?
    Refine tá 200% meu muito obrigado!

  5. Por favor alguém pode me ajudar estou com esse erro nas sprites de vários npcs e não consigo arrumar para que eles apareçam.

    Já tentei algumas coisas mas não tive resultado continuaram da mesma forma que estão vendo.

     

    // ==

    Please can someone help me I have this error in the sprites of several npcs and I can't fix them for them to appear. I've tried a few things but I haven't had any results.

     

     

     

  6. Obrigado M a p l e sobre o Mapa resolvido.

    Alguem pode me informar onde fica o diretório responsável pela janela de configurações.

    Quando clico em Game Settings o jogo fecha.

     

    Thank you M a p l e about the resolved map. Can someone tell me where is the directory responsible for the settings window. When I click on Game Settings the game closes.

     

     

     

  7. Bom dia galera, desculpe se não for o tópico correto para pedir ajuda.

    1 - Estou com dificuldade no meu 'ESC' quando aperto Esc no jogo a linha Game Settings não abre e o menu de configuração simplesmente fecha o jogo. Qual arquivo responsável por essa Janela de Configuração?

    2 - Onde posso conseguir deixar o Mapa de Rune Midgard em Português-br tanto o mapa quanto os mobs? Os meus se encontram assim...

     

    Good morning guys, sorry if it's not the right topic to ask for help.

    1 - I have difficulty with my 'ESC' when I press Esc in the game, the Game Settings line does not open the configuration menu, it simply closes the game. Which file is responsible for this Configuration Window?

    2 - Where can I get the Rune Midgard Map in Portuguese - both the map and the mobs? Mine are like this ...

     

     

     

×
×
  • Create New...