Sign in to follow this  
Followers 0
Mikey

SpeedFan script

6 posts in this topic

This script (below) works fine if another instance of SpeedFan is already running. Any ideas on why that is happening?

Run ("M:\PROGRAM FILES\SpeedFan\speedfan.exe")

WinActivate("SpeedFan 4.22", "")

Opt("WinWaitDelay", 25000)

WinActivate("SpeedFan 4.22", "")

If WinActive("SpeedFan 4.22") Then

MsgBox(0, "", "Window was active")

EndIf

ControlFocus ("SpeedFan 4.22", "", "TRxSpinEdit10")

ControlClick("SpeedFan 4.22", "", "TRxSpinEdit10")

Share this post


Link to post
Share on other sites



Share this post


Link to post
Share on other sites

I think its because your launching the program and not waiting for it to load and your script is running on.

Use WinWait ( "SpeedFan 4.22" , "" ) between the first and second line

Chris

Hey Chris! Thanx! Ya, as soon as I put that in, budda-bing! You must be right about the script running on. Now I can move on to the next step of slowing my cpu fan. Again, thank you for the quick response. Mike

Share this post


Link to post
Share on other sites

Hey Chris! Thanx! Ya, as soon as I put that in, budda-bing! You must be right about the script running on. Now I can move on to the next step of slowing my cpu fan. Again, thank you for the quick response. Mike

Cool.. incedently there is a later version of speed fan available http://www.almico.com/sfdownload.php

Share this post


Link to post
Share on other sites

Cool.. incedently there is a later version of speed fan available http://www.almico.com/sfdownload.php

Thanx for the link Chris. I'm now running 4.26. ;)

The script below is doing everything I want it to except that it pauses for approximately 15 seconds after line 8. I had tried Opt("WinWaitDelay", 5000), but that didn't work, it wouldn't reduce the fan speed to 65%. I also tried different time settings for WinWait, but nothing changes. Any ideas?

1) Run ("M:\PROGRAM FILES\SpeedFan\speedfan.exe")

2) WinWait ( "SpeedFan 4.26" , "" )

3) WinActivate("SpeedFan 4.26", "")

4) Opt("WinWaitDelay", 20000)

5) WinActivate("SpeedFan 4.26", "")

6) ControlFocus ("SpeedFan 4.26", "", "TRxSpinEdit10")

7) ControlClick("SpeedFan 4.26", "", "TRxSpinEdit10")

8) Send("{DOWN 7}")

9) WinWait("SpeedFan 4.26", "")

10) ControlFocus ("SpeedFan 4.26", "", "TJvXPButton2")

11) ControlClick("SpeedFan 4.26", "", "TJvXPButton2")

Share this post


Link to post
Share on other sites

Hey Chris. Thanx for the help. Problem solved. Used 'sleep' as suggested by Burrup.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0