Selamlar herkese, kendimce bir kod yapmaya çalıştım. Kodları birleştirerek yaptığım bu çalışmada kanala giren ____ nickini shunlu liste eklediğim zaman alper____ nicki de shun yiyor. Bu sorunu çözmek istiyorum. Birde shunliste eklediğim insan farklı nickle login olup nickini shunlistteki yaparsa yine shun yesin istiyorum. Yardımlarınız için teşekkürler.
on !*:join:#sohbet:{
var %1 = 1
while ($read(dosya.txt,%1)) {
if ($v1 isin $nick) {
inc %_bnick
timerlmr 1 3 /msg #opers .shun $nick Tedbir.
timerlms 1 4 /msg #xxx 4 $date $time 1tarihinde 5 $nick 1giriş yaptı ve shun atıldı.
break
}
inc %1
}
}
on *:input:*: {
if !$istok(#opers #opersohbet,$chan,32) {
if $regex($1,/^([.!]shun)/Si) {
if $2 == $null {
msg #xxx 4HATA: 2Yetersiz ya da eksik kullanım. Lütfen seçenek belirtin; 4!shun ekle|sil|list
}
else {
if $2 == list {
if $lines(dosya.txt) == 0 {
msg #xxx 2Shun listesinde kullanıcı bulunamadı.
}
else {
msg #xxx 4Shun listesi sıralanıyor.
msg #xxx $str(-,20)
var %1 1
while %1 <= $lines(dosya.txt) {
msg $chan %1 - $read(dosya.txt,%1)
inc %1
}
}
}
if $2 == ekle {
if $3 == $null {
msg #xxx 2Lütfen bir nick seçiniz 4Kullanımı; !shun ekle nick
.halt
}
if $read(dosya.txt,w,$3) {
msg #xxx 4 $+ $3 $+ , 2zaten listede ekli.
}
else {
write dosya.txt $3
msg #xxx 4 $+ $3 $+ , 2ceza listesine eklenmiştir.
}
}
if $2 == sil {
if $3 == $null {
msg #xxx 2Lütfen bir nick seçiniz 4Kullanımı; !ceza sil nick
.halt
}
if !$read(dosya.txt,w,$3) {
msg #xxx 4 $+ $3 $+ , 2listede bulunamadı.
}
else {
write -dw $+ $3 dosya.txt
msg #xxx 4 $+ $3 $+ , 2Shun listesinden silinmiştir.
}
}
}
}
}
}