Çevrimdışı

Merhaba Arkadaşlar , invite script'e ihtiyacım var.
mesela


[Ü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
}
}
}


bunun gibi , fakat bu second yiyiyor , second yemiyen lazım.. teşekkürler.