Перейти к содержанию
ABSOLUTE

AutoHotkey и всё, что с ним связано)

Автор ABSOLUTE, в Моды

Рекомендуемые сообщения

Tabak    0

Tabak
Опубликовано

Ребят, что для ForCops нужно? скачал, включаю - ошибка. Sampfuncs иль еще что нужно? Объясните чайнику  :dh:

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

Поделиться сообщением

Ссылка на сообщение

lexa184    0

lexa184
Опубликовано

#IfWinActive GTA:SA:MP
"ВОТ ТУТ"::
send, ^{vk41}
send, ^{vk43}{backspace}{enter}
var1 = %clipboard%
send {f6}/find %var1%{enter}

"ВОТ ТУТ2"::
send, ^{vk41}
send, ^{vk43}{backspace}{enter}
var1 = %clipboard%
send {f6}/hfind %var1%{enter}

Поделиться сообщением

Ссылка на сообщение

Dark_Knight    672

Dark_Knight
Опубликовано

Например пишешь команду

/bizid 1

и пишет в /c [центр аммо LS]

В силах такое?

Такое на клео лучше сделать. Могу накидать код для клео с коментариями, но заполнять я его не буду полностью.

Поделиться сообщением

Ссылка на сообщение

Котофей    70

Котофей
Опубликовано

Такое на клео лучше сделать. Могу накидать код для клео с коментариями, но заполнять я его не буду полностью.

Накидай пожалуйста,попробую заполнить,в лс скинь)

Поделиться сообщением

Ссылка на сообщение

ellesse.    26

ellesse.
Опубликовано

Такое на клео лучше сделать. Могу накидать код для клео с коментариями, но заполнять я его не буду полностью.

Кинь в ЛС, надеюсь получится.

Поделиться сообщением

Ссылка на сообщение

(Eagle_Max)    4

(Eagle_Max)
Опубликовано (изменено)

Такое на клео лучше сделать. Могу накидать код для клео с коментариями, но заполнять я его не буду полностью.

Как вариант переделать клео Американа  :dx:

Изменено пользователем (Eagle_Max)

Поделиться сообщением

Ссылка на сообщение

.nexus    150

.nexus
Опубликовано

Например пишешь команду

/bizid 1

и пишет в /c [центр аммо LS]

В силах такое?

 

Такое на клео лучше сделать. Могу накидать код для клео с коментариями, но заполнять я его не буду полностью.

Готово: Link

Поделиться сообщением

Ссылка на сообщение

.nexus    150

.nexus
Опубликовано

***ня у тебя, а не линк.

Мне далеко ещё до тебя.  :spiteful:

 

 

[2:14:48] Dark_Knight: И полный
[2:14:51] Dark_Knight: КОД ГАВНО
[2:14:53] Dark_Knight: ХУЙНЯ
[2:14:54] Dark_Knight: ПОЛНАЯ
[2:14:56] Dark_Knight: *****
[2:15:00] Dark_Knight: КАК ТАК МОЖНО?

 

 

Поделиться сообщением

Ссылка на сообщение

Dark_Knight    672

Dark_Knight
Опубликовано (изменено)

Так правильнее будет.



Мне далеко ещё до тебя.  :spiteful:

 

 

[2:14:48] Dark_Knight: И полный
[2:14:51] Dark_Knight: КОД ГАВНО
[2:14:53] Dark_Knight: ***НЯ
[2:14:54] Dark_Knight: ПОЛНАЯ
[2:14:56] Dark_Knight: *****
[2:15:00] Dark_Knight: КАК ТАК МОЖНО?

 

 

Вот вам рабочий код. Надо только заполнить его.

{$CLEO}
{$NOSOURCE}
if not 31@ = samp.Base()
then
0a93: end_thread
else
    while not samp.Available()
    wait 100
    end
end
//Код выше подключает SAMPFUNCS к нашему скрипту
0ac8: 1@ = 1024 //Выделяем память под массив строк
//Заполняем массив строк названиями бизнесов
0C20: string_array 1@ element 0 size 32 = "Название биза" // 1@ - переменная массива строк, 0 - елемент массива, 32 - размер одного елемента массива. Для каждый следущий елемент должен быть равен 32 байтам иначе будет краш. "Название бизнеса" - тут пише  
0C20: string_array 1@ element 1 size 32 = "Название биза" //Тут меняем только номер елемента массива и название бизнеса.
 
0b34: "bizid" @bizid // Регистрируем команду "bizid" на метку 'bizid"
 
while true
wait 0
end
 
