DonationCoder.com forum
 
Read-only archive. This is a static copy of the DonationCoder.com forum. Reading and searching work as before; logging in, posting and private messages do not.
Archive of 2026-10-21 · About this archive · Main site

Last post Author Topic: IDEA: Use AHK GUI to make translucent overlay over apps that are not skinnable  (Read 57,957 times)

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
Any particular font you would like used?

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
I should probably stick with Arial for now, or whatever Windows standard is.
If I see the word "Arial" or "Helvetica" in the script, I can just change it later, right?

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
If I see the word "Arial" or "Helvetica" in the script, I can just change it later, right?
Yes, it will be easily changed.

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
Give this a shot (change variables at top to suit):

Code
Header_Text := "EVD CAP 8"
Font_Size   := "56"
Font_Style  := "Arial"
Font_Color  := "Yellow"


Gui, 1: +Toolwindow -Caption +Lastfound +AlwaysOnTop
GUI_ID := WinExist()
Gui, 1: +LastFound
Gui, 1: Margin, 0, 0

Gui, 1: Font, s%Font_Size% c%Font_Color%, % Font_Style
Gui, 1: Add, Text, xm+450 ym+5  0x200 vmyText, % Header_Text
Gui, 1: Font
Gui, 1: Color, EEAA99
WinSet, Transcolor, EEAA99

Gui, 1: Add, Button, xm+40  ym+125 w120 h25 vmyButton01 gonClick, NDF + LTC mp2
Gui, 1: Add, Button, xm+40  ym+150 w120 h25 vmyButton02 gonClick, DF + LTC mp2
Gui, 1: Add, Button, xm+40  ym+175 w120 h25 vmyButton03 gonClick, PAL + LTC mp2

Gui, 1: Add, Button, xm+40  ym+220 w120 h25 vmyButton04 gonClick, NDF L-R + L-LTC simo
Gui, 1: Add, Button, xm+40  ym+245 w120 h25 vmyButton05 gonClick, DF L-R + L-LTC simo
Gui, 1: Add, Button, xm+40  ym+270 w120 h25 vmyButton06 gonClick, PAL L-R + L-LTC simo

Gui, 1: Add, Button, xm+230 ym+125 w120 h25 vmyButton07 gonClick, NDF 3-4 + 3-LTC mp2
Gui, 1: Add, Button, xm+230 ym+150 w120 h25 vmyButton08 gonClick, DF 3-4 + 3-LTC mp2
Gui, 1: Add, Button, xm+230 ym+175 w120 h25 vmyButton09 gonClick, PAL 3-4 + 3-LTC mp2

Gui, 1: Add, Button, xm+230 ym+220 w120 h25 vmyButton10 gonClick, Future button 1
Gui, 1: Add, Button, xm+230 ym+245 w120 h25 vmyButton11 gonClick, Future button 2
Gui, 1: Add, Button, xm+230 ym+270 w120 h25 vmyButton12 gonClick, Future button 3

Gui, 1: Add, Button, xm+915 ym+125 w120 h25 vmyButton13 gonClick, Future button 4
Gui, 1: Add, Button, xm+915 ym+150 w120 h25 vmyButton14 gonClick, Future button 5
Gui, 1: Add, Button, xm+915 ym+175 w120 h25 vmyButton15 gonClick, Future button 6

Gui, 1: Add, Button, xm+350 ym+710 w100 h25 vmyButton16 gonClick, Switch to NTSC
Gui, 1: Add, Button, xm+465 ym+710 w100 h25 vmyButton17 gonClick, Switch to PAL

Gui, 1: Show, x0 y0 w1280 h768, Overlay

Return ; End of auto-execute section.


onClick:
{
    Gui, 2: Submit, NoHide
    If ( A_GuiControl = "myButton01" )
    {
        ; Do stuff here.
        MsgBox, You clicked "NDF + LTC mp2".
    }
    Else If ( A_GuiControl = "myButton02" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "DF + LTC mp2".
    }
    Else If ( A_GuiControl = "myButton03" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "PAL + LTC mp2".
    }
    Else If ( A_GuiControl = "myButton04" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "NDF L-R + L-LTC simo".
    }
    Else If ( A_GuiControl = "myButton05" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "DF L-R + L-LTC simo".
    }
    Else If ( A_GuiControl = "myButton06" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "PAL L-R + L-LTC simo".
    }
    Else If ( A_GuiControl = "myButton07" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "NDF 3-4 + 3-LTC mp2".
    }
    Else If ( A_GuiControl = "myButton08" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "DF 3-4 + 3-LTC mp2".
    }
    Else If ( A_GuiControl = "myButton09" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "PAL 3-4 + 3-LTC mp2".
    }
    Else If ( A_GuiControl = "myButton10" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future button 1".
    }
    Else If ( A_GuiControl = "myButton11" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future button 2".
    }
    Else If ( A_GuiControl = "myButton12" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future button 3".
    }
    Else If ( A_GuiControl = "myButton13" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future button 4".
    }
    Else If ( A_GuiControl = "myButton14" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future button 5".
    }
    Else If ( A_GuiControl = "myButton15" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future button 6".
    }
    Else If ( A_GuiControl = "myButton16" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Switch to NTSC".
    }
    Else If ( A_GuiControl = "myButton17" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Switch to PAL".
    }
}
Return

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
It works!

Now I just plug in my scripts where it says MsgBox and see what happens!

Thanks.

I'll give a report tomorrow. Your name will be golden around the office.

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
It works!
Thanks.

Sweet.  =]  You're welcome...glad to help.

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
Got the "Switch to PAL" button to work.
Will work on the others soon.
But the old hotkey of Windows-P no longer works for "Switch to PAL"
Is this because of a stray "RETURN" somewhere in the script?
Or maybe because the hotkeys should be placed first in the script, before the button data?

Also, you won't believe this.
The overlay doesn't show up in a VNC remote session!
Don't know if there's anything that can be done scriptwise... might have to ask the video expert here how to remedy that.

But thanks so far!

cranioscopical

  • Friend of the Site
  • Supporting Member
  • Joined in 2006
  • **
  • Posts: 4,776
    • Cody Award
    • Official Forum Clown
    • rotten turkey sandwich - Rotten Turkey Sandwich
It works!
Thanks.

Sweet.  =]  You're welcome...glad to help.
Well done, Golden!
Chris

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
Got the "Switch to PAL" button to work.
Will work on the others soon.
But the old hotkey of Windows-P no longer works for "Switch to PAL"
Is this because of a stray "RETURN" somewhere in the script?
Or maybe because the hotkeys should be placed first in the script, before the button data?

Does it work if you first click the actual vidcap window?  If you've clicked one of the overlay buttons first, it would have focus and any vidcap window hotkeys would not work.  We should be able to get around this if this is the case.

