20 Ocak 2024, 14:42
#1 Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Mobil Kod Sorunu
Kodu düzenlemeye çaliştim lakin çalişmada kodda hatalı bölümler nerelerdir
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*: { $iif(*Client connecting* iswm $1-,.timer 1 15 ctcp $9 version) }
on *:ctcpreply:*version*: {
elseif $regex($4,/VERSION/Si) {
if $regex($5-,/(qwebirc|Mobile IRC|Android|iphone|SekerSHell v4 html5 irc client|ChatV2.1-ofs|SekerShell Mobile IRC)/Si) && $regex($token($5-,-1,32),/^(\d+)$/Si) {
if ($token($hget(Mobil-Vers,$nick($1)),1,191) == ekle) {
.hadd -ms Mobil-Ver $regml(1) Ekleyen: $token($hget(Mobil-Vers,$nick($1)),2,191) Eklenen: $nick($1) Sebep: $token($hget(Mobil-Vers,$nick($1)),3-,191)
.hsave -o Mobil-Ver hash/mobil-ver.tprk
msg #kontrol $+(:4,$nick($1),) version cevapı yasaklandı..
msg #kontrol Version: $strip($5-)
msg #kontrol Yakalanan ID: $regml(1)
gzline $nick ($1) - Kurallara aykırı davranıdığınızdan dolayı sunucudan uzaklaştırıldınız.
.hdel -ms Mobil-Vers $nick($1)
}
elseif $hget(Mobil-Ver,$regml(1)) {
msg #kontrol (4Yasak mobil giriş )---
msg #kontrol
msg #kontrol Nick: $nick($1) $hget(Mobil-Ver,$regml(1))
msg #kontrol
msg #kontrol Mobil veriyi silmek için !mobil sil $regml(1) yazabilirsiniz.
gzline $nick($1) - Kurallara aykırı davranıdığınızdan dolayı sunucudan uzaklaştırıldınız.
}
else { msg #kontrol :[5 $+ $iif($regex($5-,/Mobile/Si),Mobil,WEB) Giriş Uyarı] $nick($1) nicki için $iif($regex($5-,/Mobile/Si),Mobil,WEB) giriş bulundu Yasaklamak için: 4!mobil ekle $nick($1) Sebep }
}
elseif ($token($hget(Mobil-Vers,$_nick($1)),1,191) == ekle) {
msg #kontrol $+(:4,$nick($1),) mobil/web girişi olmadığından yasaklanamaz..
msg #kontrol Version: $5-
.hdel -ms Mobil-Vers $nick($1)
}
}
}