| goKhaN` | 23 Eylül 2007 01:12 |
/Ekoru
Kod:
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 1 gelbana
.timer_sc_koşgel 0 1 baslıx
.timer_sc_kapat_ -mio 0 1 .SCC | .set %hoppa $+($mouse.x,$mouse.y)
}
alias SCC {
if ( $+($mouse.x,$mouse.y) == %hoppa) { Halt }
if ( $+($mouse.x,$mouse.y) != %hoppa) { 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) by goKhaN
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 by goKhaN
}
Bunu Nerden buLdugumu hatırlamiyorum :) Ama Guzel Cok Hosuma Gıdıor bu bazen yolluom arkdaslarima N'bu dıor dıom Ekran Koruyucu Guzel birsey. /Ekoru Yaz Dıom Trsıorlar birden )(= Umarım Sızde benim gıbi GuLersiniz. Kolay gelsın. |
