mIRC Scripting

mIRC Scripting (https://www.mircscripting.net/)
-   Help - Yardım (https://www.mircscripting.net/help-yardym/)
-   -   Yazı şekli (https://www.mircscripting.net/help-yardym/360-yazy-thekli.html)

WeiLSiDe 09 Ağustos 2009 15:19

Yazı şekli
 
1. "[15:11] <WeiLSiDe> deneme " Sunucuda yazılan metinlerde nicklerin başında ve sonunda Kırmızı ile belirttiğim şekilde işaretler cıkıyo bunlardan kurtulup :
"[15:11] WeiLSiDe :deneme " böyle birşey yapmak istedim ama olmadı.

2. Birden ben herhangi bir nicki yazdığım zaman atıyorum black nicki normalde böyle gözüküyo : "[15:11] <WeiLSiDe> black " ben bunun renkli cıkmasını istiyorum şu şekilde mesela "[15:11] <WeiLSiDe> black " Umarım anlatabilmişimdir.
Şimdiden tşk ederim.

L4roXyL 09 Ağustos 2009 21:44

1. sorunun için;

on ^*:text:*:*:echo $colour(normal text) $iif(#,#,$nick) $timestamp $+($nick,:) $1- | haltdef

-

2. sorunun için;

Kod:

on *:input:*: {
  if ($left($1,1) != /) {
    haltdef | var %1 = 1,%2 = $1-,%3,%v1
    while ($gettok(%2,%1,32)) { %v1 = $v1 | if ($active = %v1 || %v1 ison #) { %3 = $v1 | break } | inc %1 }
    say $regsubex(%2,$+(/\b,%3,\b/gi),$+($chr(3),4,$chr(31),%3,$chr(3),$chr(31)))
  }
}


WeiLSiDe 10 Ağustos 2009 00:28

Teşekkürler ama 1 nci kodda bi sorun var kendim yazdığımda geçerli olmuyo yani benim yazılarım halen "<WeiLSiDe>" şeklinde görünüyo. Birde şunu öğrenmek istiyorum, 2 nci kodda altıçizgili olayı nasıl oldu anlamadım. Yada şöyle diyeyim say $regsubex ile devam eden satırı açıklayabilir misin?

L4roXyL 10 Ağustos 2009 04:24

Kendi yazdıklarının aynı şekilde çıkması için yine on input kullanacaksın.
Lakin, /say yerine /msg kullanmalısın, şöyleki(kodu biraz daha değiştirdim ama açıklamamı istediğin kısım aynı);

Kod:

on *:input:*: {
  if ($left($1,1) != /) {
    haltdef | var %1 = 1,%2 = $1-,%v1,%t,%3
    while ($gettok(%2,%1,32)) { %v1 = $v1 | if ($active = %v1 || %v1 ison #) { %3 = $v1 | break } | inc %1 }
    %t = $regsubex(%2,$+(/\b,%3,\b/gi),$+($chr(3),4,$chr(31),%3,$chr(3),$chr(31)))
    .msg $target %t | echo $color(own text) $target $timestamp $+($me,:) %t
  }
}

-

Ek olarak, $regsubex kısmını açıklayabilirim evet: $regsubex(%2,$+(/\b,%3,\b/gi),$+($chr(3),4,$chr(31),%3,$chr(3),$chr(31)))

Burada diyoruzki: %2 değişkenine atanan verinin içerisinde(ki bu $1-(senin kedi text-inin tamamı) oluyor) %3 değişkenine atanan(buda eşleşen nick oluyor) verininin yerine $+($chr(3),4,$chr(31),%3,$chr(3),$chr(31)) verisini değiştir.
-
$+(/\b,%3,\b/gi): \b bir konum/yer karşılaştırmasıdır. Kelime sınırı anlamına gelir. Burada diyoruzki; /(karşılaştırma başlatıyoruz)\b(herhangi bir kelime? veya yok)%3(eşleşen veri =>)\b((%3) ile bitiyorsa)/gi(büyük küçük harf ayırt edilmeksizin kaç adet eşleşme varsa?)
-
$chr(3): Renk kodu - ctrl+k
4: Default olarak kırmızı renk(değişebilirsin)
$chr(31): Underline kodu - ctrl+u
%3: Eşleşen veri - search edilen nick

-

Edit: İlk verdiğim kodların $color kısmındaki renk isimlerini düzenledim daha sağlıklı oldu.
$color içerisine girilen, "normal text" karşıdan gelen text-e atanan default veya değiştirilen rengin kodunu/rakamını verir.
Yine $color içerisine girilen, "own text" senin karşıya gönderdiğin text-e atanan default veya değiştirilen rengin kodunu/rakamını verir.

WeiLSiDe 10 Ağustos 2009 23:25

Çok teşekkür ederim.


++ mIRCScripting.net hakkında kısaca:

mS; "Gayri resmi mIRC" kullanıcı ve tasarımcı topluluğudur.
2009 yılında kurulan mS; tasarımcı ve geliştiricileri bir araya getiren etkileşim ve iletişim sağlayan bir platformdur.
mS; tasarım, programlama, geliştirme, düzenleme vb. pek çok konu etrafında bir araya gelmiş "mIRC" meraklısı bir çok insan tarafından yaratılan içeriğiyle; kullanıcı dostu, özgün elit, nitelikli kişi ve konularla hizmet sunan mIRC Scripting platformudur.

Özgün içerikten onay almaksızın içeriği yaratan kullanıcılarımız tamamen yada kısmen sorumludur, aynı zamanda söz konusu içerik mS yetkilileri izni olmaksızın, kaynak gösterilse dahi(!) kopyalanamaz ve/ya paylaşılamaz.   Site/içerik hakkında görüş, öneri ve şikayetleriniz için sikayet[at]mircscripting[dot]net e-posta ve ya İletişim adresinden bizlere ulaştırabilirsiniz.



mIRC mIRC Orjinal mIRC İndir mIRC Download mIRC Tutorials mIRC Socket mIRC Commands mIRC Komutlar mIRC Yükle mIRC Dersler mIRC Hazır Kodlar mIRC Classentifier mIRC DLL mIRC Dialog mIRC IRC mIRC FTP mIRC Telnet mIRC Help
mIRC Yardım mIRC Iconlar mIRC Com Object mIRC Binary Files mIRC Picture Windows mIRC Unicode mIRC Forum mIRC Hazır Kodlar mIRC Kod mIRC Script mIRC File Handling mIRC Scripting Language mIRC Scripting Dili mIRC Scripting Info
mIRC Scripting Tutorials



User Alert System provided by Advanced User Tagging v3.1.3 (Lite) - vBulletin Mods & Addons Copyright © 2026 DragonByte Technologies Ltd. Runs best on HiVelocity Hosting.

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76

SEO by vBSEO 3.6.1