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
You must be logged in to comment.