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

Teori · 04 Ağustos 2007, 02:38

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

 
on *:text:*:#:{
  if $nick isop $chan { halt }
  if $nick == Soru-Cevap { halt }
  if $nick == Sessiz { halt }
  if ($len($1-) >= 15 ) {
    if ($int($calc($regex($1,/[A-ZÁ-ÙÄ]/g)/$len($1)*100)) >= 40 ) {
      inc -u30 %bharf. [ $+ [ $nick ] ] 1
      if %bharf. [ $+ [ $nick ] ] == 1 {
        msg $chan Uyarı : Lütfen büyük harf kullanmayınız     
      }
      if %bharf. [ $+ [ $nick ] ] == 2 {
        mode # +b $wildsite | kick $chan $nick 5 Buyuk Harf Kullandıgınız Icin Atıldınız.
      }
    }
  }

Arkadaslar Zamanında LeadeR'in Vermis Oldugu Bir Code'i Kendime Gore Editledim ve Kullanıyorum Fakat Sorun Su .
Buyuk Harf Yazanı Once Uyarıyor 2. Defada Atiyor .
Ama , Nickleri Buyuk Olan Kisilere Seslenildiginde Yine Uzaklastırıyor .
Yani User Buyuk Harfle Yazılan Bir Nicke Seslendiginde Calısmasın Sadece Yazılan Cumle veya Kelimelerde Calıssın Istiyorum Tşkler .

MavipikSeL · 04 Ağustos 2007, 03:14

Mantık olarak düşünürsek "ison" parametresi işe yarar herhalde. Büyük harf olarak %bharf. adında bir değer atıorsa if %bharf. ison # { halt } bunun gibi birşey olmalı. Yanlış düşünüyorsam düzeltilirse sevinirim.

detay · 04 Ağustos 2007, 10:43

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

on *:text:*:#:{
  if $nick isop $chan { halt }
  if $nick == Soru-Cevap { halt }
  if $nick == Sessiz { halt }
  if ($len($1-) >= 15 ) {
    if ($int($calc($regex($1,/[A-ZÁ-ÙÄ]/g)/$len($1)*100)) >= 40 ) {
      var %t = $numtok($1-,32) | while %t { if $gettok($1-,%t,32) ison $chan { halt } | dec %t }
      inc -u30 %bharf. [ $+ [ $nick ] ] 1
      if %bharf. [ $+ [ $nick ] ] == 1 {
        msg $chan Uyarı : Lütfen büyük harf kullanmayınız     
      }
      if %bharf. [ $+ [ $nick ] ] == 2 {
        mode # +b $wildsite | kick $chan $nick 5 Buyuk Harf Kullandıgınız Icin Atıldınız.
      }
    }
  }
}

ison kanaldami degilmi kontrol edicegimiz icin banko var tabi kodda %bharf kullanmicaz cunku o kisi uyarilcakmi kicklenecekmi ona karar vermek icin var
suanki kod ise yaziyi tek tek kelimelere ayirip kelimelerden biri kanaldaki nickse kodu durduruyor

MeGaBytE · 06 Ağustos 2007, 04:20

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


on *:text:*:#:{
  if $nick isop $chan { halt }
  if $nick == Soru-Cevap { halt }
  if $nick == Sessiz { halt }
  if ($len($1-) >= 15 ) {
    if ($int($calc($regex($1,/[A-ZÁ-ÙÄ]/g)/$len($1)*100)) >= 40 ) {
      inc -u30 %bharf. [ $+ [ $nick ] ] 1
      if %bharf. [ $+ [ $nick ] ] == 1 {
        msg $chan UYARI: $nick $+ , Lütfen Büyük Harf Kullanmayınız
      }
      if %bharf. [ $+ [ $nick ] ] == 2 {
        mode # +b $wildsite | kick $chan $nick 5 Buyuk Harf Kullandıgınız Icin Atıldınız.
      }
    }
  }

Bu ŞekiLde Dener Misin ?

MeGaBytE · 07 Ağustos 2007, 19:04

Alıntı:

on @*:text:*:#:{

Yalnız *'da önce '@' İşareti Olmadan Banlıyamazsin..
Kanalda Op iken çalışır

Eğer ki Oper isen;

Alıntı:

mode # +b $wildsite

Kısmını;

Alıntı:

samode # +b $wildsite

Şeklinde değiştiriniz..

By_GuRbey · 28 Ağustos 2007, 12:18

[quote=detay;243158]

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

on *:text:*:#:{
  if $nick isop $chan { halt }
  if $nick == Soru-Cevap { halt }
  if $nick == Sessiz { halt }
  if ($len($1-) >= 15 ) {
    if ($int($calc($regex($1,/[A-ZÁ-ÙÄ]/g)/$len($1)*100)) >= 40 ) {
      var %t = $numtok($1-,32) | while %t { if $gettok($1-,%t,32) ison $chan { halt } | dec %t }
      inc -u30 %bharf. [ $+ [ $nick ] ] 1
      if %bharf. [ $+ [ $nick ] ] == 1 {
        msg $chan Uyarı : Lütfen büyük harf kullanmayınız     
      }
      if %bharf. [ $+ [ $nick ] ] == 2 {
        mode # +b $wildsite | kick $chan $nick 5 Buyuk Harf Kullandıgınız Icin Atıldınız.
      }
    }
  }
}

Güzel Bi Kod Fakat Bunu User Ikende KanaL'a Yansıtıyor, ßu Kodun Sadece Aop yada Operator Oldugu Zaman Işlem Gormesi Icın Ne Yapabiliriz..

CesuryureK · 28 Ağustos 2007, 14:13

[quote=By_GuRbey;254218]

detay Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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

on *:text:*:#:{
  if $nick isop $chan { halt }
  if $nick == Soru-Cevap { halt }
  if $nick == Sessiz { halt }
  if ($len($1-) >= 15 ) {
    if ($int($calc($regex($1,/[A-ZÁ-ÙÄ]/g)/$len($1)*100)) >= 40 ) {
      var %t = $numtok($1-,32) | while %t { if $gettok($1-,%t,32) ison $chan { halt } | dec %t }
      inc -u30 %bharf. [ $+ [ $nick ] ] 1
      if %bharf. [ $+ [ $nick ] ] == 1 {
        msg $chan Uyarı : Lütfen büyük harf kullanmayınız     
      }
      if %bharf. [ $+ [ $nick ] ] == 2 {
        mode # +b $wildsite | kick $chan $nick 5 Buyuk Harf Kullandıgınız Icin Atıldınız.
      }
    }
  }
}

Güzel Bi Kod Fakat Bunu User Ikende KanaL'a Yansıtıyor, ßu Kodun Sadece Aop yada Operator Oldugu Zaman Işlem Gormesi Icın Ne Yapabiliriz..

--

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

on *:text:*:#:{

Kısmını

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

on @*:text:*:#:{

Şekilde Değiştirirsen İstediğin Gerçekleşir.

SpecifiC · 28 Ağustos 2007, 15:05

Aslında küçük bir bug oluşmuş kod içerisinde. Yani kanalda bulunan herhangi bir nicki yazıp, bütün cümleyi büyük harfle yazabiliriz ve script bunu görmezden gelir...

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

on @*:text:*:#: {
  if !$istok(Soru-Cevap Sessizi,$nick,32) && $nick !isop # {
    var %ntok = $numtok($1-,32)
    :loop
    if %ntok > 0 {
      var %rnick = $iif($gettok($1-,%ntok,32) ison #,$addtok(%rnick,$gettok($1-,%ntok,32),124),%rnick)
      dec %ntok
      goto loop
    }
    var %strip = $regsubex($strip($1-),/ %rnick /g,\1)
    if $calc($regex(%strip,/[A-ZÄÖÜĞÇİ]/g)/$len(%strip)*100) >= 70 {
      inc -eu60 $+(caps.,$nick)
      if $($+(caps.,$nick),2) == 1 {
        msg # uyarı $nick ; büyük harf kullanmayınız lütfen.
      }
      else {
        ban -k # $nick 2 Gereginden fazla büyük harf kullandınız.
      }
    }
  }
}

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
İlk Harf Buyuk Yazı Stili	Juventus	mIRC Scripting Sorunları	26	12 Mayıs 2020 00:23
Büyük Harf / Uzun Harf / Tekrar Harf -Uyarı/koruma	diyorumki	mIRC Scripting Sorunları	0	06 Ekim 2010 17:22
Buyuk Harf harf Uzatma	Leo	mIRC Scripting Sorunları	5	03 Temmuz 2009 22:29

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

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.