1 Тема от Dworkin (изменено: Dworkin, 2013-09-19 16:50:50)

  • Dworkin
  • Участник
  • Неактивен

Тема: AHK: Свзяь между скриптами через интернет

Здравствуйте. Помогите пожалуйста со скриптиком.
Суть: я кидаю макрос знакомому, прошу его не кидать не кому, но если он кидает, то я вижу что не только он один им пользуется.
Запускаю макрос-сервер, когда кто-то или несколько людей запускают скрипт, мне показывает что столько то людей использует данный скрипт, показывает ихние IP и все это сохраняет в текстовый документ.

Например вот код скрипта который я собираюсь кидать знакомым:

HK_NUMPAD4 := "vk58" , HK_NUMPAD6 := "!vk20"

#SingleInstance force  
#UseHook  

Gui, Add, CheckBox, x50 y+10 gSave vCheck_NUMPAD4, % "   NUMPAD 4"
Gui, Add, Edit, x50 w250 Center ReadOnly gSave HWNDvHK_NUMPAD4 vNUMPAD4, % HF_ReadVar(HK_NUMPAD4)

Gui, Add, CheckBox, x50 y+20 gSave vCheck_NUMPAD6, % "   NUMPAD 6"
Gui, Add, Edit, x50 w250 Center ReadOnly gSave HWNDvHK_NUMPAD6 vNUMPAD6, % HF_ReadVar(HK_NUMPAD6)
HF_HotkeyUserFunc("vHK_NUMPAD4|vHK_NUMPAD6") 

Gui, Add, Text, x10 y120 w80 h20 cBlue, Автор: Dworkin
Gui, Add, Text, x205 y120 w140 h20 cBlue, Дата создания: 17.09.2013
Gui, Show, x100 y100 h140 w350, NUMPADs for notebooks by Dworkin
Return 

GuiClose:
    ExitApp

Save:
    GuiControl := Ltrim(A_GuiControl, "Check_")
    GuiControlGet, Check_%GuiControl%     
    Hotkey, % Pr_HK_%GuiControl%, P_%GuiControl%, UseErrorLevel Off  
    Pr_HK_%GuiControl% := HK_%GuiControl% 
    Hotkey, % HK_%GuiControl%, P_%GuiControl%, % (Check_%GuiControl% = 1) ? " UseErrorLevel On" : " UseErrorLevel Off"  
    return
    
    ; ---------------------------------------------- Подпрограммы ----------------------------------------------
    
P_NUMPAD4:
send {vk64 down}{vk64 UP}
    return
    
P_NUMPAD6:
send {vk66 down}{vk66 UP}
    return

Нашел кое-что про связь тут, но не хватает знаний все это соединить

+ открыть спойлер

http://www.autohotkey.com/board/topic/5 … ock-tcpip/