Skip to content

Instantly share code, notes, and snippets.

https://gist.github.com/JoeGlines
Gui, Submit ; Save the input from the user to each control's associated variable.
Filename:= (SubStr(filename,-3)=".ahk")?(SubStr(Filename,1,StrLen(Filename)-4)):Filename ;just in case they end it with .ahk
Body:=Jxon_Dump({content:Clipboard}) ;need to encode it
Data={"description": "%Descr%","public": true,"files": {"%FileName%.ahk": %Body%}} ;build data for post havnig double quotes
Obj:=ParseJSON(Send(Token,"https://api.github.com/gists","POST",Data)) ;make post and return information about it
Clipboard:="Use the following for a webpage post:`n<script src='https://gist.github.com/" GitName "/"(SubStr(obj.url,Instr(obj.url,"/",,0)+1))".js'></script>`n`nYou can get the code here: " obj.html_url
WinGetTitle, ActiveWindow , A ;Get active title
loop 50 {
try {
FileAppend()
break
} catch Error as e
sleep 20
}
;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey courses.
;They're structured in a way to make learning AHK EASY: https://the-Automator.com/Learn
;*******************************************************
#Include <default_Settings>
;**************************************
var=
(
Email First_Name Last_Name
joejunkemail@yahoo.com Joe King
;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey courses.
;They're structured in a way to make learning AHK EASY: https://the-Automator.com/Learn
;*******************************************************
;~ #Include <default_Settings>
;**************************************
Loop,read, B:\the-automator\Cossman Billboards.txt
aa++ ;increment rows- Need to know what the last row is
Random, Random_Row, 1, %aa% ;selecat random row
;*******************************************************
; Want a clear path for learning AHK; Take a look at our AutoHotkey courses.
; They're structured in a way to make learning AHK EASY: https://the-Automator.com/Learn
;*******************************************************
; Create certificate
$cert = New-SelfSignedCertificate -Subject "{CertName}" -CertStoreLocation "cert:\CurrentUser\My" -HashAlgorithm sha256 -type CodeSigning
; Create password
$pwd = ConvertTo-SecureString -String "{123456}" -Force -AsPlainText
Example Chat GPT-3 API call
var = 0: "Admission"1: "Student Details"2: "Alumini Details"3: "Print Student Details"
f := 1
while f
{
f := RegExMatch(var, x := "[" chr(34) "](\w+)[" chr(34) "]", $, f+1)
msgbox, % $1
}
;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey courses.
;They're structured in a way to make learning AHK EASY: https://the-Automator.com/Learn
;*******************************************************
SetBatchLines,-1
#SingleInstance,Force
;********************Excel Safe array***********************************
XL:=XL_Handle(1) ;Connect to Excel
sArr :=xl.Range["a1:L29"] ;Store the content of the array into sArr
;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey courses.
;They're structured in a way to make learning AHK EASY: https://the-Automator.com/Learn
;*******************************************************
#SingleInstance,Force ;only allow one instance
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
SetBatchLines,-1 ;run the script as fast as possible
Setkeydelay,0 ;reduce key delay to smallest time period
SetWorkingDir, %A_ScriptDir% ; Ensures a consistent starting directory.
SendMode, Input ; Recommended for new scripts due to its superior speed and reliability.