Der Saver ist ein Script dass den Bildschirm von "Blicken anderer" schützt. Auf knopfruck verdunkelt es den Bildschirm.
Viel Spass:
Spoiler anzeigen
msgbox(0, 'Saver', 'Scripted by Stefan ( Scripter192 )'&@CRLF&'Press F1 for using the Saver'&@crlf&'Press F1 a second time for deactivade the saver'&@CRLF&'Press Strg + Alt + Esc to exit', 0)
[/autoit] [autoit][/autoit] [autoit]#region ### SAVER ###
$saver = guicreate('Saver', @desktopwidth + 100, @desktopheight + 100, -50, -50)
GUISetBkColor(0x000000)
#endregion ### SAVER ###
#region ### VARIABLES + HOTKEYS ###
$status = 0
$trans = 0
HotKeySet('{F1}', 'saver')
HotKeySet('^!{ESC}', 'ext')
#EndRegion ### VAIABLES + HOTKEYS ###
#Region ### SCRIPT ###
while 1
$jetzt = 0
if $status = 1 then
WinSetState($saver, '', @SW_SHOW)
if $status = 1 then MouseMove(0, @desktopheight, 1)
EndIf
$trans = 0
WEnd
#EndRegion ### SCRIPT ###
#region ### FUNCTIONS ###
func saver()
if $status = 0 Then
$status = 1
guisetstate(@SW_SHOW, $saver)
WinSetOnTop($saver, '', 1)
Do
sleep(1)
$trans = $trans + 1
WinSetTrans($saver, '', $trans)
Until $trans = 255
$jetzt = 1
EndIf
if $jetzt = 0 then
if $status = 1 Then
$trans = 255
$status = 0
Do
sleep(1)
$trans = $trans - 1
WinSetTrans($saver, '', $trans)
until $trans = 0
guisetstate(0, $saver)
EndIf
EndIf
EndFunc
func ext()
beep(1000)
TrayTip('EXIT', 'Exit NOW .....', 10)
sleep(6000)
Exit
EndFunc
#endregion ### FUNCTIONS ###
MFG Scripter192