tls.ahk

whr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
whr.Option(4) := 0x3300, results := []
whr.Open("HEAD", "https://github.com")
for _,ver in [0x200, 0x800, 0x2000] {
    done := false, whr.Option(9) := ver
    try whr.Send(), done := true
    results.push(done)
}
MsgBox % Format("{:1}{:2}{:3}", results*)