Jump to content
  • 0
Pandaaa

[Event] Stop the Clock Request

Question

I Found a script made from eathenaa... anyone can make it work for herc?

 

prontera,156,122,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_all;
sleep2 20000;
announce "[Aline]: Hurry up! Event starts in 10 Seconds!",bc_all;
sleep2 5000;
announce "[Aline]: Get Ready only 5 seconds left!",bc_all;
sleep2 5000;
announce "[Aline]: START!!!",bc_all;
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_area;
		misceffect 377;
		sleep2 1000;
		}

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

for(set .i, 50; .i > 0;set .i, .i - 1)	{
		announce ":: "+.i+" ::",bc_blue|bc_area;
		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_all;

end;
}

 

Share this post


Link to post
Share on other sites

2 answers to this question

Recommended Posts

  • 0

Usually eA scripts work for Hercules/rAthena unless it's an instance script since the commands are a bit different. Could you please post a snippet of what's happening in the map server console so we I can further assist You? Not at home otherwise I'd test it out :P

Share this post


Link to post
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.   Restore formatting

  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.

Loading...

×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.