A small and simple script I made for no reason at all.
No really, there's no reason to this.
;FlashLight 1.0
;Made by BlueThen on March 28, 2008.
;To install, paste this code into your remotes
;Then type /flashlight or right click in che channel or status and click FlashLight.
menu channel,status {
FlashLight: flashlight
}
alias FlashLight {
window -poCzdk0 +tnbL @FlashLight -1 -1 400 400 | window -poChzdk0 +tnbL @flash.Buf -1 -1 800 800 | set %flash.off n
}
menu @flashlight {
mouse: {
if (%flash.off != y) {
%tun.x = 75 | clear @flash.buf
while (%tun.x > 0) {
drawdot -r @flash.buf $rgb($calc(255-(%tun.x *3.4)) , $calc(255-(%tun.x *3.4)) , $calc(255-(%tun.x *3.4))) $calc(%tun.x *2.66) $calc($mouse.x * 2) $calc($mouse.y *2)
dec %tun.x
}
drawtext @flash.buf 1 Tahoma 40 200 200 Made By BlueThen
drawtext @flash.buf 1 Tahoma 40 200 260 BlueThen.com
drawcopy -m @flash.buf 0 0 800 800 @FlashLight 0 0 400 400
}
}
}
on *:close:@flashlight: window -c @flash.buf | set %flash.off y