:bizid //Обьвляем метку "bizid"
0b35: 0@ // Получанием значение строки команды, которое ввел пользователь.
0c1a: atoi 0@ 0@ //Превращаем строку в целое
if and //Проверяем значения. Если ... 
0@ > 0 //Переменная 0@ больше нуля
0@ <= 32//И меньше-равно 32(32 - это маскимальное количество бизнесов. Какое точное количество я не знаю)
then //Если условие правдивое, тогда...
    0C1F: 2@ = string_array 1@ element 0@ size 32 //Получаем указатель на строку с массива строк елемента 0@
    0af8: "%s" 0xFFFFFF 2@ //Отображаем значение строки в чат
else //Если условие ложное, тогда ...
    0af8: "Введите правильный номер бизнеса" 0xFFFFFF //Обьвляем пользователю, что он не верно ввел значение.
    
end
samp.CmdRet()//выходим из команды в тело скрипта
Изменено пользователем Dark_Knight

Поделиться сообщением

Ссылка на сообщение

.nexus    150

.nexus
Опубликовано (изменено)
 

 

Так правильнее будет.



Мне далеко ещё до тебя.   :spiteful:

 

 

[2:14:48] Dark_Knight: И полный
[2:14:51] Dark_Knight: КОД ГАВНО
[2:14:53] Dark_Knight: ***НЯ
[2:14:54] Dark_Knight: ПОЛНАЯ
[2:14:56] Dark_Knight: *****
[2:15:00] Dark_Knight: КАК ТАК МОЖНО?

 

 

Вот вам рабочий код. Надо только заполнить его.

{$CLEO}
{$NOSOURCE}
if not 31@ = samp.Base()
then
0a93: end_thread
else
    while not samp.Available()
    wait 100
    end
end
//Код выше подключает SAMPFUNCS к нашему скрипту
0ac8: 1@ = 1024 //Выделяем память под массив строк
//Заполняем массив строк названиями бизнесов
0C20: string_array 1@ element 0 size 32 = "Название биза" // 1@ - переменная массива строк, 0 - елемент массива, 32 - размер одного елемента массива. Для каждый следущий елемент должен быть равен 32 байтам иначе будет краш. "Название бизнеса" - тут пише  
0C20: string_array 1@ element 1 size 32 = "Название биза" //Тут меняем только номер елемента массива и название бизнеса.
 
0b34: "bizid" @bizid // Регистрируем команду "bizid" на метку 'bizid"
 
while true
wait 0
end
 
:bizid //Обьвляем метку "bizid"
0b35: 0@ // Получанием значение строки команды, которое ввел пользователь.
0c1a: atoi 0@ 0@ //Превращаем строку в целое
if and //Проверяем значения. Если ... 
0@ > 0 //Переменная 0@ больше нуля
0@ <= 32//И меньше-равно 32(32 - это маскимальное количество бизнесов. Какое точное количество я не знаю)
then //Если условие правдивое, тогда...
    0C1F: 2@ = string_array 1@ element 0@ size 32 //Получаем указатель на строку с массива строк елемента 0@
    0af8: "%s" 0xFFFFFF 2@ //Отображаем значение строки в чат
else //Если условие ложное, тогда ...
    0af8: "Введите правильный номер бизнеса" 0xFFFFFF //Обьвляем пользователю, что он не верно ввел значение.
    
end
samp.CmdRet()//выходим из команды в тело скрипта


 

Благодарочка. Но я как поц, снес гта и всё равно крашит. У остальных норм. Обновил пост в модах.

Изменено пользователем [Niko_Belic]

Поделиться сообщением

Ссылка на сообщение

SteelSeries    0

SteelSeries
Опубликовано (изменено)

Парни добрый день,хотел сделать авто-скрин.нечего не получилось,вот вам исходник.Кто сможешь сделать сразу рабочий скрипт и залить его на sendspace,буду благодарен.Я просто noob в ахк.Вот исходник

 

Filename=%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt

