Kayıtlı Ve Kayıtsız Nick Işlem

Bu menüyü doğru kullanmanız kötü niyetli kişilerin sunucunuz üzerinde gerçekleştirdiği faaliyetleri kontrol altında tutmak için oldukca önemlidir. Algoritma olarak sunucu üzerindeki kayıtlı ve kayıtsız nickleri tespit edip soldaki listeden belirttiğiniz işlemleri yapmaktır.

Kayıtlı ve Kayıtsız Nickleri Görmek İçin Sahip Olmanız Gereken ACC: USER ACC
Menüden İşlem Yapabilmek İçin Sahip Olmanız Gereken ACC: Oper,User,Op ACC

Yani Oper olmadanda menüyü kullanabilirsiniz. Tam Verimli Olmasada

A) Reklam Kontrolü
Menüden Kayıtlı ve Kayıtsız Nickller İşlem Seçeneklerinden birisini seçin ve bu butona tıklayın. Seçtiğiniz seçenek durumundaki nicklere oto olarak reklam kontrol mesajı göndericek ve bu mesaja 2 saniye içerisinde cevap verenleri menüdeki belirttiğiniz kanala yazdığı mesajla birlikte kopyalacaktır. Bu menü işleme tabi değildir siz duruma göre manuel olarak işlem yapıcaksınız. (masum userlerde bu menüden etkilendiği için işleme tabi tutulmamıştır, örneğin; özel kabul addonları, oto özel mesaj addonları vb.)

B) Away Mesaj Kontrolü
Sunucunuzda away mesajını yasaklayıpta userlerinizi mağdur etmenizin bir manası yok. Bu butona tıkladıgınızda away konumundaki userleri tespit edecek ve away olanların away mesajlarını belirttiğiniz kanala kopyalayacaktır. İşleme tabi değildir, manuel işlem gerektirir)

C) Seçtiğiniz Türdeki Nicklere Mesaj Gönderme
Örneğin nicki kayıtsız kullanıcılara oto olarak kayıt mesajı gönderebilirsiniz. Yada kayıtlı kullanıcılara sistemle ilgili bilgi vermek için text mesajı gönderebilirsiniz.

dialog kknks {title "Kayıtlı ve Kayıtsız Nickler Kontrol Sistemi"size -1 -1 253 237option dbulist 1, 115 11 58 211, size hsbar vsbarbox "Kayıtsız Nickler", 4, 109 2 68 224edit "", 2, 13 73 74 10, autohsedit "", 6, 13 43 74 10, autohsbutton "Hepsine Zline At", 7, 12 130 74 10button "Hepsine Kanalda Voice Ver", 8, 12 146 74 10button "Hepsinin Voicesini Geri Al", 9, 12 162 74 10button "Hepsini Kanala Sajoin Yap", 10, 12 179 74 10box "Mesaj Menüsü", 11, 3 2 98 101box "Global İşlemler Menüsü", 12, 2 106 98 120button "Away Mesaj Kontrolü Yap", 13, 12 195 74 10button "Reklam Mesaj Kontrolü Yap", 14, 12 211 74 10button "Hepsini Kanalda Banla", 15, 12 115 74 10edit "", 17, 13 13 74 10, autohsbutton "Nick Register Bilgisi", 16, 26 25 52 12button "Text Mesaj Gönder", 5, 23 54 54 12button "Reklam,Away Kanalı", 3, 21 85 57 9box "Kayıtlı Nickler", 20, 183 2 68 224list 34, 189 11 58 211, size hsbar vsbarradio "Kayıtsızlara İşlem", 18, 116 228 57 9radio "Kayıtlılara İşlem", 19, 190 228 52 9text "İşlem Yapacağınız Nick Türünü Sagdan Seçiniz", 21, 1 228 112 8}

