[Помощь] Отыгровка к Серверным командам - Форум Cheat-Master.ru
  • Страница 1 из 2
  • 1
  • 2
  • »
Модератор форума: Sanoxxx, Alowir, Phoenixxx_Czar  
[Помощь] Отыгровка к Серверным командам
JayscoreINC Дата: Вторник, 31.07.2018, 15:38 | Сообщение # 1
Любитель
Сообщений: 30
Статус: Offline
Приветствую, уважаемые пользователи Cheat Master. У меня такой вопрос:

Я хочу добавить отыгровку к Серверной Команде.
Команда /uninvite [ID] [Причина]
Мне нужно чтобы он считывал ID и Причину ну и далее шла отыгровка
SendChat(ля ля ля)
sleep 1000
SendChat(ля ля ля)
sleep 1000
SendChat("/f "Имя, полученное через ид" отправлен(-а) в отставку.")
SendChat("/f Причина: "И тут второй параметр с серверной команды"")

Заранее благодарю за помощь! <3


Некоторые люди наслаждаются дождём, другие просто промокают.

Сообщение отредактировал JayscoreINC - Вторник, 31.07.2018, 15:39
MrGPro Дата: Вторник, 31.07.2018, 20:51 | Сообщение # 2
Боец
Сообщений: 202
Статус: Offline
Не уверен что правильно расставил переменные uninvite_ в SendChat возможно %uninvite_....%

Код
#include UDF.ahk
dwAddress := dwSAMP + 0x12D8F8
chatInput := readString(hGTA, dwAddress, 256)  ; чтение строки чата из памяти (хз как работает давно не работал но все пишут)
RegExMatch(chatInput, "/uninvite (?<id>\d+) [(?<text>.*)]", uninvite_)
getName := getPlayerNameById(uninvite_id)
SendChat("/f " getName " отправлен(-а) в отставку.")
SendChat("/f Причина: " uninvite_text)


Тебе помогли не забывай про благодарность >> тыкни репутацию
---------------------------------------͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏ -----------------------------------------------------
Зам.Администратора на проекте "DayZ Epoсh SPN" сервер Arma 2OA DayZ Epoch пиратка и лицензия
JayscoreINC Дата: Вторник, 31.07.2018, 22:01 | Сообщение # 3
Любитель
Сообщений: 30
Статус: Offline
Спасибо огромное, второй раз уже помогаешь)

А еще такой вопрос. Серверная команда /r, и мне нужно чтобы когда я писал /r текст, автоматически ставилось /r [" position "]: " текст ". Таким же способом не получится, потому то он отправляет сначала без тега, а потом сообщение с тегом... Возможно ли такое сделать?)


Некоторые люди наслаждаются дождём, другие просто промокают.
JayscoreINC Дата: Вторник, 31.07.2018, 22:11 | Сообщение # 4
Любитель
Сообщений: 30
Статус: Offline
Нет, позишен - это должность, тобишь тэг

Добавлено (31.07.2018, 22:13)
---------------------------------------------
Мне надо, чтобы автоматически когда я пишу /r сообщение, перед сообщением ставился ТЭГ, а он сохраняется в переменной position.


Некоторые люди наслаждаются дождём, другие просто промокают.
JayscoreINC Дата: Вторник, 31.07.2018, 23:26 | Сообщение # 5
Любитель
Сообщений: 30
Статус: Offline
Не работает, сначала пишется сообщение с Тегом как положено, а сразу за ним стандартное без тега. Короче примерно так:

Мы пишем /r 1234

Оно пишет:
/r [Тут ТЭГ]: 1234
/r 1234

Через :?/r и я могу, но хочется по другому


Некоторые люди наслаждаются дождём, другие просто промокают.
MrGPro Дата: Вторник, 31.07.2018, 23:48 | Сообщение # 6
Боец
Сообщений: 202
Статус: Offline
JayscoreINC, сам сервер принимает сообщение формата /r [Тут ТЭГ]: 1234

Данный код не очень корректно работает в некоторых случаях
Код
:?:/r::

В своих кодах без UDF только такую конструкцию использую
Код
:~$?:/r::


Тебе помогли не забывай про благодарность >> тыкни репутацию
---------------------------------------͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏ -----------------------------------------------------
Зам.Администратора на проекте "DayZ Epoсh SPN" сервер Arma 2OA DayZ Epoch пиратка и лицензия


Сообщение отредактировал MrGPro - Вторник, 31.07.2018, 23:52
JayscoreINC Дата: Среда, 01.08.2018, 00:04 | Сообщение # 7
Любитель
Сообщений: 30
Статус: Offline
С очень маленькой задержкой.
Кажется я додумался, нужно использовать

blockinput()
Добавление к /r тег
unblockinput()


Некоторые люди наслаждаются дождём, другие просто промокают.
MrGPro Дата: Среда, 01.08.2018, 00:09 | Сообщение # 8
Боец
Сообщений: 202
Статус: Offline
JayscoreINC,

Код

global rank := "[Генерал]:"

if (isInChat() = 1)
{
   While(!(GetKeyState("Enter", "P") or GetKeyState("Esc", "P")))
{}
    dwAddress := dwSAMP + 0x12D8F8
    chatInput := readString(hGTA, dwAddress, 256)
    if chatInput contains /r
    {
  msg := SubStr(chatInput, 3)
  SendChat("/r " rank " " msg)
sleep 1000
SendChat("/r " msg)
    }
}


chatInput := readString(hGTA, dwAddress, 256) если не работает то проблема тут

чисто на ahk
Код
global rank = "[Генерал]:"
:~$?:/r::
sleep 1000
    While(!(GetKeyState("Enter", "P") or GetKeyState("Esc", "P")))
{}
    chatInput := "/r Здравствуй пидор котрый любит, дрочить хуи на azino 777"
    if chatInput contains /r
    {
   RegExMatch(chatInput, " (.*)", txt)
      msg := SubStr(chatInput, 3)
      MsgBox,,, "/r " %rank% " " %txt1%
   MsgBox,,, "/r " %rank% " " %msg%
    }
return


Тебе помогли не забывай про благодарность >> тыкни репутацию
---------------------------------------͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏ -----------------------------------------------------
Зам.Администратора на проекте "DayZ Epoсh SPN" сервер Arma 2OA DayZ Epoch пиратка и лицензия


Сообщение отредактировал MrGPro - Среда, 01.08.2018, 01:56
MrGPro Дата: Среда, 01.08.2018, 00:37 | Сообщение # 9
Боец
Сообщений: 202
Статус: Offline
Kempel1K, пробуй сейчас испра

Тебе помогли не забывай про благодарность >> тыкни репутацию
---------------------------------------͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏ -----------------------------------------------------
Зам.Администратора на проекте "DayZ Epoсh SPN" сервер Arma 2OA DayZ Epoch пиратка и лицензия
MrGPro Дата: Среда, 01.08.2018, 00:51 | Сообщение # 10
Боец
Сообщений: 202
Статус: Offline
Kempel1K, я исправил код

Код
While(!GetKeyState("Enter", "P") or !GetKeyState("Esc", "P"))
{
}
    MsgBox, e


на

Код
While(!(GetKeyState("Enter", "P") or GetKeyState("Esc", "P")))
{
}
    MsgBox, e


если не использовать {} в while то
While(!(GetKeyState("Enter", "P") or GetKeyState("Esc", "P")))
var:=1; входит в цыкл while
MsgBox,,, не входит


Тебе помогли не забывай про благодарность >> тыкни репутацию
---------------------------------------͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏ -----------------------------------------------------
Зам.Администратора на проекте "DayZ Epoсh SPN" сервер Arma 2OA DayZ Epoch пиратка и лицензия


Сообщение отредактировал MrGPro - Среда, 01.08.2018, 01:55
Toopie Дата: Среда, 01.08.2018, 03:03 | Сообщение # 11
Боец
Сообщений: 122
Статус: Offline
Kempel1K, хватит пожалуйста давать советы, которые не работают.
А вообще, чет вы странно намудрили как-то.
Код

