! $+ voice/hop/op/ban list

By thegingon on Feb 16, 2012

Screenshots

this Snippet is voice and/or half-op and/or op and/or ban list on chan.
to use him write:
!listops - for opers list
!listhops - for half-opers list
!listvops - for voices list
!listbans - for ban list

its sand the informaion in notice

my first snippet.
i will shere more Snippet

;opers list
on *:TEXT:!listops:#:{
  if (!$nick($chan,1,o)) {
    notice $nick 4 * There is no opers in the channel $2 $+ .
    halt
  }
  else {
    notice $nick 4 * Listing Ops on #
    set %i 1
    :next
    set %nick $nick(#,%i)
    if %nick isop # notice $nick 3 %nick is an Op!
    elseif %nick == $null goto done
    inc %i
    goto next
    :done
    notice $nick 4 * End of Ops list
    unset %i
    unset %nick
  }
}
;half-opers list
on *:TEXT:!listhops:#:{
  if (!$nick($chan,1,h)) {
    notice $nick 4 * There is no half-opers in the channel $2 $+ .
    halt
  }
  else {
    notice $nick 4 * Listing Hops on #
    set %i1 1
    :next
    set %nick1 $nick(#,%i1)
    if %nick1 ishop # notice $nick 3 %nick1 is an Hop!
    elseif %nick == $null goto done
    inc %i1
    goto next
    :done
    notice $nick 4 * End of Hops list
    unset %i1
    unset %nick1
  }
}
;voice list
on *:TEXT:!listvops:#:{
  if (!$nick($chan,1,v)) {
    notice $nick 4 * There is no voice in the channel $2 $+ .
    halt
  }
  else {
    notice $nick 4 * Listing voice on $chan
    set %i2 1
    :next
    set %nick2 $nick(#,%i2)
    if %nick2 isvoice # notice $nick 3 %nick2 have a voice!
    elseif %nick2 == $null goto done
    inc %i2
    goto next
    :done
    notice $nick 4 * End of voice list
    unset %i2
    unset %nick2
  }
}
;ban list
on *:TEXT:!listbans:#:{
  if ($ibl($chan,0) == 0) {
    notice $nick 4 * There is no bans in the channel $2 $+ .
    halt
  }
  else {
    var %n 1
    notice $nick 4 * Listing bans on $chan
    :banlist
    if (!$ibl($chan,%n)) { goto done }
    else {
      var %banick $ibl($chan,%n)
      notice $nick 4 %n $+ . %banick have ban in this chan - $chan      
      inc %n
      goto banlist
    } 
    :done
    notice $nick 4 * End of ban list
  }
}

Comments

Sign in to comment.
napa182   -  Feb 17, 2012

^^lol

 Respond  
Spoof   -  Feb 16, 2012

Nice mIRC help file script rip. Changed the Alias to "on *:text: <-event" making it a trigger script.

 Respond  
Sorasyn   -  Feb 16, 2012

Most clients support showing ban lists. Perhaps as an alternative to listing all the bans, you could search for a specific host matching against a supplied wildcard pattern. Also instead of having 4 text events you could crunch them down a little bit by using if statements. :)

 Respond  
thegingon   -  Feb 16, 2012

so how i change it to all the bans .

and to me its wor'k with old ban

 Respond  
TochA1551   -  Feb 16, 2012

About !listbans , it shows only new bans (which u add after u add this script)

 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.