how to add consolation prize on this dice event script ?

[eJay]

Pano po ba mag add ng consolation prize sa dice event ?

tapos kpag natatalo ung mga player automatic po na ma wawarp cla dito sa

que_moon 34 34 tapos may npc po jan na mag bibigay ng 40 Cash pts then ma wawarp sa prontera.

thnx in advance

//##########################################################################

//By: ____ _ __ __ ____ _____ #

// | \ ___ __ __ _ | | \ \ / /_ _ _ / ___\ / ____| #

// | || | / _ \\ \ / /| || | \ \ / /| || \ | || | ___ | (___ #

// | || || __/ \ \/ / | || |__ \ \/\/ / | || \| || |___|\ \___ \ #

// __|____/__\___|__\__/__|_||____|_____\_/\_/__|_||_|\__|_\_____/_____) | #

//|_____________________________________________________________________/ #

// #

//##########################################################################

// #

//== Dice Event #

// #

//##########################################################################

// #

//== Automatically starts a dice event every 30 minutes of every hour #

// #

//== Prize- Change 13723 to any item ID you want the winner to recieved #

// #

//##########################################################################

- script Dice#announcer -1,{

OnInit:

disablenpc "prtevent";

hideonnpc "Dice#evnt1";

end;

OnMinute15:

announce "Dice: We are going to have a Dice event.",0;

sleep2 10000;

announce "Dice: For those who wants to join, Please proceed to the center of Prontera and enter the Warp Portal.",0;

sleep2 10000;

announce "Dice: After 1 Minute the Portal will close.",0;

sleep2 10000;

announce "Dice: So please go to the middle of Prontera and enter the Warp Portal now if you want to join.",0;

enablenpc "prtevent";

initnpctimer;

end;

OnTimer30000:

announce "Dice: Last 30 seconds.",0;

sleep2 5000;

announce "Dice: If you want to join please enter the Warp Portal beside me here in Prontera.",0;

end;

OnTimer50000:

announce "Dice: Last 10 seconds.",0;

end;

OnTimer55000:

announce "Dice: 5.",0;

end;

OnTimer56000:

announce "Dice: 4.",0;

end;

OnTimer57000:

announce "Dice: 3.",0;

end;

OnTimer58000:

announce "Dice: 2.",0;

end;

OnTimer59000:

announce "Dice: 1.",0;

end;

OnTimer60000:

announce "Dice: Time's up.",0;

end;

OnTimer61000:

disablenpc "prtevent";

donpcevent "Dice#evnt1::OnEnable";

stopnpctimer;

end;

OnTimer62000:

announce "Dice: The next Dice event will begin after 30 minutes.",0;

end;

}

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

prontera,155,166,0 warp prtevent 2,2,quiz_01,204,90

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

quiz_01,204,93,6 script Dice#evnt1 715,{

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

mes "[Dice]";

mes "Please tell me your name";

next;

input .@name$;

if(.@name$ != strcharinfo(0)) {

mes "[Dice]";

mes "Are you sure thats your character name?";

close;

}

mes "[Dice]";

mes "Congrats. You've won.";

close2;

announce "Dice: We have a winner, "+.@name$+".",0;

set #CASHPOINTS,#CASHPOINTS + 200;

dispbottom "You have Won 200 Cash Points Total of = "+#CASHPOINTS+" Points.";

warp "turbo_room",100,99;

hideonnpc "Dice#evnt1";

end;

OnEnable:

mapannounce "quiz_01","Dice: We are about to start the Dice event.",0;

sleep2 10000;

mapannounce "quiz_01","Dice: But before we start the event here's how to play the game. . .",0;

sleep2 10000;

mapannounce "quiz_01","Dice: I'm only gonna say this once so read carefully.",0;

sleep2 10000;

mapannounce "quiz_01","Dice: I'm going to pick a number, 1 to 4. Then I'll do a count down from 5 to 0.",0;

sleep2 10000;

mapannounce "quiz_01","Dice: All you have to do is go to the box of the number you want.",0;

sleep2 10000;

mapannounce "quiz_01","Dice: Example, If I get the number of 4, All the players standing on numbers 1 to 3 will be warped back to town.",0;

sleep2 10000;

mapannounce "quiz_01","Dice: We will do it again and again until we only have 1 player left on the map.",0;

sleep2 10000;

mapannounce "quiz_01","Dice: Oh yeah! Before I forget you MUST GO INSIDE THE BOX, because if you're caught standing on the stairs you'll be automatically disqualified.",0;

sleep2 10000;

mapannounce "quiz_01","Dice: That's that.. Now let's play...",0;

sleep2 10000;

goto L_Start;

end;

L_Start:

if(getmapusers("quiz_01") == 1) goto L_Champ;

if(getmapusers("quiz_01") == 0) goto L_None;

