AV

By ^Alexis^ on Feb 01, 2009

Well its been a while since i posted a script on hawkee..so here it is. any questions im on irc.cyanide-x.net my nick is Kirby. ty rate and hate AND i didnt add color you can add it

just a simple Auto voicer!

on *:TEXT:.av on*:#:{
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    set %Av [ $+ [ $chan ] ] on
    msg $chan Autovoice is on for $chan 
  }
}

on *:TEXT:.av off*:#:{
  if (%Av [ $+ [ $chan ] ] == on) {
    if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
      unset %Av [ $+ [ $chan ] ]
      msg $chan Autovoice is off for $chan
    }
  }
}

on *:TEXT:.av*:#:{
  if (%av [ $+ [ $chan ] ] == on) {
    if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
      set %Auv [ $+ [ $address($2,2) ] ] $address($2,2) 
      msg $chan $address($2,2) added to autovoice list.
    }
  }
}

on *:TEXT:.deav*:#:{
  if (%av [ $+ [ $chan ] ] == on) { 
    if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
      unset %Auv [ $+ [ $address($2,2) ] ] $address($2,2)
      msg $chan $address($2,2) removed from autovoice list   
    }
  }
}

on *:JOIN:#:{ 
  if (%av [ $+ [ $chan ] ] == on) && (%Auv [ $+ [ $address($2,2) ] ] == $address($nick,2)) {
    mode $chan +v $nick
  }
}

Comments

