_progress.1 Script Yüklemesi Başlıyor ...
Kod:
_progress.2 10 YouTube \ \ \ 'a bağlaniliyor ...
Kod:
alias _progress.1 (
yak?n - @ @ Progress @. pbmp
pencere pfdohkaBz + blt @ Progress $ calc ($ window (-1). w - 330) $ calc ($ window (-1). h - 160) 319 104
drawrect-FRN @ Progress $ rgb (yüz) 2 0 0 319 104
_gradient @ Progress 9 69 300 25
_bevel @ ilerleme 7 67 304 29
drawrect-rn @ Progress $ rgb (yüz) 7 0 60 319 44
drawtext-nr @ Progress $ rgb (metin) "ms sans serif \ \ \ \ 16 8 25 $ 1 -
; Progress Barı N sağ Köşesine görüntü koyabilirsiniz 64 X 64
; Drawpic-@ Progress $ nt rgb (255.255.255) 247 1 195 65 64 64 image.ico
drawdot @ ilerleme
pencere hpf @. pbmp 0 0 301 30
drawcopy @ Progress 9 69 300 28 @. pbmp 0 0
)
alias _progress.2 (
($ Window (@ Progress) == $ null) if
($ 1> 100) (_recurse eğer _progress.2 100 $ 2 - | geri)
drawcopy-n @. pbmp 0 0 300 28 @ Progress 9 69
drawtext-nro @ Progress $ rgb (metin) \ \ "Arial \ \" 24 $ calc (159 - $ geni?li?i ($ 1%, Arial, 24,1,0) / 2) 67 $ 1%
drawrect-nrif @ Progress 1 0 9 69 $ calc ($ 1 * 3 + 1) 26
drawrect-FRN @ Progress $ rgb (yüz) 2 8 45 236 21
drawtext-cnr @ Progress $ rgb (metin) "ms sans serif \ \ \ \ 12 8 48 235 99 $ 2 -
başlık @ ilerleme - $ 1%
drawdot @ ilerleme
($ 1 == 100) (if
timer.kill.progress-mio 1 500 kapatın. - @ @ Progress @. chr (124) $ pbmp
)
)
alias-l _bevel (
drawrect-$ 1 $ rgb (kare) 1 $ nr calc ($ 2 + 1) $ calc ($ 3 + 1) $ calc ($ 4 - 1) $ calc ($ 5 - 1)
drawrect-$ 1 $ rgb (3dlight) 2 $ FRN calc ($ 2 + 1) $ calc ($ 3 + $ 5 - 1) $ calc ($ 4 - 1) 2
drawrect-$ 1 $ rgb (3dlight) 2 $ FRN calc ($ 2 + $ 4 - 1) $ calc ($ 3 + 1) 2 $ calc ($ 5 - 1)
drawrect-$ 1 $ rgb (hilight) 1 $ 2 $ 3 $ calc ($ 4 + 1) $ nr calc ($ 5 + 1)
drawline-nr $ 1 $ rgb (gölge) 1 $ 2 $ calc ($ 3 + $ 5 - 1) $ 2 $ 3 $ calc ($ 2 + $ 4) $ 3
)
alias-l _gradient (
var% yer = $ calc ($ 4 / 2 + $ 5 / 2 + $ 2),% r = $ calc ($ rgb (yüz)% 256),% g = $ calc ($ rgb (yüz) / 256% 256), % b = $ calc ($ rgb (yüz) / 65536)
: LoopL
drawline-nr $ 1 $ rgb (% r,% g,% b) 7 $ calc (% yerde - 3) $ calc ($ 3 - 3) $ calc (% yerde - $ 5) $ calc ($ 3 + $ 5)
(% Yerde $ 2>) (if
(% R> 2) Aralık% r 3 e?er
%) Aralık% g 3> 2 g (e?er
(% B> e?er 2) Aralık% b 3
Aralık% yerde 8
goto loopL
)
% Yer = $ calc ($ 4 / 2 + $ 5 / 2 + $ 2)
% R = $ calc ($ rgb (yüz)% 256)
% G = $ calc ($ rgb (yüz) / 256% 256)
% B = $ calc ($ rgb (yüz) / 65536)
var% hedefi = $ calc ($ 2 + $ 4 + $ 5)
: LoopR
drawline-nr $ 1 $ rgb (% r,% g,% b) 7 $ calc (% yerde - 3) $ calc ($ 3 - 3) $ calc (% yerde - $ 5) $ calc ($ 3 + $ 5)
(% Yer <% gol) (if
(% R <250) inc% r 3 eğer
%) Inc% g 3 <250 g (eğer
(% B <250) inc% b 3 eğer
inc% yerde 8
goto loopR
)
)
alias $ 1 - | return $ result _recurse