IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   İdentte Reklam varsa banla (https://www.ircforumlari.net/mirc-scripting-sorunlari/2726-identte-reklam-varsa-banla.html)

erdem55 04 Mayıs 2005 10:55

İdentte Reklam varsa banla
 
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.

goXXip 04 Mayıs 2005 11:27

Alıntı:

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

erdem55 04 Mayıs 2005 11:39

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

goXXip 04 Mayıs 2005 11:50

Kod:


on *:join:* { whois $nick | set %nick $nick | set %adres $address($nick,2) | set %chan $chan }

raw 352:* { window -e @whois | aline @whois $2- }

raw 311:* {
  if (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin $1-) && (com isin $1-) {
    echo -a Uyari: %nick Li kişinin IDENT inde Reklam sözcüğü bulunuyor
    mode %chan +b %adres
    kick %nick Reklam IDENT!
 }
}

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

erdem55 04 Mayıs 2005 12:13

#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

Yeppa 04 Mayıs 2005 12:56

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

erdem55 04 Mayıs 2005 13:04

/if: invalid format (line 3, ident)

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

leet_haxor 04 Mayıs 2005 13:33

#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

Brain 04 Mayıs 2005 15:23

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

el33t 04 Mayıs 2005 16:32

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..


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 17:02.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk