Çevrimdışı

Hiçbir kod girmeden, sadece diyalog şeklinde istediğiniz renk, arkaplan, kalın, altçizgili vb seçerek yazı yazmak için ufak bir kod. Kod sahibini bilmiyorum, sadece Türkçe'ye çevirdim. Bazen çok kullanışlı olabiliyor.

Diyalog resmi


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


Mirc klasörüne eklenecek resim:


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


Yüklenişi:
Aşağıdaki kodu Alt+R ile açtığımız remoteye ekliyoruz(Yeni bir pencere tavsiye edilir). Ardından yukarıdaki renk kodlarının olduğu küçük resmi bilgisayara indirip mirc klasöründe uygun yere koyun. Mesela koda göre icon 9, 13 73 87 20, icon\renkler.jpg, 0, noborder resim icon klasörü içinde. Siz nereye koyarsanız kodda ona göre düzeltme yapabilirsiniz.

Çalıştırma: Sağ tıklama ya da /mct

Kod:

dialog MCT {
title "Renkli Yazı"
size -1 -1 112 165
option dbu
button "Tamam", 4, 35 145 40 15, ok
box "Yazı Özellikleri", 5, 10 27 93 36
edit "", 6, 56 37 30 10
icon 9, 13 73 87 20, icon\renkler.jpg, 0, noborder
box "Renk Kodları", 10, 10 65 93 33
text "Renk Kodu", 18, 28 38 28 6
box "Aç / Kapat", 22, 10 2 93 23
radio "Açık", 23, 29 11 19 10, group
radio "Kapalı", 24, 60 11 25 10
check "Kalın", 29, 28 50 20 10, left
check "Altçizgili", 30, 55 51 32 7, left
box "Örnek", 31, 10 98 93 45
edit "Tek Renk= Yazınızın rengi olur.", 32, 11 107 90 10
edit "Çift Renk= 1.si yazı, 2.si arkaplan", 33, 11 119 90 10
edit "13,1=Siyah arkaplanda pembe yazı", 34, 11 131 90 10
}

on *:dialog:MCT:init:0:{
did -c $dname $iif(%mct.on,23,$iif(%mct.off,24,))
$iif(%text.color,did -a $dname 6 %text.color)
if (%mctbold = ) { did -c $dname 29 }
if (%mctunderline = ) { did -c $dname 30 }
}
on *:dialog:MCT:sclick:*:{
if ($did == 4) {
if ($did(MCT,29).state = 1) { set %mctbold  } | else { unset %mctbold }
if ($did(MCT,30).state = 1) { set %mctunderline  } | else { unset %mctunderline }
set %text.color $did(MCT,6)
}
if ($did == 23) { enable #mctext | unset %mct.* | set %mct.on on }
if ($did == 24) { disable #mctext | unset %mct.* | set %mct.off off }
}

#mctext off
on *:input:*:if (!$regex($1-,^\/) && !$inpaste) { msg $active %mctunderline $+ %mctbold $+  $+ %text.color $+ $1- | halt }
#mctext end

alias mct { dialog -m MCT MCT }

alias ctext {
$iif($dialog(MCT),dialog -c MCT MCT) dialog -m MCT MCT
}

menu * {
Renkli Yazma:/mct
}

 

Çevrimdışı

* /dialog: 'MCT' Icon Yüklemede Hata 'icon\renkler.jpg' (Satır 42, script28.mrc)

 

Çevrimdışı

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

* /dialog: 'MCT' Icon Yüklemede Hata 'icon\renkler.jpg' (Satır 42, script28.mrc)

Aslında onun açıklamasını yapmıştım. Mirce eklenecek resim diye altta ikinci bir resim vermişim. O resmi bilgisayara kaydet. Sonra mirc klasöründe uygun bir klasöre ekle. Örneğin mirc resimlerin "images" klasörü içinde ise ve resmi o klasöre koyarsan, kod üzerine ufak bir değişiklik yapman gerekecek: Küçük resmi "images" klasörüne eklediğini varsayarsak, kodda şöyle bir değişiklik yapman gerekecektir.

icon 9, 13 73 87 20, icon\renkler.jpg, 0, noborder bu kısmı

icon 9, 13 73 87 20, images\renkler.jpg, 0, noborder bu şekilde değiştireceksin.

 

Çevrimdışı

Alıntı:

icon 9, 13 73 87 20, icon\renkler.jpg, 0, noborder

Bu Addon un Bırde Jpg Resmi Var Sanırım Klasor Halinde Yayınlanmıs Ve Icınde Resim Dosyasıda Var Ve Resim Olmadıgı Icın Hata Vermektedir İcon Yada İmages Olarak Belırtmıssınız Onunla Alakası yOk

__________________
Benim En Kötü Hikaye'mi En Güvendiğim İnsanlar Yazdı..
Erhan İle Hüzünlü Saatler Etka..

 

Çevrimdışı

İki defa anlattım. Aslında yapılacak şey çok basit. Şu resmi alıp uygun klasöre koyacaksınız. Uygun klasör nedir derseniz iş daha da uzayacak. En iyisi resmi icon adlı bir klasöre koyun yetecektir.


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

 

Selam dostum verdiğin kodu remoteye ekledim mırc klasorundede icon die klasor oluşturup resmide içine attım renkler.icon adıyla sağ tıkla acılıyor dialog fakar şöle bi hata verior
/did: Yetersiz veya eksik parametre (Satır 23, script53.mrc)

sorun nerde?

 

Çevrimdışı

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

Selam dostum verdiğin kodu remoteye ekledim mırc klasorundede icon die klasor oluşturup resmide içine attım renkler.icon adıyla sağ tıkla acılıyor dialog fakar şöle bi hata verior /did: Yetersiz veya eksik parametre (Satır 23, script53.mrc) sorun nerde?

İlk çalıştırdığın zaman diyalog açık ya da kapalı şeklinde bir seçim olmadığı için o hatayı verir. Açtıktan sonra Açık ya da Kapalı düğmelerinden birini tıklarsan, sonraki açılışta o hatayı vermez.

----------

Aslında baştan upload etmek istememiştim. Baktım çok karışık hale gelmiş, en iyisi resmi ve kodu aynı klasöre koyarak link vereyim istedim. Aşağıdaki linkten dosyayı indirip rar'dan çıkarın ve renkliyazi klasörünü mirc klasörüne atın. Daha sonra mircinizi açıp şunu yazın ve enterlayın: /load -rs renkliyazi\renkliyazi.mrc

Çalıştırmak için sağ tıklama veya /mct
Kodu kaldırmak için: /unload -rs renkliyazi\renkliyazi.mrc
/did: Yetersiz veya eksik parametre (Satır 23, ...........) şeklinde hata verirse hemen üstteki mesajı okuyunuz.

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

 

Çevrimdışı

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

icon 9, 13 73 87 20, icon\renkler.jpg, 0, noborder bu kısmı icon 9, 13 73 87 20, images\renkler.jpg, 0, noborder bu şekilde değiştireceksin.

jpg resmi 3850 diye adlandırılmış;
icon 9, 13 73 87 20, images\3850.jpg, 0, noborder[/B]
ile değişilirse dialog açılır.