|
Beklenti Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
Animasyon istemiyorum ben o sebeble o kodları ayırmaya ugrasmak istemem. Şöyle birşey yaptim yukardaki arkadasin verdiği kodu kullandım örnek;
Kod: Kodu kopyalamak için üzerine çift tıklayın! on *:dialog:*:init:*: {
mdx SetMircVersion $version
mdx MarkDialog $dname
mdx SetDialog $dname bgcolor $rgb(255,255,255)
}
Ama arada bazı bg ve textbg.'lar gri kaldı onuda kendi kodlari altında renklendirdim şuan çalışıyor. 2 tane $devent init kullanmış oldum. Bu şekilde doğrumu? Örnek;
Kod: Kodu kopyalamak için üzerine çift tıklayın! on *:dialog:startpen:*:*:{
if ($devent == init) {
mdx SetColor $dname 2 textbg $rgb(255,255,255)
mdx SetColor $dname 2,1 background $rgb(255,255,255)
}
if ($devent == init) {
did -a startpen 3 $me
did -c startpen 3 1
}
if ($devent == sclick) && ($did == 14) { /set %servername irc.enbeyaz.com }
if ($devent == sclick) && ($did == 17) { /set %serverport 6667 }
if ($devent == sclick) {
if ($did == 19) { server irc.benimsitem.com:6667 | .nick $did(3) | penikapat }
}
}
|
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:DIALOG:*:init:*:{
mdx SetMircVersion $version
mdx MarkDialog $dname
; Dialogun arka plan rengini belirliyoruz. Buradan renkte değişiklik yapabilirsiniz
mdx SetDialog $dname bgcolor $rgb(74,112,139)
var %~ = 1
; Bu %j değişkeni bir dialogun içindeki id sayısıdır, genelde daha az olur
; ama büyük dialoglarda bu ve bundan daha fazlası da olabilir, ancak
; açılışta hem döngünün çok uzun sürüp yavaşlamaması hem de mümkün
; olduğunca eksik id kalmaması için 700 sayısını seçtim, eğer sizin
; scriptinizde daha fazla id'li dialog varsa artırın, eğer hep daha az id'ler varsa azaltabilirsiniz.
var %j = 700
var %s = 0
; Bütün 1'den 700'e kadar tüm id'ler için aşağıdaki komutları uygulatıyoruz.
while %~ <= %j {
; Bu if'in açılmasının nedeni, dialogun içindeki bazı edit ve box kısımlarını
; (değer girilebilen) mdx'in değiştirmemesi ve o kutucuk ve yazıların belirgin kalabilmesi..
if ($did(%~).isid == $true) {
; Bu if ise, "eğer %~ değişkeninin ifade ettiği id değeri var ise" manasına gelmektedir.
if ($did($dname,%~)) {
; Dialog içindeki yazı arka plan rengidir.. Dilerseniz değiştirebilirsiniz.
mdx SetColor $dname %~ textbg $rgb(108,166,205)
; Dialog içindeki yazı rengidir.. Dilerseniz değiştirebilirsiniz.
mdx SetColor $dname %~ text $rgb(232,232,232)
; Dialog içindeki genel arka plan rengidir.. Dilerseniz değiştirebilirsiniz.
mdx SetColor $dname %~ background $rgb(108,166,205)
; Genel yazı fontu ve ayarlarıdır.. Dilerseniz değiştirebilirsiniz.
mdx SetFont $dname %~ Turkish 14 200 arial
}
inc %s
}
inc %~
}
}
Animasyonlar kaldırıldı.