$~vkD::
{
    if (isInChat() && !isDialogOpen()) {
    
  blockChatInput()
  Sleep, 170
  dwAddress := dwSAMP + 0x12D8F8
  chatInput := readString(hGTA, dwAddress, 256)
  Sleep, 30
  unBlockChatInput()
  if (RegExMatch(chatInput, "i)^\/r\s(.*)$", item)) {
   SendChat("/r [Dog] " item1)
  } else {
   SendChat(chatInput)
  }
    }
}


лучший в мире самп сервер 185.159.129.71:7777 лидерки админки да
JayscoreINC Дата: Среда, 01.08.2018, 21:36 | Сообщение # 12
Любитель
Сообщений: 30
Статус: Offline
Спасибо. smile

Добавлено (02.08.2018, 22:27)
---------------------------------------------
В итоге с данным кодом я провозился часа два. Я его изменял и так и так, в какое место кода его пихать ? В конец пихаю - не работает
Перед командами скрипта - работают, зато все команды, которые после него - не работают.. И не надо говорить return убери, его нет...

Код

$~vkD::
{
    if (isInChat() && !isDialogOpen())
    {
        blockChatInput()
        Sleep, 170
        dwAddress := dwSAMP + 0x12D8F8
        chatInput := readString(hGTA, dwAddress, 256)
        Sleep, 30
        unBlockChatInput()
        if (RegExMatch(chatInput, "i)^\/r\s(.*)$", item))
        {
            SendChat("/r [" position "] " item1)
        }
        else
        {
            SendChat(chatInput)
        }
    }
}

Прошу в очередной раз помощи biggrin


Некоторые люди наслаждаются дождём, другие просто промокают.
MrGPro Дата: Четверг, 02.08.2018, 22:59 | Сообщение # 13
Боец
Сообщений: 202
Статус: Offline
JayscoreINC, Полный код сюда или на https://pastebin.com/. return - отвечает за окончание оператора и за возврат значения с функции. Те кто убирают return с кода label hotkey идиоты в определенных случая из-за его нехватки страдает код. Лентяии который не читают документацию

Тебе помогли не забывай про благодарность >> тыкни репутацию
---------------------------------------͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏ -----------------------------------------------------
Зам.Администратора на проекте "DayZ Epoсh SPN" сервер Arma 2OA DayZ Epoch пиратка и лицензия


Сообщение отредактировал MrGPro - Четверг, 02.08.2018, 23:05
JayscoreINC Дата: Четверг, 02.08.2018, 23:15 | Сообщение # 14
Любитель
Сообщений: 30
Статус: Offline
https://pastebin.com/XYhQmge9

Я вырезал половину кода в (выше menu, там настройка ахк в диалогах и офицерское меню)в целях экономия места, т.к он там не нужен, да и палить не хочу)


Некоторые люди наслаждаются дождём, другие просто промокают.
MrGPro Дата: Пятница, 03.08.2018, 01:25 | Сообщение # 15
Боец
Сообщений: 202
Статус: Offline
JayscoreINC, https://pastebin.com/ud17dQ5U
Изучи Try catch, цыкл for, условия if и применение return, написание функций типа funcion(key) пересмотри код я его немного укоротил


Тебе помогли не забывай про благодарность >> тыкни репутацию
---------------------------------------͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏̏͋͋' ͡ ͋̏̏̏̏̏̏̏̏̏ -----------------------------------------------------
Зам.Администратора на проекте "DayZ Epoсh SPN" сервер Arma 2OA DayZ Epoch пиратка и лицензия


Сообщение отредактировал MrGPro - Пятница, 03.08.2018, 01:27
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск:
Статистика Форума
Лучшие пользователи
Admin [39113]

GеNius [7210]

[CM]Russel [5557]

kenlo763 [4952]

[CM]AGRESSOR [4639]

Snake_Firm [4452]

Сэс [4416]

Artem_Buero [4223]

[CM]Durman [3204]

[CM]Рафаэль [3080]

iMaddy [2855]

sky_Woker [2854]

getrekt [2745]

Новые пользователи