//===== 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 .@npc$;
        mes "Hello there, "+strcharinfo(0)+", how are you today!";
        next;
        mes "I am the Broadcaster!";
        mes "What do you wish to do today?";
        next;
        menu "Broadcaster",l_broadcast,"Leave",l_leave;
        
        l_broadcast:
        next;
        mes .@npc$;
        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 .@npc$;
        mes "Type in the box the text you want to broadcast.";
        mes "Type 'cancel' to cancel";
        input .@announce$;
        if (.@announce$ == cancel) goto l_leave;
        next;
        mes .@npc$;
        mes "Current preview of your broadcast...";
        mes ""+.@announce$+"";
        next;
        mes "Continue?";
        if (select("Yes","Try Again")==2) { goto l_broadcast;
                } else {
                        l_colour:
                        mes .@npc$;
                        mes "Choose your colour...";
                        menu "Black",l_black,"Gray",l_gray,"Pink",l_pink,"Orange",l_orange,"Blue",l_blue;
                        
                        l_black:
                        mes .@npc$;
                        mes "Final preview...";
                        mes "^000000"+.@announce$+"^000000";
                        next;
                        mes .@npc$;
                        mes "Continue?";
                        if (select("Yes","No")==2) { goto l_colour; 
                                } else {
                                        mes .@npc$;
                                        mes "Thank you for using my broadcaster! Bye!";
                                        set Zeny,zeny -1000000;
                                        announce " "+strcharinfo(0)+": "+.@announce$+"",0,0x000000;
                                        close;
                                        }
                                        
                        l_gray:
                        mes .@npc$;
                        mes "Final preview...";
                        mes "^B5B5B5"+.@announce$+"^000000";
                        next;
                        mes .@npc$;
                        mes "Continue?";
                        if (select("Yes","No")==2) { goto l_colour; 
                                } else {
                                        mes .@npc$;
                                        mes "Thank you for using my broadcaster! Bye!";
                                        set Zeny,zeny -1000000;
                                        announce " "+strcharinfo(0)+": "+.@announce$+"",0,0xBDBDBD;
                                        close;
                                        }
                                        
                        l_pink:
                        mes .@npc$;
                        mes "Final preview...";
                        mes "^FF5C9D"+.@announce$+"^000000";
                        next;
                        mes .@npc$;
                        mes "Continue?";
                        if (select("Yes","No")==2) { goto l_colour; 
                                } else {
                                        mes .@npc$;
                                        mes "Thank you for using my broadcaster! Bye!";
                                        set Zeny,zeny -1000000;
                                        announce " "+strcharinfo(0)+": "+.@announce$+"",0,0xFF5C9DD;
                                        close;
                                        }
                                        
                        l_orange:
                        mes .@npc$;
                        mes "Final preview...";
                        mes "^FF7700"+.@announce$+"^000000";
                        next;
                        mes .@npc$;
                        mes "Continue?";
                        if (select("Yes","No")==2) { goto l_colour; 
                                } else {
                                        mes .@npc$;
                                        mes "Thank you for using my broadcaster! Bye!";
                                        set Zeny,zeny -1000000;
                                        announce " "+strcharinfo(0)+": "+.@announce$+"",0,0xFF7700;
                                        close;
                                        }
                                        
                        l_blue:
                        mes .@npc$;
                        mes "Final preview...";
                        mes "^0095FF"+.@announce$+"^000000";
                        next;
                        mes .@npc$;
                        mes "Continue?";
                        if (select("Yes","No")==2) { goto l_colour; 
                                } else {
                                        mes .@npc$;
                                        mes "Thank you for using my broadcaster! Bye!";
                                        set Zeny,zeny -1000000;
                                        announce " "+strcharinfo(0)+": "+.@announce$+"",0,0095FF;
                                        close;
                                        }
                                        
                                        l_leave:
                                        mes .@npc$;
                                        mes "Okay then. Come back later!";
                                        close;
                                        
                                        }
                                        }
                        
}