Loop, read, %Filename%
nstroki=%A_Index%
start:
if on=2
return
if block=1
goto start
FileReadLine, stroka, %Filename%, %nstroki%
if ErrorLevel
{
nstroki-=1
goto start
}
if stroka=
{
nstroki+=1
goto start
}
IfInString, stroka, FloriK
{
if (InStr(stroka, "FloriK обыскал игрока"))or (InStr(stroka, "FloriK посадил")) or (InStr(stroka, "бахнул тазером")) or (InStr(stroka, "закован в наручники"))
{
RegExMatch(stroka, ".*\((.*)\):", idigroka)
Sleep 100
Sendinput {F2}
Sleep 300
nstroki+=1
goto start
}
}
IfInString, stroka, Ты увеличил
{
if (InStr(stroka, "розыск"))or (InStr(stroka, "Ты увеличил"))
{
RegExMatch(stroka, ".*\((.*)\):", idigroka)
Sleep 100
Sendinput {F2}
Sleep 300
nstroki+=1
goto start
}
}
IfInString, stroka, Ты дал
{
if (InStr(stroka, "звезды"))or (InStr(stroka, "звезд"))or (InStr(stroka, "Ты дал"))or (InStr(stroka, "Причина"))
{
RegExMatch(stroka, ".*\((.*)\):", idigroka)
Sleep 100
Sendinput {F2}
Sleep 300
nstroki+=1
goto start
}
}
nstroki+=1
goto start
return

~$F6 UP::
if block=0
{
block=1
return
}
if block=1
{
sleep 600
block=0
}
return
~$enter UP::
if block=1
{
sleep 600
block=0
}
return

Изменено пользователем SteelSeries

Поделиться сообщением

Ссылка на сообщение

(Eagle_Max)    4

(Eagle_Max)
Опубликовано (изменено)

 

Парни добрый день,хотел сделать авто-скрин.нечего не получилось,вот вам исходник.Кто сможешь сделать сразу рабочий скрипт и залить его на sendspace,буду благодарен.Я просто noob в ахк.Вот исходник

 

Filename=%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt

Loop, read, %Filename%

nstroki=%A_Index%

start:

if on=2

return

if block=1

goto start

FileReadLine, stroka, %Filename%, %nstroki%

if ErrorLevel

{

nstroki-=1

goto start

}

if stroka=

{

nstroki+=1

goto start

}

IfInString, stroka, FloriK

{

if (InStr(stroka, "FloriK обыскал игрока"))or (InStr(stroka, "FloriK посадил")) or (InStr(stroka, "бахнул тазером")) or (InStr(stroka, "закован в наручники"))

{

RegExMatch(stroka, ".*\((.*)\):", idigroka)

Sleep 100

Sendinput {F2}

Sleep 300

nstroki+=1

goto start

}

}

IfInString, stroka, Ты увеличил

{

if (InStr(stroka, "розыск"))or (InStr(stroka, "Ты увеличил"))

{

RegExMatch(stroka, ".*\((.*)\):", idigroka)

Sleep 100

Sendinput {F2}

Sleep 300

nstroki+=1

goto start

}

}

IfInString, stroka, Ты дал

{

if (InStr(stroka, "звезды"))or (InStr(stroka, "звезд"))or (InStr(stroka, "Ты дал"))or (InStr(stroka, "Причина"))

{

RegExMatch(stroka, ".*\((.*)\):", idigroka)

Sleep 100

Sendinput {F2}

Sleep 300

nstroki+=1

goto start

}

}

nstroki+=1

goto start

return

 

~$F6 UP::

if block=0

{

block=1

return

}

if block=1

{

sleep 600

block=0

}

return

~$enter UP::

if block=1

{

sleep 600

block=0

}

return

 

Уже скинул тебе готовое. :ek:

Изменено пользователем (Eagle_Max)

Поделиться сообщением

Ссылка на сообщение

BIoody    23

BIoody
Опубликовано (изменено)

Помогите криворукому, найти ошибку:

2:: 
 ImageSearch, xf, yf, 0, 0, A_ScreenWidth, A_ScreenHeight, C:\Users\vlad\Desktop\gta_sa 2014-10-10 21-02-31-2апрапр18.png
 ToolTip % ErrorLevel
 MouseMove xf, yf
 Return
Изменено пользователем BIoody

Поделиться сообщением

Ссылка на сообщение

.nexus    150

.nexus
Опубликовано (изменено)

Можно ли сделать для компьютера скрипт,что бы он нажимал сам клавишу каждые 3 секунды?

Можно.

Sleep, 3000

Пример:

!0:: ;клавиша
loop 999 ;количество повторов
{
sleep 3000 ;откат
sendinput{F6}/s пример{enter}
}
Изменено пользователем [Niko_Belic]

Поделиться сообщением

Ссылка на сообщение

Котофей    70

Котофей
Опубликовано

 

Можно.

Sleep, 3000

Пример:

!0:: ;клавиша
loop 999 ;количество повторов
{
sleep 3000 ;откат
sendinput{F6}/s пример{enter}
}

Можешь мне создать готовый скрипт?

Поделиться сообщением

Ссылка на сообщение
Перейти к списку тем Моды

  • Сейчас на странице   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу

×