3 ms·
Show HN: Coding a desktop extender with AutoIT
; You can download the executable here: http://sites.google.com/site/bryanbottebell/bryan-bottebell-s-projects/BRYden.zip
#Region ; Directives created by AutoIt3Wrapper_GUI
#AutoIt3Wrapper_icon=bryden.ico
#AutoIt3Wrapper_outfile=BRYden.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=n
#EndRegion ; Directives created by AutoIt3Wrapper_GUI
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.2.10.0
Author: James Bryan Bottebell
Script Function: BRYden pseudo desktop extender
Template AutoIt script.
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#Include <Constants.au3>
Opt("TrayAutoPause",0) ; Script will not be paused when clicking the tray icon.
ToolTip("You still can't WIDEN your screen but you can now BRYden it!"&@CRLF&@CRLF&" Written by James Bryan Bottebell - January 2012",@DesktopWidth/2,@DesktopHeight/2,"BRYden",1)
sleep(5000)
ToolTip("If your windows get lost just press [WIN]+D twice" ,@DesktopWidth/2,@DesktopHeight/2,"BRYden",1)
sleep(3000)
ToolTip("")
;TrayTip("BRYden", "You still can't WIDEN your screen but you can now BRYden it!", 2, 1)
TraySetState()
TrayItemSetText($TRAY_ITEM_EXIT,"Exit BRYden")
TrayItemSetText($TRAY_ITEM_PAUSE,"Pause BRYden")
while 1
while MouseGetPos(0)>@DesktopWidth-2
$wins=WinList()
for $counter=1 to $wins[0][0]
$title=$wins[$counter][1]
$winpos=WinGetPos($title)
winmove($title,"",$winpos[0]-100,$winpos[1])
Next
WEnd
while MouseGetPos(0)<2
$wins=WinList()
for $counter=1 to $wins[0][0]
$title=$wins[$counter][1]
$winpos=WinGetPos($title)
winmove($title,"",$winpos[0]+100,$winpos[1])
Next
WEnd
Sleep(1)
WEnd