NPC Edit Function

[_Darius_]

Can anyone help me finish my npc, plz?

Type just wanted to add these two functions:

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

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

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á Sr. "+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;[/font][/size][/font][/color]
[color=#282828][font=tahoma, helvetica, arial, sans-serif][size=3][font=helvetica, arial, sans-serif]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: next;
Announce "Irei falar a resposta certa!",bc_map;
sleep2 5000;
Announce "A resposta correta é: "+._resp1$+"",bc_map;
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: next;
Announce "Irei falar a resposta certa!",bc_map;
sleep2 5000;
Announce "A resposta correta é: "+._resp2$+"",bc_map;
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: next;
Announce "Irei falar a resposta certa!",bc_map;
sleep2 5000;
Announce "A resposta correta é: "+._resp3$+"",bc_map;
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;[/font][/size][/font][/color]
[color=#282828][font=tahoma, helvetica, arial, sans-serif][size=3][font=helvetica, arial, sans-serif]case 2: next;
mes "[silvio Santos]";
mes "Muito bem vamos ver se você acertou, boa sorte!";
next;
warp "tent_evt.gat", 49, 75; close;[/font][/size][/font][/color]
[color=#282828][font=tahoma, helvetica, arial, sans-serif][size=3][font=helvetica, arial, sans-serif]case 3: next;
mes "[silvio Santos]";
mes "Muito bem vamos ver se você acertou, boa sorte!";
next;
warp "tent_evt.gat", 63, 63; close;
}
}
}
}
}
}

Edited May 29, 2012 by _Darius_