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/)
-   -   Yazı tipi: Harfler arasında boşluk (https://www.ircforumlari.net/mirc-scripting-sorunlari/723199-yazi-tipi-harfler-arasinda-bosluk.html)

CoCoRiCo 20 Ocak 2016 20:46

Cevap: Yazı tipi: Harfler arasında boşluk
 
"_" yerine istediğin karakter, "4" yerinede istediğin
kadar aralık koymak için sayıyı yazabilirsin.

$str($+($chr(32),$chr(160)),2) bu örnekte 4 boşluk içindir..
mirc 1 den fazla boşluk karakterine izin vermez.. bu nedenle kısa boşluk
$chr(32) 1 uzun boşluk $chr(160) kombine yapmalısın.. 4 bosluk yapmak
istersen iki bosluk karakteri kullandıgın icin /2 olarak yazman gerekir..
eğer alt cizgi yada başla bir karakter kullanmak istersen $str(_,4) bu
şekilde yazman yeterli

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

on *:input:*: {
  if $regex($window($active).type,/(Query|Channel)/ig) && !$regex($1,/(^\/)/) && !$ctrlenter {
    haltdef
    var %~s $str($+($chr(32),$chr(160)),2)
    ;var %~s $str(_,4)

    msg $target $regsubex($regsubex($1-,/(\s+)/ig,$+(\t,%~s)),/([[:print:]])/ig,$+(\1,$chr(32)))
  }
}


LavdegoN 21 Ocak 2016 16:44

Cevap: Yazı tipi: Harfler arasında boşluk
 
Alıntı:

CoCoRiCo Nickli Üyeden Alıntı (Mesaj 1041727676)
"_" yerine istediğin karakter, "4" yerinede istediğin
kadar aralık koymak için sayıyı yazabilirsin.

$str($+($chr(32),$chr(160)),2) bu örnekte 4 boşluk içindir..
mirc 1 den fazla boşluk karakterine izin vermez.. bu nedenle kısa boşluk
$chr(32) 1 uzun boşluk $chr(160) kombine yapmalısın.. 4 bosluk yapmak
istersen iki bosluk karakteri kullandıgın icin /2 olarak yazman gerekir..
eğer alt cizgi yada başla bir karakter kullanmak istersen $str(_,4) bu
şekilde yazman yeterli

Kodu aynen uyguladim ama aşağıdaki resimde gösterdiğim gibi kelime arasinda  seklinde bir karakter beliriyor ve bu karakter sadece karşı tarafta görünüyor.

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

CoCoRiCo 21 Ocak 2016 17:32

Cevap: Yazı tipi: Harfler arasında boşluk
 
uzun boşlugun ascii görüntüsü UTF den kaynaklı..
ve karsı tarafın encode decode kilidi kapalıdır..
bunu $chr(160) yerine $chr(9) kullanabilirsin

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

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

LavdegoN 21 Ocak 2016 18:53

Cevap: Yazı tipi: Harfler arasında boşluk
 
Alıntı:

CoCoRiCo Nickli Üyeden Alıntı (Mesaj 1041728240)

Kod:

on *:input:*: {
  if $regex($window($active).type,/(Query|Channel)/ig) && !$regex($1,/(^\/)/) && !$ctrlenter {
    haltdef
    var %~s $str($+($chr(32),$chr(160)),2)
    ;var %~s $str(_,4)

    msg $target $regsubex($regsubex($1-,/(\s+)/ig,$+(\t,%~s)),/([[:print:]])/ig,$+(\1,$chr(32)))
  }
}


Karşı tarafa şu şekilde gitmesi için "B u g ü n ___ S i n e m a y a ___ G i d e c e ğ i m" bu kodun neresini değiştirmeliyim. $str(_,4) kısmını değiştiriyorum ama hiçbirşey farketmiyor. Uzun çizgi yapamadim bir türlü.. Çizgilerin arasinda da boşluk çıkıyor

CoCoRiCo 21 Ocak 2016 20:08

Cevap: Yazı tipi: Harfler arasında boşluk
 
mavi satırın ; işareti kaldır kırmızı satırın basına ; işareti koy.
başta anlattım dikkatli okursan anlayacaksın.

LavdegoN 22 Ocak 2016 06:35

Cevap: Yazı tipi: Harfler arasında boşluk
 
Alıntı:

CoCoRiCo Nickli Üyeden Alıntı (Mesaj 1041727676)
Kod:

on *:input:*: {
  if $regex($window($active).type,/(Query|Channel)/ig) && !$regex($1,/(^\/)/) && !$ctrlenter {
    haltdef
    var %~s $str($+($chr(32),$chr(160)),2)
    ;var %~s $str(_,4)

    msg $target $regsubex($regsubex($1-,/(\s+)/ig,$+(\t,%~s)),/([[:print:]])/ig,$+(\1,$chr(32)))
  }
}


Türkçe karakterler kullandigim zaman harfler birleşmeye başlıyor ve kelimelerin arasına aralıksız uzun çizgi "___" koymayı başaramadım "_ _ _" bu şekilde gozukuyor.

Vakit ayırdığınız için teşekkürler. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 'un verdigi kod zaten işimi görmüştü.

CoCoRiCo 22 Ocak 2016 15:05

Cevap: Yazı tipi: Harfler arasında boşluk
 
$regsubex($regsubex($1-,/(\s+)/ig,$+(\t,%~s)),/([[:print:]][^_])/ig,$+(\t,$chr(32)))

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 16:05 -->-> Daha önceki mesaj 15:04 --

Aslında kod doğru çalışıyor..
problem mIRC kendisinde..
BUG yani hata var..
birlikte iken harfler doğru UTF8 çözümlerken aralarına ektra boşluk yada
görünmez karekter eklenince hata oluşuyor.. düzeltmenin birçok yolu var..
ama yinede çözüm degil.. sende doğru görünse bile karşındakinde hatalı olabilir
onda hatalı görünse de sende doğru görünebilir..

en pratik çözüm alternatifleriyle kontrol yapmak..
dier arkadaşın verdiği kod "replace" ile çalışır.. o da saglıklı çalışmaz tekrar eden
kelimeleri tek olarak gösterecektir.

Kod:

on *:input:*: {
  if $regex($window($active).type,/(Query|Channel)/ig) && !$regex($1,/(^\/)/) && !$ctrlenter {
    haltdef
    ;var %~s $str($+($chr(32),$chr(160)),4)
    var %~s $str(_,4)
    var %t~ $regsubex($regsubex($1-,/(\s+)/ig,$+(\t,%~s)),/([[:print:]][^_])/ig,$+(\t,$chr(32)))
    echo 1 : msg $target  %t~
    echo 3 : msg $target  $utfdecode($utfencode(%t~),0)
    echo 2 : msg $target  $utfdecode($utfencode(%t~),1)
    echo 4 : msg $target  $utfdecode($utfencode(%t~),2)
    echo 5 : msg $target  $utfdecode($utfencode(%t~),160)
    echo 7 : msg $target  $utfdecode($utfencode(%t~),161)
    echo 14 : msg $target  $utfdecode($utfencode(%t~),162)
  }
}

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

Alıntı:

  • 000 - ANSI_CHARSET
  • 001 - DEFAULT_CHARSET
  • 002 - SYMBOL_CHARSET
  • 077 - MAC_CHARSET
  • 128 - SHIFTJIS_CHARSET
  • 129 - HANGEUL_CHARSET
  • 130 - JOHAB_CHARSET
  • 134 - GB2312_CHARSET
  • 136 - CHINESEBIG5_CHARSET
  • 161 - GREEK_CHARSET
  • 162 - TURKISH_CHARSET
  • 163 - VIETNAMESE_CHARSET
  • 177 - HEBREW_CHARSET
  • 178 - ARABIC_CHARSET
  • 186 - BALTIC_CHARSET
  • 204 - RUSSIAN_CHARSET
  • 222 - THAI_CHARSET
  • 238 - EASTEUROPE_CHARSET
  • 255 - OEM_CHARSET



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 20:46.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk