[neobre]

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

alias digi {
window -poCzdk0 +tnbL @digitalsaat -1 -1 200 100
drawtext @digitalsaat 4 Impact 20 40 10 => ßy CooL <=
drawtext @digitalsaat 1 Impact 20 30 30 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
0 1 saatcek
}
alias -l saatcek {
clear @digitalsaat
drawfill @digitalsaat 0 0 1 1
yaz
}
on *:close:@digitalsaat: {
unset %say
.timertime off
window -c @digitalsaat
}
menu @digitalsaat {
Hakkında:.return $input(Digital Saat // CooL Coding // 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
alias yaz {
var %i 1,%x = 0
while %i <= $numtok($time,58) {
inc %say
var %x $calc(%x + 30)
drawpic -fr @digitalsaat %x 0 $+(digi/,$left($gettok($time,%i,58),1),.,gif)
var %x $calc(%x + 20)
drawpic -fr @digitalsaat %x 0 $+(digi/,$right($gettok($time,%i,58),1),.,gif)
drawtext @digitalsaat 1 Impact 20 32 40 $replace($day,Monday,Pzt.,Tuesday,Sal.,Wednesday,Çrş.,Thursday,Per.,Friday,Cum.,Saturday,Cmt.,Sunday,Pzr.) $gettok($date,3,47) ~ $replace($gettok($date,1-2,47),/,-)
if %say == 1 || %say == 2 {
drawtext @digitalsaat 4 Impact 40 $calc(%x + 26) 0 .
}
else {
unset %say
}
inc %i
}
}
on *:load:{
if $finddir($mircdir,digi,0) == 0 {
echo -a HATA! mIRC Ana dizininde digi adlı bir klasör malesef bulunamadı
echo -a Bu Sorunu Gidermek İçin:
echo -a - digi.rar Dosyasını tekrar çıkartıp digitalsaat klasörünün içindeki bütün dosyaları $+(,$mircdir,) Bu uzantıya atınız..
echo -a - 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
adresinden online destek alınız
.unload -rs digi.mrc
}

arkadaslar elımde boyle bır kod var mı menu seklınde yada windows penceresinde cıkabılecek sekılde ayarlabılır mısınız yalnız
/digi yazınca cıkmıcak onceden solıyım tesekkurler menu seklınde olması ve windows penceresinde cıkması ıyı olur.