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/)

- - koruma Botuna Cr Fullaname Okutmak. (https://www.ircforumlari.net/mirc-scripting-sorunlari/125889-koruma-botuna-cr-fullaname-okutmak.html)

bøCek

27 Temmuz 2008 21:51

koruma Botuna Cr Fullaname Okutmak.

S.a Koruma Botuma benim Istedıgım Fullname'ler Harıcı Sunucuya Gıren oldugu zaman kill cekmesini ve Lutfen Web Adreslerimzi Kullaniz. yazmasını Istiorum egerki ayni ipten ıkıncı defa deneme yaparsa bu sefer zline atmasını ıstıorum. fullname.txt ıcıne yazacagım fullname'ler harıcı Gırenlere yani. bunlardan Oplarim zarar gormiyecek. adminlerim zarar gormicek sadece usher'ler ıcın gecerlı olacak. Sunucum CR. Egerki anlatamadiysam. Ozur dılerim. Sız sorun ben yanitlarim.. Ilgıniz ve alakaniz Icın tesekkur ederim.

detay

28 Temmuz 2008 11:17

Cevap: koruma Botuna Cr Fullaname Okutmak.

cr server ile ilgili hicbirsey bilmiyorum o nedenle giris noticeini olsun verseydin. client connecting vs..

bøCek

28 Temmuz 2008 11:50

Cevap: koruma Botuna Cr Fullaname Okutmak.

detay vereyim Hocam Hemen :)

-irc.xXx.net- *** Notice -- Client connecting on port 8030: catlaxcocuk (~Teoman@78.161.46.187)

Client ßu Umarım Isıne yarar. oLmasa Sen Iste ben Her turLu bulurum :) Yeterki Su kodu bi yapak sana zahmet.

detay

28 Temmuz 2008 11:54

Cevap: koruma Botuna Cr Fullaname Okutmak.

birde "who nick" yaptiginda gelen yaniti vermelisin fullname almak icin bu sart.
raw *:*:echo -a : $numeric : $1- | halt
bu kod varken remotende who cek birine sonra cikani pastla buraya kod isleri boyle boyle olur.

bøCek

28 Temmuz 2008 12:50

Cevap: koruma Botuna Cr Fullaname Okutmak.

: 352 : boCek * ~security irc.xXx.net irc.xXx.net Ay_mavi H* 1 security@
: 315 : boCek Ay_Mavi /Who Listesi Sonu

ßoylemi demek Istıon. Tabi bu Isler boyle boyle oLacak ßiLmioz Iste Sayenizde Ogreniorz. ALLAH Razı oLsun. Herzaman demisimdir. bildigimizde biliriz. bilmedigimizde sorarak ogrenirz.

detay

28 Temmuz 2008 13:10

Cevap: koruma Botuna Cr Fullaname Okutmak.

Kod:

raw 352:*: {

  if %w == $6 { 

    haltdef  

    ;60 sn icinde tekrar gelen usere kline atiliyor.

    if $hget(killed,$6) { kline $9 Fullname'iniz hatali. | halt  }
 

    ;ilk sefer icin kill attik 

    if $read(full.txt,w,$9-) { kill $9 web sitesini kullaniniz. | hadd -mu60 killed $6 $ticks }   

  } 

}

raw 315:*:if %w { haltdef | unset %w  }

/write full.txt security@
seklinde ekle ornek olarak fullname i o txtde yoksa security olmayanlari once kill atar 1dk icinde tekrar gelirse kline atar.tabi kodu denemedim problem cikabilir %1 ihtimalle

bøCek

28 Temmuz 2008 13:37

Cevap: koruma Botuna Cr Fullaname Okutmak.

yok Ustad'im Calısmadi. Senin dediklerini Aynen uyguladım full.txt'in ıcıne eklettım. FuLLanameLeri ama baska FuLLName'yLe gırdım N'kiLL N'baska birsey. ßide Peki Ustad'im ßuna RenkLi FuLLname oLayini Nasıl yapabilirz ?

detay

28 Temmuz 2008 14:01

Cevap: koruma Botuna Cr Fullaname Okutmak.

calismamasi gayet normal.
on *:snotice:*client conn*:who $9 | set %w $9

kodu olmali ki girene who ceksin sunucuya..
renkli fullname icinse $strip($9-) yapicaksin $read li bölümü

bøCek

28 Temmuz 2008 14:29

Cevap: koruma Botuna Cr Fullaname Okutmak.

Hocam Who Cekıor Goruor nick'ı Ama Kill'leme Yapmior Acaba kodda benmi yanlıs yapiom yoksa sorunmu varki bi bakarsan dedıklerını Aynen Yaptim.

Kod:

on *:snotice:*client conn*:who $9 | set %w $9 }

