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

12Beğeni(ler)

Yeni Konu aç Konu Kapatılmıştır
 
LinkBack Seçenekler Stil
Alt 30 Kasım 2018, 13:00   #1
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Girişte version Yasaklama ?




menu status,menubar,channel {
.-
.Version Yansıtma Koruması
..Açık:.enable #VersionYansıtma | .echo -a 2 Version Yansıtma Koruması 4 Aktif.
..Kapalı:.disable #VersionYansıtma | .echo -a 2 Version Yansıtma Koruması 4 Deaktif.
.-
}
#VersionYansıtma off
on *:snotice:*Client connecting*: {
.ctcp $9 VERSION
.ctcp $9 FINGER
}

on 1:CTCPREPLY:*FINGER*: {
msg #Security 4Sorgu: 1  $nick 4FINGER: 1 $1-
}

on 1:CTCPREPLY:*VERSION*: {
msg #Security 4Sorgu: 1  $nick 4VERSION: 1 $strip($1-)
}

on 1:snotice:*Notice Yasak*: {
if VERSION isin $1- || FINGER isin $1- {
msg #Security 4VERSION 1/ 4FINGER:1  $2 $strip($remove($8-,[,],Notice,Yasaklanmistir))
}
}
#VersionYansıtma end


Kod Sahibi : The

Öncelikle The Arkadaşımıza Teşekkkür ederim. Benim sormak istediğim ben bi hash dosyası oluşturmak ve belirdiğim version sonucu çıkanı yasaklamak istiyorum. Bunu bu koda göre nasıl uygulayabilirim ? Yardımcı olursanız sevinirim.

 

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 30 Kasım 2018, 13:51   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte version Yasaklama ?




O kodun yazarı The değil, benim. Başka bir forumda yayınladım, üzerine konmuş
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Aşağıdaki ekran görüntüsündeki tarihe dikkati çekerim, yöneticisi olduğum yerde yayınladım onu ben..


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.






Soruna gelince, kendi mircinde mi kullanıcaksın yoksa botta mı onu belirtirsen ona göre yazarım.

 

Alt 30 Kasım 2018, 14:02   #3
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte version Yasaklama ?




kendi mircimde . öncelikle özür dilerim böyle bi paylaşım olmuşta burda ordan belirttim.

 

Alt 30 Kasım 2018, 14:11   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte version Yasaklama ?




Xadd1 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kendi mircimde . öncelikle özür dilerim böyle bi paylaşım olmuşta burda ordan belirttim.

Senlik bişey yok kardeşim ortalık çakma coder dolu. Aşağıdaki şekilde remote kısmına eklersen kullanabilirsin;

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias versionekle 
{
if 
$hfind(yasakli,$1-,1,W).data { echo -a Bu version zaten var. | return }
hadd -m mnick $calc($hget(yasakli,0).item $r(999,000)) $1-
hsave yasakli yasak.aln
hload yasakli yasak
.aln
echo -a Yasak version $qt($1-) eklendi.
}

alias versionsil {
if !
$hfind(yasakli,$1-,1,W).data { echo -a Bu version zaten yok. | return }
hdel $hfind(yasakli,$1-,1,W).data
hsave yasakli yasak
.aln
hload yasakli yasak
.aln
echo -a Yasak version $qt($1-) silindi..
}

on 1:CTCPREPLY:*VERSION*: { 
if 
o isin $usermode {
  if 
$hfind(yasakli,$1-,1,W).data gzline $nick Yasak version girişi tespit edildi. | return }
}
}