on *:dialog:kknks:sclick:*: {
if $did(18).state == 1 { set %kayitsiz on | unset %kayitli }
if $did(19).state == 1 { set %kayitli on | unset %kayitsiz }
if ($did == 16) {
set %kayitmsg $did(17)
var %i 1
while %i <= $lines(kayitsiz.txt) {
msg $read(kayitsiz.txt,%i) $did(17)
inc %i
}
}
if ($did == 5) {
if %kayitsiz == on {
set %globalmesaj $did(6)
var %i 1
while %i <= $lines(kayitsiz.txt) {
msg $read(kayitsiz.txt,%i) $did(6)
inc %i
}
}
if %kayitli == on {
set %globalmesaj $did(6)
var %i 1
while %i <= $lines(kayitli.txt) {
msg $read(kayitli.txt,%i) $did(6)
inc %i
}
}
}
if $did == 3 {
set %ckanal $did(2)
}
if $did == 15 {
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
mode $active +b $address($read(kayitsiz.txt,%i),2)
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
WhileFix WhileFix .
mode $active +b $address($read(kayitli.txt,%i),2)
inc %i
}
}
}
if $did == 7 {
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
Zline $read(kayitsiz.txt,%i) %sure 4Kurallara Uyunuz
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
Zline $read(kayitli.txt,%i)
inc %i
}
}
}
if $did == 8 {
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
mode $active +v $read(kayitsiz.txt,%i)
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
mode $active +v $read(kayitli.txt,%i)
inc %i
}
}
}
if $did == 9 {
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
mode $active -v $read(kayitsiz.txt,%i)
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
mode $active -v $read(kayitli.txt,%i)
inc %i
}
}
}
if $did == 10 {
if %kayitsiz == on {
var %i 1
var %ufuks $$?”Lütfen Userleri Çekeceğiz Kanalı Yazın # İşareti Koyun!”
while %i <= $lines(kayitsiz.txt) {
sajoin $read(kayitsiz.txt,%i) %ufuks
inc %i
}
}
if %kayitli == on {
var %i 1
var %ufuks $$?”Lütfen Userleri Çekeceğiz Kanalı Yazın # İşareti Koyun!”
while %i <= $lines(kayitli.txt) {
sajoin $read(kayitli.txt,%i) %ufuks
inc %i
}
}
}
if $did == 13 {
set %awayk on
.timer 1 1 who +a $active
.timer 1 4 unset %awayk
}
if $did == 14 {
set %reklamkontrol on
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
msg $read(kayitsiz.txt,%i) Lütfen Dikkat Bu Reklam Kontroldür Cevap Vermeyiniz.
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
msg $read(kayitli.txt,%i) Lütfen Dikkat Bu Reklam Kontroldür Cevap Vermeyiniz.
inc %i
}
}
.timer 1 2 unset %reklamkontrol
}
}
on *:dialog:kknks:sclick:*: {
if $did(18).state == 1 { set %kayitsiz on | unset %kayitli }
if $did(19).state == 1 { set %kayitli on | unset %kayitsiz }
if ($did == 16) {
set %kayitmsg $did(17)
var %i 1
while %i <= $lines(kayitsiz.txt) {
msg $read(kayitsiz.txt,%i) $did(17)
inc %i
}
}
if ($did == 5) {
if %kayitsiz == on {
set %globalmesaj $did(6)
var %i 1
while %i <= $lines(kayitsiz.txt) {
msg $read(kayitsiz.txt,%i) $did(6)
inc %i
}
}
if %kayitli == on {
set %globalmesaj $did(6)
var %i 1
while %i <= $lines(kayitli.txt) {
msg $read(kayitli.txt,%i) $did(6)
inc %i
}
}
}
if $did == 3 {
set %ckanal $did(2)
}
if $did == 15 {
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
mode $active +b $address($read(kayitsiz.txt,%i),2)
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
mode $active +b $address($read(kayitli.txt,%i),2)
inc %i
}
}
}
if $did == 7 {
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
Zline $read(kayitsiz.txt,%i) %sure 4Kurallara Uyunuz
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
Zline $read(kayitli.txt,%i)
inc %i
}
}
}
if $did == 8 {
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
mode $active +v $read(kayitsiz.txt,%i)
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
mode $active +v $read(kayitli.txt,%i)
inc %i
}
}
}
if $did == 9 {
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
mode $active -v $read(kayitsiz.txt,%i)
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
mode $active -v $read(kayitli.txt,%i)
inc %i
}
}
}
if $did == 10 {
if %kayitsiz == on {
var %i 1
var %ufuks $$?”Lütfen Userleri Çekeceğiz Kanalı Yazın # İşareti Koyun!”
while %i <= $lines(kayitsiz.txt) {
sajoin $read(kayitsiz.txt,%i) %ufuks
inc %i
}
}
if %kayitli == on {
var %i 1
var %ufuks $$?”Lütfen Userleri Çekeceğiz Kanalı Yazın # İşareti Koyun!”
while %i <= $lines(kayitli.txt) {
sajoin $read(kayitli.txt,%i) %ufuks
inc %i
}
}
}
if $did == 13 {
set %awayk on
.timer 1 1 who +a $active
.timer 1 4 unset %awayk
}
if $did == 14 {
set %reklamkontrol on
if %kayitsiz == on {
var %i 1
while %i <= $lines(kayitsiz.txt) {
msg $read(kayitsiz.txt,%i) Lütfen Dikkat Bu Reklam Kontroldür Cevap Vermeyiniz.
inc %i
}
}
if %kayitli == on {
var %i 1
while %i <= $lines(kayitli.txt) {
msg $read(kayitli.txt,%i) Lütfen Dikkat Bu Reklam Kontroldür Cevap Vermeyiniz.
inc %i
}
}
.timer 1 2 unset %reklamkontrol
}
}

