Jump to content
Sign in to follow this  
Ejoc

Best Script Ever!

Recommended Posts

This has to be the best AutoIt script EVER!!!!!

Enjoy:

$szFunc = ""
$szFile = RegRead("HKLM\SOFTWARE\AutoIt v3\AutoIt","InstallDir")
if $szFile <> "" Then
    Run(@ComSpec & ' /c START "" "' & $szFile & '\AutoIt.chm"',"",@SW_HIDE)
    WinWait("AutoIt Help")
    Send("!n" & $szFunc & "{ENTER}")
Else
    Run(@Comspec & ' /c START http://www.autoitscript.com/autoit3/downloads.php',"",@SW_HIDE)
Endif

I also made a "lite" version:

$szFunc = ""
$szFile = RegRead("HKLM\SOFTWARE\AutoIt v3\AutoIt","InstallDir")
if $szFile <> "" Then
    Run(@ComSpec & ' /c START "" "' & $szFile & '\AutoIt.chm"',"",@SW_HIDE)
    WinWait("AutoIt Help")
    Send("!n" & $szFunc & "{ENTER}")
Endif

*EDIT added Xenogis' modification and gafrost's

Edited by Ejoc

Start -> Programs -> AutoIt v3 -> AutoIt Help File -> Index -> (The Function you are asking about)----- Links -----DllStruct UDFsRSA Crypto UDFs

Share this post


Link to post
Share on other sites

Now when a newb posts we can say "Run this script"

edit:

Slightly better

$szFunc = ""
$szFile = RegRead("HKLM\SOFTWARE\AutoIt v3\AutoIt","InstallDir")
if $szFile = "" Then
    MsgBox(0,"No Autoit","Is AutoIt installed?")
    exit
Endif

Run(@ComSpec & ' /c START "" "' & $szFile & '\AutoIt.chm"',"",@SW_HIDE)
WinWait("AutoIt Help")
WinActivate ( "AutoIt Help" )
Send("!n")
Send($szFunc&"{enter}")
Edited by Xenogis

[font="Times"] If anyone remembers me, I am back. Maybe to stay, maybe not.----------------------------------------------------------------------------------------------------------[/font][font="Times"]Things I am proud of: Pong! in AutoIt | SearchbarMy website: F.R.I.E.S.A little website that is trying to get started: http://thepiratelounge.net/ (not mine)[/font][font="Times"] ----------------------------------------------------------------------------------------------------------[/font][font="Arial"]The newbies need to stop stealing avatars!!! It is confusing!![/font]

Share this post


Link to post
Share on other sites

lol

I saw your post on the other thread, saw the {enter} and was like, oh I need too add that, but you beat me to it! :)

Edited by Ejoc

Start -> Programs -> AutoIt v3 -> AutoIt Help File -> Index -> (The Function you are asking about)----- Links -----DllStruct UDFsRSA Crypto UDFs

Share this post


Link to post
Share on other sites

An AutotIt script, that tells people to download AutoIt, if it is not installed?

You guy's are funny. :D

Edit: Are you sure this is your best script ever? :) LOL

Edited by MHz

Share this post


Link to post
Share on other sites

Edit: Are you sure this is your best script ever?  :D  LOL

<{POST_SNAPBACK}>

Not just my best script, it's THE best script ever :)

Start -> Programs -> AutoIt v3 -> AutoIt Help File -> Index -> (The Function you are asking about)----- Links -----DllStruct UDFsRSA Crypto UDFs

Share this post


Link to post
Share on other sites

Not just my best script, it's THE best script ever  :D

<{POST_SNAPBACK}>

If the noob does not have Autoit installed. How can they run the script, and to have it send them to the download site, to download AutoIt? :)

:D Hello!!!

Share this post


Link to post
Share on other sites

It opens the help file to a certain function. The opening a browser to dl it is a secondary feature. If you install AutoIt via .zip and not the .exe it would open the browser :)

That way when noob #874635 asks how do I send text to a window you can just hit them with a script, something they'll run vs. RTFM which they get pissy at :D

$szFunc = "ControlSend"
$szFile = RegRead("HKLM\SOFTWARE\AutoIt v3\AutoIt","InstallDir")
if $szFile <> "" Then
    Run(@ComSpec & ' /c START "" "' & $szFile & '\AutoIt.chm"',"",@SW_HIDE)
    WinWait("AutoIt Help")
    Send("!n" & $szFunc & "{ENTER}")
