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

 Kayıt ol  Topluluk
7Beğeni(ler)

Yeni Konu aç Cevapla
Sayfa 1 Toplam 2 Sayfadan 1 2
 
LinkBack Seçenekler Stil
Alt 07 Haziran 2011, 22:10   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Özel yazı stilinde değişiklik



ConferenceRoom bir sunucuya takiliyorum.. biliyorsunuz ki bu tür sunucularda genelde renkli yazilar unreal sunucular gibi sorun olmuyor banlanmiyorsunuz renkli yazi yuzunden kanallardan. Onun icin kendime CesuryureK arkadasimizin emegi olan mIRC Turkce 6.35 Scripti kendime gore duzenlemeler yaptim kullaniyorum ve bu scripte resimdeki sekilde yazi addonu eklemek istiyorum yardimi gececek herkese tesekkurler.

Dip Not: Tıpkisinin aynisi olsun istiyorum.



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


Orjinalinden alintidir. Coder by 4CesuryureK

on 1:input:*:{
if ($chr(47) == $mid($1-,1,1)) || ($inpaste) || ($ctrlenter) { goto end }
if ($1- == isnum) { goto end }
var %a 0, %b, %c
while (%a < $numtok($1-,32)) {
inc %a
%c = $gettok($1-,%a,32)
if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+($chr(3),1) $chr(2) %c $chr(3) $chr(2) }
else { %b = %b %c }
}
if (!%b) { %b = $1- }
say %b
halt
:end
}

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 09 Haziran 2011, 09:07   #2
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Özel yazı stilinde değişiklik



