Jump to content

Broadcaster

Hades03

By Hades03
in Utility Script Releases

 Share

Recommended Posts

Hades03 Poring

Hades03

Posted
  • Group:  Members
  • Topic Count:  81
  • Topics Per Day:  0.02
  • Content Count:  242
  • Reputation:   3
  • Joined:  01/01/12
  • Last Seen:  
Posted

Hello rathena member this is my broadcaster script

Features:

With 8 Color

Red, Black, Blue, Green, Purple, Pink, Gray, Orange.

you can set the payment here

set @payitem,671;

set @payamt,1;

100+ Downloads and no comment and no report omg :D

No Bug!!!

Wew 278 Downloads But still no reprot wew nice script /gg

Still no bug?

broadcaster.txt

  • Upvote 2
Link to comment
Share on other sites
onizame Poring

onizame

Posted
  • Group:  Members
  • Topic Count:  15
  • Topics Per Day:  0.00
  • Content Count:  139
  • Reputation:   2
  • Joined:  07/05/12
  • Last Seen:  
Posted

i want to report.. this is no bug.. o.O

Link to comment
Share on other sites
Raikumi Drops

Raikumi

Posted
  • Group:  Members
  • Topic Count:  15
  • Topics Per Day:  0.00
  • Content Count:  51
  • Reputation:   0
  • Joined:  06/28/12
  • Last Seen:  
Posted

can someone tell me how to set it to require 100k zeny instead of an item?

Link to comment
Share on other sites
Emistry Deviling

Emistry

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

replace the item checking part with this

if( Zeny < 100000 ){
   mes "You cant use.";
   close;
}

replace the item removing part with this

set Zeny - 1000000;

Link to comment
Share on other sites
  • 2 weeks later...
cheeky Poring

cheeky

Posted
  • Group:  Members
  • Topic Count:  8
  • Topics Per Day:  0.00
  • Content Count:  17
  • Reputation:   0
  • Joined:  04/10/12
  • Last Seen:  
Posted

can you arrange or align the texts? Because it's all in left side. It's not working for me..

Link to comment
Share on other sites
Hades03 Poring

Hades03

Posted
  • Group:  Members
  • Topic Count:  81
  • Topics Per Day:  0.02
  • Content Count:  242
  • Reputation:   3
  • Joined:  01/01/12
  • Last Seen:  
  • Author
Posted

Try To Download dude

Link to comment
Share on other sites
  • 4 weeks later...
Hades03 Poring

Hades03

Posted
  • Group:  Members
  • Topic Count:  81
  • Topics Per Day:  0.02
  • Content Count:  242
  • Reputation:   3
  • Joined:  01/01/12
  • Last Seen:  
  • Author
Posted

340 Download Yuhoooo

Link to comment
Share on other sites
  • 1 month later...
rotestserver Poring

rotestserver

Posted
  • Group:  Members
  • Topic Count:  3
  • Topics Per Day:  0.00
  • Content Count:  32
  • Reputation:   0
  • Joined:  10/21/12
  • Last Seen:  
Posted

thanks, but when I change the requirements to zeny. nothing happens when I click the npc. D: can you tell me why?

Link to comment
Share on other sites
Bin4ry Poring

Bin4ry

Posted
  • Group:  Members
  • Topic Count:  30
  • Topics Per Day:  0.01
  • Content Count:  782
  • Reputation:   82
  • Joined:  01/01/12
  • Last Seen:  
Posted (edited)

@^rotestserver, you can use mine here.

// http://rathena.org/board/topic/66794-broadcaster/#entry148563
prontera,147,172,5 script Broadcast Agent 57,{

set .@Price, 100000;
setarray .@Color$[0], "Red", "Green", "Blue";
setarray .@ColorCode$[0], "0xFF0000", "0x00FF00", "0x0000FF";

mes "[broadcaster]";
mes "Hello, ^0055ff" + strcharinfo(0) + "^000000.";
mes "Do you want to broadcast something? The price is " + .@Price + "z.";
next;
if (select("Yes:No") == 2) {
mes "[broadcaster]";
mes "Oh that's a bummmer.";
mes "Feel free to talk to me again.";
close;
}
if (Zeny < .@Price) {
mes "[broadcaster]";
mes "I don't think you have enough zeny.";
close;
}
mes "[broadcaster]";
mes "Now please pick a color:";
next;
for (set .@i, 0; .@i < getarraysize(.@Color$); set .@i, .@i + 1)
set .@Menu$, .@Menu$ + .@Color$[.@i] + ":";
set .@i,(select(.@Menu$) - 1);
mes "[broadcaster]";
mes "Please type your message now:";
next;
input .@Msg$;
mes "[broadcaster]";
mes "Alright, message is broadcasted now! Thank you.";
set Zeny, Zeny - .@Price;
announce strcharinfo(0) + ": " + .@Msg$, bc_all, .@ColorCode$[.@i];
close;
}

Edit: Here is link for proper tabbed ver: http://www.heypasteit.com/clip/0JE5

Edited by darristan
  • Upvote 1
Link to comment
Share on other sites
rotestserver Poring

rotestserver

Posted
  • Group:  Members
  • Topic Count:  3
  • Topics Per Day:  0.00
  • Content Count:  32
  • Reputation:   0
  • Joined:  10/21/12
  • Last Seen:  
Posted

@^rotestserver, you can use mine here.

