Jump to content

  •  

Asgard4676

Member Since 12 Sep 2014
Offline Last Active Aug 27 2016 04:41 PM
-----

Topics I've Started

Erro ao Iniciar Evento

05 August 2015 - 08:38 PM

Olá estou usando o Evento ache  o Poring e toda vez que o npc vai iniciar o jogo trava e aparece o seguinte erro no mapserver

 

 

ERROR:

 

[Warning]: Unexpected type for argument 1. Expected label, got C_NAME[Debug]: Data: variable name='OnStart' index=0[Debug]: Function: callsub[Debug]: Source (NPC): Evento Pandaring at prontera (147,171)[Error]: script:callsub: argument is not a label[Debug]: Data: number value=0[Debug]: Source (NPC): Evento Pandaring at prontera (147,171)

 

-	script	Evento Pandaring#var	-1,{end;	OnInit:		//- ID do item do prêmio.		set $ipe, 607;		 //- Quantidade do item do prêmio.		set $qpe, 5;		 //- Tirar 50% de HP quando matar		//- um Pandaring falso?		//- [0=NÃO|1=SIM]		set $hpe, 0;	end;}//===== Script: ==============================================prontera,147,171,3	script	Evento Pandaring	763,{	 if(getgmlevel() < 50)	{		if(!.pandaringcatch)		{			mes "[Evento Pandaring]";			mes "Não tem evento por inquanto.";			close;		}		mes "[Evento Pandaring]";		mes "Olá "+strcharinfo(0)+" o que posso fazer por você?";		next;		switch(select("Entrar no evento.:Informação."))		{			case 1:				mes "[Evento Pandaring]";				mes "Divirta-se!";				next;				warp "poring_c01", 100, 100;				end;			 case 2:				mes "[Evento Pandaring]";				mes "São invocados 100 Pandarings.";				mes "Só UM é verdadeiro e você tem que acha-lo.";				mes "Caso consiga, ganhará um item.";				mes "Boa Sorte.";				close;		}	}	mes "[Evento Pandaring]";	mes "Olá "+strcharinfo(0)+" o que posso fazer por você?";	next;	if(select("Ligar evento.:Entrar no evento.") == 1) callsub OnStart;	mes "[Evento Pandaring]";	mes "Divirta-se!";	next;	warp "poring_c01", 100, 100;	end;		 Onclock0200: callsub OnEventStart;		Onclock0030: callsub OnEventStart;		OnClock1630: callsub OnEventStart;		OnClock0500: callsub OnEventStart;		OnClock2000: callsub OnEventStart;		OnClock1900: callsub OnEventStart;		 OnEventStart:			announce "[Evento Pandaring]: Gente, é hora do evento. Falem comigo para entrar.",0;			initnpctimer;			monster "poring_c01",0,0,"Pandaring",3500,1,strnpcinfo(0)+"::OnMobKilled";			monster "poring_c01",0,0,"Pamdaring",3500,10,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Pandarimg",3500,10,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"P@andaring",3500,10,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Panndarin",3500,10,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Pendaring",3500,5,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Pandaryng",3500,1,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Pandarlng",3500,1,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Pandarng",3500,1,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Pandring",3500,10,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"P4ndring",3500,10,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Pandaryng",3500,10,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Panring",3500,10,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Pandring",3500,10,strnpcinfo(0)+"::OnWrongKilled";			monster "poring_c01",0,0,"Pamdring",3500,1,strnpcinfo(0)+"::OnWrongKilled";			set .pandaringcatch,1;			end;			return;		 OnTimer600000:			stopnpctimer;			announce "[Evento Pandaring]: O tempo acabou, tente na próxima vez.",0;			set .pandaringcatch,0;			killmonsterall "poring_c01";			end;		 OnMobKilled:			stopnpctimer;			announce "[Evento Pandaring]: "+strcharinfo(0)+" encontrou o Pandaring. Tente denovo na próxima vez.",0;			dispbottom "Parabéns, você me achou.";			getitem $ipe,$qpe;			killmonsterall "poring_c01";			set .pandaringcatch,0;			end;		 OnWrongKilled:			dispbottom "Whaa, você errou feio.";			if($hpe) percentheal -50,0;			warp "prontera",157,175;			end;}