help bout disguise event 2

[Hatake Kakashi]

the prob. is why there's no announce when we try to join and we normal chat the correct answer. npc is not recognize the correct answer..

and where do i put prize on it.

sorry for bad english.

i hope you understand.

hahaha xD

thank you...

poring_c01,102,99,2 script Disguise NPC 50,{

if (!$guessbegin)
{
mes "[Disguise NPC]";
mes "The event is going to start soon!";
close;
}
end;

OnStart:
set $guessbegin, 1;
set .DisguiseWon, 0;
if (!$DisguiseRound)
{
npctalk "Okay then. Let's start the event!";
sleep 4000;
npctalk "But first I will explain to you how to play this game.";
sleep 6000;
npctalk "I'am going to disguise into a random monster.";
sleep 5000;
npctalk "You have to guess the monster's name and shout it out.";
sleep 5000;
npctalk "Don't bother about the use of capital and small initial letters.";
sleep 8000;
npctalk "Ok. Let's start!";
sleep 5000;
}
else if ($DisguiseRound < 5)
{
npctalk "Let's get ready for the next round.";
setnpctimer 0;
sleep 8000;
}
else
{
npctalk "Last round now!";
sleep 2000;
npctalk "Get ready.";
sleep 6000;
}
do
{
set $monster, rand(1001,1797);
}
while ($monster == 1003 || $monster == 1006 || $monster == 1017 || $monster == 1021 || $monster == 1022 || $monster == 1027 || $monster == 1043 || $monster == 1006 || $monster == 1136 || $monster == 1137 || $monster == 1168 || $monster == 1171 || $monster == 1172 || $monster == 1173 || $monster == 1181 || $monster == 1210 || $monster == 1223 || $monster == 1284 || ($monster >= 1324 && $monster <= 1363) || $monster == 1006 || $monster == 1407 || $monster == 1411 || $monster == 1414 || $monster == 1496 || $monster == 1501);
setnpctimer 0;
initnpctimer;
setnpcdisplay "Disguise NPC",$monster;
set $MonsterName$, strmobinfo(1,$monster);
defpattern 1, "([^:]+):.*s"+$MonsterName$+"(.*)", "OnWin";
activatepset 1;
npctalk "What's my name?";
sleep 2000;
npcwalkto 107,99;
sleep 1000;
npcwalkto 102,99;
sleep 1000;
npcwalkto 102,103;
sleep 1000;
npcwalkto 102,99;
end;

OnTimer10000:
if (!.DisguiseWon)
{
npctalk "Come on. What monster am I?";
npcwalkto 107,99;
sleep 2000;
npcwalkto 102,99;
sleep 2000;
npcwalkto 102,103;
sleep 2000;
npcwalkto 102,99;
}
end;


OnTimer25000:
if (!.DisguiseWon)
{
npctalk "Nobody knows that monster?";
npcwalkto 107,99;
sleep 2000;
npcwalkto 102,99;
sleep 2000;
npcwalkto 102,103;
sleep 2000;
npcwalkto 102,99;
}
end;

OnTimer35000:
if (!.DisguiseWon)
{
npctalk "You get 10 more seconds to guess my name.";
npcwalkto 107,99;
sleep 2000;
npcwalkto 102,99;
sleep 2000;
npcwalkto 102,103;
sleep 2000;
npcwalkto 102,99;
}
end;

OnTimer45000:
if (!.DisguiseWon)
{
npctalk "Round is over.";
set $DisguiseRound, $DisguiseRound + 1;
sleep 3000;
deletepset 1;
npctalk $MonsterName$ + " would have been the correct answer.";
sleep 5000;
if ($DisguiseRound >= 6)
{
set $DisguiseRound, 0;
sleep 3000;
npctalk "Event is over now!";
sleep 3500;
npctalk "See ya guys";
sleep 2000;
emotion 12;
sleep 1000;
mapwarp "poring_c01.gat","gonryun",158,112;
setnpcdisplay "Disguise NPC",50;
disablenpc "Disguise NPC";
end;
}
goto OnStart;
}
end;

OnWin:
setnpctimer 0;
deletepset 1;
set .DisguiseWon, 1;
set $DisguiseRound, $DisguiseRound + 1;
sleep2 3000;
npctalk strcharinfo(0) + " got my right name!";
sleep2 3000;
npctalk $MonsterName$ + " is the correct answer.";
sleep2 3000;
npctalk "Take this as a reward, buddy.";
getitem 7061,1;
if ($DisguiseRound >= 6)
{
set $DisguiseRound, 0;
sleep 3000;
npctalk "Event is over now!";
sleep 3500;
npctalk "See ya guys";
sleep 2000;
emotion 12;
sleep 1000;
mapwarp "poring_c01.gat","gonryun",158,112;
setnpcdisplay "Disguise NPC",50;
disablenpc "Disguise NPC";
end;
}
sleep 5000;
goto OnStart;
end;



}

//-----------------------------------------------------------------------------------
//-----------------------------------------------------------------------------------

- script guessAnnouncer -1,{

OnMinute00:
OnMinute30:

announce "We are going to start an Disguise Event now!",0;
set $guessbegin, 0;
sleep 5000;
announce "If you want to join us, come to Gonryun and enter the warp portal.",0;
enablenpc "guesswarp";
enablenpc "Disguise NPC";
sleep 5000;
announce "The portal is going to close in one minute.",0;  
sleep 30000;
announce "30 seconds left before the warp portal closes.",0;
sleep 20000;
announce "10",0;
sleep 1000;
announce "9",0;
sleep 1000;
announce "8",0;
sleep 1000;
announce "7",0;
sleep 1000;
announce "6",0;
sleep 1000;
announce "5",0;
sleep 1000;
announce "4",0;
sleep 1000;
announce "3",0;
sleep 1000;
announce "2",0;
sleep 1000;
announce "1",0;
sleep 1000;
announce "The portal has been closed.",0;
disablenpc "guesswarp";
sleep 5000;
announce "Next Event will start in 30 minutes.",0;
set $DisguiseRound, 0;
donpcevent "Disguise NPC::OnStart";
end;

OnInit:
disablenpc "Disguise NPC";
disablenpc "guesswarp";

}

//-----------------------------------------------------------------------------------
//------------------Warp Portal------------------------------------------------------
gonryun,159,112,0 warp guesswarp 2,2,poring_c01,103,95
//-----------------------------------------------------------------------------------
//------------------Map Flags--------------------------------------------------------
poring_c01 mapflag nowarpto
poring_c01 mapflag noskill
poring_c01 mapflag nowarp
poring_c01 mapflag nosave
poring_c01 mapflag nomemo
poring_c01 mapflag noteleport
//-----------------------------------------------------------------------------------

Edited April 24, 2012 by Hatake Kakashi

[Smoke]

For the first question. I'm not sure what you're trying to say. Because i see the announce commands in place... this is Spera's Disguise npc if im not mistaken.. and if untouched will work fine.

As for the second,

Find :

getitem 7061,1;

Replace with :

getitem YOURITEM,QUANTITY;

[Hatake Kakashi]

how to win here? coz i already try this event, but still not recognize the correct answer. please help.....

bump./ please help