Simple Broadcast script

[Zodac0de]

Hello!
It's just a REALLY simple broadcast script

Use: .bc help
And you'll see the commands.

Exemple:
<nick>: .bc add 10 3600 Hello world!
<bot notice>: Broadcast added. To delete broadcast use: .bc del <nr>

Don't forget to change NICK to your nick.

Code: Select all

on *:text:.bc*:#: {
  if ($nick == NICK) {
    set %bct $rand(0,1000)
    if (!$2) {
      notice $nick Error. SYNTAX: $1 <help> | halt
    }
    if ($2 == add) {
      if ($3 == 0) {
        .notice $nick Please don't use $3 times, i could get killed. | halt
      }
      .timer [ $+ [ %bct ] ] $3 $4 .amsg (Broadcast) $5- 
      .notice $nick Broadcast added. To delete broadcast use: .bc del %bct
    }
    if ($2 == del) {
      if (!$3) {
        .notice $nick Error. Syntax: $1 $2 <nr> | halt
      }
      .timer [ $+ [ $3 ] ] off
      .notice $nick Broadcast deleted.
    }
  }
  if ($2 == help) {
    notice $nick SYNTAX: $1 <add|(del> <nr>) <howmanytimes> <howoften(in seconds)> <your massage>
    Notice $nick  $1 add
    notice $nick <howmanytimes> = How many times you want it to broadcast.
    notice $nick <howoften(in seconds)> = How often you like it to send you broadcast massage.
    notice $nick  $1 del
    notice $nick <nr> = The number you got when you addded the broadcasting massage.
    | halt
  }
}
else {
  notice $nick You don't have access to this command.
}

[Cristian]

Hi

I loaded the script in my mirc editor, and it seems like there is some misplaced brackets.

This line isn't the best to use on Quakenet.

Code: Select all

if ($nick == NICK) {

The script is okay, simple to use.

Commands can be found by typing ".bc help".

[StareX]

Very nice..

Thanks!

[zNigel-]

This line isn't the best to use on Quakenet.

Code: Select all

if ($nick == NICK) {

Exactly..

That's why i'm learning my coding with

Code: Select all

  if ($read(users.txt,w,$address($nick,2)))

witch reads the file users.txt for your *!*@host

Imo it's much safer than the $nick == nick shizzle for beginners

[Cristian]

This line isn't the best to use on Quakenet.

Code: Select all

if ($nick == NICK) {

Exactly..

That's why i'm learning my coding with

Code: Select all

  if ($read(users.txt,w,$address($nick,2)))

witch reads the file users.txt for your *!*@host

Imo it's much safer than the $nick == nick shizzle for beginners

We all have to start somewhere

and the .amsg command might be useless after Quakenets update, I'm talking about channelmode +T, its something to take under consideration when updating the script.

[zNigel-]

We all have to start somewhere

and the .amsg command might be useless after Quakenets update, I'm talking about channelmode +T, its something to take under consideration when updating the script.

RAW should still work tho ^^

[Blady]

What about a command to list all the <nr> running ? For example if you forgot them =)

[Jerzy]

Blady: Exactly as i was going to say.

It could maybe be a good idea to just have the cmd: .bc add 3600 Hello world! and not: .bc add 10 3600 Hello world!
so you dont need to type the number yourself, but the bot just do it for you.

[Zodac0de]

Blady: Exactly as i was going to say.

It could maybe be a good idea to just have the cmd: .bc add 3600 Hello world! and not: .bc add 10 3600 Hello world!
so you dont need to type the number yourself, but the bot just do it for you.

So it will be default with 10 times? =)

and with the number list, dont know how to make it..

// $me

[Blady]

Blady: Exactly as i was going to say.

It could maybe be a good idea to just have the cmd: .bc add 3600 Hello world! and not: .bc add 10 3600 Hello world!
so you dont need to type the number yourself, but the bot just do it for you.

So it will be default with 10 times? =)

// $me

Maybe make something : if the user type : .bc add <delay> <msg> (So when he does not provide a number of times), use '0' for unlimited messages

The check can be done like :

Code: Select all

if ($1 == .bc) {
  if ($2 == add) {
    if ($4 isnum) {
      var %message = $5-
      var %delay = $4
      var %numTimes = $3
    }
    else {
      var %message = $4-
      var %delay = $3
      var %numTimes = 0
    }
    .timer [ $+ [ %bct ] ] %numTimes %delay .amsg (Broadcast) %message
  }
}

and with the number list, dont know how to make it..
// $me

To do it, you can add an index to all the timer. Instead of:

Code: Select all

.timer [ $+ [ %bct ] ] <numTimes> <delay> <command>

Use:

Code: Select all

.timerbc. [ $+ [ %bct ] ] <numTimes> <delay> <command>

And then, use the $timer function like :

Code: Select all

var %i = 1, %timedMessage = 0
while ($timer(%i)) {
  if (bc.* iswm $v1) {
    .timer 1 %timedMessage notice $nick BC LIST - Name: $timer(%i).name - Time before next spam: $timer(%i).secs - Message: $gettok($timer(%i).com,$2-,32)
    inc %timedMessage 2
  }
  inc %i
}
.timer 1 %timedMessage I found $calc(%timedMessage / 2) timer(s) running.

Regards.