raw 352:*: {

  if %w == $6 { 

    haltdef  

    ;60 sn icinde tekrar gelen usere kline atiliyor.

    if $hget(killed,$6) {  kiil $9 Fullname'iniz hatali. | halt  }
 

    ;ilk sefer icin kill attik 

    if $read(full.txt,w,$9-) $strip($9-) { kill $9 web sitesini kullaniniz. | hadd -mu 60 killed $6 $ticks }   

  } 

}

raw 315:*:if %w { haltdef | unset %w  }

Neyde Acaba Sorun ?

Editor

28 Temmuz 2008 16:20

Cevap: koruma Botuna Cr Fullaname Okutmak.

PHP- Kodu:

   on *:snotice:*client conn*:who $9 | set %w $9 }
raw 352:*: {
  if %w == $6 { 
    haltdef  
    ;60 sn icinde tekrar gelen usere kline atiliyor.
    if $hget(killed,$6) {  kill $9 Fullname'iniz hatali. | halt  }

    ;ilk sefer icin kill attik 
    if $read(full.txt,w,$9-) $strip($9-) { kill $9 web sitesini kullaniniz. | hadd -mu 60 killed $6 $ticks }   
  } 
}
raw 315:*:if %w { haltdef | unset %w  }

Gözüme ilk Çarpan kill yerine kiil yazmışsın.

bøCek

28 Temmuz 2008 16:39

Cevap: koruma Botuna Cr Fullaname Okutmak.

Ondan Kaynaklanmior O'rasi gzline atiordu. ben bilerek oyle yaptim kod calısıormu calismiormu dıe. O'hatayı biLiorum ama SoyLe birsey yapior ama kiLL'emior.

* gulpare85 H% ~Teoman@85.105.87.182 :1 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Who Araştırması Sonu.

Who Cektıkten sonra killemesi lazim. ama Cix Fayda etmior.

detay

28 Temmuz 2008 20:34

Cevap: koruma Botuna Cr Fullaname Okutmak.

arkadasim who yanitini gorebiliyorsan kod zaten calismiyor demektir, haltdefli o rawlar scriptte baska rawla cakisiyordur benim yazdiklarim etkisiz kaliyordur kodun yapısı geregi who ceker ama sen sunucuya girenlere cekilen who lari görmemen gerekir. raw *:* hala ekliyse onuda sil baska cakisan varsa onlarida kaldir

bøCek

28 Temmuz 2008 21:22

Cevap: koruma Botuna Cr Fullaname Okutmak.

aßicim ALLAh Razi olsun. yardımcı olursun ama Kod'u Sıfır mIRC'e ekledim Yine bir faydasi yok. Tamam biliorum SkıLdın ama Calısmıor Calıssa ben neden burda geleyım dert yanayım. Ahh Ahh oLSa.. Neyse Zorlamaya gerek yok Olmuorsa olmuordur Hata bendedır. Emekleriniz Icın tesekkur ettim saolun.

detay

28 Temmuz 2008 22:03

Cevap: koruma Botuna Cr Fullaname Okutmak.

birde bu sekilde dene

Kod:

on *:snotice:*Client connecting*:set %w $9 | who %w

raw 352:*: {

  if %w { 

    haltdef  | if $hget(killed,$6) { kline $9 Fullname'iniz hatali. | halt  }

    if fullname iswm $9- { kill $9 web sitesini kullaniniz. | hadd -mu60 killed $6 $ticks }   

  } 

}

raw 315:*:if %w { haltdef | unset %w  }

fullname yazan bölümü test amacli bir degistir. bu sekilde calisirsa read'li bölümü degistiricem zaten baska yerden problem cikamaz aslinda ordan da cikmamali ama anlamadim gitti versionla ilgili bi eksiklik olabilir

bøCek

31 Temmuz 2008 09:22

Cevap: koruma Botuna Cr Fullaname Okutmak.

ßuLdum Saolasin detay yardimlarin Icın SCouNDReL Ustad Yapti. Superde calişior ama ben buna renk olayini yapamadim. Yardim edebilecek arkadaşlar varmi ? $strip($9-) bunu $read yanina ekleme yapiorum ama aktif olamior ? bi bakarsaniz sevinirim. koLay gelsin.

Kod:

Kod:

on *:Snotice:*Client*Connect*:{ set %ip $remove($gettok($10,2,$asc(@)),$chr(41)) .enable #sjn.fllname who $9 } #sjn.fllname off raw 352:*:{ if (!$read(fullname.txt,w,$9-)) { inc $+(%,sjn.flname!,%ip) if ($($+(%,sjn.flname!,%ip),2) == 1) { kill $6 Lutfen Web Adreslerimzi Kullaniz } else { zline $6 Lutfen Web Adreslerimzi Kullaniz | unset $+(%,sjn.flname!,%ip) } } } raw 315:*:{ .disable #sjn.fllname } #sjn.fllname end

detay

31 Temmuz 2008 11:43

Cevap: koruma Botuna Cr Fullaname Okutmak.

if (!$read(fullname.txt,w,$strip($9-))) {
yaparsan fullname i renk kodlarindan arindirir o sekilde arama yapar

bøCek

31 Temmuz 2008 12:00

Cevap: koruma Botuna Cr Fullaname Okutmak.

yok abi kafayı yıcems ya valla :) Normaller Calısıor renklı Fullname'lerı kabul etmior. CıLdırmak Uzereyım :)

Duffy`DuCk

07 Ağustos 2008 08:19

Cevap: koruma Botuna Cr Fullaname Okutmak.

Kod:

on *:start:{

  hmake fullname

  hload fullname fullname.bastard

}

alias full {

  hadd -m Fullname $r(0,1000) $$1-

  hsave Fullname fullname.Bastard

  echo -a $1 Fullname kaydedildi.

}

Alias fullsil {

  if $hfind(fullname,$$1-,1,W).data {

    hdel fullname $ifmatch

    hsave Fullname fullname.Bastard

    echo -a Fullname maski silindi ( $+ $ifmatch $+ ) $$1-

  }

  else {

    echo -a Fullname bulunamadi.

  } 

} 

on *:snotice:*:{ 

  if *client connect* iswm $1- {

    who $9

    set %ip $remove($gettok($10,2,$asc(@)),$chr(41))

  }

}

raw 352:*:{ 

  if $hfind(Fullname,$9-,1,W).data { halt }

  window -z @Fullname

  inc $+(%,Sercan,%ip)

  if ($($+(%,Sercan,%ip),2) == 1) {

    kill $6 Sebeb

    echo @Fullname $6 Rumuzlu yasak fullname ile Server'a girmeye çalıştı, kill atıldı.

  }

  if ($($+(%,Sercan,%ip),2) == 2) {

    Kline $6 Sebeb

    echo @Fullname $6 Rumuzlu kişi 2. sefer yasak fullname ile sunucuya giriş yaptı, kline yedi.

  }

}

on *:load:write -c fullname.bastard

/full fullname
/fullsil fullname (:

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