//Jam "Merme"
//=======================================================================================
//=======================================================================================
//=======================================================================================
//Annoucer/broadcaster   (in color)
//=======================================================================================
//=======================================================================================
//=======================================================================================
caspen,177,229,3    script  Broadcaster 790,{
 
set @payitem,671;
set @payamt,1;
 
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Hello, ^F509DE"+strcharinfo(0)+"^000000";
mes "Do you want to broadcast something? Payment is^FAEB60 100,000 Zeny ^000000.";
menu "Yes please.",yes,"No",no;
 
yes:
if(Zeny < 100000) goto exit2;
next;
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Alrighty then! Please choose the color that you want your broadcast to be displayed in!";
next;
menu "^FFFF Y Yellow^000000",yellow, "^FF000  Red^000000",red, "^00FFFF Blue^000000",blue, "",green, "",purple, "",pink, "",gray, "",orange, "Cancel",-; 
mes "Come back if you ever need to broadcast something!";
close;
 
red:
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Type your message and it will be heard miles away";
input @mensagem$;
set Zeny,Zeny - 100000;
announce ""+strcharinfo(0)+": "+@mensagem$+" ",bc,0xD20000;
close;
 
yellow:
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Type your message and it will be heard miles away";
input @mensagem1$;
set Zeny,Zeny - 100000;
announce ""+strcharinfo(O)+": "+@mensagem1$+" ",bc,0xFFFF00;
close;
 
 
blue:
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Type your message and it will be heard miles away";
input @mensagem3$;
set Zeny,Zeny - 100000;
announce ""+strcharinfo(0)+": "+@mensagem3$+" ",bc_blue;
close;
 
green:
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Type your message and it will be heard miles away";
input @mensagem4$;
set Zeny,Zeny - 100000;
announce ""+strcharinfo(O)+": "+@mensagem4$+" ",bc,0x33FF33;
close;
 
purple:
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Type your message and it will be heard miles away";
input @mensagem5$;
set Zeny,Zeny - 100000;
announce ""+strcharinfo(O)+": "+@mensagem5$+" ",bc,0xCC00FF;
close;
 
pink:
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Type your message and it will be heard miles away";
input @mensagem5$;
set Zeny,Zeny - 100000;
announce ""+strcharinfo(O)+": "+@mensagem5$+" ",bc,0xFF33CC;
close;
 
gray:
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Type your message and it will be heard miles away";
input @mensagem6$;
set Zeny,Zeny - 100000;
announce ""+strcharinfo(O)+": "+@mensagem6$+" ",bc,0xBAB9B9;
close;
 
orange:
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Type your message and it will be heard miles away";
input @mensagem5$;
set Zeny,Zeny - 100000;
announce ""+strcharinfo(O)+": "+@mensagem5$+" ",bc,0xFF9900;
close;
 
no:
next;
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Oh that's a bummer.";
mes "Come back when you need me. ^_^";
close;
 
exit2:
next;
mes "[ ^FE021B Broadcaster^000000  ]";
mes "Sorry you don't have enough Zeny to make the broadcast.";
mes "Please come again when you can afford it.";
close;
 
end;
}