Just another on Text?

Please Register to submit score.

Average Score	4.0
Scores Submitted	2
Date Added	Feb 12, 2008
Last Updated	Feb 12, 2008
Tags	ban bot channel kick op protection

Introduction

Copy an paste the code into your remote section ALT +r an save it if you wish. These are simple bot commands but they are set up a little differently then normal.The use of these commands are as follows.
On your nick list from top to bottom are = to 1 - wat ever number of chatters there are in the channel.So you would have to count down from top to bottom.To !op some one count down the nicklist to their name so if they are the 3rd one down you would use !op 3 .If they are the 15th one down !op 15.The Syntax's are <!command> <number in the nicklist> <time >< reason>.I just thought it was a neat way to go about some simple bot commands XD.As always comments an seggestions are appreciated."Rate or Hate it?".`-.-�

Grab the Code

on *:LOAD: {
  write a_a.txt $input(Please choose a nickname to be the first bot user here.,e)
  echo -a These are simple bot commands but they are set up a little differently then normal.The Syntax of these commands are as follows.
  echo -a On your nick list from top to bottom are = to 1 - wat ever number of chatters there are in the channel.So you would have to count down from top to bottom.
  echo -a To !op some one count down the nicklist to their name so if they are the 3rd one down you would use !op 3 .If they are the 15th one down !op 15.
  echo -a The Syntax's are <!command> <number in the nicklist> <time or reason>
}
on 1:text:!op*:#: {
  var %a_a $nick
  if ($nick == $read(a_a.txt,r,%a_a)) { 
    var %_NOP $2
    var %_Z 0
    var %_N_C $nick($chan,0)
    while (%_Z <= %_N_C) { 
      inc %_Z
      if (%_Z == %_NOP) {
        mode $chan +o $nick($chan,%_Z) 
        msg $chan 15,1(�(4,1(�0,1 $+ $nick($chan,%_Z) OPED By: $nick $+ !4,1�)15,1)�) 
      }
    }
  }
}
on 1:text:!dop*:#: {
  var %a_a $nick
  if ($nick == $read(a_a.txt,r,%a_a)) { 
    var %_NDOP $2
    var %_Z 0
    var %_N_C $nick($chan,0)
    while (%_Z <= %_N_C) { 
      inc %_Z
      if (%_Z == %_NDOP) {
        mode $chan -o $nick($chan,%_Z)
        msg $chan  15,1(�(4,1(�0,1 $+ $nick($chan,%_Z) DEOPED By: $nick $+ !4,1�)15,1)�) 
      }
    }
  }
}
on 1:text:!vop*:#: {
  var %a_a $nick
  if ($nick == $read(a_a.txt,r,%a_a)) { 
    var %_NVOP $2
    var %_Z 0
    var %_N_C $nick($chan,0)
    while (%_Z <= %_N_C) { 
      inc %_Z
      if (%_Z == %_NVOP) {
        mode $chan +v $nick($chan,%_Z) 
        msg $chan 15,1(�(4,1(�0,1 $+ $nick($chan,%_Z) VOICED By: $nick $+ !4,1�)15,1)�) 
      }
    }
  }
}
on 1:text:!dvop*:#: {
  var %a_a $nick
  if ($nick == $read(a_a.txt,r,%a_a)) { 
    var %_NDVOP $2
    var %_Z 0
    var %_N_C $nick($chan,0)
    while (%_Z <= %_N_C) { 
      inc %_Z
      if (%_Z == %_NDVOP) {
        mode $chan -v $nick($chan,%_Z)
        msg $chan  15,1(�(4,1(�0,1 $+ $nick($chan,%_Z) DEVOICED By: $nick $+ !4,1�)15,1)�) 
      }
    }
  }
}
on *:text:*!mute*:#: {
  var %a_a $nick
  if ($nick == $read(a_a.txt,r,%a_a)) { 
    var %_NQ $2 
    var %_QT $3
    var %_Z 0
    var %_N_C $nick($chan,0)
    while (%_Z <= %_N_C) { 
      inc %_Z
      if (%_Z == %_NQ) {
        mode $chan +q $nick($chan,%_Z) 
        .timer 1 %_QT mode $chan -q $nick($chan,%_Z) 
        msg $chan  15,1(�(4,1(�0,1 $+ $nick($chan,%_Z) Muted For: %_QT Seconds4,1�)15,1)�) 
      }
    }
  }
}
on 1:text:!kick*:#: {
  var %a_a $nick
  if ($nick == $read(a_a.txt,r,%a_a)) { 
    var %_NK $2
    var %_KR $3-
    var %_Z 0
    var %_N_C $nick($chan,0)
    while (%_Z <= %_N_C) { 
      inc %_Z
      if (%_Z == %_NK) {
        kick $chan $nick($chan,%_Z) 15,1(�(4,1(�0,1 $+ $nick($chan,%_Z) Kicked.Reason: %_KR $+ !4,1�)15,1)�) 
      }
    }
  }
}
on 1:text:!ban*:#: {
  var %a_a $nick
  if ($nick == $read(a_a.txt,r,%a_a)) { 
    var %_NB $2 
    var %_BT $3
    var %_BR $4
    var %_Z 0
    var %_N_C $nick($chan,0)
    while (%_Z <= %_N_C) { 
      inc %_Z
      if (%_Z == %_NB) {
        ban -ku $+ %_BT $chan $nick($chan,%_Z) 4 15,1(�(4,1(�0,1 $+ $nick($chan,%_Z) KickedBaned For: %_BT Seconds!!.Reason: %_BR $+ !4,1�)15,1)�) 
      }
    }
  }
}
on 1:text:!add*:#: {
  var %a_a $nick
  if ($nick == $read(a_a.txt,r,%a_a)) { 
    var %_NADD $2 
    var %_Z 0
    var %_N_C $nick($chan,0)
    while (%_Z <= %_N_C) { 
      inc %_Z
      if (%_Z == %_NADD) {
        write a_a.txt $nick($chan,%_Z) 
        msg $chan 15,1(�(4,1(�0,1 $+ $nick($chan,%_Z) ADDED!!4,1�)15,1)�) 
      }
    }
  }
}
on 1:text:!remove*:#: {
  var %a_a $nick
  if ($nick == $read(a_a.txt,r,%a_a)) { 
    var %_NREM $2 
    var %_Z 0
    var %_N_C $nick($chan,0)
    while (%_Z <= %_N_C) { 
      inc %_Z
      if (%_Z == %_NREM) {
        write -d a_a.txt $nick($chan,%_Z) 
        msg $chan 15,1(�(4,1(�0,1 $+ $nick($chan,%_Z) REMOVED!!4,1�)15,1)�) 
      }
    }
  }
}

Comments

(0) RSS

Go to Bottom

Just another on Text?

Introduction

Grab the Code

Comments

EL

My Snippet Tags

Contact

Friends (16)

Sponsors

		Freelance artist...
Last seen: Jul 06, 2008 Profile \| Website Friends (16) Snippets (17) Images (20) Comments Received (339) Comments Submitted (801) Forum Posts (44)