// http://rathena.org/board/topic/66794-broadcaster/#entry148563
prontera,147,172,5 script Broadcast Agent 57,{

set .@Price, 100000;
setarray .@Color$[0], "Red", "Green", "Blue";
setarray .@ColorCode$[0], "0xFF0000", "0x00FF00", "0x0000FF";

mes "[broadcaster]";
mes "Hello, ^0055ff" + strcharinfo(0) + "^000000.";
mes "Do you want to broadcast something? The price is " + .@Price + "z.";
next;
if (select("Yes:No") == 2) {
mes "[broadcaster]";
mes "Oh that's a bummmer.";
mes "Feel free to talk to me again.";
close;
}
if (Zeny < .@Price) {
mes "[broadcaster]";
mes "I don't think you have enough zeny.";
close;
}
mes "[broadcaster]";
mes "Now please pick a color:";
next;
for (set .@i, 0; .@i < getarraysize(.@Color$); set .@i, .@i + 1)
set .@Menu$, .@Menu$ + .@Color$[.@i] + ":";
set .@i,(select(.@Menu$) - 1);
mes "[broadcaster]";
mes "Please type your message now:";
next;
input .@Msg$;
mes "[broadcaster]";
mes "Alright, message is broadcasted now! Thank you.";
set Zeny, Zeny - .@Price;
announce strcharinfo(0) + ": " + .@Msg$, bc_all, .@ColorCode$[.@i];
close;
}

Edit: Here is link for proper tabbed ver: http://www.heypasteit.com/clip/0JE5

Thank you sir darristan!

Link to comment
Share on other sites
  • 3 months later...
EnigmatiCDreaM Poring

EnigmatiCDreaM

Posted
  • Group:  Members
  • Topic Count:  6
  • Topics Per Day:  0.00
  • Content Count:  19
  • Reputation:   1
  • Joined:  12/11/12
  • Last Seen:  
Posted

Is it possible to add a code to set a limit to how many times you broadcast a day? and if so can someone help add the code to it?

For example every player can do a maximum of 3 broadcasts a day

Appreciate it!

Link to comment
Share on other sites
  • 5 months later...
markiez22 Poporing

markiez22

Posted
  • Group:  Members
  • Topic Count:  11
  • Topics Per Day:  0.00
  • Content Count:  126
  • Reputation:   5
  • Joined:  10/31/12
  • Last Seen:  
Posted 



//Jam "Merme"
//=======================================================================================
//=======================================================================================
//=======================================================================================
//Annoucer/broadcaster   (in color)
//=======================================================================================
//=======================================================================================
//=======================================================================================
prontera,145,164,6    script    Broadcaster    415,{


if (.AnnounceDelay > gettimetick(2)) {
    mes "You must wait 2 minutes between announcements.";
    close;
}

mes "[ ^FE021BMerme^000000 ]";
mes "Hello, ^F509DE"+strcharinfo(0)+"^000000";
mes "Do you want to broadcast something?.";
next;
mes "[ ^FE021BMerme^000000 ]";
mes "We Have Color Please choose!";
next;
menu "Red",red, "Green",green, "Purple",purple, "Orange",orange, "Cancel",-; 
mes "im Sorry if u want to say something just let me know.";
close;

red:
mes "[ ^FE021BMerme^000000 ]";
mes "Type your message and it will be heard miles away";
input @mensagem$;
announce ""+strcharinfo(0)+": "+@mensagem$+" ",bc,0xD20000;
set .AnnounceDelay, gettimetick(2) + 120;
close;



green:
mes "[ ^FE021BMerme^000000 ]";
mes "Type your message and it will be heard miles away";
input @mensagem4$;
announce ""+strcharinfo(O)+": "+@mensagem4$+" ",bc,0x33FF33;
set .AnnounceDelay, gettimetick(2) + 120;
close;

purple:
mes "[ ^FE021BMerme^000000 ]";
mes "Type your message and it will be heard miles away";
input @mensagem5$;
announce ""+strcharinfo(O)+": "+@mensagem5$+" ",bc,0xCC00FF;
set .AnnounceDelay, gettimetick(2) + 120;
close;


orange:
mes "[ ^FE021BMerme^000000 ]";
mes "Type your message and it will be heard miles away";
input @mensagem5$;
announce ""+strcharinfo(O)+": "+@mensagem5$+" ",bc,0xFF9900;
set .AnnounceDelay, gettimetick(2) + 120;
close;

no:
next;
mes "[ ^FE021BMerme^000000 ]";
mes "Oh that's a bummmer.";
mes "Come back when you need me. ^_^";
close;

exit2:
mes "[ ^FE021BMerme^000000 ]";
mes "Sorry you don't have enough coins to make the broadcast.";
mes "Please come again.";
close;

end;
}

 

Is it possible to add a code to set a limit to how many times you broadcast a day? and if so can someone help add the code to it?

For example every player can do a maximum of 3 broadcasts a day

Appreciate it!

 

 

i don't know how to config that. . 

but try this one. .

2min every annouce. .  to anti spam :D

Link to comment
Share on other sites
  • 3 months later...
Akbal Poring

Akbal

Posted
  • Group:  Members
  • Topic Count:  1
  • Topics Per Day:  0.00
  • Content Count:  4
  • Reputation:   0
  • Joined:  10/22/13
  • Last Seen:  
Posted

Ey Jam can you please write what is the exactly "check" part and the "remove part" of your code?

because i got an error replacing the "delitem @..." in all the colors.

 

thanks.

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
Reply to this topic...

×   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.

×
 Share
Go to topic listing
×
×
  • Create New...