tglogo.png
0 LIKES

Snippet


Server Notice Window (Ircop) by elvara

In Category General IRC Posted by Snippets On 12/04/23

by elvara
on ^*:snotice:*: {
  if (*Client connecting* iswm $1-) {
    noop $regex($1-,: ([^ ]+) \x28([^@]+)@([^\x29]+)\x29)
    if (!$window(@Konekcije)) {
      window -mg[1]k[0]bxlkapoCzdk0tnbL @Konekcije 0 0 300 700
      titlebar @Konekcije - Konekcije!
    }
    iline @Konekcije 1 5[ $+ $time(HH:nn) $+ ] * $regml(1) ( $+ $regml(2) $+ @ $+ $regml(3) ) 
  }
  if (*Client exiting* iswm $1-) {
    dline @Konekcije 1 $sline(@Konekcije,%i)
    haltdef
    window -emg[1]k[0] @SNotices
    aline -p @SNotices 5 $1-
  }
}
menu @Konekcije {
  WHOIS:{
    var %i = $sline(@Konekcije,0)
    while (%i != 0) {
      if $regex(linija,$strip($sline(@Konekcije,%i)), ([^ ]+) \x28([^@]+)@([^\x29]+)\x29) {
        //whois $regml(linija,1) $regml(linija,1)
      }
      dec %i
    }
  }
  CLONES:{
    var %i = $sline(@Konekcije,0)
    while (%i != 0) {
      if $regex(linija,$strip($sline(@Konekcije,%i)), ([^ ]+) \x28([^@]+)@([^\x29]+)\x29) {
        //gline +*@ $+ $regml(linija,3) 5d :Clones su zabranjeni na bolchat mrezi! Nick: $regml(linija,1) // Host/IP: $regml(linija,3) http://your.web.com
      }
      dec %i
    }
  }
  PRAVILNIK:{
    var %i = $sline(@Konekcije,0)
    while (%i != 0) {
      if $regex(linija,$strip($sline(@Konekcije,%i)), ([^ ]+) \x28([^@]+)@([^\x29]+)\x29) {
        //gline +*@ $+ $regml(linija,3) 5d :Molimo vas da se drzite pravila Bolchat mreze! Nick: $regml(linija,1) // Host/IP: $regml(linija,3) http://your.web.com
      }
      dec %i
    }
  }
  SKINI kill SA NIKA:{
    var %i = $sline(@Konekcije,0)
    while (%i != 0) {
      if $regex(linija,$strip($sline(@Konekcije,%i)), ([^ ]+) \x28([^@]+)@([^\x29]+)\x29) {
        //gline -*@ $+ $regml(linija,3)
      }
      dec %i
    }
  }
  NACIONALIZAM:{
    var %i = $sline(@Konekcije,0)
    while (%i != 0) {
      if $regex(linija,$strip($sline(@Konekcije,%i)), ([^ ]+) \x28([^@]+)@([^\x29]+)\x29) {
        //gline +*@ $+ $regml(linija,3) 100d :Bolchat mreza nece tolerisati nacionalizam,rasizam i slicno! Nick: $regml(linija,1) // Host/IP: $regml(linija,3) http://your.web.com
      }
      dec %i
    }
  }
}


Comments 0


Please note that on our website we use cookies necessary for the functioning of our website, cookies that optimize the performance. To learn more about our cookies, how we use them and their benefits, please read our Cookie Policy.
I Understand