Seb icon

Userlist 3.1+client

Seb | PRO | 06/13/10 10:18:22 PM UTC | 0 ⭐ | 1291 👁️ | Never ⏰ | []
mIRC |

4.87 KB

|

None

|

0 👍

/

0 👎

#########################
#    Userlist System    #
#  Version: 3.1+client  #
# By: Sebastien         #
# Mail: xplorer@live.ca #
# Net: irc.undernet.org #
# Chan: #mircscripting  #
#########################
alias user { 
  msg $chan $iif($readini($+(database\,$1,.ini), $2, $address($3,2)),1,0) 
  halt
}
 
on *:JOIN:#:{
  if ($readini(database\ $+ $chan $+ .ini, opjoin, $address($nick,2)) == 1) && ($readini(database\ $+ $chan $+ .ini, voicejoin, $address($nick,2)) == 1) { mode $chan +o+v $nick $nick | halt } 
  if ($readini(database\ $+ $chan $+ .ini, opjoin, $address($nick,2)) == 1) { mode $chan +o $nick | halt } 
  if ($readini(database\ $+ $chan $+ .ini, voicejoin, $address($nick,2)) == 1) { mode $chan +v $nick | halt } 
}
 
on *:KICK:#:{ 
  if ($nick == $me) { halt }
  if ($readini(database\ $+ $chan $+ .ini, protect, $address($knick,2)) == 1) { 
    ban -k $chan $nick $knick is Protected 
  } 
}
on *:ban:#:{ 
  if ($nick == $me) { halt }
  if ($bnick == $nick) { halt }
  if ($readini(database\ $+ $chan $+ .ini, protect, $address($bnick,2)) == 1) { 
    mode $chan -bo+b $banmask $nick $address($nick,2) 
    kick $chan $nick $bnick is Protected
  } 
}
on *:DEOP:#:{ 
  if ($nick == $me) { halt }
  if ($opnick == $nick) { halt }
  if ($readini(database\ $+ $chan $+ .ini, keepop, $address($opnick,2)) == 1) { 
    mode $chan -o+o $nick $opnick 
  } 
}
 
on *:text:.wget *:#:{
  msg $chan Levels for $2 with this mask :: $address($2,2)
  msg $chan $&
    $iif($readini(database\ $+ $chan $+ .ini, opjoin, $address($2,2)),3+AutoOp,4-autoop) $&    
    $iif($readini(database\ $+ $chan $+ .ini, voicejoin, $address($2,2)),3+AutoVoice,4-autovoice) $&    
    $iif($readini(database\ $+ $chan $+ .ini, keepop, $address($2,2)),3+KeepOp,4-keepop) $&    
    $iif($readini(database\ $+ $chan $+ .ini, bot, $address($2,2)),3+Bot,4-bot) $& 
    $iif($readini(database\ $+ $chan $+ .ini, protect, $address($2,2)),3+Protect,4-protect)               
}
 
alias showlevels {
  msg $chan Levels for $1 with this mask :: $address($1,2)
  msg $chan $&
    $iif($readini(database\ $+ $chan $+ .ini, opjoin, $address($1,2)),3+AutoOp,4-autoop) $&    
    $iif($readini(database\ $+ $chan $+ .ini, voicejoin, $address($1,2)),3+AutoVoice,4-autovoice) $&    
    $iif($readini(database\ $+ $chan $+ .ini, keepop, $address($1,2)),3+KeepOp,4-keepop) $&    
    $iif($readini(database\ $+ $chan $+ .ini, bot, $address($1,2)),3+Bot,4-bot) $& 
    $iif($readini(database\ $+ $chan $+ .ini, protect, $address($1,2)),3+Protect,4-protect)               
}
 
alias echolevels {
  echo -a Levels for $$1 with this mask :: $address($$1,2)
  echo -a $&
    $iif($readini(database\ $+ $chan $+ .ini, opjoin, $address($$1,2)),3+AutoOp,4-autoop) $&    
    $iif($readini(database\ $+ $chan $+ .ini, voicejoin, $address($$1,2)),3+AutoVoice,4-autovoice) $&    
    $iif($readini(database\ $+ $chan $+ .ini, keepop, $address($$1,2)),3+KeepOp,4-keepop) $&    
    $iif($readini(database\ $+ $chan $+ .ini, bot, $address($$1,2)),3+Bot,4-bot) $&    
    $iif($readini(database\ $+ $chan $+ .ini, protect, $address($$1,2)),3+Protect,4-protect)               
}
 
 
 
menu nicklist {
  Userlist
  .Add
  ..Op:writeini $+(database\,$chan,.ini) opjoin $address($$1,2) 1 | echo -a Added $$1 To Op list on $chan with this host: $address($$1,2) | mode $chan +o $$1
  ..Voice:writeini $+(database\,$chan,.ini) voicejoin $address($$1,2) 1 | echo -a Added $$1 To Voice list on $chan with this host: $address($$1,2) | mode $chan +v $$1
  ..KeepOp:writeini $+(database\,$chan,.ini) keepop $address($$1,2) 1 | echo -a Added $$1 To KeepOp list on $chan with this host: $address($$1,2) | mode $chan +o $$1
  ..Protect:writeini $+(database\,$chan,.ini) protect $address($$1,2) 1 | echo -a Added $$1 To protect list on $chan with this host: $address($$1,2)
  ..Bot:writeini $+(database\,$chan,.ini) bot $address($$1,2) 1 | echo -a Added $$1 To Bot list on $chan with this host: $address($$1,2)
  .Remove
  ..Op:remini $+(database\,$chan,.ini) opjoin $address($$1,2) | echo -a Removed $$1 From Op list on $chan with this host: $address($$1,2) | mode $chan -o $$1
  ..Voice:remini $+(database\,$chan,.ini) voicejoin $address($$1,2) | echo -a Removed $$1 From Voice list on $chan with this host: $address($$1,2) | mode $chan -v $$1  
  ..KeepOp:remini $+(database\,$chan,.ini) KeepOp $address($$1,2) 1 | echo -a Removed $$1 From KeepOp list on $chan with this host: $address($$1,2)
  ..Protect:remini $+(database\,$chan,.ini) protect $address($$1,2) 1 | echo -a Removed $$1 From protect list on $chan with this host: $address($$1,2)
  ..Bot:remini $+(database\,$chan,.ini) bot $address($$1,2) 1 | echo -a Removed $$1 From Bot list on $chan with this host: $address($$1,2)
  .Info
  ..Echo:echolevels $$1
}
 
on *:LOAD:{
  echo -a Userlist v3.1+client Succesfully loaded
  mkdir database
}

Comments