Вопросы по AHK-скриптингу

[VuTuV]

Как декомпелировать .exe ahk?

В данной теме есть несколько unpackerov.(click)

 

[BUGIUA]

*~$Space::
Sleep 100
Loop
{
GetKeyState, SpaceState, Space, P
If SpaceState = U
break
Sleep 5
Send, {Blind}{Space}
}
Мне надо с этого кода переделать на автокликер быстрый на правую кнопку мыши

Если невозможно сделайте прошу тогда с нуля те кому не лень

 

[axellor]

Здравствуйте, мне нужно чтобы после появления строчки определённого текста зажимались клавиши alt+arrow up

 

[Vladislav25]

Ребята, крч как сделать, когда человек показывает паспорт тебе, чтоб в чат вывел Ник и должность, а то чето я вникнуть не могу в "if RegExMatch"

 

[Taich]

Помогите пожалуйста, что мне тут изменить, чтобы при нажатии клавиш писался тот текст, который на данном скрине

Проще говоря. Человек пишет фразу, которую я должен буду написать, я нажимаю клавиши и оно автоматически пишет эту фразу в /rep
Вот текст AHK:

lalt & X::
{
SendMessage, 0x50,, 0x4190419,, A
FileRead, Str, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
StringReplace, Str, Str, `r`n, `n, 1
StringReplace, Str, Str, `r, `n, 1
RegExMatch("`n" Str "`n", "i).*\n\[\d+:\d+:\d+]\s*SMS:.*?\|.*?Отправитель:.*?т.(.*?)\]\s", out)
SendInput {F6}/sms %out1%{space}
return
}

Заранее спасибо за помощь!

 

[BUGIUA]

Помогите пожалуйста, что мне тут изменить, чтобы при нажатии клавиш писался тот текст, который на данном скрине
Посмотреть вложение 31199
Проще говоря. Человек пишет фразу, которую я должен буду написать, я нажимаю клавиши и оно автоматически пишет эту фразу в /rep
Вот текст AHK:

lalt & X::
{
SendMessage, 0x50,, 0x4190419,, A
FileRead, Str, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
StringReplace, Str, Str, `r`n, `n, 1
StringReplace, Str, Str, `r, `n, 1
RegExMatch("`n" Str "`n", "i).*\n\[\d+:\d+:\d+]\s*SMS:.*?\|.*?Отправитель:.*?т.(.*?)\]\s", out)
SendInput {F6}/sms %out1%{space}
return
}

Заранее спасибо за помощь!

А что за сервак?

 

[Taich]

А что за сервак?

Рашка

 

[darksoor]

Помогите пожалуйста, что мне тут изменить, чтобы при нажатии клавиш писался тот текст, который на данном скрине
Посмотреть вложение 31199
Проще говоря. Человек пишет фразу, которую я должен буду написать, я нажимаю клавиши и оно автоматически пишет эту фразу в /rep
Вот текст AHK:

