Girdiğin kanalın adını resim olrak kaydedip arka plana yüklemek - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Alience · 28 Şubat 2005, 09:30

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

on *:join:#: { if $nick == $me { xpencere $chan } }
alias xpencere {
  if !$widnow(@deneme) { window -dp +L @deneme 0 0 250 100 | window -h @deneme }
  drawrect -f @deneme $colour(background) 50 $window(@deneme).x  $window(@deneme).y $window(@deneme).w $window(@deneme).h
  drawtext @deneme $colour(own text) TimesNewRoman 22 0 0 $1
  drawtext @deneme $colour(info text) TimesNewRoman 12 10 30 Bilmemne script ver 1.0
  drawsave @deneme $+($chan,_tmp.bmp)
  background -p $1 $+($chan,_tmp.bmp)
  .remove $+($chan,_tmp.bmp)
}
alias XColorCheck { if $color(backgorund) != %XColorCheck { var %i = $chan(0) | while %i { xpencere $chan(%i) | dec %i 1 } } }
on *:connect: { set %XColorCheck $color(background) | .timerXColorCheck -m 0 200 XColorCheck }

yukarıdaki kod girdiğin kanalın ismini ve scripti vs resim olarak kaydedip arka plana yukluyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.

Yeppa · 28 Şubat 2005, 09:38

güzel bir calisma tebrikler..

bLackStar · 28 Şubat 2005, 13:44

çok güzel. eline sağlık

lord_of_darkness · 28 Şubat 2005, 15:13

helal sana eline saglık ii olmus denedim gusel...

Flyman · 01 Mart 2005, 02:04

guzel olmusda benim scriptte koydum kanal adini resimledi script adinida bilmemne script olarak yansitti bilmemne yi nerden cikarrti bu
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) benimd escriptimin bir adi var yani ismini dogru yansitmasi icin script ismini nereye kayitlamam lazim nerdne aliyor bilgiyi bu kod?

Flyman · 01 Mart 2005, 05:14

bide icon da koymak mumkun olabilirmi ayni bu sekilde resim degil icon

03 Mart 2005, 20:11

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kardes Gercekten Hos Ve Güzel Bir Addon Ama Tek Kötü Yanı Var Mirc'i Kasıyor.. Ama Gercekten Güzel Calısma Tebrikler.

Alience · 07 Mart 2005, 19:26

evet neden kasıyor bir bakalım background yerine backogrund yazmışım yani ifi atlıyor ve her 200ms de bir arka plan yukluyordu aşağıya düzeltilmiş halini yazdım şimdi artık sadece arkaplan rengi değişirse resim yukleyecek
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
, arada dalgınlıkla kaçıyor.

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

on *:join:#: { if $nick == $me { xpencere $chan } }
alias xpencere {
  if !$widnow(@deneme) { window -dp +L @deneme 0 0 250 100 | window -h @deneme }
  drawrect -f @deneme $colour(background) 50 $window(@deneme).x  $window(@deneme).y $window(@deneme).w $window(@deneme).h
  drawtext @deneme $colour(own text) TimesNewRoman 22 0 0 $1
  drawtext @deneme $colour(info text) TimesNewRoman 12 10 30 Bilmemne script ver:1 .0
  drawsave @deneme $+($chan,_tmp.bmp)
  background -p $1 $+($chan,_tmp.bmp)
  .remove $+($chan,_tmp.bmp)
  set %XColorCheck $color(background)
}
alias XColorCheck { if $color(background) != %XColorCheck { var %i = $chan(0) | while %i { xpencere $chan(%i) | dec %i 1 } } }
on *:connect: { set %XColorCheck $color(background) | .timerXColorCheck -m 0 200 XColorCheck }

CoMMaNDeR · 08 Mart 2005, 16:13

Öylesine gezinirken bi sniplet buldum bu arkaplana script adını yazmakla ilgili. Gerçi burdakinde açıklamaları ile koymuşlar diye fazladan yazayım. Güzele benziyor.

; kullanımı: /chanbg <#channel> <Xpadding> <Ypadding> <$rgb(N,N,N)> <FontSize> <FontName>
; örnek: /chanbg #zurna 300 50 $rgb(120,180,160) 10 Tahoma
; #zurna, kanal:P; 300 ve 50, nerede duracagi; $rgb(sayi,sayi,sayi), renk; 10, yazı boyutu; Tahoma, font.

alias chanbg {
; bikaç hata kontrolu
if ($6 == $null) return
if (!$window($1)) return
if (($2 !isnum) || ($3 !isnum) || ($5 !isnum)) return
; pencere zaten açılmışsa, temizlemesi
if ($window(@chanbg)) clear @chanbg
; açılmamışsa, gizili bi resim penceresi açmak
else window -hpf @chanbg -1 -1 $window($1).dw $window($1).dh
; hesaplama için bi değişken hazırlanması, kanal adının nerede çizileceğini belirleyecek
set -l %x $calc($window($1).dw - $width($1,$6-,$5) - $2)
; uygun parametrelerle pencereye çizim
drawtext -nr @chanbg $4 $6- $5 %x $3 $1
; ve onu script dosyasıyla yanyana bi şekilde kaydet
drawsave @chanbg " $+ $scriptdirchanbg.bmp $+ "
; gizli resim penceresini kaldır
window -c @chanbg
; arkaplana kanal adının çizildiği resimli ekle
background $1 " $+ $scriptdirchanbg.bmp $+ "
}

; sonra aktif pencere değiştiğinde kanal açılırse resmi çiz ve yükle
; sarı renkte
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

on *:active:*:{
if ($left($active,1) == $chr(35)) chanbg $active 0 0 $rgb(120,180,160) 14 Comic Sans MS
}

Tabasco · 10 Mart 2005, 11:52

Ellerine sağlık Alience. Çalışmalarının devamını diliyorum..

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
resim yüklenmemişse başka resim yüklemek onerror()	hAte	HTML/CSS/JavaScript	0	16 Ekim 2014 15:18
Kanal ve Özellerde arka plana resimli kod	DenperaS	mIRC Scripting Sorunları	2	27 Kasım 2010 00:57
Arka plana Resim Koymak	Deniz	mIRC Scripting Sorunları	9	22 Kasım 2010 21:02
arka plana resim koymak	SAW	mIRC Scripting Sorunları	18	09 Mart 2009 20:01
mircte arka plana resim ekleme nasil???	19elnur05	mIRC Scripting Sorunları	2	14 Mart 2007 20:03

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

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.