Also, you won't believe this.
The overlay doesn't show up in a VNC remote session!
Don't know if there's anything that can be done scriptwise... might have to ask the video expert here how to remedy that.

Hmmm...I could understand that if we were using a percentage of transparency but we're not.  Which version/flavour of VNC is this?

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
I've gone home for the day so I can't do any experimenting - but I know it will work soon.

as far as VNC...

UltraVNC with video mirror driver on the server side
TightVNC on the client side...

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
I set up a test box with UltraVNC.  Do the following on the server side:

1) Start menu > Programs > UltraVNC > Edit Settings
2) Screen Capture tab.  Check the 'Capture Alpha-Blending' box.
3) Restart VNC service (or reboot that box).

Should work now...

cranioscopical

  • Friend of the Site
  • Supporting Member
  • Joined in 2006
  • **
  • Posts: 4,776
    • Cody Award
    • Official Forum Clown
    • rotten turkey sandwich - Rotten Turkey Sandwich
I set up a test box with UltraVNC...
My goodness, you do go out of your way to help people!
My hat's off to you.
Chris

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
My goodness, you do go out of your way to help people!
My hat's off to you.

Anything and everything in the name of software, eh?  =]

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
got all the buttons working - overlay okay too now!

still waiting for engineer to give me net access so I can move the script back to my email computer and show you what I've done.

(hotkeys are null in the version I made...)

till tomorrow...

thanks

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
G'morning.
Hope it's not disastrous that the code is pasted into the message like this. For some reason I couldn't find the buttons which set it apart.

Enjoyed the overlay all yesterday.
All the hotkeys are at the bottom. I'm guessing they don't work because of a bracket symbol or a return command. Or maybe the black drop shadow I made as GUI 3 is messing things up.

The 2nd shift guy likes it too. He would like a transparency slider which can make the buttons disappear when he doesn't need them, but I told him to come up with some $$$.

Code: (autoit)
Header_Text3 := "EVDCAP 8"
Font_Size3   := "56"
Font_Style3  := "Lucida Sans Unicode"
Font_Color3  := "Black"

Gui, 3: +Toolwindow -Caption +Lastfound +AlwaysOnTop
GUI_ID := WinExist()
Gui, 3: +LastFound
Gui, 3: Margin, 0, 0

Gui, 3: Font, s%Font_Size3% c%Font_Color3%, % Font_Style3
Gui, 3: Add, Text, xm+457 ym+2 0x200 vmyText, % Header_Text3
Gui, 3: Font
Gui, 3: Color, EEAA99
Winset, Transcolor, EEAA99

Gui, 3: Show, x0 y0 w1280 h768, Overlay


Header_Text := "EVDCAP 8"
Font_Size   := "56"
Font_Style  := "Lucida Sans Unicode"
Font_Color  := "Red"

Gui, 1: +Toolwindow -Caption +Lastfound +AlwaysOnTop
GUI_ID := WinExist()
Gui, 1: +LastFound
Gui, 1: Margin, 0, 0

Gui, 1: Font, s%Font_Size% c%Font_Color%, % Font_Style
Gui, 1: Add, Text, xm+460 ym+0 0x200 vmyText, % Header_Text
Gui, 1: Font
Gui, 1: Color, EEAA99
Winset, Transcolor, EEAA99

