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 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: 21:36.

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