G2A Many GEOs
SHARE
TWEET

Userlist 3.1+client

Seb Jun 13th, 2010 (edited) 265 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #########################
  2. #    Userlist System    #
  3. #  Version: 3.1+client  #
  4. # By: Sebastien         #
  5. # Mail: xplorer@live.ca #
  6. # Net: irc.undernet.org #
  7. # Chan: #mircscripting  #
  8. #########################
  9. alias user {
  10.   msg $chan $iif($readini($+(database\,$1,.ini), $2, $address($3,2)),1,0)
  11.   halt
  12. }
  13.  
  14. on *:JOIN:#:{
  15.   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 }
  16.   if ($readini(database\ $+ $chan $+ .ini, opjoin, $address($nick,2)) == 1) { mode $chan +o $nick | halt }
  17.   if ($readini(database\ $+ $chan $+ .ini, voicejoin, $address($nick,2)) == 1) { mode $chan +v $nick | halt }
  18. }
  19.  
  20. on *:KICK:#:{
  21.   if ($nick == $me) { halt }
  22.   if ($readini(database\ $+ $chan $+ .ini, protect, $address($knick,2)) == 1) {
  23.     ban -k $chan $nick $knick is Protected
  24.   }
  25. }
  26. on *:ban:#:{
  27.   if ($nick == $me) { halt }
  28.   if ($bnick == $nick) { halt }
  29.   if ($readini(database\ $+ $chan $+ .ini, protect, $address($bnick,2)) == 1) {
  30.     mode $chan -bo+b $banmask $nick $address($nick,2)
  31.     kick $chan $nick $bnick is Protected
  32.   }
  33. }
  34. on *:DEOP:#:{
  35.   if ($nick == $me) { halt }
  36.   if ($opnick == $nick) { halt }
  37.   if ($readini(database\ $+ $chan $+ .ini, keepop, $address($opnick,2)) == 1) {
  38.     mode $chan -o+o $nick $opnick
  39.   }
  40. }
  41.  
  42. on *:text:.wget *:#:{
  43.   msg $chan Levels for $2 with this mask :: $address($2,2)
  44.   msg $chan $&
  45.     $iif($readini(database\ $+ $chan $+ .ini, opjoin, $address($2,2)),3+AutoOp,4-autoop) $&    
  46.     $iif($readini(database\ $+ $chan $+ .ini, voicejoin, $address($2,2)),3+AutoVoice,4-autovoice) $&    
  47.     $iif($readini(database\ $+ $chan $+ .ini, keepop, $address($2,2)),3+KeepOp,4-keepop) $&    
  48.     $iif($readini(database\ $+ $chan $+ .ini, bot, $address($2,2)),3+Bot,4-bot) $&
  49.     $iif($readini(database\ $+ $chan $+ .ini, protect, $address($2,2)),3+Protect,4-protect)              
  50. }
  51.  
  52. alias showlevels {
  53.   msg $chan Levels for $1 with this mask :: $address($1,2)
  54.   msg $chan $&
  55.     $iif($readini(database\ $+ $chan $+ .ini, opjoin, $address($1,2)),3+AutoOp,4-autoop) $&    
  56.     $iif($readini(database\ $+ $chan $+ .ini, voicejoin, $address($1,2)),3+AutoVoice,4-autovoice) $&    
  57.     $iif($readini(database\ $+ $chan $+ .ini, keepop, $address($1,2)),3+KeepOp,4-keepop) $&    
  58.     $iif($readini(database\ $+ $chan $+ .ini, bot, $address($1,2)),3+Bot,4-bot) $&
  59.     $iif($readini(database\ $+ $chan $+ .ini, protect, $address($1,2)),3+Protect,4-protect)              
  60. }
  61.  
  62. alias echolevels {
  63.   echo -a Levels for $$1 with this mask :: $address($$1,2)
  64.   echo -a $&
  65.     $iif($readini(database\ $+ $chan $+ .ini, opjoin, $address($$1,2)),3+AutoOp,4-autoop) $&    
  66.     $iif($readini(database\ $+ $chan $+ .ini, voicejoin, $address($$1,2)),3+AutoVoice,4-autovoice) $&    
  67.     $iif($readini(database\ $+ $chan $+ .ini, keepop, $address($$1,2)),3+KeepOp,4-keepop) $&    
  68.     $iif($readini(database\ $+ $chan $+ .ini, bot, $address($$1,2)),3+Bot,4-bot) $&    
  69.     $iif($readini(database\ $+ $chan $+ .ini, protect, $address($$1,2)),3+Protect,4-protect)              
  70. }
  71.  
  72.  
  73.  
  74. menu nicklist {
  75.   Userlist
  76.   .Add
  77.   ..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
  78.   ..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
  79.   ..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
  80.   ..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)
  81.   ..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)
  82.   .Remove
  83.   ..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
  84.   ..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  
  85.   ..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)
  86.   ..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)
  87.   ..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)
  88.   .Info
  89.   ..Echo:echolevels $$1
  90. }
  91.  
  92. on *:LOAD:{
  93.   echo -a Userlist v3.1+client Succesfully loaded
  94.   mkdir database
  95. }
RAW Paste Data
Ledger Nano X - The secure hardware wallet
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top