Gui, 1: Add, Button, xm+40  ym+125 w145 h25 vmyButton01 gonClick, NDF + LTC mp2 (#1)
Gui, 1: Add, Button, xm+40  ym+150 w145 h25 vmyButton02 gonClick, DF + LTC mp2 (#2)
Gui, 1: Add, Button, xm+40  ym+175 w145 h25 vmyButton03 gonClick, PAL + LTC mp2 (#3)

Gui, 1: Add, Button, xm+40  ym+220 w145 h25 vmyButton04 gonClick, NDF L-R + L-LTC simo (#4)
Gui, 1: Add, Button, xm+40  ym+245 w145 h25 vmyButton05 gonClick, DF L-R + L-LTC simo (#5)
Gui, 1: Add, Button, xm+40  ym+270 w145 h25 vmyButton06 gonClick, PAL L-R + L-LTC simo (#6)

Gui, 1: Add, Button, xm+230  ym+125 w145 h25 vmyButton07 gonClick, NDF 3-4 + 3-LTC mp2 (#7)
Gui, 1: Add, Button, xm+230  ym+150 w145 h25 vmyButton08 gonClick, DF 3-4 + 3-LTC mp2 (#8)
Gui, 1: Add, Button, xm+230  ym+175 w145 h25 vmyButton09 gonClick, PAL 3-4 + 3-LTC mp2 (#9)

Gui, 1: Add, Button, xm+230  ym+220 w145 h25 vmyButton10 gonClick, Future Button 1
Gui, 1: Add, Button, xm+230  ym+245 w145 h25 vmyButton11 gonClick, Future Button 2
Gui, 1: Add, Button, xm+230  ym+270 w145 h25 vmyButton12 gonClick, Future Button 3

Gui, 1: Add, Button, xm+915  ym+125 w145 h25 vmyButton13 gonClick, Future Button 4
Gui, 1: Add, Button, xm+915  ym+150 w145 h25 vmyButton14 gonClick, Future Button 5
Gui, 1: Add, Button, xm+915  ym+175 w145 h25 vmyButton15 gonClick, Future Button 6

Gui, 1: Add, Button, xm+330  ym+705 w120 h25 vmyButton16 gonClick, Switch to NTSC (#n)
Gui, 1: Add, Button, xm+450  ym+705 w120 h25 vmyButton17 gonClick, Switch to PAL (#p)

Gui, 1: Show, x0 y0 w1280 h768, Overlay




onClick:
{
	Gui, 2: Submit, NoHide
	If ( A_GuiControl = "myButton01" )
	{
		SetTitleMatchMode, 2
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN
	}

	Else If ( A_GuiControl = "myButton02" )
	{
SetTitleMatchMode, 2
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN
	}
	
	Else If ( A_GuiControl = "myButton03" )
	{
SetTitleMatchMode, 2
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, pal{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN
	}

	Else If ( A_GuiControl = "myButton04" )
	{
SetTitleMatchMode, 2
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
RETURN
	}

	Else If ( A_GuiControl = "myButton05" )
	{
SetTitleMatchMode, 2
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
RETURN
	}

	Else If ( A_GuiControl = "myButton06" )
	{
SetTitleMatchMode, 2
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, pal{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
RETURN
	}
	
	Else If ( A_GuiControl = "myButton07" )
	{
SetTitleMatchMode, 2
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN
	}

	Else If ( A_GuiControl = "myButton08" )
	{
SetTitleMatchMode, 2
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN
	}

	Else If ( A_GuiControl = "myButton09" )
	{
SetTitleMatchMode, 2
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project...,
Sleep, 200 
Send, pal{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN
	}

	Else If ( A_GuiControl = "myButton10" )
	{
		; Do other stuff here.
		MsgBox, You clicked "Future Button 1".
	}
	Else If ( A_GuiControl = "myButton11" )
	{
		; Do other stuff here.
		MsgBox, You clicked "Future Button 2".
	}
	Else If ( A_GuiControl = "myButton12" )
	{
		; Do other stuff here.
		MsgBox, You clicked "Future Button 3".
	}
	Else If ( A_GuiControl = "myButton13" )
	{
		; Do other stuff here.
		MsgBox, You clicked "Future Button 4".
	}
	Else If ( A_GuiControl = "myButton14" )
	{
		; Do other stuff here.
		MsgBox, You clicked "Future Button 5".
	}
	Else If ( A_GuiControl = "myButton15" )
	{
		; Do other stuff here.
		MsgBox, You clicked "Future Button 6".
	}
	Else If ( A_GuiControl = "myButton16" )
	{SetTitleMatchMode, 2
	WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 100
Send, {ALTDOWN}{ALTUP}op
WinWait, Preferences, 
IfWinNotActive, Preferences, , WinActivate, Preferences, 
WinWaitActive, Preferences, 
MouseClick, left,  105,  98
Sleep, 100
MouseClick, left,  392,  58
Sleep, 200
Send {Up}
Sleep, 100
Send, {ENTER}
Sleep, 100
Send, {ENTER}
return
	}
	Else If ( A_GuiControl = "myButton17" )
	{SetTitleMatchMode, 2
		WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 100
MouseClick, left,  248,  12
Sleep, 100
Send, {ALTDOWN}{ALTUP}op
WinWait, Preferences, 
IfWinNotActive, Preferences, , WinActivate, Preferences, 
WinWaitActive, Preferences, 
MouseClick, left,  105,  98
Sleep, 100
MouseClick, left,  392,  58
Sleep, 200
Send {Down}
Sleep, 100
Send, {ENTER}
Sleep, 100
Send, {ENTER}
return
	}
}
Return	





SetTitleMatchMode, 2
#n::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 100
Send, {ALTDOWN}{ALTUP}op
WinWait, Preferences, 
IfWinNotActive, Preferences, , WinActivate, Preferences, 
WinWaitActive, Preferences, 
MouseClick, left,  105,  98
Sleep, 100
MouseClick, left,  392,  58
Sleep, 200
Send {Up}
Sleep, 100
Send, {ENTER}
Sleep, 100
Send, {ENTER}
return

SetTitleMatchMode, 2
#p::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 100
MouseClick, left,  248,  12
Sleep, 100
Send, {ALTDOWN}{ALTUP}op
WinWait, Preferences, 
IfWinNotActive, Preferences, , WinActivate, Preferences, 
WinWaitActive, Preferences, 
MouseClick, left,  105,  98
Sleep, 100
MouseClick, left,  392,  58
Sleep, 200
Send {Down}
Sleep, 100
Send, {ENTER}
Sleep, 100
Send, {ENTER}
return

!numpad0::
MouseClick, left,  710,  460
Sleep, 100
WinWait, Ingest Upload Verification Page - Mozilla Firefox, 
IfWinNotActive, Ingest Upload Verification Page - Mozilla Firefox, , WinActivate, Ingest Upload Verification Page - Mozilla Firefox, 
WinWaitActive, Ingest Upload Verification Page - Mozilla Firefox, 
Sleep, 100
MouseClick, left,  711,  253
Sleep, 100
WinWait, Ingest Upload Sucess Home Page - Mozilla Firefox, 
IfWinNotActive, Ingest Upload Sucess Home Page - Mozilla Firefox, , WinActivate, Ingest Upload Sucess Home Page - Mozilla Firefox, 
WinWaitActive, Ingest Upload Sucess Home Page - Mozilla Firefox, 
Sleep, 100
MouseClick, left,  713,  405
Sleep, 100
MouseClick, left,  713,  370
return

:*:aspera::
Run, C:\Program Files\Aspera\Aspera Scp\bin\asperacopy.exe
WinWait, Aspera File Transfer, 
IfWinNotActive, Aspera File Transfer, , WinActivate, Aspera File Transfer, 
WinWaitActive, Aspera File Transfer, 
MouseClick, left,  491,  131
Sleep, 100
MouseClick, left,  794,  233
Sleep, 100
Send, {ALTDOWN}{SPACE}x{ALTUP}{ALTDOWN}{ALTUP}{RIGHT}{RIGHT}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}
MouseClick, left,  390,  116
Sleep, 100
RETURN

SetTitleMatchMode, 2
#1::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN

SetTitleMatchMode, 2
#2::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN

SetTitleMatchMode, 2
#3::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, pal{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN

SetTitleMatchMode, 2
#4::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
RETURN

SetTitleMatchMode, 2
#5::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
RETURN

SetTitleMatchMode, 2
#6::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, pal{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
RETURN

SetTitleMatchMode, 2
#7::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN

SetTitleMatchMode, 2
#8::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project..., 
Sleep, 200
Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN

SetTitleMatchMode, 2
#9::
WinWait, Digital Rapids Stream, 
IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
WinWaitActive,  Digital Rapids Stream, 
MouseClick, left,  248,  12
Sleep, 200
Send, {ALTDOWN}f{ALTUP}o
WinWait, Open Local Project..., 
IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
WinWaitActive, Open Local Project...,
Sleep, 200 
Send, pal{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
RETURN
« Last Edit: September 17, 2009, 05:02 PM by mouser »

mouser

  • First Author
  • Administrator
  • Joined in 2005
  • *****
  • Posts: 40,931
    • Gathering Badge
    • Plugin Coding Medal
    • Participated in NANY Challenge Seventeen Times
    • Cody Award
    • Coding Snacks
    • Volunteers/Staff
i added the code highlighting -- you just select the text and then choose the language from the Code Highlighting box (autoit is suitable for ahk).

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
Thx.
It certainly made it colorful!

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
The hotkeys work for me.  I did clean up your formatting a bit; sorry for imposing my braces and indentation habits upon you.  Also, you only need "SetTitleMatchMode, 2" once in the script (at the top, unless you're changing it later for some reason).  As for hiding the overlay, you can do this easily with a toggle-type of hotkey.  I added an F1 toggle hotkey for you but you could change it to whatever you like.  Here's the toggle code (it's also included in the full script below):

Code: (autoit)
F1:: ; Toggle the GUI.
{
    If ! ( Toggle_Gui )
    {
        Gui, 3: Show, Hide
        Gui, 1: Show, Hide
    }
    Else
    {
        Gui, 3: Show
        Gui, 1: Show
    }
    Toggle_Gui := !Toggle_Gui
}
Return


Code: (autoit)
SetTitleMatchMode, 2
DetectHiddenWindows, On

Header_Text3 := "EVDCAP 8"
Font_Size3   := "56"
Font_Style3  := "Lucida Sans Unicode"
Font_Color3  := "Black"

Gui, 3: +Toolwindow -Caption +Lastfound +AlwaysOnTop
Gui, 3: +LastFound
Gui, 3: Margin, 0, 0
Gui, 3: Font, s%Font_Size3% c%Font_Color3%, % Font_Style3
Gui, 3: Add, Text, xm+457 ym+2 0x200 vmyText, % Header_Text3
Gui, 3: Font
Gui, 3: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 3: Show, x0 y0 w1280 h768, Overlay

Header_Text := "EVDCAP 8"
Font_Size   := "56"
Font_Style  := "Lucida Sans Unicode"
Font_Color  := "Red"

Gui, 1: +Toolwindow -Caption +Lastfound +AlwaysOnTop
Gui, 1: +LastFound
Gui, 1: Margin, 0, 0
Gui, 1: Font, s%Font_Size% c%Font_Color%, % Font_Style
Gui, 1: Add, Text, xm+460 ym+0 0x200 vmyText, % Header_Text
Gui, 1: Font
Gui, 1: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 1: Add, Button, xm+40  ym+125 w145 h25 vmyButton01 gonClick, NDF + LTC mp2 (#1)
Gui, 1: Add, Button, xm+40  ym+150 w145 h25 vmyButton02 gonClick, DF + LTC mp2 (#2)
Gui, 1: Add, Button, xm+40  ym+175 w145 h25 vmyButton03 gonClick, PAL + LTC mp2 (#3)
Gui, 1: Add, Button, xm+40  ym+220 w145 h25 vmyButton04 gonClick, NDF L-R + L-LTC simo (#4)
Gui, 1: Add, Button, xm+40  ym+245 w145 h25 vmyButton05 gonClick, DF L-R + L-LTC simo (#5)
Gui, 1: Add, Button, xm+40  ym+270 w145 h25 vmyButton06 gonClick, PAL L-R + L-LTC simo (#6)
Gui, 1: Add, Button, xm+230  ym+125 w145 h25 vmyButton07 gonClick, NDF 3-4 + 3-LTC mp2 (#7)
Gui, 1: Add, Button, xm+230  ym+150 w145 h25 vmyButton08 gonClick, DF 3-4 + 3-LTC mp2 (#8)
Gui, 1: Add, Button, xm+230  ym+175 w145 h25 vmyButton09 gonClick, PAL 3-4 + 3-LTC mp2 (#9)
Gui, 1: Add, Button, xm+230  ym+220 w145 h25 vmyButton10 gonClick, Future Button 1
Gui, 1: Add, Button, xm+230  ym+245 w145 h25 vmyButton11 gonClick, Future Button 2
Gui, 1: Add, Button, xm+230  ym+270 w145 h25 vmyButton12 gonClick, Future Button 3
Gui, 1: Add, Button, xm+915  ym+125 w145 h25 vmyButton13 gonClick, Future Button 4
Gui, 1: Add, Button, xm+915  ym+150 w145 h25 vmyButton14 gonClick, Future Button 5
Gui, 1: Add, Button, xm+915  ym+175 w145 h25 vmyButton15 gonClick, Future Button 6
Gui, 1: Add, Button, xm+330  ym+705 w120 h25 vmyButton16 gonClick, Switch to NTSC (#n)
Gui, 1: Add, Button, xm+450  ym+705 w120 h25 vmyButton17 gonClick, Switch to PAL (#p)
Gui, 1: Show, x0 y0 w1280 h768, Overlay


F1:: ; Toggle the GUI.
{
    If ! ( Toggle_Gui )
    {
        Gui, 3: Show, Hide
        Gui, 1: Show, Hide
    }
    Else
    {
        Gui, 3: Show
        Gui, 1: Show
    }
    Toggle_Gui := !Toggle_Gui
}
Return

onClick:
{
    Gui, 2: Submit, NoHide
    If ( A_GuiControl = "myButton01" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton02" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton03" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, pal{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton04" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton05" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton06" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, pal{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton07" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }

    Else If ( A_GuiControl = "myButton08" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton09" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project...,
        Sleep, 200 
        Send, pal{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton10" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 1".
    }
    Else If ( A_GuiControl = "myButton11" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 2".
    }
    Else If ( A_GuiControl = "myButton12" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 3".
    }
    Else If ( A_GuiControl = "myButton13" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 4".
    }
    Else If ( A_GuiControl = "myButton14" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 5".
    }
    Else If ( A_GuiControl = "myButton15" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 6".
    }
    Else If ( A_GuiControl = "myButton16" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 100
        Send, {ALTDOWN}{ALTUP}op
        WinWait, Preferences, 
        IfWinNotActive, Preferences, , WinActivate, Preferences, 
        WinWaitActive, Preferences, 
        MouseClick, left,  105,  98
        Sleep, 100
        MouseClick, left,  392,  58
        Sleep, 200
        Send {Up}
        Sleep, 100
        Send, {ENTER}
        Sleep, 100
        Send, {ENTER}
    }
    Else If ( A_GuiControl = "myButton17" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 100
        MouseClick, left,  248,  12
        Sleep, 100
        Send, {ALTDOWN}{ALTUP}op
        WinWait, Preferences, 
        IfWinNotActive, Preferences, , WinActivate, Preferences, 
        WinWaitActive, Preferences, 
        MouseClick, left,  105,  98
        Sleep, 100
        MouseClick, left,  392,  58
        Sleep, 200
        Send {Down}
        Sleep, 100
        Send, {ENTER}
        Sleep, 100
        Send, {ENTER}
    }
}

#n::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 100
    Send, {ALTDOWN}{ALTUP}op
    WinWait, Preferences,
    IfWinNotActive, Preferences, , WinActivate, Preferences,
    WinWaitActive, Preferences,
    MouseClick, left,  105,  98
    Sleep, 100
    MouseClick, left,  392,  58
    Sleep, 200
    Send {Up}
    Sleep, 100
    Send, {ENTER}
    Sleep, 100
    Send, {ENTER}
}
Return

#p::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 100
    MouseClick, left,  248,  12
    Sleep, 100
    Send, {ALTDOWN}{ALTUP}op
    WinWait, Preferences,
    IfWinNotActive, Preferences, , WinActivate, Preferences,
    WinWaitActive, Preferences,
    MouseClick, left,  105,  98
    Sleep, 100
    MouseClick, left,  392,  58
    Sleep, 200
    Send {Down}
    Sleep, 100
    Send, {ENTER}
    Sleep, 100
    Send, {ENTER}
}
Return

!numpad0::
{
    MouseClick, left,  710,  460
    Sleep, 100
    WinWait, Ingest Upload Verification Page - Mozilla Firefox,
    IfWinNotActive, Ingest Upload Verification Page - Mozilla Firefox, , WinActivate, Ingest Upload Verification Page - Mozilla Firefox,
    WinWaitActive, Ingest Upload Verification Page - Mozilla Firefox,
    Sleep, 100
    MouseClick, left,  711,  253
    Sleep, 100
    WinWait, Ingest Upload Sucess Home Page - Mozilla Firefox,
    IfWinNotActive, Ingest Upload Sucess Home Page - Mozilla Firefox, , WinActivate, Ingest Upload Sucess Home Page - Mozilla Firefox,
    WinWaitActive, Ingest Upload Sucess Home Page - Mozilla Firefox,
    Sleep, 100
    MouseClick, left,  713,  405
    Sleep, 100
    MouseClick, left,  713,  370
}
Return

:*:aspera::
{
    Run, C:\Program Files\Aspera\Aspera Scp\bin\asperacopy.exe
    WinWait, Aspera File Transfer,
    IfWinNotActive, Aspera File Transfer, , WinActivate, Aspera File Transfer,
    WinWaitActive, Aspera File Transfer,
    MouseClick, left,  491,  131
    Sleep, 100
    MouseClick, left,  794,  233
    Sleep, 100
    Send, {ALTDOWN}{SPACE}x{ALTUP}{ALTDOWN}{ALTUP}{RIGHT}{RIGHT}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}
    MouseClick, left,  390,  116
    Sleep, 100
}
Return

#1::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#2::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#3::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, pal{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#4::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
}
Return

#5::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
}
Return

#6::
{   WinWait, Digital Rapids Stream, 
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
    WinWaitActive,  Digital Rapids Stream, 
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project..., 
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
    WinWaitActive, Open Local Project..., 
    Sleep, 200
    Send, pal{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
}
Return

#7::
{
    WinWait, Digital Rapids Stream, 
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
    WinWaitActive,  Digital Rapids Stream, 
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project..., 
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
    WinWaitActive, Open Local Project..., 
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#8::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#9::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, pal{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

; EOF

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
Clean code.
There's nothing better.
How'd you like the drop shadow effect?
Feel free to borrow that advanced coding technique.

Thanks again sir.

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
So, is everything working, as desired, to this point?  Hotkeys, buttons, etc.

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
Haven't tried it yet. Bossman hasn't transferred to the script yet, and the encoding computers are firewalled from my normal internet computer.

Soon I will see it in its glory.

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
Everything worked.
Mission accomplished.
Thank you sir.

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
Adding one more function...Woohoo!

(Added drivespace remaining to the GUI - lines 39 thru 98)
Study and admire.

But how do I make the Drivespacefree value refresh itself every 5 minutes?

The AHK guys told me to use the SETTIMER command, but the scripts given as examples don't seem to have anything related to mine - so I can't just cut and paste their code...

Thx


Code: (autoit)
SetTitleMatchMode, 2
DetectHiddenWindows, On


Header_Text := "EVDCAP 8"
Font_Size   := "56"
Font_Style  := "Lucida Sans Unicode"
Font_Color  := "Green"

Gui, 1: +Toolwindow -Caption +Lastfound +AlwaysOnTop
Gui, 1: +LastFound
Gui, 1: Margin, 0, 0
Gui, 1: Font, s%Font_Size% c%Font_Color%, % Font_Style
Gui, 1: Add, Text, xm+460 ym+0 0x200 vmyText, % Header_Text
Gui, 1: Font
Gui, 1: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 1: Add, Button, xm+40  ym+125 w145 h25 vmyButton01 gonClick, NDF + LTC mp2 (#1)
Gui, 1: Add, Button, xm+40  ym+150 w145 h25 vmyButton02 gonClick, DF + LTC mp2 (#2)
Gui, 1: Add, Button, xm+40  ym+175 w145 h25 vmyButton03 gonClick, PAL + LTC mp2 (#3)
Gui, 1: Add, Button, xm+40  ym+220 w145 h25 vmyButton04 gonClick, NDF L-R + L-LTC simo (#4)
Gui, 1: Add, Button, xm+40  ym+245 w145 h25 vmyButton05 gonClick, DF L-R + L-LTC simo (#5)
Gui, 1: Add, Button, xm+40  ym+270 w145 h25 vmyButton06 gonClick, PAL L-R + L-LTC simo (#6)
Gui, 1: Add, Button, xm+230  ym+125 w145 h25 vmyButton07 gonClick, NDF 3-4 + 3-LTC mp2 (#7)
Gui, 1: Add, Button, xm+230  ym+150 w145 h25 vmyButton08 gonClick, DF 3-4 + 3-LTC mp2 (#8)
Gui, 1: Add, Button, xm+230  ym+175 w145 h25 vmyButton09 gonClick, PAL 3-4 + 3-LTC mp2 (#9)
Gui, 1: Add, Button, xm+230  ym+220 w145 h25 vmyButton10 gonClick, Future Button 1
Gui, 1: Add, Button, xm+230  ym+245 w145 h25 vmyButton11 gonClick, Future Button 2
Gui, 1: Add, Button, xm+230  ym+270 w145 h25 vmyButton12 gonClick, Future Button 3
Gui, 1: Add, Button, xm+915  ym+125 w145 h25 vmyButton13 gonClick, Future Button 4
Gui, 1: Add, Button, xm+915  ym+150 w145 h25 vmyButton14 gonClick, Future Button 5
Gui, 1: Add, Button, xm+915  ym+175 w145 h25 vmyButton15 gonClick, Future Button 6
Gui, 1: Add, Button, xm+330  ym+705 w120 h25 vmyButton16 gonClick, Switch to NTSC (#n)
Gui, 1: Add, Button, xm+450  ym+705 w120 h25 vmyButton17 gonClick, Switch to PAL (#p)
Gui, 1: Show, x0 y0 w1280 h768, Overlay



DrivespaceFree, freeQ, Q:\
DrivespaceFree, freeR, R:\
DrivespaceFree, freeS, S:\

Header_Text2 := " Gb Free on Cap 6"
Font_Size2   := "14"
Font_Style2  := "Lucida Sans Unicode"
Font_Color2  := "Green"

Gui, 2: +Toolwindow -Caption +Lastfound +AlwaysOnTop
GUI_ID := WinExist()
Gui, 2: +LastFound
Gui, 2: Margin, 0, 0

Gui, 2: Font, s%Font_Size2% c%Font_Color2%, % Font_Style2
Gui, 2: Add, Text, xm+900 ym+00 0x200 vmyText, % Round(freeQ/1024) Header_Text2
Gui, 2: Font
Gui, 2: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 2: Show, x0 y0 w1280 h768, Overlay




Header_Text3 := " Gb Free on Cap 7"
Font_Size3   := "14"
Font_Style3  := "Lucida Sans Unicode"
Font_Color3  := "Green"

Gui, 3: +Toolwindow -Caption +Lastfound +AlwaysOnTop
GUI_ID := WinExist()
Gui, 3: +LastFound
Gui, 3: Margin, 0, 0

Gui, 3: Font, s%Font_Size2% c%Font_Color2%, % Font_Style2
Gui, 3: Add, Text, xm+900 ym+30 0x200 vmyText, % Round(freeR/1024) Header_Text3
Gui, 3: Font
Gui, 3: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 3: Show, x0 y0 w1280 h768, Overlay




Header_Text4 := " Gb Free on Cap 8"
Font_Size4   := "14"
Font_Style4  := "Lucida Sans Unicode"
Font_Color4  := "Green"

Gui, 4: +Toolwindow -Caption +Lastfound +AlwaysOnTop
GUI_ID := WinExist()
Gui, 4: +LastFound
Gui, 4: Margin, 0, 0

Gui, 4: Font, s%Font_Size2% c%Font_Color2%, % Font_Style2
Gui, 4: Add, Text, xm+900 ym+60 0x200 vmyText, % Round(freeS/1024) Header_Text4
Gui, 4: Font
Gui, 4: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 4: Show, x0 y0 w1280 h768, Overlay


#T:: ; Toggle the GUI.
{
    If ! ( Toggle_Gui )
    {

        Gui, 1: Show, Hide
	Gui, 2: Show, Hide
	Gui, 3: Show, Hide
	Gui, 4: Show, Hide

    }
    Else
    {

        Gui, 1: Show
	Gui, 2: Show
	Gui, 3: Show, Hide
	Gui, 4: Show, Hide

    }
    Toggle_Gui := !Toggle_Gui
}
Return

onClick:
{
    Gui, 2: Submit, NoHide
    If ( A_GuiControl = "myButton01" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton02" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton03" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, pal{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton04" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton05" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton06" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, pal{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton07" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }

    Else If ( A_GuiControl = "myButton08" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton09" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project...,
        Sleep, 200 
        Send, pal{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton10" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 1".
    }
    Else If ( A_GuiControl = "myButton11" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 2".
    }
    Else If ( A_GuiControl = "myButton12" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 3".
    }
    Else If ( A_GuiControl = "myButton13" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 4".
    }
    Else If ( A_GuiControl = "myButton14" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 5".
    }
    Else If ( A_GuiControl = "myButton15" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 6".
    }
    Else If ( A_GuiControl = "myButton16" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 100
        Send, {ALTDOWN}{ALTUP}op
        WinWait, Preferences, 
        IfWinNotActive, Preferences, , WinActivate, Preferences, 
        WinWaitActive, Preferences, 
        MouseClick, left,  105,  98
        Sleep, 100
        MouseClick, left,  392,  58
        Sleep, 200
        Send {Up}
        Sleep, 100
        Send, {ENTER}
        Sleep, 100
        Send, {ENTER}
    }
    Else If ( A_GuiControl = "myButton17" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 100
        MouseClick, left,  248,  12
        Sleep, 100
        Send, {ALTDOWN}{ALTUP}op
        WinWait, Preferences, 
        IfWinNotActive, Preferences, , WinActivate, Preferences, 
        WinWaitActive, Preferences, 
        MouseClick, left,  105,  98
        Sleep, 100
        MouseClick, left,  392,  58
        Sleep, 200
        Send {Down}
        Sleep, 100
        Send, {ENTER}
        Sleep, 100
        Send, {ENTER}
    }
}

#n::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 100
    Send, {ALTDOWN}{ALTUP}op
    WinWait, Preferences,
    IfWinNotActive, Preferences, , WinActivate, Preferences,
    WinWaitActive, Preferences,
    MouseClick, left,  105,  98
    Sleep, 100
    MouseClick, left,  392,  58
    Sleep, 200
    Send {Up}
    Sleep, 100
    Send, {ENTER}
    Sleep, 100
    Send, {ENTER}
}
Return

#p::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 100
    MouseClick, left,  248,  12
    Sleep, 100
    Send, {ALTDOWN}{ALTUP}op
    WinWait, Preferences,
    IfWinNotActive, Preferences, , WinActivate, Preferences,
    WinWaitActive, Preferences,
    MouseClick, left,  105,  98
    Sleep, 100
    MouseClick, left,  392,  58
    Sleep, 200
    Send {Down}
    Sleep, 100
    Send, {ENTER}
    Sleep, 100
    Send, {ENTER}
}
Return

!numpad0::
{
    MouseClick, left,  710,  460
    Sleep, 100
    WinWait, Ingest Upload Verification Page - Mozilla Firefox,
    IfWinNotActive, Ingest Upload Verification Page - Mozilla Firefox, , WinActivate, Ingest Upload Verification Page - Mozilla Firefox,
    WinWaitActive, Ingest Upload Verification Page - Mozilla Firefox,
    Sleep, 100
    MouseClick, left,  711,  253
    Sleep, 100
    WinWait, Ingest Upload Sucess Home Page - Mozilla Firefox,
    IfWinNotActive, Ingest Upload Sucess Home Page - Mozilla Firefox, , WinActivate, Ingest Upload Sucess Home Page - Mozilla Firefox,
    WinWaitActive, Ingest Upload Sucess Home Page - Mozilla Firefox,
    Sleep, 100
    MouseClick, left,  713,  405
    Sleep, 100
    MouseClick, left,  713,  370
}
Return

:*:aspera::
{
    Run, C:\Program Files\Aspera\Aspera Scp\bin\asperacopy.exe
    WinWait, Aspera File Transfer,
    IfWinNotActive, Aspera File Transfer, , WinActivate, Aspera File Transfer,
    WinWaitActive, Aspera File Transfer,
    MouseClick, left,  491,  131
    Sleep, 100
    MouseClick, left,  794,  233
    Sleep, 100
    Send, {ALTDOWN}{SPACE}x{ALTUP}{ALTDOWN}{ALTUP}{RIGHT}{RIGHT}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}
    MouseClick, left,  390,  116
    Sleep, 100
}
Return

#1::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#2::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#3::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, pal{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#4::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
}
Return

#5::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
}
Return

#6::
{   WinWait, Digital Rapids Stream, 
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
    WinWaitActive,  Digital Rapids Stream, 
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project..., 
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
    WinWaitActive, Open Local Project..., 
    Sleep, 200
    Send, pal{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
}
Return

#7::
{
    WinWait, Digital Rapids Stream, 
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
    WinWaitActive,  Digital Rapids Stream, 
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project..., 
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
    WinWaitActive, Open Local Project..., 
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#8::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#9::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, pal{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

; EOF
« Last Edit: September 29, 2009, 05:37 PM by dwilbank »

skwire

  • I eat Coding Snacks for breakfast...
  • Global Moderator
  • Joined in 2005
  • *****
  • Posts: 5,297
    • Participated in NANY Challenge Seventeen Times
    • Coding Snacks
    • Superboy Coder
    • Cody Award
    • Volunteers/Staff
    • Gathering Badge
This should do what you want:

Code: (autoit)
SetTitleMatchMode, 2
DetectHiddenWindows, On


Header_Text := "EVDCAP 8"
Font_Size   := "56"
Font_Style  := "Lucida Sans Unicode"
Font_Color  := "Green"

Gui, 1: +Toolwindow -Caption +Lastfound +AlwaysOnTop
Gui, 1: +LastFound
Gui, 1: Margin, 0, 0
Gui, 1: Font, s%Font_Size% c%Font_Color%, % Font_Style
Gui, 1: Add, Text, xm+460 ym+0 0x200 vmyText1, % Header_Text
Gui, 1: Font
Gui, 1: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 1: Add, Button, xm+40  ym+125 w145 h25 vmyButton01 gonClick, NDF + LTC mp2 (#1)
Gui, 1: Add, Button, xm+40  ym+150 w145 h25 vmyButton02 gonClick, DF + LTC mp2 (#2)
Gui, 1: Add, Button, xm+40  ym+175 w145 h25 vmyButton03 gonClick, PAL + LTC mp2 (#3)
Gui, 1: Add, Button, xm+40  ym+220 w145 h25 vmyButton04 gonClick, NDF L-R + L-LTC simo (#4)
Gui, 1: Add, Button, xm+40  ym+245 w145 h25 vmyButton05 gonClick, DF L-R + L-LTC simo (#5)
Gui, 1: Add, Button, xm+40  ym+270 w145 h25 vmyButton06 gonClick, PAL L-R + L-LTC simo (#6)
Gui, 1: Add, Button, xm+230  ym+125 w145 h25 vmyButton07 gonClick, NDF 3-4 + 3-LTC mp2 (#7)
Gui, 1: Add, Button, xm+230  ym+150 w145 h25 vmyButton08 gonClick, DF 3-4 + 3-LTC mp2 (#8)
Gui, 1: Add, Button, xm+230  ym+175 w145 h25 vmyButton09 gonClick, PAL 3-4 + 3-LTC mp2 (#9)
Gui, 1: Add, Button, xm+230  ym+220 w145 h25 vmyButton10 gonClick, Future Button 1
Gui, 1: Add, Button, xm+230  ym+245 w145 h25 vmyButton11 gonClick, Future Button 2
Gui, 1: Add, Button, xm+230  ym+270 w145 h25 vmyButton12 gonClick, Future Button 3
Gui, 1: Add, Button, xm+915  ym+125 w145 h25 vmyButton13 gonClick, Future Button 4
Gui, 1: Add, Button, xm+915  ym+150 w145 h25 vmyButton14 gonClick, Future Button 5
Gui, 1: Add, Button, xm+915  ym+175 w145 h25 vmyButton15 gonClick, Future Button 6
Gui, 1: Add, Button, xm+330  ym+705 w120 h25 vmyButton16 gonClick, Switch to NTSC (#n)
Gui, 1: Add, Button, xm+450  ym+705 w120 h25 vmyButton17 gonClick, Switch to PAL (#p)
Gui, 1: Show, x0 y0 w1280 h768, Overlay



Header_Text2 := " Gb Free on Cap 6"
Font_Size2   := "14"
Font_Style2  := "Lucida Sans Unicode"
Font_Color2  := "Green"

Gui, 2: +Toolwindow -Caption +Lastfound +AlwaysOnTop
GUI_ID := WinExist()
Gui, 2: +LastFound
Gui, 2: Margin, 0, 0

Gui, 2: Font, s%Font_Size2% c%Font_Color2%, % Font_Style2
Gui, 2: Add, Text, xm+900 ym+00 w230 0x200 vmyText2, 
Gui, 2: Font
Gui, 2: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 2: Show, x0 y0 w1280 h768, Overlay




Header_Text3 := " Gb Free on Cap 7"
Font_Size3   := "14"
Font_Style3  := "Lucida Sans Unicode"
Font_Color3  := "Green"

Gui, 3: +Toolwindow -Caption +Lastfound +AlwaysOnTop
GUI_ID := WinExist()
Gui, 3: +LastFound
Gui, 3: Margin, 0, 0

Gui, 3: Font, s%Font_Size2% c%Font_Color2%, % Font_Style2
Gui, 3: Add, Text, xm+900 ym+30 w230 border 0x200 vmyText3,
Gui, 3: Font
Gui, 3: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 3: Show, x0 y0 w1280 h768, Overlay




Header_Text4 := " Gb Free on Cap 8"
Font_Size4   := "14"
Font_Style4  := "Lucida Sans Unicode"
Font_Color4  := "Green"

Gui, 4: +Toolwindow -Caption +Lastfound +AlwaysOnTop
GUI_ID := WinExist()
Gui, 4: +LastFound
Gui, 4: Margin, 0, 0

Gui, 4: Font, s%Font_Size2% c%Font_Color2%, % Font_Style2
Gui, 4: Add, Text, xm+900 ym+60 w230 0x200 vmyText4,
Gui, 4: Font
Gui, 4: Color, EEAA99
Winset, Transcolor, EEAA99
Gui, 4: Show, x0 y0 w1280 h768, Overlay


; Run once to initialise values.
GoSub, GetDriveSpaceFree
; Set the timer to run every five minutes.
SetTimer, GetDriveSpaceFree, 300000

Return ; End of auto-execute section.


#T:: ; Toggle the GUI.
{
    If ! ( Toggle_Gui )
    {
        Gui, 1: Show, Hide
        Gui, 2: Show, Hide
        Gui, 3: Show, Hide
        Gui, 4: Show, Hide
    }
    Else
    {

        Gui, 1: Show
        Gui, 2: Show
        Gui, 3: Show, Hide
        Gui, 4: Show, Hide
    }
    Toggle_Gui := !Toggle_Gui
}
Return


GetDriveSpaceFree:
{
    DrivespaceFree, freeQ, Q:\
    DrivespaceFree, freeR, R:\
    DrivespaceFree, freeS, S:\
    
    GuiControl, 2: Text, myText2, % Round(freeQ/1024) Header_Text2    
    GuiControl, 3: Text, myText3, % Round(freeR/1024) Header_Text3    
    GuiControl, 4: Text, myText4, % Round(freeS/1024) Header_Text4
}
Return


onClick:
{
    Gui, 2: Submit, NoHide
    If ( A_GuiControl = "myButton01" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton02" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton03" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, pal{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton04" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton05" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton06" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, pal{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton07" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }

    Else If ( A_GuiControl = "myButton08" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project..., 
        Sleep, 200
        Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton09" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 200
        Send, {ALTDOWN}f{ALTUP}o
        WinWait, Open Local Project..., 
        IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
        WinWaitActive, Open Local Project...,
        Sleep, 200 
        Send, pal{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
    }
    Else If ( A_GuiControl = "myButton10" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 1".
    }
    Else If ( A_GuiControl = "myButton11" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 2".
    }
    Else If ( A_GuiControl = "myButton12" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 3".
    }
    Else If ( A_GuiControl = "myButton13" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 4".
    }
    Else If ( A_GuiControl = "myButton14" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 5".
    }
    Else If ( A_GuiControl = "myButton15" )
    {
        ; Do other stuff here.
        MsgBox, You clicked "Future Button 6".
    }
    Else If ( A_GuiControl = "myButton16" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 100
        Send, {ALTDOWN}{ALTUP}op
        WinWait, Preferences, 
        IfWinNotActive, Preferences, , WinActivate, Preferences, 
        WinWaitActive, Preferences, 
        MouseClick, left,  105,  98
        Sleep, 100
        MouseClick, left,  392,  58
        Sleep, 200
        Send {Up}
        Sleep, 100
        Send, {ENTER}
        Sleep, 100
        Send, {ENTER}
    }
    Else If ( A_GuiControl = "myButton17" )
    {
        WinWait, Digital Rapids Stream, 
        IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
        WinWaitActive,  Digital Rapids Stream, 
        MouseClick, left,  248,  12
        Sleep, 100
        MouseClick, left,  248,  12
        Sleep, 100
        Send, {ALTDOWN}{ALTUP}op
        WinWait, Preferences, 
        IfWinNotActive, Preferences, , WinActivate, Preferences, 
        WinWaitActive, Preferences, 
        MouseClick, left,  105,  98
        Sleep, 100
        MouseClick, left,  392,  58
        Sleep, 200
        Send {Down}
        Sleep, 100
        Send, {ENTER}
        Sleep, 100
        Send, {ENTER}
    }
}

#n::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 100
    Send, {ALTDOWN}{ALTUP}op
    WinWait, Preferences,
    IfWinNotActive, Preferences, , WinActivate, Preferences,
    WinWaitActive, Preferences,
    MouseClick, left,  105,  98
    Sleep, 100
    MouseClick, left,  392,  58
    Sleep, 200
    Send {Up}
    Sleep, 100
    Send, {ENTER}
    Sleep, 100
    Send, {ENTER}
}
Return

#p::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 100
    MouseClick, left,  248,  12
    Sleep, 100
    Send, {ALTDOWN}{ALTUP}op
    WinWait, Preferences,
    IfWinNotActive, Preferences, , WinActivate, Preferences,
    WinWaitActive, Preferences,
    MouseClick, left,  105,  98
    Sleep, 100
    MouseClick, left,  392,  58
    Sleep, 200
    Send {Down}
    Sleep, 100
    Send, {ENTER}
    Sleep, 100
    Send, {ENTER}
}
Return

!numpad0::
{
    MouseClick, left,  710,  460
    Sleep, 100
    WinWait, Ingest Upload Verification Page - Mozilla Firefox,
    IfWinNotActive, Ingest Upload Verification Page - Mozilla Firefox, , WinActivate, Ingest Upload Verification Page - Mozilla Firefox,
    WinWaitActive, Ingest Upload Verification Page - Mozilla Firefox,
    Sleep, 100
    MouseClick, left,  711,  253
    Sleep, 100
    WinWait, Ingest Upload Sucess Home Page - Mozilla Firefox,
    IfWinNotActive, Ingest Upload Sucess Home Page - Mozilla Firefox, , WinActivate, Ingest Upload Sucess Home Page - Mozilla Firefox,
    WinWaitActive, Ingest Upload Sucess Home Page - Mozilla Firefox,
    Sleep, 100
    MouseClick, left,  713,  405
    Sleep, 100
    MouseClick, left,  713,  370
}
Return

:*:aspera::
{
    Run, C:\Program Files\Aspera\Aspera Scp\bin\asperacopy.exe
    WinWait, Aspera File Transfer,
    IfWinNotActive, Aspera File Transfer, , WinActivate, Aspera File Transfer,
    WinWaitActive, Aspera File Transfer,
    MouseClick, left,  491,  131
    Sleep, 100
    MouseClick, left,  794,  233
    Sleep, 100
    Send, {ALTDOWN}{SPACE}x{ALTUP}{ALTDOWN}{ALTUP}{RIGHT}{RIGHT}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}
    MouseClick, left,  390,  116
    Sleep, 100
}
Return

#1::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#2::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#3::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, pal{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#4::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
}
Return

#5::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
}
Return

#6::
{   WinWait, Digital Rapids Stream, 
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
    WinWaitActive,  Digital Rapids Stream, 
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project..., 
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
    WinWaitActive, Open Local Project..., 
    Sleep, 200
    Send, pal{SHIFTDOWN}-{SHIFTUP}l-r{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}l-ltc{SHIFTDOWN}-{SHIFTUP}simultaneous.prj{ENTER}
}
Return

#7::
{
    WinWait, Digital Rapids Stream, 
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream, 
    WinWaitActive,  Digital Rapids Stream, 
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project..., 
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project..., 
    WinWaitActive, Open Local Project..., 
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}ndf{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#8::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, ntsc{SHIFTDOWN}-{SHIFTUP}df{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

#9::
{
    WinWait, Digital Rapids Stream,
    IfWinNotActive, Digital Rapids Stream, , WinActivate, Digital Rapids Stream,
    WinWaitActive,  Digital Rapids Stream,
    MouseClick, left,  248,  12
    Sleep, 200
    Send, {ALTDOWN}f{ALTUP}o
    WinWait, Open Local Project...,
    IfWinNotActive, Open Local Project..., , WinActivate, Open Local Project...,
    WinWaitActive, Open Local Project...,
    Sleep, 200
    Send, pal{SHIFTDOWN}-{SHIFTUP}3-4{SHIFTDOWN}-{SHIFTUP}{SHIFTDOWN}=-{SHIFTUP}ltc{SHIFTDOWN}-{SHIFTUP}mp2.prj{ENTER}
}
Return

; EOF

May I assume this overlay is working well and helping out at your workplace?

dwilbank

  • Supporting Member
  • Joined in 2009
  • **
  • Posts: 86
I didn't want to spread it around until I got this last bit perfected, but my 2nd shift replacement likes it so far.
I think the big debut will be tomorrow, when I expand the code to include about 12 drive space readouts.
Thanks!

Original address: https://www.donationcoder.com/forum/index.php?topic=19896.0