alias tasi { var %c1 $nick($1,0) while (%c1 > 0) { sajoin $nick($1,%c1) $2 dec %c1 } } Komut: /tasi #kanal1 #kanal2 Örnek: #Help kanalını #HelpOp kanalına taşımak; /tasi #Help #HelpOp Not: Bu Addon, Services Botları taşımaz.
on *:CONNECT: { .msg NickServ IDENTIFY şifre .oper opernick operşifresi .mode $me +Wsq +cFf .chghost $me mirchane.com }
alias kick { kick $1- %kicksayac | kicksayac } alias kicksayac { if (%kicksayac == $null) { set %kicksayac 1 } %kicksayac = %kicksayac + 1 halt } alias kline { kline $1- %klinesayac | klinesayac } alias klinesayac { if (%klinesayac == $null) { set %klinesayac 1 } %klinesayac = %klinesayac + 1 halt [...]
dialog memoserv { title ” Memoserv Komutları ” size 240 228 280 142 button “Memo Gönder”, 1, 13 18 105 23 box “Memo Oku:”, 2, 134 3 140 99 button “Memo 1″, 31, 140 21 53 20 button “Memo 4″, 34, 211 21 53 20 button “Memo 2″, 32, 140 46 53 20 button “Diğer”, [...]
;tub = total unban alias tub { if $1 !ischan || !$2 { /echo $color(info text) -at * /tub: insufficient parameters | halt } if $me isop $1 || $me ishop $1 { var %i = $ibl($1,0), %items = $iif($calc($ibl($1,0) – $2) < 0,$ibl($1,0),$2), %modespl = $null if !$hget($+($1,-ibl)) { hmake $+($1,-ibl) %items } while [...]
