dialog kayan yazı - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Dependent · 23 Nisan 2008, 19:26

aşağıdaki kodu remoteye kopyala

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias yazdir {
  if !$dialog($1) {
    if $2 != -t && $show { echo $color(info text) -at * $1 dialoğu mevcut değil } 
  }
  else {
    if $2 == -t {  
      dialog -t $1 $mid($5-,$3,$len($5-))
      if $4 == + {
        if $3 >= $len($5-) { .timer -m 1 120 yazdir $1 -t $len($5-) - $5- }
        else { .timer -m 1 120 yazdir $1 -t $calc($3 + 1) + $5- }
      }
      else {
        if $3 <= 0 { .timer -m 1 120 yazdir $1 -t 0 + $5- }
        else { .timer -m 1 120 yazdir $1 -t $calc($3 - 1) - $5- } 
      }
    }
    else { .timer -m 1 120 yazdir $1 -t 1 + $2-  }
  }
}

Kullanımı /yazdir dialog_adı Title(çok uzun olmasın)

mesela dialoğumuz:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

dialog x {
  size 150 150 150 150
}

olsun ve bu remotede kayıtlı olsun,
/dialog -m dialog_name x
komutunu girdiğimizde yukarıdaki "x" tablosunu kullanan "dialog_name" adlı dialoğumuzu oluşturacağız

/yazdir dialog_name Alience
komutunu girdiğimizde dialog titlesi:
Alience
lience
ience
ence
nce
ce
e
ce
nce
ence
ience
lience
Alience

aynı şekilde devam eder fakat komutu iki defa üst üste girme sapıtır
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
, ama aynı anda 5 dialog açıp hepsine tek bir yazdir(toplamda 5 dialog var 5 yazdir komutu) komutu girersen bir şey olmaz
en iyi yöntem on *.dialog:dialog_adi:init:*: { yazdir $dname Alience } gibi yazman.
birde daha başka kayma şekli isteme algoritmasını komple değiştirmek gerekebilir.

yukarıdaki son yazdıklarımdan bir şey anlamadı isen yukarıdaki kodu da içeren örnekli aşağıdaki kodu remoteye kopyala:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

dialog x {
  size 150 150 150 150
}
on *:dialog:dialog_name:init:*: { yazdir $dname Alience was here :p }

alias yazdir {
  if !$dialog($1) {
    if $2 != -t && $show { echo $color(info text) -at * $1 dialoğu mevcut değil } 
  }
  else {
    if $2 == -t {  
      dialog -t $1 $mid($5-,$3,$len($5-))
      if $4 == + {
        if $3 >= $len($5-) { .timer -m 1 120 yazdir $1 -t $len($5-) - $5- }
        else { .timer -m 1 120 yazdir $1 -t $calc($3 + 1) + $5- }
      }
      else {
        if $3 <= 0 { .timer -m 1 120 yazdir $1 -t 0 + $5- }
        else { .timer -m 1 120 yazdir $1 -t $calc($3 - 1) - $5- } 
      }
    }
    else { .timer -m 1 120 yazdir $1 -t 1 + $2-  }
  }
}

ve
/dialog -m dialog_name x
komutunu gir.
bu arada mirc nin daha önceki versiyonlarında ok veya cancel buttonu olmayınca dialoğu açmıyordu öyle bir hata olur ise:
size 150 ... kısımının altına
button "x", 1, 1500 1500 1 1, ok
ekle ve dene.

Kolay gelsin ;oki

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Proflde Kayan Yazı	Sarya	SMF	0	10 Temmuz 2021 02:43
Title da Kayan Yazı	iLLuSioNiST	HTML/CSS/JavaScript	2	14 Ağustos 2009 01:26
Kayan yazı(dialog ve custom window)	L4roXyL	mIRC Scripting Hazır Kodlar	10	04 Mayıs 2008 17:51
Kayan Yazı İle Haberler.	Cheki	HTML/CSS/JavaScript	0	07 Temmuz 2006 11:02

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

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.