Sign in to comment.
napalm`   -  Feb 02, 2009

lol @ all of you

 Respond  
Korvin   -  Feb 02, 2009

=] lindrian gets beat up.... a lot...

 Respond  
Kirby   -  Feb 02, 2009

Lindrian is better than all of you.
So gtfo.

 Respond  
Korvin   -  Feb 02, 2009

yeah. im the ignorant one when you make mistakes and blame it on me.

 Respond  
Firstmate   -  Feb 02, 2009

Fighting with someone as ignorant as you is futile. Whatever.

 Respond  
Korvin   -  Feb 02, 2009

if youre 5 times better then me, why cant you read a script? why are you unable to find the actual problem? i found it on accident.. it wasnt even what you said.

 Respond  
Korvin   -  Feb 02, 2009

trigger was a little off, and not in the way he said it was..

on *:text:/^[!@#^](de)?av/gi:# {
on *:text:/^(!|@|#|\^)(de)av/gi:# {

first is the new one. i edited this in notepad.

 Respond  
Firstmate   -  Feb 02, 2009

Dude I'm probably 5x better at msl than you and you don't even know how old I am...

 Respond  
Korvin   -  Feb 02, 2009

i hate it when little kids who have no idea how to script talk crap about what i do.. its annoying he cant read a script then says its my fault? its rediculous

 Respond  
Firstmate   -  Feb 02, 2009

Ooh you're just fcking retarded aren't you. What do you take me for? A dumbass? I looked at the script for 5 minutes before making that post. Don't give your bullshit. You're a noob at msl.

 Respond  
Aucun50   -  Feb 02, 2009

Please if your going to flame each other DON'T do it here.

AS I SAID TAKE IT SOMEWHERE ELSE!

 Respond  
Korvin   -  Feb 02, 2009

aucun, you didnt win =p mine destroyed yours, mine works completely, this firstmate kid doesnt know what hes talking about

 Respond  
Korvin   -  Feb 02, 2009

i didnt just add that.. read the script retard... dont flame me if you cant read a script... and that regex should work.. the /'s tell the script its regex.

 Respond  
Firstmate   -  Feb 02, 2009

You just added that. And thanks but I'm sure I know how to script.

 Respond  
Aucun50   -  Feb 02, 2009

I win rewrite again :D

 Respond  
Korvin   -  Feb 02, 2009

its in there and yes it does. it does exactly what that kids does buddy. learn to script please.

on *:JOIN:#:{ if ($($+(%,av,$chan),2)) && ($($+(%,av,$address($,2)),2) == $address($nick,2)) mode $chan +v $nick }

thats in that script

 Respond  
Firstmate   -  Feb 02, 2009

LOL konlin you're script doesn't even voice someone....

And there's something you have to put in the event to let mirc know yourr matching regex

 Respond  
Korvin   -  Feb 02, 2009

dont worry, i did this while i was tired out of my mind, and i scripted it without testing

alias isq if ($1 isop $2 || $1 ishop $2 || $address($1,2) == $address($me,2)) return $true
on *:JOIN:#:{ if ($($+(%,av,$chan),2)) && ($($+(%,av,$address($,2)),2) == $address($nick,2)) mode $chan +v $nick }
on *:text:/^[!@#^](de)?av/gi:# {
  if ($isq($nick,#)) {
    if (*deav !iswm $1) {
      if ($2 == on || $2 == off) {
        $iif($2 == on,set,unset) %Av $+ $chan on
        msg $chan Autovoice is $iif($2 == on,on,off) for $chan 
        halt
      }
      set $+(%av,$address($,2)) $address($2,2) 
      msg $chan $address($2,2) added to autovoice list.
    }
    unset $+(%av,$address($,2))
    msg $chan $2 removed from autovoice list   
  }
}

much cleaner.

jesus.. mine destroys all of yours

 Respond  
^Alexis^   -  Feb 01, 2009

Ya :DD but im a blue Kirby kthx...ABTW someone rate this script XD

 Respond  
Kirby   -  Feb 01, 2009

Your nick is Kirby?
So is mine!

 Respond  
Aucun50   -  Feb 01, 2009

"sorry not that advanced yet..maybe once i learn to script more i will do it...thanks Aucun btw nice megabot." Thank you, i like redoing scripts with tons of text events :)

 Respond  
^Alexis^   -  Feb 01, 2009

Oh sorry...I havent scripted for a year..

 Respond  
Firstmate   -  Feb 01, 2009

lol

Btw, this is wrong:

on *:JOIN:#:{ 
  if (%av [ $+ [ $chan ] ] == on) && (%Auv [ $+ [ $address($2,2) ] ] == $address($nick,2)) {
    mode $chan +v $nick
  }
}

The ) after the on ends the if statement). You need:

on *:JOIN:#:{ 
  if ((%av [ $+ [ $chan ] ] == on) && (%Auv [ $+ [ $address($2,2) ] ] == $address($nick,2)) {
    mode $chan +v $nick
  }
}
 Respond  
^Alexis^   -  Feb 01, 2009

oh...ty firstmate..maybe teach me sometime or give me a tutorial

 Respond  
Firstmate   -  Feb 01, 2009

All he means is you can group them.

For example:

on *:TEXT:!trigger*:#:{

Is the same as:

on *:TEXT:*:#: {
 if ($1 == !trigger) {
 }
}

By doing that, you can put multiple commands in one event:

on *:TEXT:*:#: {
 if ($1 == !trigger) {
 }
 if ($1 == !trigger2) {
 }
}
 Respond  
^Alexis^   -  Feb 01, 2009

sorry not that advanced yet..maybe once i learn to script more i will do it...thanks Aucun btw nice megabot.

 Respond  
Aucun50   -  Feb 01, 2009

You could add all your on text's into one:

on *:TEXT:*:#: {
  if (.av == $strip($1)) && (on == $strip($2)) {
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    set %Av [ $+ [ $chan ] ] on
    msg $chan Autovoice is on for $chan 
    }
  }
  if (.av == $strip($1)) && (off == $strip($2)) {
  if (%Av [ $+ [ $chan ] ] == on) {
    if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
      unset %Av [ $+ [ $chan ] ]
      msg $chan Autovoice is off for $chan
    }
  }
  if (.av == $strip($1)) {
  if (%av [ $+ [ $chan ] ] == on) {
    if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
      set %Auv [ $+ [ $address($2,2) ] ] $address($2,2) 
      msg $chan $address($2,2) added to autovoice list.
    }
  }
  if (.deav == $strip($1)) {
  if (%av [ $+ [ $chan ] ] == on) { 
    if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
      unset %Auv [ $+ [ $address($2,2) ] ] $address($2,2)
      msg $chan $address($2,2) removed from autovoice list   
    }
  }
}
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.