Jump to content
  • 0

Stop the clock event


ecstasssyy

Question


  • Group:  Members
  • Topic Count:  5
  • Topics Per Day:  0.00
  • Content Count:  16
  • Reputation:   0
  • Joined:  03/20/14
  • Last Seen:  

Si mam/sir can someone help me fixing this script, i would like to edit the announcements coming from the npc. I want it to be in pront only.  I changed some announcement from here : https://rathena.org/wiki/Announce 

prontera,156,177,4 script Stop the Clock 102,{


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$, "[Event Manager]";
set .menu$, "Times:Information:Price:Leave";


if(strcharinfo(0) == .winner$) {
set stopped, 0;
mes .name$;
mes "Here you get your price.";
mes "Your Price is:";
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$ + ":StartGame:SetPrice";

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 "^00800015:00^000000, ^00800018:00^000000 and ^00800021:00^000000 o'clock.";
close;

case 2:
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 3:
mes .name$;
mes "The Price is:";
mes "^ff0000"+$prize_amount+" "+getitemname($prize_id)+"^000000";
close;

case 4:
close;

case 5:
sleep2 100;
close2;
goto l_start;
end;

case 6:
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;
}

OnClock1500:
OnClock1800:
OnClock2100:
l_start:

announce "[Aline]: We are going to start an Stop the Clock Event in 1 Minute at Prontera!",bc_all;
sleep2 30000;
announce "[Aline]: We are going to start in 30 Seconds!",bc_map;
sleep2 20000;
announce "[Aline]: Hurry up! Event starts in 10 Seconds!",bc_map;
sleep2 5000;
announce "[Aline]: Get Ready only 5 seconds left!",bc_map;
sleep2 5000;
announce "[Aline]: START!!!",bc_map;
sleep2 5000;

set .winner$, "";
set .game, 1;
set .lowest, 1000;

for(set .i, 1000; .i > 300;set .i, .i - 100) {
announce ":: "+.i+" ::",bc_blue|bc_map;
misceffect 377;
sleep2 1000;
}

for(set .i, 300; .i > 50;set .i, .i - 10) {
announce ":: "+.i+" ::",bc_blue|bc_map;
misceffect 377;
sleep2 100;
}

for(set .i, 50; .i > 0;set .i, .i - 1) {
announce ":: "+.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_blue;
end;
}
announce .winner$+" won Stop the Clock. He stopped it at "+.lowest+".",bc_blue;
sleep2 5000;
announce .winner$+"Please talk to me to get your price.",bc_blue;
sleep2 5000;
announce "To activate your char for the next round, please talk to me, too.",bc_map;

end;
}
Edited by Emistry
codebox
Link to comment
Share on other sites

5 answers to this question

Recommended Posts

  • 0

  • Group:  Members
  • Topic Count:  34
  • Topics Per Day:  0.01
  • Content Count:  83
  • Reputation:   0
  • Joined:  12/07/11
  • Last Seen:  


