Çevrimdışı

Arkadaşlar ben yazmaya çalıştım fakat yapamadım. Ya ben identinde reklam olanların kanala girdiklerinde atılmasını istiyorum bunu nasıl yapabilirim acaba?
Bu arada aranızda çok yeniyim yanlış yere filan açtıysam özür dilerim.

 

erdem55 Nickli Üyeden Alıntı

Arkadaşlar ben yazmaya çalıştım fakat yapamadım. Ya ben identinde reklam olanların kanala girdiklerinde atılmasını istiyorum bunu nasıl yapabilirim acaba? Bu arada aranızda çok yeniyim yanlış yere filan açtıysam özür dilerim.

ne tür reklamlar? IDENT te ne tür reklamlar olabilir. Bunlar için örnek verirsen yardımcı olmaya çalışalım

 

Çevrimdışı

mesela ******
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
net com vs gibi

 

Gibi birşey olması lazım... Denemedim ama...

 

Çevrimdışı

#bident on
on @*:JOIN:#:{
if (*!*fuck*@* iswm $fulladdress) || (*!*yarak*@* iswm $fulladdress) || (*!*Amcik*@* iswm $fulladdress) || (*!*Orosp*@* iswm $fulladdress) || (*!********@* iswm $fulladdress) || (*!*annen*@* iswm $fulladdress) || (*!*[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] iswm $fulladdress) || (*!*.com*@* iswm $fulladdress) || (*!*lezbiyen*@* iswm $fulladdress) || (*!*kaltak*@* iswm $fulladdress) || (*!*.net*@* iswm $fulladdress) || (*!*azgin*@* iswm $fulladdress) || (*!*jgolo*@* iswm $fulladdress) || (*!*ipne*@* iswm $fulladdress) || (*!*ibne*@* iswm $fulladdress) || (*!*orgazm*@* iswm $fulladdress) || (*!*organ*@* iswm $fulladdress) || (*!*penis*@* iswm $fulladdress) || (*!*****@* iswm $fulladdress) || (*!*siker*@* iswm $fulladdress) || (*!*delici*@* iswm $fulladdress) {
ban -u300 # $nick 2
ban # $nick 5 | /kick # $nick 14,1[4,1 Kötü ident 14] tesbit ediLdi !
}
}
#bident end
bende böle bişi buldum.
Acaba hangisi daha az kasar scriti yardım edermisin

 

Çevrimdışı

goxxip'in verdigi kasar. cunki whois cekiyor. senin pasteledigin ise kanal'a joinde tespit ettiginde atiyor. senin pastelemiş oldugun kod daha iyi bence.

 

Çevrimdışı

/if: invalid format (line 3, ident)

bendeki kod böle bi hata veriyor neden acaba yada nasıl düzeltebilirim

 

Çevrimdışı

#bident on
on *:JOIN:#:{
var %x =
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
penis delici,%i = 1
while $gettok(%x,%i,32) {
if ($+(*,$ifmatch,*) iswm $fulladdress) {
ban -u300 # $nick 2
ban # $nick 5 | /kick # $nick 14,1[4,1 Kötü ident 14] tesbit ediLdi !
}
inc %i
}
}
#bident end

;bide bunu dene, istersen daha metin ekleyebilirsin o yukarıda gördüğün satıra

 

Çevrimdışı

Bunu hem ident reklam koruması hem kara liste olarak kullana bilirsin zaten açıklamarda yazıyor kullanma sekli umarım isine yarar
İnşallah [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] okurda yavas yavas ögrendigimi anlar :D



on 1:LOAD:{
.set %karalist_sebep 5Kanalına Girisiniz Engellenmistir sakıncalı nick ident
.set %karalistt on
echo Ayarlar Ve Addon Yüklendi..:)
dialog -m karaliste karaliste

}
dialog karaliste {
title "Kara Liste"
size -1 -1 135 190
option dbu
box "Kara Liste", 2, 5 0 65 85
edit "", 3, 80 10 45 10, autohs
button "Ekle", 4, 80 25 47 12
box "", 5, 5 120 125 30
button "Açıklama", 6, 80 65 47 12
edit %karalist_sebep , 7, 10 100 115 10, autohs
box "Kick Mesajı", 8, 5 90 125 25
button "Tamam", 11, 5 165 42 12, ok
button "iptal", 12, 85 165 42 12, cancel
radio "Kapalı", 15, 80 130 30 10
radio "Açık", 9, 20 130 40 10
button "Kaldır", 10, 80 45 47 12
box "", 16, 5 120 125 30
box "Nick", 14, 75 0 55 85
list 1, 10 10 55 70, size
}
alias listkontrol1 {
goto karaliste 1
:karaliste
inc %vo1
if ($ulist(*,karaliste,%vo1) == $null) { unset %vo1 | halt }
did -a karaliste 1 $ulist(*,karaliste,%vo1)
goto karaliste
}
on *:dialog:karaliste:sclick:6: { dialog -m KaraAcıklama KaraAcıklama }
on *:dialog:karaliste:sclick:11: { set %karalist_sebep $did(7) }
on *:dialog:karaliste:sclick:9: { set %karalistt on | dialog -t karaliste Koruma Açıldı. | did -e karaliste 7 | .enable #karaListe }
on *:dialog:karaliste:sclick:15: { set %karalistt off | dialog -t karaliste Koruma Kapandı. | did -b karaliste 7 | set %karalistt off }
on *:dialog:karaliste:init:0:{
if (%karalistt == on) { did -c karaliste 9 | .enable #karaListe }
if (%karalistt == off) { did -c karaliste 15 | .disable #karaListe }
listkontrol1
}
on 1:dialog:karaliste:sclick:4: {
.auser karaliste $did(3)
did -a karaliste 1 $did(3)
; listkontrol1
}
on 1:dialog:karaliste:sclick:10: {
.ruser karaliste $did(1,$did(1).sel)
did -r karaliste 1
listkontrol1
}
dialog KaraAcıklama {
title "Acıklama"
size -1 -1 125 110
option dbu
text "Dikket Ederseniz Daha Rahat Edersiniz", 1, 10 10 105 8
text "Örnek nick!*@* ", 2, 10 20 105 8
text "Nick Eklerseniz Nickki Kara Listeye Alırsınız", 3, 10 30 105 8
text "Örnek *!identd*@*", 4, 10 40 105 8
text "İdenti Eklerseniz Kara Listeye Alırsınız", 5, 10 50 105 8
text "Örnek *!*@ip ", 6, 10 60 105 8
text "ipi Eklersiniz Kara Listeye Almıs Olursunuz", 7, 10 70 105 8
box "Önemli Acıklama", 8, 5 0 115 85
button "Tamam", 9, 15 90 97 12, ok
}
#karaListe on
on @karaliste:join:#:{
ban # $nick 7 | kick # $nick 4 %$- # %karalist_sebep
}
#karaListe end

 

Çevrimdışı

on @*:JOIN:#:{ var %a = $remove($gettok($gettok($address($nick,5),2,33),1, 64),~) | if (*** isin %a) || (fuck isin %a) || (dick isin %a) || (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin %a) || (****** isin %a) || (com isin %a) { mode # +b $+(*!*,%a,*@*) | kick # $nick identd } }



Yukardaki gibi bir kodda işine yarayabilir. Eklemek için || (com isin %a) 'dan sonra boşluk bırakıp tekrar || (bilmemne isin %a) { şekline getirebilirsin.

Umarım işine yarar..