payon,155,238,6 script Stop the Clock 856,{
if(.game == 1 && stopped != 1) {
set stopped, 1;
set @stopped, .i;
message strcharinfo(0), "You stopped the clock at "+@stopped+".";
if(.lowest > @stopped) {
set .lowest, @stopped;
set .winner$, strcharinfo(0);
}
end;
}
else if(.game == 1) {
message strcharinfo(0), "You already stopped the clock.";
end;
}
set .name$, "[ STC Manager ]";
set .menu$, "Information:Price:Leave";
if(strcharinfo(0) == .winner$) {
set stopped, 0;
mes .name$;
mes "Here you get your price.";
//mes "Your Price is :";
getitem 22654,1;
//mes "^ff0000"+$prize_amount+" "+getitemname($prize_id)+"^000000";
//getitem $prize_id, $prize_amount;
set .winner$, "";
close;
}
if(stopped == 1) {
set stopped, 0;
mes .name$;
mes "You activated your char for the next round.";
close;
}
if(getgmlevel() > 60) set .menu$, .menu$ + ":Start Game";
mes .name$;
mes "Welcome to the ^ff0000Stop the Clock^000000.";
next;
switch(select(.menu$)) {
//case 1:
//mes .name$;
//mes "^ff0000Stop the Clock^000000 starts each day at:";
//mes "^0080001:00^000000, ^00800018:00^000000 and ^00800021:00^000000 o'clock.";
//mes"^008000STC always starts at 10:00/19:00 Server Time^000000";
//close;
case 1:
mes .name$;
mes "^ff0000Stop the Clock^000000";
mes "is a game where you need to";
mes "click on me exactly when the counter reached 0.";
next;
mes .name$;
mes "It counts down from ^0080001000^000000 to ^ff00000^000000.";
next;
mes .name$;
mes "To win, you need to have the ^ff0000closest value to 0^000000 but at least ^ff0000below 50^000000.";
next;
mes .name$;
mes "The winner will recieve a prize.";
mes "^ff0000Don't forget to talk to me after the Event is over,";
mes "to reset your counter to take part on the next event.^000000";
close;
case 2:
mes .name$;
mes "The Price is : 1 Event Card.";
//mes "^ff0000"+$prize_amount+" "+getitemname($prize_id)+"^000000";
close;
case 3:
close;
case 4:
sleep2 100;
close2;
goto l_start;
end;
}
//case 5:
//mes .name$;
//mes "Enter the item id of the prize:";
//input $prize_id;
//next;
//mes .name$;
//mes "Enter the amount if items the winner will recieve:";
//input $prize_amount;
//next;
//mes .name$;
//mes "The price id is: ^ff0000"+$prize_id+"^000000";
//mes "^008000("+getitemname($prize_id)+")^000000.";
//mes "The amount is: ^ff0000"+$prize_amount+"^000000.";
//close;
//}
//OnClock1000:
//OnClock1900:
//OnClock2010:
l_start:
announce "STC Event Manager : We are going to start an Stop the Clock Event in 1 Minute at Payon Town @go 3 !",bc_all;
sleep2 60000;
announce "STC Event Manager : We are going to start in 30 Seconds !",bc_map;
sleep2 20000;
announce "STC Event Manager : Hurry up! Event starts in 10 Seconds !",bc_map;
sleep2 5000;
announce "STC Event Manager : Get Ready only 5 seconds left !",bc_map;
sleep2 5000;
announce "STC Event Manager : START !!!",bc_map;
sleep2 5000;
set .winner$, "";
set .game, 1;
set .lowest, 1000;
for(set .i, 1000; .i > 300;set .i, .i - 100) {
mapannounce"payon",":: "+.i+" ::",bc_blue|bc_map;
misceffect 377;
sleep2 1000;
}
for(set .i, 300; .i > 50;set .i, .i - 10) {
mapannounce"payon",":: "+.i+" ::",bc_blue|bc_map;
misceffect 377;
sleep2 100;
}
for(set .i, 50; .i > 0;set .i, .i - 1) {
mapannounce"payon",":: "+.i+" ::",bc_blue|bc_map;
misceffect 377;
sleep2 10;
}
set .game, 0;
if(.winner$ == "") {
announce "Nobody hit the clock at the right moment, There is no winner.",bc_map;
end;
}
announce .winner$+" won Stop the Clock. He stopped it at "+.lowest+".",bc_map;
sleep2 5000;
announce .winner$+" please talk to me to get your prize.",blue;
//sleep2 5000;
//announce "Event Manager : To activate your char for the next round, please talk to me, too.",bc_map;
end;
OnInit:
waitingroom "STC Event",0;
end;
}