if(getmapusers("quiz_01") > 1) {

announce "Dice: . . . . .",0;

set $@number, rand(1,4);

sleep2 10000;

announce "Dice: I have a number now. Please go to the box of the number you want.... GO!",0;

sleep2 10000;

announce "Dice: 5",0;

sleep2 5000;

announce "Dice: 4",0;

sleep2 4000;

announce "Dice: 3",0;

sleep2 3000;

announce "Dice: 2",0;

sleep2 2000;

announce "Dice: 1",0;

sleep2 1000;

announce "Dice: Time's up.",0;

donpcevent "evnt#1::OnEnable";

announce "Dice: Winning number "+$@number+".",0;

if(($@number != 1) && ($@number != 2) && ($@number != 3)) goto L_Lose1;

if(($@number != 1) && ($@number != 2) && ($@number != 4)) goto L_Lose2;

if(($@number != 1) && ($@number != 3) && ($@number != 4)) goto L_Lose3;

if(($@number != 2) && ($@number != 3) && ($@number != 4)) goto L_Lose4;

end;

}

L_Lose1:

areawarp "quiz_01",183,81,191,59,"prontera",155,182;

areawarp "quiz_01",195,81,203,59,"prontera",155,182;

areawarp "quiz_01",207,81,215,59,"prontera",155,182;

goto L_Start;

end;

L_Lose2:

areawarp "quiz_01",183,81,191,59,"prontera",155,182;

areawarp "quiz_01",195,81,203,59,"prontera",155,182;

areawarp "quiz_01",219,81,227,59,"prontera",155,182;;

goto L_Start;

end;

L_Lose3:

areawarp "quiz_01",183,81,191,59,"prontera",155,182;

areawarp "quiz_01",207,81,215,59,"prontera",155,182;

areawarp "quiz_01",219,81,227,59,"prontera",155,182;

goto L_Start;

end;

L_Lose4:

areawarp "quiz_01",195,81,203,59,"prontera",155,182;

areawarp "quiz_01",207,81,215,59,"prontera",155,182;

areawarp "quiz_01",219,81,227,59,"prontera",155,182;

goto L_Start;

end;

L_Champ:

mapannounce "quiz_01","Dice: Come to me and tell me your name.",0;

hideoffnpc "Dice#evnt1";

end;

L_None:

hideonnpc "Dice#evnt1";

end;

}

- script evnt#1 -1,{

OnEnable:

areawarp "quiz_01",182,94,228,88,"prontera",155,182;

areawarp "quiz_01",185,87,188,82,"prontera",155,182;

areawarp "quiz_01",197,87,200,82,"prontera",155,182;

areawarp "quiz_01",209,87,212,82,"prontera",155,182;

areawarp "quiz_01",221,87,224,82,"prontera",155,182;

end;

}

// -- Mapflags

quiz_01 mapflag nowarp

quiz_01 mapflag nowarpto

quiz_01 mapflag noteleport

quiz_01 mapflag nosave

quiz_01 mapflag nomemo

quiz_01 mapflag nobranch

quiz_01 mapflag nopvp

Edited July 16, 2012 by Luffy

[Gerome]

Pedi din pg natalo sila automatic ma bibigyan sila ng Points..

L_Lose1:
set #CASHPOINTS,40;
areawarp "quiz_01",183,81,191,59,"prontera",155,182;
areawarp "quiz_01",195,81,203,59,"prontera",155,182;
areawarp "quiz_01",207,81,215,59,"prontera",155,182;
goto L_Start;
end;

L_Lose2:
set #CASHPOINTS,40;
areawarp "quiz_01",183,81,191,59,"prontera",155,182;
areawarp "quiz_01",195,81,203,59,"prontera",155,182;
areawarp "quiz_01",219,81,227,59,"prontera",155,182;;
goto L_Start;
end;

L_Lose3:
set #CASHPOINTS,40;
areawarp "quiz_01",183,81,191,59,"prontera",155,182;
areawarp "quiz_01",207,81,215,59,"prontera",155,182;
areawarp "quiz_01",219,81,227,59,"prontera",155,182;
goto L_Start;
end;

L_Lose4:
set #CASHPOINTS,40;
areawarp "quiz_01",195,81,203,59,"prontera",155,182;
areawarp "quiz_01",207,81,215,59,"prontera",155,182;
areawarp "quiz_01",219,81,227,59,"prontera",155,182;

or want mo tlga na ma warp sila sa map na un ito ung code..

L_Lose1:
areawarp "quiz_01",183,81,191,59,"que_moon",34,34;
areawarp "quiz_01",195,81,203,59,"que_moon",34,34;
areawarp "quiz_01",207,81,215,59,"que_moon",34,34;
goto L_Start;
end;

L_Lose2:
areawarp "quiz_01",183,81,191,59,"prontera",34,34;
areawarp "quiz_01",195,81,203,59,"prontera",34,34;
areawarp "quiz_01",219,81,227,59,"prontera",34,34;;
goto L_Start;
end;

L_Lose3:
areawarp "quiz_01",183,81,191,59,"que_moon",34,34;
areawarp "quiz_01",207,81,215,59,"que_moon",34,34;
areawarp "quiz_01",219,81,227,59,"que_moon",34,34;
goto L_Start;
end;

L_Lose4:
areawarp "quiz_01",195,81,203,59,"que_moon",34,34;
areawarp "quiz_01",207,81,215,59,"que_moon",34,34;
areawarp "quiz_01",219,81,227,59,"que_moon",34,34;
goto L_Start;

then sa que_moon lagay ka ng npc na mg bbgay sa kanila ng cash points..