IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   !unban yazdığımda Banımı Açsın (https://www.ircforumlari.net/mirc-scripting-sorunlari/6148-unban-yazdigimda-banimi-acsin.html)

Alper 07 Ağustos 2005 14:59

on *:text:*:?:{
if ($1 == !unban) { var %~ = $chan( $+ 0 $+ ) | while %~ { if ($me isop $chan(%~)) { mode $chan(%~) -b $nick } | dec %~ } }

goXXip 08 Ağustos 2005 09:34

on 1:text:*:?: {
if $1 == !unban && $me isop #izmir {
var %k = 1
while %k <= 15 {
_queue mode #izmir -b $adress($nick,%k)
inc %k
}
}
}
alias _queue {
inc %queue.count
if ($timer(.queue) == $null) {
hadd -m queue count 1
hadd -m queue 1 $1-
_doqueue 1
}
else {
var %queue.count = $calc($hget(queue,count) + 1)
hadd -m queue %queue.count $1-
hadd -m queue count %queue.count
}
}
alias _doqueue {
if ($hget(queue,$1) != $null) {
.timer.queue -mo 1 $calc((4 - $gettok(3 2 1,$1,32)) * 60) _doqueue $calc($1 + 1)
$ifmatch
.hdel -s queue $1
}
else hfree queue
}


Bu da başka bir yöntem tabi :)


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 05:33.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk