//===== eAthena Script =======================================
//= Broadcaster
//===== By: ==================================================
//= Keim
//===== Current Version: =====================================
//= 1.0
//===== Description: =========================================
//= Broadcaster for free use
//===== Additional Comments: =================================
//= For @Jam
//============================================================
payon,123,123,4 script Broadcaster 123,{
set .@npc$,
"^FF0000Broadcaster^000000";
mes "I am the Broadcaster!";
mes "What do you wish to do today?";
menu "Broadcaster",l_broadcast,
"Leave",l_leave;
l_broadcast:
mes "Broadcasting has a fee of 1,000,000 Zeny.";
mes "Checking for zeny...";
if(Zeny<
1000000) { mes .@npc$;
mes "You don't have enough zeny, sorry!";
close;
} else {
mes "Type in the box the text you want to broadcast.";
mes "Type 'cancel' to cancel";
if (.@
announce$
== cancel
) goto l_leave;
mes "Current preview of your broadcast...";
if (select("Yes",
"Try Again")==2) { goto l_broadcast;
} else {
l_colour:
mes "Choose your colour...";
menu "Black",l_black,
"Gray",l_gray,
"Pink",l_pink,
"Orange",l_orange,
"Blue",l_blue;
l_black:
if (select("Yes",
"No")==2) { goto l_colour;
} else {
mes "Thank you for using my broadcaster! Bye!";
}
l_gray:
if (select("Yes",
"No")==2) { goto l_colour;
} else {
mes "Thank you for using my broadcaster! Bye!";
}
l_pink:
if (select("Yes",
"No")==2) { goto l_colour;
} else {
mes "Thank you for using my broadcaster! Bye!";
}
l_orange:
if (select("Yes",
"No")==2) { goto l_colour;
} else {
mes "Thank you for using my broadcaster! Bye!";
}
l_blue:
if (select("Yes",
"No")==2) { goto l_colour;
} else {
mes "Thank you for using my broadcaster! Bye!";
}
l_leave:
mes "Okay then. Come back later!";
}
}
}