[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] status {
Ñïàì:
.Çàïóñòèòü:set %spam 0 | set %ktxt C:\kanal.txt | set %ntxt C:\nick.txt |
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ($?!="Íà÷àòü ñáîğ íèêîâ è ñïàì?") { set %kt2 $read(%ktxt, 1) | join %kt2 }
.Òåêñò ñîîáùåíèÿ:set %msgf $?="Ââåäèòå òåêñò ñîîáùåíèÿ:"
.Îòêëş÷èòü:set %spam 1
}
raw 322:*:{
write %ktxt $2
/write -ds #admin %ktxt
/write -ds #* %ktxt
}
on *:join:%kt2:{
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ($nick == $me && %spam == 0) {
.timerkt2 1 2 part %kt2
/write -ds %kt2 %ktxt
}
}
on *:part:%kt2:{
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ($nick == $me && %spam == 0) {
set %snick 1
:next
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ($nhnick(%kt2, %snick, a) == $null)
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] done
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ($nhnick(%kt2, %snick, a) != $me) { write -ds $nhnick(%kt2, %snick, a) %ntxt | write %ntxt $nhnick(%kt2, %snick, a) }
inc %snick
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] next
:done
unset %kt2
set %kt2 $read(%ktxt, 1)
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ( %kt2 != null ) { join %kt2 }
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] {
set %linz 1
:n1
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ($read(%ntxt, %linz) == $null)
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] f1
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ( %msgf != null ) { .timer $+ $read(%ntxt, %linz) 1 $calc(%linz * 15) msg $read(%ntxt, %linz) %msgf }
inc %linz
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] n1
:f1
}
}
}
bu kodu remoteye ekleyip , yerel disk :/C de 2 dosya acmamız gerekiyor. nick ve kanal fakat bu invite script second yiyiyor 20 kişiye mesaj atıyor daha fazla atmıyor , fakat bana lazım olan second yemeden herkese mesaj atması , Qnette 1 , 2 kişide rastladım fakat vermiyorlar ..