on *:dialog:kknks:*:*: {if $devent == init {who $activedid -a $dname 17 %kayitmsgdid -a $dname 6 %globalmesajdid -a $dname 2 %ckanalif %kayitli == on { did -c $dname 19 }if %kayitsiz == on { did -c $dname 18 }.timer 1 1 savebuf -o kknks 1 kayitsiz.txt.timer 1 2 savebuf -o kknks 34 kayitli.txt}if $devent == dclick {if ($did == 34) { write -ds $+ $did(34).seltext kayitli.txt | did -d kknks 34 $did(34).sel }if ($did == 1) { write -ds $+ $did(1).seltext kayitsiz.txt | did -d kknks 1 $did(1).sel }}if $devent == close {write -c kayitsiz.txtwrite -c kayitli.txt}}raw 301:*: {if %awayk == on {if $me ison %ckanal {/msg %ckanal 12Nickname 4 $qt($2) 12Away Mesajı 4 $qt($3-)}}}on *:text:*:?: {if %reklamkontrol == on {msg %ckanal 12Reklama Takılan Rumuz: 4 $nick 12Yazdığı İleti: 4 $1-}}raw 352:*: {if (*r* !iswm $7) &amp;&amp; (* !isin $7) &amp;&amp; (@ !isin $7) &amp;&amp; (+ !isin $7) &amp;&amp; (% !isin $7) &amp;&amp; (~ !isin $7) &amp;&amp; (&amp; !isin $7) &amp;&amp; $dialog(kknks) {did -a kknks 1 $6}if (*r* iswm $7) &amp;&amp; (* !isin $7) &amp;&amp; (@ !isin $7) &amp;&amp; (+ !isin $7) &amp;&amp; (% !isin $7) &amp;&amp; (~ !isin $7) &amp;&amp; (&amp; !isin $7) &amp;&amp; $dialog(kknks) {did -a kknks 34 $6}}menu * {Kayıtlı ve Kayıtsız Nick Kontrol Sistemi:dialog -m kknks kknks }

Not: Alıntı
Yazanı belli değil.

Bir cevap yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir