ilk harf büyük olsun - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

ZenqerDenq · 15 Haziran 2013, 23:26

on 1:input:*:{
if ($chr(47) == $mid($1-,1,1)) || ($inpaste) || ($ctrlenter) { goto end }
if ($1- == isnum) { goto end }
var %a 0, %b, %c, %d, %e, %f
while (%a < $numtok($1-,32)) {
inc %a
%c = $gettok($1-,%a,32)
if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(4«1 ,%c,4») }
else {
if (%a == $numtok($1-,32)) {
%d = $+($right(%c,..1),,,)
%f = $right(%d,2)
}
%e = $regsubex(%c,/(?=^| )(.)/g,$+( 1, $+ $upper(\1)|,))
%b = %b $+(%e,%f)
}
}
if (!%b) { %b = $1- }
else { say %b }
halt
:end
}

yukarıdaki kodda nick kenarında 2 simge var ayrıca her kelimenin ilk harfi büyük bunu sadece cümlenin ilk harfi büyük olacak sekilde ayarlaya bilirmiyiz ?

thunderboLt · 19 Haziran 2013, 23:33

Kodu yeniden yazdım; sizdekini biraz uzun tutmuş yazan kişi.
* Kanalda olan birinin nickini belirttiğinizde «Nick» şeklinde belirtilir.
* Cümlenin ilk harfi büyük.

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

on *:input:*:{
  if !$ctrlenter && !$inpaste && !$regex($1-,^\x2F) {
    haltdef
    var %thu $1-
    var %bolt 1
    while %bolt <= $numtok(%thu,32) {
      if $gettok(%thu,%bolt,32) ison # { var %thu $puttok(%thu,$+(4«1,$gettok(%thu,%bolt,32),4»),%bolt,32) }
      inc %bolt
    }
    say $regsubex(%thu,^(.),$upper(\t))
  }
}

İyi forumlar.

Set · 19 Haziran 2013, 23:55

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

on *:input:*:{
  if !$ctrlenter && !$inpaste && !$regex($1-,^\x2F) {
    var %text $regsubex($1-,/(\w+)/g,$iif(\t ison #,«\t»,\t))
    say $regsubex(%text,^(.),$upper(\t))
    haltdef
  }
}

Boylede olabilir hayırlı IF'ler.

thunderboLt · 20 Haziran 2013, 00:07

Set 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 *:input:*:{
  if !$ctrlenter && !$inpaste && !$regex($1-,^\x2F) {
    var %text $regsubex($1-,/(\w+)/g,$iif(\t ison #,«\t»,\t))
    say $regsubex(%text,^(.),$upper(\t))
    haltdef
  }
}

Boylede olabilir hayırlı IF'ler.

Regsubex düşüncesi güzel lakin [, ] vb. karakterler içeren yani \w (harf,rakam,alt çizgi) harici karakterler içeren nicklerde sorun çıkaracaktır verdiğiniz kod.
[00:05:34] <~boLt[Away]> Selam boLt[Away] nasılsın
[00:05:36] <~boLt[Away]> «thunderboLt»
Gibi.

(Konuyu açan arkadaşı bilgilendirmek amaçlı)

İyi forumlar.

ZenqerDenq · 24 Haziran 2013, 04:37

tşkler arkadaşlar

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Büyük Harf İle Başlama	JohnGalt	mIRC Scripting Sorunları	26	23 Haziran 2016 23:03
Büyük Harf , Harf Uzatma Uyarı Admin Ve opları uyarmısın Yardim Edin..	eRCi	mIRC Scripting Sorunları	3	04 Kasım 2010 14:22
Büyük Harf / Uzun Harf / Tekrar Harf -Uyarı/koruma	diyorumki	mIRC Scripting Sorunları	0	06 Ekim 2010 17:22
ilk harf büyük	lacremel	mIRC Scripting Sorunları	15	07 Şubat 2008 20:51

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.