What and how to use setagem?

[_Darius_]

Well, first I wanted to say hello to the guys and the rathena apologize for my English. xD

I would urge you to ask someone to help me with the following script and added twofunctions in it.

Are the functions:

1 - That player could respond only after I sent the question.

2 - And they could choose the alternative only once a question?

My script:

tent_evt.gat,49,62,4 script Silvio Santos 953,{

// CONFIGURAÇÃO:
set .@lvmin,60; // Level minimo de GM para acessar o npc
// SCRIPT:		
  if(getgmlevel() <= .@lvmin) goto inicio;
			{
  mes "[ Silvio Santos ]";
  mes "Olá S"+ (Sex?"r. ":"ra. ") +""+strcharinfo(0)+", vamos comeÇar o Evento TentaÇÃo!:";
  next;
  switch(select("- Fazer pergunta:- Responder a pergunta para todos"))
{
  case 1:
  mes "Agora digite a pergunta a ser feita:";
  input ._pergunta$;
  next;
  mes "[ Silvio Santos ]";
  mes "Digite a primeira opÇÃo de resposta:";
  input ._resp1$;
next;
mes "[ Silvio Santos ]";
mes "Digite a segunda opÇÃo de resposta:";
input ._resp2$;
next;
mes "[ Silvio Santos ]";
mes "Digite a terceira opÇÃo de resposta:";
input ._resp3$;
next;
mes "[ Silvio Santos ]";
mes "Qual das opÇões que você colocou é a correta?";
switch(select("- A resposta número um:- A resposta número dois:- A resposta número três"))
{
 case 1: set $resp,1;
 case 2: set $resp,2;
 case 3: set $resp,3;

next;
mes "Agora o que deseja fazer?";
	 switch(select("- Enviar Pergunta:- Sair"))
							{
case 1:
  mapannounce "tent_evt","Vocês terÃo 10 segundos para escolher uma das alternativas, lá vai a pergunta!",bc_map;
  close2;
  sleep2 5000;
  Announce ""+._pergunta$+"",bc_map;
  sleep2 5000;
  Announce "~5~ ",bc_map;
  sleep2 1000;
  Announce "~4~ ",bc_map;
  sleep2 1000;
  Announce "~3~ ",bc_map;
  sleep2 1000;
  Announce "~2~ ",bc_map;
  sleep2 1000;
  Announce "~1~ ",bc_map;
  sleep2 1000;
  Announce "Tempo esgotado!! Seja mais rápido na próxima vez!",bc_map;
  areawarp "tent_evt",48,107,51,52,"prontera",155,180;

case 2:
	mes "[ Silvio Santos ]";
	mes "Está bem.";
close;

}
}

case 2:
mes "[ Silvio Santos ]";
mes "EntÃo Sr. "+strcharinfo(0)+", a resposta correta é:";
	 switch(select("- "+._resp1$+":- "+._resp2$+":- "+._resp3$+":- Tentar depois.")) {
case 1:
Announce "Irei falar a resposta certa!",bc_map;
sleep2 5000;
Announce "A resposta correta é: "+._resp1$+"",bc_map;
close;
end;
sleep2 5000;
  if($resp == 1)
  {
Announce "[ Silvio Santos ]: Parabéns, o grupo VERMELHO acertou!!",bc_map;
sleep2 5000;
Announce "[ Silvio Santos ]: Aos demais, mais sorte na próxima vez.",bc_map;
areawarp "tent_evt",42,89,57,74,"prontera",156,170;
areawarp "tent_evt",77,54,62,69,"prontera",156,170;
close;
}

case 2:
Announce "Irei falar a resposta certa!",bc_map;
sleep2 5000;
Announce "A resposta correta é: "+._resp2$+"",bc_map;
close;
end;
 sleep2 5000;
if($resp == 2)
{
Announce "[ Silvio Santos ]: Parabéns, o grupo VERDE acertou!!",bc_map;
sleep2 5000;
Announce "[ Silvio Santos ]: Aos demais, mais sorte na próxima vez.",bc_map;
areawarp "tent_evt",22,54,37,69,"prontera",156,170;
areawarp "tent_evt",77,54,62,69,"prontera",156,170;
  close;
}

case 3:
Announce "Irei falar a resposta certa!",bc_map;
sleep2 5000;
Announce "A resposta correta é: "+._resp3$+"",bc_map;
close;
end;
sleep2 5000;
if($resp == 3)
{
Announce "[ Silvio Santos ]: Parabéns, o grupo AZUL acertou!!",bc_map;
sleep2 5000;
Announce "[ Silvio Santos ]: Aos demais, mais sorte na próxima vez.",bc_map;
areawarp "tent_evt",22,54,37,69,"prontera",156,170;
areawarp "tent_evt",42,89,57,74,"prontera",156,170;
close;
}

inicio:  
	{
 mes "[ Silvio Santos ]";
 mes "Olá "+strcharinfo(0)+", a pergunta é:";
 mes ""+._pergunta$+"";
 mes " ";
 mes "Qual a resposta correta?";
 switch(select("- "+._resp1$+":- "+._resp2$+":- "+._resp3$+":- Tentar depois."))
{
case 1: next;
mes "[silvio Santos]";
mes "Muito bem vamos ver se você acertou, boa sorte!";
next;

warp "tent_evt.gat", 36, 62; close;

case 2: next;
mes "[silvio Santos]";
mes "Muito bem vamos ver se você acertou, boa sorte!";
next;

warp "tent_evt.gat", 49, 75; close;

case 3: next;
mes "[silvio Santos]";
mes "Muito bem vamos ver se você acertou, boa sorte!";
next;

warp "tent_evt.gat", 63, 63; close;

}
	}
}
}
}
}

I would be grateful with the help of you ^ ^

Edited May 26, 2012 by admdarius

[Mystery]

Dont wanna be a bother.. but you need to read THIS FIRST: http://rathena.org/board/forum-30/announcement-3-codeboxes/

[tr0n]

a bit too much of your <tab>'s ?

[_Darius_]

sorry xD

Fixed ^ ^