on *:start: {
hmake yasakli 1000
hload yasakli yasak
.aln


Denemedim anlık yazdım ama çalışması gerek, sorun olursa yazarsın..

Kullanımı:

Eklemek için: /versionekle VERSION
Silmek için: /versionsil VERSION


 

Alt 30 Kasım 2018, 14:18   #5
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte version Yasaklama ?




Çok teşekkür ederim.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 14:15 -->-> Daha önceki mesaj 14:13 --

Bu koda ekle sil aç kapa olayı yapabilirmiyiz

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 14:18 -->-> Daha önceki mesaj 14:15 --

Yani ekran gelicek dialog şeklinde ben ordan eklicem tamam dicem gibi. sil butonu olucak kapat butonu olucak gibi

 

Alt 30 Kasım 2018, 14:19   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte version Yasaklama ?




Xadd1 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Çok teşekkür ederim.


Bu koda ekle sil aç kapa olayı yapabilirmiyiz

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!

menu 
* {
$iif(o isin $usermode,Version Koruması,$style(2Version Koruması)
.
:.enable #versionkoruma
.Kapat:.disable #versionkoruma
}

#versionkoruma off
alias versionekle {
if 
$hfind(yasakli,$1-,1,W).data { echo -a Bu version zaten var. | return }
hadd -m mnick $calc($hget(yasakli,0).item $r(999,000)) $1-
hsave yasakli yasak.aln
hload yasakli yasak
.aln
echo -a Yasak version $qt($1-) eklendi.
}

alias versionsil {
if !
$hfind(yasakli,$1-,1,W).data { echo -a Bu version zaten yok. | return }
hdel $hfind(yasakli,$1-,1,W).data
hsave yasakli yasak
.aln
hload yasakli yasak
.aln
echo -a Yasak version $qt($1-) silindi..
}

on 1:CTCPREPLY:*VERSION*: { 
if 
o isin $usermode {
  if 
$hfind(yasakli,$1-,1,W).data gzline $nick Yasak version girişi tespit edildi. | return }
}
}


#versionkoruma end

on *:start: {
hmake yasakli 1000
hload yasakli yasak
.aln


Bu şekilde olur. Menüyü kullanmak için oper olman gerek. Son kısımdaki "on *:start" kısmını bilerek dışarıda bıraktım, mirc açıldığında tabloyu yüklemesi gerek ki açtığında işlevsel olsun.

 

Alt 30 Kasım 2018, 14:20   #7
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte version Yasaklama ?




tamam teşekkür ederim ilgin alakandan dolayı.

 

Alt 30 Kasım 2018, 14:21   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte version Yasaklama ?




Menüden kastın diyalog penceresiyse (ki öyleymiş) ona biraz daha vakit lazım, akşama doğru müsait olursam onu da eklerim.

 

Alt 30 Kasım 2018, 14:23   #9
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte version Yasaklama ?




çok iyi olur ya sağolasın

 

Alt 30 Kasım 2018, 14:33   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Girişte version Yasaklama ?




Yaptık bir iş tam olsun, diyalog pencereli haliyle kodun tamamı, bazı düzenlemeler de yaptım.


PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
menu * {
$iif(o isin $usermode,Version Koruması,$style(2Version Koruması)
.
:.enable #versionkoruma
.Kapat:.disable #versionkoruma
.Diyalog:.yasakv
}


alias versionekle {
if 
$hfind(yasakli,$1-,1,W).data { echo -a Bu version zaten var. | return }
hadd -m mnick $calc($hget(yasakli,0).item $r(999,000)) $1-
hsave yasakli yasakli.aln
hload yasakli yasakli
.aln
echo -a Yasak version $qt($1-) eklendi.
}

alias versionsil {
if !
$hfind(yasakli,$1-,1,W).data { echo -a Bu version zaten yok. | return }
hdel $hfind(yasakli,$1-,1,W).data
hsave yasakli yasakli
.aln
hload yasakli yasakli
.aln
echo -a Yasak version $qt($1-) silindi..
}

on *:start: {
hmake yasakli 1000
hload yasakli yasakli
.aln




alias yasakliadd 
  
hadd -m yasakli $calc($hget(yasakli,0).item $r(999,000)) $1-
  
hsave yasakli yasakli.aln
  hload yasakli yasakli
.aln
}

alias yasakv dialog -m yasakvers yasakvers }
dialog yasakvers {
  
title "Version Koruması"
  
size --1 292 210
  option pixels
  edit 
""2167 21 98 23multi return
  
button "Ekle"3187 57 60 17flat
  button 
"Sil"4187 83 60 17flat
  button 
"Tamam"5186 112 60 17flat ok
  
list 111 18 150 183size
  icon 6
187 140 32 32
  box 
""75 6 274 202
}

on *:dialog:yasakvers:sclick:*: {
  if (
$did 4) {
    .
hdel yasakli $hfind(yasakli,$did($dname,1).seltext,1,W).data 
    hsave yasakli yasakli
.aln
    hload yasakli yasakli
.aln
    vbdi $dname
  
}
  if (
$did 3) { yasakliadd $did($dname,2) | vbdi $dname  }
}

alias vbdi dialog -$$dialog -$$1
on 
*:dialog:yasakvers:init:0: {
  var %

  
while (%<= $hget(yasakli,0).item) { 
    
did -ac yasakvers 1 $hget(yasakli,%x).data 
    inc 
%
  
}
}

#versionkoruma off
on 1:CTCPREPLY:*VERSION*: { 
if 
o isin $usermode {
  if 
$hfind(yasakli,$1-,1,W).data gzline $nick Yasak version girişi tespit edildi. | return }
}
}
#versionkoruma end 


 

Konu Kapatılmıştır

Etiketler
girişte version yasaklama ??


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
mIRC Version yasaklama Fr33 mIRC Scripting Sorunları 6 03 Mart 2010 18:04
Girişte version çekmesin Taner Unreal IRCd 1 27 Mayıs 2009 09:53
Girişte Version koruması Neotr Unreal IRCd 5 23 Şubat 2009 12:55
Girişte version port atlaması yardım 1Casper Unreal IRCd 3 27 Temmuz 2008 04:02
Girişte version-finger yardım 1Casper Unreal IRCd 9 28 Nisan 2007 09:09