prontera,156,177,4 script Stop the Clock 102,{

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$, "[Event Manager]";

set .menu$, "Times:Information:Price:Leave";

if(strcharinfo(0) == .winner$) {

set stopped, 0;

mes .name$;

mes "Here you get your price.";

mes "Your Price is:";

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$ + ":StartGame:SetPrice";

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 "^00800015:00^000000, ^00800018:00^000000 and ^00800021:00^000000 o'clock.";

close;

case 2:

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 3:

mes .name$;

mes "The Price is:";

mes "^ff0000"+$prize_amount+" "+getitemname($prize_id)+"^000000";

close;

case 4:

close;

case 5:

sleep2 100;

close2;

goto l_start;

end;

case 6:

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;

}

OnClock1500:

OnClock1800:

OnClock2100:

l_start:

mapannounce "prontera", "[Aline]: We are going to start an Stop the Clock Event in 1 Minute at Prontera!";

sleep2 30000;

mapannounce "prontera", "[Aline]: We are going to start in 30 Seconds!";

sleep2 20000;

mapannounce "prontera", "[Aline]: Hurry up! Event starts in 10 Seconds!";

sleep2 5000;

mapannounce "prontera", "[Aline]: Get Ready only 5 seconds left!";

sleep2 5000;

mapannounce "prontera", "[Aline]: START!!!";

sleep2 5000;

set .winner$, "";

set .game, 1;

set .lowest, 1000;

for(set .i, 1000; .i > 300;set .i, .i - 100) {

announce ":: "+.i+" ::",bc_blue|bc_map;

misceffect 377;

sleep2 1000;

}

for(set .i, 300; .i > 50;set .i, .i - 10) {

announce ":: "+.i+" ::",bc_blue|bc_map;

misceffect 377;

sleep2 100;

}

for(set .i, 50; .i > 0;set .i, .i - 1) {

announce ":: "+.i+" ::",bc_blue|bc_map;

misceffect 377;

sleep2 10;

}

set .game, 0;

if(.winner$ == "") {

mapannounce "prontera", "Nobody hit the clock at the right moment. There is no winner.",bc_blue;

end;

}

mapannounce "prontera", .winner$+" won Stop the Clock. He stopped it at "+.lowest+".",bc_blue;

sleep2 5000;

mapannounce "prontera", .winner$+"Please talk to me to get your price.",bc_blue;

sleep2 5000;

mapannounce "prontera", "To activate your char for the next round, please talk to me, too.";

end;

}

Link to comment
Share on other sites

  • 0

  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10015
  • Reputation:   2348
  • Joined:  10/28/11
  • Last Seen:  

change announce to mapannounce

 

and please follow the basic rules of the forum, post code in

 [code]  script    [/code]
Link to comment
Share on other sites

  • 0

  • Group:  Members
  • Topic Count:  5
  • Topics Per Day:  0.00
  • Content Count:  16
  • Reputation:   0
  • Joined:  03/20/14
  • Last Seen:  

ok sir im sorry thank you so much


I changed the announce to mapannounce but i cant click the npc now.. tried to change the first line only it does not work too.

 

 
mapannounce "[Aline]: We are going to start an Stop the Clock Event in 1 Minute at Prontera!",bc_map;
sleep2 30000;
announce "[Aline]: We are going to start in 30 Seconds!",bc_map;
sleep2 20000;
announce "[Aline]: Hurry up! Event starts in 10 Seconds!",bc_map;
sleep2 5000;
announce "[Aline]: Get Ready only 5 seconds left!",bc_map;
sleep2 5000;
announce "[Aline]: START!!!",bc_map;
sleep2 5000;
Link to comment
Share on other sites

  • 0

  • Group:  Members
  • Topic Count:  34
  • Topics Per Day:  0.01
  • Content Count:  83
  • Reputation:   0
  • Joined:  12/07/11
  • Last Seen:  

 

ok sir im sorry thank you so much

I changed the announce to mapannounce but i cant click the npc now.. tried to change the first line only it does not work too.

 
mapannounce "[Aline]: We are going to start an Stop the Clock Event in 1 Minute at Prontera!",bc_map;
sleep2 30000;
announce "[Aline]: We are going to start in 30 Seconds!",bc_map;
sleep2 20000;
announce "[Aline]: Hurry up! Event starts in 10 Seconds!",bc_map;
sleep2 5000;
announce "[Aline]: Get Ready only 5 seconds left!",bc_map;
sleep2 5000;
announce "[Aline]: START!!!",bc_map;
sleep2 5000;

mapannounce "prontera",

Link to comment
Share on other sites

  • 0

  • Group:  Members
  • Topic Count:  5
  • Topics Per Day:  0.00
  • Content Count:  16
  • Reputation:   0
  • Joined:  03/20/14
  • Last Seen:  

Thank you so much sir sorry for being noob

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...