📩 Отправка и получение данных по MQTT / Sending and receiving data using MQTT

Скрипт отправляет и получает данные от брокера. Можно добавить логин и пароль. На v1 не переводил, если кому-то не лень, можете заняться, добавлю. В папку со скриптом нужно закинуть папку mosquitto.

The script sends and gets data from broker. It is possible to use login and password. Have no time to transfer to v1, pm me if you are ready to do this. The script needs a mosquitto folder in the script's folder.

v2:

Send data

publish(topic, message)
{
    shell := ComObject("WScript.Shell")
    pubCmd := a_scriptdir "\mosquitto\mosquitto_pub.exe -h test.mosquitto.org -p 1883 -t " topic " -m '" message "'" 
    shell.Run(pubCmd, 0, true)
    shell.ObjRelease()
}

Get data

shell := ComObject("WScript.Shell")
subCmd := a_scriptdir "\mosquitto\mosquitto_sub.exe -h " mqttHost " -p " mqttPort " -t " topic
subProcess := shell.Exec(subCmd)
OnMessage(subProcess)

OnMessage(subProcess) {
    While (!subProcess.StdOut.AtEndOfStream) {
        msg := subProcess.StdOut.ReadLine()
        MsgBox "Сообщение получено:" "`n" msg
    }
}

Источник / Source: GPT-4, @Lencore
#Script

📬 Отправка данных в другой скрипт / Send data to another script

В первой функции меняем ANOTHER SCRIPT на название своего второго скрипта, аргумент функции — что нужно передать. Во втором скрипте после получения данных можно обработать их прямо в функции, либо вернуть в тело и работать там.

In the first function, change ANOTHER SCRIPT onto your another script name, an argument of functions is data to send. In the second function, you can catch data into variable and proceed directly in function or return it to script body.

v2:

Send data:

SendWM(StringToSend)
{
    TargetScriptTitle := "ANOTHER SCRIPT.ahk ahk_class AutoHotkey"
    CopyDataStruct := Buffer(3*A_PtrSize) 
    SizeInBytes := (StrLen(StringToSend) + 1) * 2
    NumPut( "Ptr", SizeInBytes, "Ptr", StrPtr(StringToSend), CopyDataStruct, A_PtrSize)
    DetectHiddenWindows True
    SetTitleMatchMode 2
    TimeOutTime := 4000
    SendMessage(0x004A, 0, CopyDataStruct,, TargetScriptTitle) 
}

Get data:

Persistent 1
OnMessage 0x004A, Receive_WM_COPYDATA

Receive_WM_COPYDATA(wParam, lParam, msg, hwnd)
{
    data := StrGet(NumGet(lParam, 2*A_PtrSize, "Ptr"))
}

Источник / Source: неизвестно / unknown

@AutoHotKey
#Script

😌 sheet.best — облегчаем работу с Гугл таблицами, превращая работу с ними в REST API. У гугла ужасно замудренные протоколы авторизации, а через сервис все просто — открыл доступ к таблице и добавляешь данные через POST запросы. Попробуйте, если ненавидите OAuth так же, как я. Первый месяц — бесплатно 15к запросов, далее 15к за $10, либо 50к за $20.

😌 sheet.best — make work with Google Sheets much easier by transforming it into REST API. Google has awful auth protocols, and it's solved now: just generate link to your sheet and add new data by sending POST requests. Try it if you hate OAuth as much as me xd. Free 15k requests for the first month, then $10 for 15k or $20 for 50k.

Сайт / Site:
https://sheet.best

Документация / Documentation:
https://docs.sheet.best/#welcome

@AutoHotKey
#Service #API

📊 Вычисление среднего отклонения по массиву (стандартная девиация). В основном используется в финансах. Если вы не знаете, для чего он, скорее всего он вам не нужен, но скрипт в любом случае полезный.

📊 Standard deviation calculation for array, Mainly used in finance. If you don't know what it's for, you probably don't need it, but the script is useful anyway.

v1 / v2:

nums := [20.4, 18.0, 1.4, -8.6, -14.4, 3.0, -38.8, 20.9, -4.2, 131.0, -43.2, 4.6]
msgbox Round((StandardDeviation(nums)/100), 2)

StandardDeviation(arr) {
   mean := sd2 := 0
   for val in arr
      mean += val
   mean /= arr.Length
   for val in arr
      sd2 += (val - mean) ** 2
   return sqrt(sd2 / arr.Length)
}

Источник / Source:
https://www.autohotkey.com/boards/viewtopic.php?p=560434#p560434

@AutoHotKey
#Script