|
Difuzyon Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
$mouse
Properties: win, x, y, mx, my, cx, cy, dx, dy, key, lb
The .x/.y, .mx/.my, and .dx/.dy properties return the x and y position of the mouse relative to the active window, the main mIRC window, and the desktop respectively
Mantık:
Mouse koordinatları x ve y'den oluşur.Seçenek olarak (prop) uygun bir yörüngeden baz alırsın(Sana kalmış ister .mx ister .dx kısmından alırsın).Bir timer(zamanlayıcı) oluşturursun.Bu koordinatların her biri için Set Variables yada Hash Tables oluşturursun.Bu sistemde anlık(1 sn. veya 2 sn. sonra yok olacak) zaman zarfında bir sorgu belirlersin.Oluşturduğun bu sorguda (şayet X koordinatı önceki sorguda aynı yerde ise) bir inc değeri arttırırsın.
Bu değer belli bir rakama ulaştığında (buda demek oluyor ki mouse koordinatlarında bir değişiklik yoktur,yani mouse kıpırdamamıştır) istediğin sonuca ulaşmanı sağlar.
inc değeri 1sn. yada 2 sn. sonunda herhangi bir arttırıma gitmediği takdirde bu mouse'nin koordinatlarında değişim olduğunu belirtecektir.
Aslında buna benzer bir çalışmam olacaktı , Ekran Koruyucu olarak düşünmüştüm.
Görsel efekti yarım kaldığından paylaşıma henüz sunmadım,bir ara sizlerle de paylaşırım inşallah.
|
difizyun bende birtane ekran koruyucu kod var hoşuma gittiydi bende o ekran koruyucu kodu mause hareketsizse oto calıstıra bılmek için fikirler üretmeye çalışıyordum senin paylaşımların cok güzel yaratıcı ınanki senin ve bıkac arkadaşın kod larını özelikle baylaşım konularını inceliyor mircimde kullanıyorum
kod belki sana fikir vere bilir görmüşsündür bilmiyorum kime ait oldugunuda bılmıyorum
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias Ekoru {
.window -Bdok0pbx +fyX @Ekran_koruyucu
.timer_sc_nokta 0 3 drawdot @Ekran_koruyucu $rand(0,15) 2000 10 5
.timer_sckoşabine 0 5 drawtext -r @Ekran_koruyucu $rgb($rand(0,255),$rand(0,255),$rand(0,255)) Fixedsys 1000 11 500 500 $me
gelbana
.timer_scgel -hio 0 5 gelbana
.timer_sc_koşgel 0 5 baslıx
.timer_sc_kapat_ -mio 0 1 .SCC | .set %MX $+($mouse.x,$mouse.y)
}
alias SCC {
if ( $+($mouse.x,$mouse.y) == %MX) { Halt }
if ( $+($mouse.x,$mouse.y) != %MX) { SCF }
}
alias SCF { .timersc off | .window -c @Ekran_koruyucu | .timer_sc* off }
on *:KEYDOWN:@Ekran_koruyucu:*:SCF
alias -l gelbana {
drawtext -r @Ekran_koruyucu $rgb($rand(0,255),$rand(0,255),$rand(0,255)) Fixedsys $rand(0,500) $rand(0,500) $rand(0,500) Sahr
drawtext -r @Ekran_koruyucu ($rgb(100,173,255) verdana 20 200 650 Ekranı Açmak için Fareyi Kıpırdatın }
alias -l baslıx {
drawtext -r @Ekran_koruyucu $rgb(73,73,73) Verdana 50 112 12 Screen Saver
drawtext -r @Ekran_koruyucu $rgb($rand(0,255),$rand(0,255),$rand(0,255)) Verdana 50 110 10 Screen Saver
}
bu kod ta mause hareketiyle çalışacak düzenek var aslında ama yapamadım ben
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. istediğimi