Else
    Run(@Comspec & ' /c START http://www.autoitscript.com/autoit3/downloads.php',"",@SW_HIDE)
Endif
Edited by Ejoc

Start -> Programs -> AutoIt v3 -> AutoIt Help File -> Index -> (The Function you are asking about)----- Links -----DllStruct UDFsRSA Crypto UDFs

Share this post


Link to post
Share on other sites

So someone has a zip version, and you send them to Autoit downloads, to perhaps download the installer version, so it can be installed. So the script can read the new registry key, set by the installer, then it will open the helpfile, as in the script?

Am I correct, with this knowledge?

I am not sure if a noob, will understand any of this?

Edit: Why does the script, send them to Autoit downloads, when they already have the Autoit files and the helpfile already.

Edited by MHz

Share this post


Link to post
Share on other sites

They dont need to understand it at all. Chances are they installed AutoIt w/ the .exe, which means it will open the help file 99% of the time, going to the dl page will only happen like 1% of the time.

What happens when you run the script, chances are it will open your autoit help file to ControlSend (thats what this script will do 99% of the time) Thats what this script does, you are focusing on something that will almost never happen. If you prefer focus on the "lite" version

$szFunc = "ControlSend"
$szFile = RegRead("HKLM\SOFTWARE\AutoIt v3\AutoIt","InstallDir")
if $szFile <> "" Then
    Run(@ComSpec & ' /c START "" "' & $szFile & '\AutoIt.chm"',"",@SW_HIDE)
    WinWait("AutoIt Help")
    Send("!n" & $szFunc & "{ENTER}")
Endif

Start -> Programs -> AutoIt v3 -> AutoIt Help File -> Index -> (The Function you are asking about)----- Links -----DllStruct UDFsRSA Crypto UDFs

Share this post


Link to post
Share on other sites

This has to be the best AutoIt script EVER!!!!!

Enjoy:

$szFunc = ""
$szFile = RegRead("HKLM\SOFTWARE\AutoIt v3\AutoIt","InstallDir")
if $szFile <> "" Then
    Run(@ComSpec & ' /c START "" "' & $szFile & '\AutoIt.chm"',"",@SW_HIDE)
    WinWait("AutoIt Help")
    Send("!n" & $szFunc & "{ENTER}")
Else
    Run(@Comspec & ' /c START http://www.autoitscript.com/autoit3/downloads.php',"",@SW_HIDE)
Endif

I also made a "lite" version:

$szFunc = ""
$szFile = RegRead("HKLM\SOFTWARE\AutoIt v3\AutoIt","InstallDir")
if $szFile <> "" Then
    Run(@ComSpec & ' /c START "" "' & $szFile & '\AutoIt.chm"',"",@SW_HIDE)
    WinWait("AutoIt Help")
    Send("!n" & $szFunc & "{ENTER}")
Endif

*EDIT added Xenogis' modification and gafrost's

<{POST_SNAPBACK}>

:(

Here is the start of my most best script ever....

Dim $scvgdsadEDEssddfzDSCSDCDSBrainsize= ""

Dim $zzDDFcdsdgfssesddgesgghfrsdsHEADsize= "XXXXXXXXXLarge"

Dim $XXddkeksdjgkdjeskerjfksdjfjekDoorSise= "Toosmall"

Dim $dkfjekskeksjadjfkdfejkjerkejreHELP= "Jerry@carpentersrus.com"

If $zzDDFcdsdgfssesddgesgghfrsdsHEADsize >= "XXXXXXXXXXLarge" Then _Help()

Func _Help()

#include <INet.au3>

$s_MailTo=$dkfjekskeksjadjfkdfejkjerkejreHELP

$s_MailSubject="Help, I can't go home."

$s_MailBody="Please come and make my door bigger again"

_INetMail($s_MailTo, $s_MailSubject, $s_MailBody)

WinWaitActive("Mail To:")

If WinExists("Mail To:") Then

Sleep(5000)

Send("!+D")

EndIf

WinWaitActive("Signature")

If WinActive("Signature") Then

Send("O")

EndIf

EndFunc

Now thats funny, Hope you can take a joke, remember you were a newb once.

Share this post


Link to post
Share on other sites

I hope you don't check that, you might just start getting emails from me :(


Writing AutoIt scripts since
_DateAdd("d", -2, _NowCalcDate())

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  

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...