
21 Temmuz 2015, 21:39
|
 | Headcoder mS Puan: 41 mS Derece:  | | Üyelik tarihi: 28 Kasım 2009 Mesajlar: 13 Konular: 9 Eklentiler: 0 Alınan Teşekkür: 29 Yapılan Teşekkür: 13 | |
Script clone uyari Kod: alias jclone {
var %f $ial($address($1,2),0), %s 1 | if $ial($address($1,2),0) > 1 { while %s <= %f { var %ss $addtok(%ss,$regsubex($$ial($address($1,2),$calc(%s)),(.+)(!.+@.+),\1),32) | inc %s } }
return $remove($+($chr(40),$chr(2),$iif(%ss,$iif(!$2,%ss,12 $+ %ss 3HOST:4 $regsubex($$ial($address($1,2),1),(.+!)(.+@.+),\2)) $+ $chr(15),Clone YOK!),$chr(2),$chr(41)),$1)
} $jclone(Nick) ~ $jclone(Nick,$me)
Özelinizde veya kanala giriste clone tarar.
Örn: Kod: on ^*:join:#:echo $color(join) -t # Giriş: $nick $+($chr(40),$address,$chr(41)) $jclone($nick) | haltdef
on *:open:?:echo 5 -t $nick Clone: $jclone($nick)
alias query { query $$1 | echo 4 -t $$1 Clone: $jclone($1,2) }
Konu IrCbaStarD tarafından (21 Temmuz 2015 Saat 21:42 ) değiştirilmiştir.
|