Auto0p Control

By Ripp0n on May 02, 2005

[This is my first script Submitted to hawkee]
This is a very easy and simple script to use. It's all in the nicklist menu.
Im still learning mIRC so don't critisize to harshly :P

menu *  {
  -
  Auto0p Control 
  .$iif(%ed0p == $true, [Enabled], Enable): .enable #Auto0p | enable.a0p
  .$iif(%ed0p == $true, Disable, [Disabled]): .disable #Auto0p | disable.a0p
  .-
  .Control
  ..Add $1: a0p $1
  ..Delete $1: d0p $1
  ..-
  ..Add: a0p $$?"Enter nick to add"
  ..Delete: d0p $$?"Enter nick to remove"
  .-
  .List A0ps: l0ps
  .Say A0ps: s0ps
}

on 1:Load: { set %A0p2 9[10A3uto1003p 10C3ontrol9] | set %A0p3 9[10A3uto10O3p 10L3ist9]2 | set %ed0p $true }

alias disable.a0p {
  if (%ed0p != $false) {
    set %ed0p $false
    msg # %A0p2 $+ : Disactivated
    echo -a %A0p2 $+ : 4D5isabled
  }
  else { 
    echo -a Error: Already disabled.
  }
}

alias enable.a0p {
  if (%ed0p != $true) { 
    set %ed0p $true
    msg # %A0p2 $+ : Initiated
    echo -a %A0p2 $+ : 10E3nabled
  }
  else {
    echo -a Error: Already enabled.
  }
}

alias a0p {
  .auser a0p $1
  set %Auto0p %Auto0p $1
  write Auto0ps.txt $1
  msg $chan 10A3uto10O3p 7A8dded3: 9[2 $+ $1 $+ 9]
}

alias d0p {
  .ruser a0p $1 
  set %Auto0p $remtok(%Auto0p,$1,1,32) 
  write -ds $+ $1 Auto0ps.txt 
  msg $chan 10A3uto10O3p 4R5emoved3: 9[2 $+ $1 $+ 9]
}

alias l0ps {
  window @Auto0ps
  echo @Auto0ps %A0p3
  pull
}

alias s0ps {
  describe # %A0p3 %Auto0p
  else { echo -a There are currently no Auto0ps }
}

alias pull {
  var %f = Auto0ps.txt, %i = 0, %x = $lines(%f) | while (%i < %x) { inc %i | echo -a 3[2 $+ $read(%f,tn,%i) $+ 3]
  }
}

#Auto0p on
on a0p:join:#:{ 
  mode # +o $nick | msg # 9[2 $+ $nick $+ 9]3 is on my %A0p3
}
#Auto0p end

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

Comments

Sign in to comment.
Ripp0n   -  May 03, 2005

oh....okay thanx

 Respond  
DarthReven   -  May 02, 2005

1) .$iif($group(#Auto0p) == on, [Enabled],[Disabled]) { if ($group(#Auto0p) == on) { .disable #Auto0p | echo -ae Auto Op Off } | else { .enable #AutoOp | echo -ae Auto Op On } 2) .$iif(!$read(Auto0ps.txt,w,$1),Add $1 to A0p,Delete from A0p) { if (!$read(Auto0ps.txt,w,$1)) { .auser a0p $1 | write Auto0p.txt $1 | echo -ae Added $1 to Auto Op } | else { .ruser $1 | .echo -q $read(Auto0ps.txt,w,$1) | write Auto0p.txt -dl $+ $readn | echo -ae Deleted $1 from Auto Op } }

 Respond  
Ripp0n   -  May 02, 2005

suggestion?

 Respond  
DarthReven   -  May 02, 2005

you don\'t need all the extra variables and aliases like enable.a0p and disable.a0p

 Respond  
Ripp0n   -  May 02, 2005

yeah i know but i wanted to make something =P

 Respond  
xDaeMoN   -  May 02, 2005

mIRC already has a built-in auto-op feature. /help /aop =)

 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.