Kod:   Kodu kopyalamak için üzerine çift tıklayın!
On 1:input:*:{
  if  ($left($1,1) != /) || ($active != Status Window)  {
    if ($target == $chan) {
      if $1 isnum  { msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      else {
        msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        halt
      }
    } 
    else {
      if $1 isnum  { msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      else {
        msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        halt
      }
    }
  }
}

Aslında böyle direk isteklere cevap vermiyoruz. Lakin canım sıkıldı uğraşmak için birşeyler arıyordum denk geldi.

Kod hem özelde hemde kanalda nickleri ince yapar ve hem özelde hemde kanalda çalışacaktır aynı yazı tipi ile.

Örnek: Bu Nedir Deme CesuryureK Bu Bir Yazı Tipi Deneme Yazısıdır.

__________________
Şimdi Saat Sensizliğin Ertesi..
Konu CesuryureK tarafından (13 Nisan 2019 Saat 06:36 ) değiştirilmiştir. Sebep: Örnek Eklendi.
 
Alıntı ile Cevapla

Alt 10 Haziran 2011, 16:15   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Özel yazı stilinde değişiklik



CesuryureK 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 1:input:*:{
  if (/* !iswm $1) || ($active != Status Window)  {
    if ($target == $chan) {
      if $1 isnum  { msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      else {
        msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        halt
      }
    } 
    else {
      if $1 isnum  { msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      else {
        msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        halt
      }
    }
  }
}

Aslında böyle direk isteklere cevap vermiyoruz. Lakin canım sıkıldı uğraşmak için birşeyler arıyordum denk geldi.

Kod hem özelde hemde kanalda nickleri ince yapar ve hem özelde hemde kanalda çalışacaktır aynı yazı tipi ile.

Örnek: Bu Nedir Deme CesuryureK Bu Bir Yazı Tipi Deneme Yazısıdır.

CesuryureK cok teşekkur ediyorum hocam iyi denk gelmisim oyleyse) oldu fakat soyle bir sorunla karsilastim /join #kanal olarak kanallara girmiyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
neden acaba kanala yansitiyor oldugu gibi komutu.. birde boyle bos bir vaktinizi yakalamisken fisatcilik gibi olmasin ama CesuryureK ;
Ben istedigim resim örneginde butun kelimelerin harfleri buyuk ciksin istemistim biliyorum ama gozume hos gelmedi "İ"lk harf buyuk digerleri kucuk olucak sekilde ayarlamak istersem hangi bolumu degısmem gerekir onuda belirtirseniz pek horaa gececektir hocam simdiden teşekkürler.

Örn:

[16:08] <Ugur>  /j Ur
[16:08] <Ugur>  Allah Allah
[16:14] <Ugur>  /join #ur

Konu RadyocUgur tarafından (10 Haziran 2011 Saat 16:33 ) değiştirilmiştir. Sebep: Örnek Eklendi.
 
Alıntı ile Cevapla

Alt 10 Haziran 2011, 21:04   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Özel yazı stilinde değişiklik



Kodda 2. satırı kaldır.
Verdiğim satırı ekle: if ($left($1,1) != /) {

 
Alıntı ile Cevapla

Alt 12 Ağustos 2011, 07:18   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Özel yazı stilinde değişiklik



Emeği geçen coder arkadaşların eline sağlık.. ilk harfleri küçük olarak nasıl yapabiliriz? büyük olmasın.. ve bu yazı şeklind eki metin öncesi ctrl + k kutucuğu çıkıyor.. onunda mutlak bir önlemi var mı acaba çıkmasın..

 
Alıntı ile Cevapla

Alt 13 Ağustos 2011, 02:11   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Özel yazı stilinde değişiklik



Lütfen, bu başlığı kontrol ediniz.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

 
Alıntı ile Cevapla

Alt 22 Ağustos 2011, 18:41   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Özel yazı stilinde değişiklik



CesuryureK 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 1:input:*:{
  if (/* !iswm $1) || ($active != Status Window)  {
    if ($target == $chan) {
      if $1 isnum  { msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      else {
        msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        halt
      }
    } 
    else {
      if $1 isnum  { msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      else {
        msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        halt
      }
    }
  }
}

Aslında böyle direk isteklere cevap vermiyoruz. Lakin canım sıkıldı uğraşmak için birşeyler arıyordum denk geldi.

Kod hem özelde hemde kanalda nickleri ince yapar ve hem özelde hemde kanalda çalışacaktır aynı yazı tipi ile.

Örnek: Bu Nedir Deme CesuryureK Bu Bir Yazı Tipi Deneme Yazısıdır.

normal metin yazmak için hangi komutu değiştirmemiz lazım arkadaşlar? ilk harf büyük YAZMASIN..

 
Alıntı ile Cevapla

Alt 07 Eylül 2011, 23:29   #8
Çevrimdışı
fav
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Özel yazı stilinde değişiklik



$lower identify ni kullanabilirsin
örnek: //ech -a $lower(SELAM) selam


kodu şöyle değişsek kısa ve hızlı sanırım istediğin olur
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
On *:input:*:{
  if (/* !iswm $1) || ($active != Status Window)  {
    if ($target == $chan) {
      if $1 isnum  { msg $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      else {
        var %dnm $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 ison #,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        msg $lower(%dnm)
        halt
      }
    } 
    else {
      if $1 isnum  { 
      var dnm1 $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $1 $regsubex($2-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3)),$mid(\1,2-)))) | halt }
      msg $lower(%dnm1)
      else {
        var dnm2 $target $+($+($+($chr(3),14),$chr(263)),$chr(3)) $regsubex($1-,/(\S+)/gi,$iif(\1 isin $target,$+($chr(2),\1,$chr(2)),$+($+($+($+($chr(3),14),$+($upper($left(\1,1)),$chr(3),$chr(2))),$chr(2)),$mid(\1,2-)))) 
        msg $lower(%dnm2)
        halt
      }
    }
  }
}
 
Alıntı ile Cevapla

Alt 09 Eylül 2012, 22:43   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Özel yazı stilinde değişiklik



Peki bu yazı tipinin hem baş harflerini altı çizili ve renkli diğerlerininde başka bi renkte mesel mirc renk tonu olarak konuşmak gerekirse her kelimenin baş harfleri 12 renginde altı çizili diğer harfler 14 renginde böyle bir yazı tipi gördüm arıyorum bulamıyorum yardımcı olursanız sevinirim

Selam Naber gibi

 
Alıntı ile Cevapla

Alt 10 Eylül 2012, 14:38   #10
Çevrimiçi
~ Coktatli.net ~
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (2)
IF Ticaret Yüzdesi:(%)
Cevap: Özel yazı stilinde değişiklik



Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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) $+(·,%c,·) }
    else {
      if (%a == $numtok($1-,32)) {
        %d = $+($right(%c,..1),,,)
        %f = $right(%d,2)
      }
      %e = $regsubex(%c,/(?=^| )(.)/g,$+(12,$upper(\1),14))
      %b = %b $+(%e,%f)
    }
  }
  if (!%b) { %b = $1- }
  else { say %b }
  halt
  :end
}

arslan__ Buyrun

 
Alıntı ile Cevapla

Cevapla
Sayfa 1 Toplam 2 Sayfadan 1 2

Etiketler
değişiklik, lazim, mirc, ozel, remotesi, stilinde, yazi, yazı, Özel

« önceki Konu | sonraki Konu »

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

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
Yazi Stilinde DüzenLeme By_ATMACA mIRC Scripting Sorunları 5 18 Ekim 2013 19:23
Yazı Stilinde Hata tas mIRC Scripting Sorunları 4 14 Eylül 2012 08:26
Yazi Stilinde Hata By_ATMACA mIRC Scripting Sorunları 2 22 Temmuz 2012 13:56
Kanal & özeL Barı ve yazı Kısmı Sorunu A&B mIRC Scripting Sorunları 3 19 Temmuz 2010 01:08




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
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.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
yavru köpek sohbet sohbet teması yetişkin sohbet
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net

mimarsinanokullari.com mjsanaokulu.com eburke.org