|
Peki o zaman : sız kod
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
On 1:input:#:{
if / == $LEFT($1-,1) { $1- | .halt }
%z = $nick(#,0)
while %z {
if $nick(#,%z) isin $1- {
.echo $active $timestamp $+(<,$me,>) $replace($1-,$nick(#,%z),$+([-,$nick(#,%z),-]))
.msg $active $replace($1-,$nick(#,%z),$+([-,$nick(#,%z),-]))
.halt
}
.dec %z
}
echo $active $timestamp $+(<,$me,>) $1- | .msg $active $1- | halt
}
|