lalt & X::
{
SendMessage, 0x50,, 0x4190419,, A
FileRead, Str, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
StringReplace, Str, Str, `r`n, `n, 1
StringReplace, Str, Str, `r, `n, 1
RegExMatch("`n" Str "`n", "i).*\n\[\d+:\d+:\d+]\s*SMS:.*?\|.*?Отправитель:.*?т.(.*?)\]\s", out)
SendInput {F6}/sms %out1%{space}
return
}

Заранее спасибо за помощь!

Регулярку измени на эту:

match =
(
i).*\n\[\d+:\d+:\d+\]\sАдминистратор \w+\:.*в репорт напишет \"(\w+)
)
RegExMatch("`n" Str "`n", match, out)

 

[seruj22048]

#SingleInstance,Force
AutoTrim,Off
CoordMode,Mouse,Screen
CoordMode,ToolTip
CoordMode,Pixel
Menu,Tray,UseErrorLevel
process,priority,,high
;SendMode,input
SetBatchLines,-1
SetControlDelay,0
SetKeyDelay,-1
SetTitleMatchMode,2
SetWinDelay,20
SetWorkingDir,%A_ScriptDir%
StringCaseSense,On
DetectHiddenWindows,On

SetFormat, IntegerFast, h

vkod:={"~*del":"vk2e down","~*up":"vk26 down","~*Down":"vk28 down","~*left":"vk25 down","~*right":"vk27 down","~*ins":"vk2d down","~*home":"vk24 down","~*end":"vk23 down","~*pgup":"vk21 down","~*pgdn":"vk22 down","~*del up":"vk2e up","~*up up":"vk26 up","~*Down up":"vk28 up","~*left up":"vk25 up","~*right up":"vk27 up","~*ins up":"vk2d up","~*home up":"vk24 up","~*end up":"vk23 up","~*pgup up":"vk21 up","~*pgdn up":"vk22 up"}

timecorrection:=0

Loop, 0xFF
{
  if (A_Index=0x79 or A_Index=0x7a or A_Index=0x7b)
    continue
  Hotkey,% "~*vk" . A_Index . " down",Label,On T0
  Hotkey,% "~*vk" . A_Index . " up",Label,On
}

  Hotkey,~*del,Label,On T0
  Hotkey,~*up,Label,On T0
  Hotkey,~*Down,Label,On T0
  Hotkey,~*left,Label,On T0
  Hotkey,~*right,Label,On T0
  Hotkey,~*ins,Label,On T0
  Hotkey,~*home,Label,On T0
  Hotkey,~*end,Label,On T0
  Hotkey,~*pgup,Label,On T0
  Hotkey,~*pgdn,Label,On T0

  Hotkey,~*del up,Label,On T0
  Hotkey,~*up up,Label,On T0
  Hotkey,~*Down up,Label,On T0
  Hotkey,~*left up,Label,On T0
  Hotkey,~*right up,Label,On T0
  Hotkey,~*ins up,Label,On T0
  Hotkey,~*home up,Label,On T0
  Hotkey,~*end up,Label,On T0
  Hotkey,~*pgup up,Label,On T0
  Hotkey,~*pgdn up,Label,On T0
Return

Label:
critical
;tooltip,%a_tickcount%`n%A_ThisHotkey%`n%a_priorhotkey%
if (A_ThisHotkey=a_priorhotkey)
  return
time:=a_tickcount-oldtime
if A_ThisHotkey not contains vk
  key:=vkod[A_ThisHotkey]
else
  key:=RegExreplace(A_ThisHotkey, "~\*(vk)0x(.*)", "$1$2" )

if waittocontinue=1
{
  if key contains up
    waittocontinue=0
  return
}

if play=1
  oldrec:=rec
play=

count++
if (time<0x11)
  time-=time
rec%count%:=time-timecorrection

count++
rec%count%:=key
;t.=time "|" key "|"
;tooltip,%a_tickcount%`n%A_ThisHotkey%`n%a_priorhotkey%

;ToolTip,"%key%"`n%A_TimeSincePriorHotkey%
oldtime:=a_tickcount
Return

;if vk<7 save coords

f10::  ; rec
tooltip
oldtime:=a_tickcount
rec=
play=
count=
t=
return

F12::  ; play
PlayRec=
play=1
loop,% count
{
;  critical
;tooltip,% A_loopfield "`n" play "`n" Play
  if play=
    break
  Play:=rec%a_index%
  if (a_index & 1)
  {
    if Play=wait
    {
      tooltip,Нажми любую кнопку чтобы продолжить.
      waittocontinue=1
      while waittocontinue
        sleep,10
      tooltip
    }
    else if (Play>0 and oldPlay!="wait")
      DllCall("Sleep",UInt,Play)
    oldPlay:=Play
  }
  else
    send,{%Play%}
  PlayRec%a_index%:=Play
  c:=a_index
}
play=0
;loop,% c
;  rec%a_index%:=PlayRec%a_index%
return

F11::  ; play old
count++
rec%count%=wait
count++
rec%count%=vk07 up

;fileappend,%t%,Rec
;play=1
;loop,c
;{
;;  critical
;;tooltip,% A_loopfield "`n" play "`n" key
;  if play=
;    break
;  key:=PlayRec%a_index%
;  if (a_index & 1)
;  {
;    if key>0
;      DllCall("Sleep",UInt,key)
;  }
;  else
;    send,{%key%}
;}
;play=0
return

Пишет Error: "vk0x1 down" is niit a valid key name

 

[Taich]

Регулярку измени на эту:

match =
(
i).*\n\[\d+:\d+:\d+\]\sАдминистратор \w+\:.*в репорт напишет \"(\w+)
)
RegExMatch("`n" Str "`n", match, out)

Подскажи как правильно менять, я поменял, но не работает :( Спасибо за ранее

 

[bbbbbb]

Здравствуйте. Мне с игры CRMP нужно сделать так, чтоб копировало сообщение с определенного чата(допустим, /r), и, скопированное сообщение писалось в чат диалога(f6). Можно мне полностью не делать скрипт, а часть того, чтоб копировало. Спасибо.

 

[ruslangaliev]

Привет всем. Нужна помощь в скрипте. Написал скрипт по чтению чатлога. Почему то ахк не работает, посмотрите пожалуйста

#Include samp-udf.ahk
#IfWinActive GTA:SA:MP
chat:=A_MyDocuments "/GTA San Andreas User Files/SAMP/chatlog.txt"

global flag := false

start:
if(flag)
{
    FileRead, chatlog, % chat
    if chatlog contains Объявление на проверку
    {
        ControlSend, ahk_parent, {F6}/обпр{enter}{enter}, ahk_exe gta_sa.exe
        ;Sendchat("/обпр{enter}{enter}")
        flag:=false
        save(chatlog)
    }
}
return

Также нужно сделать чтоб активировался на кнопку и после срабатывания деактивировался. Следовательно последующие активации также осуществлялись кнопками

 

[fedfasdwedsaed]

Привет всем. Нужна помощь в скрипте. Написал скрипт по чтению чатлога. Почему то ахк не работает, посмотрите пожалуйста

Loop
{
    GetChatLine(0, chat)
    if chat contains Объявление на проверку
    {
Sendchat("/обпр")
SendInput {enter}
SendInput {enter}
    }
}
return

 

[ruslangaliev]

Loop
{
    GetChatLine(0, chat)
    if chat contains Объявление на проверку
    {
Sendchat("/обпр")
SendInput {enter}
SendInput {enter}
    }
}
return

 

[BASS_DEVSOFTWARE]

samp udf установи.