[Разработка] CRMP UDF | Дорабатываем вместе! - Страница 2 - Форум Cheat-Master.ru

  • Страница 2 из 2
  • «
  • 1
  • 2
Форум » Программирование » AHK Программирование » [Разработка] CRMP UDF | Дорабатываем вместе! (Разработка новых функций CRMP UDF)
[Разработка] CRMP UDF | Дорабатываем вместе!
Rinat_NamazovДата: Среда, 21.02.2018, 22:57 | Сообщение # 16
Боец
Группа: Пользователи
Сообщений: 110
Статус: Offline
Цитата DOBRO1 ()
Из диалогового окна текст можно как то вытаскивать?)

Правильно зачем что-то читать, если можно спросить.
; # - getDialogCaption() - Вывод названия диалога ; | Работает
; # - getDialogText() - Вывод текста из диалога ; | Работает
; # - getDialogLine(index) - Выводит текст из строки ; | Работает
; # - getDialogLines() - Возвращает массив строк с диалога ; | Не тестировал
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Joni228Дата: Четверг, 05.04.2018, 07:08 | Сообщение # 17
Боец
Группа: Читер CM
Сообщений: 255
Статус: Offline
Цитата DOBRO1 ()
Из диалогового окна текст можно как то вытаскивать?)

Можно! getDialogText()

Добавлено (05.04.2018, 07:08)
---------------------------------------------
UP!


Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
DrygokДата: Четверг, 07.06.2018, 22:07 | Сообщение # 18
Любитель
Группа: Пользователи
Сообщений: 31
Статус: Offline
Не знаю, может кому понадобится. Скорость авто в режиме наблюдения.

Код
SpecSpeed() {
    if(!checkHandles())
        return -1
    dwAddr := readDWORD(hGTA, getModuleBaseAddress("grand_theft_auto_san_andreas.dll", hGTA) + 0x76F3B8)
    
    fSpeedX := readMem(hGTA, dwAddr + ADDR_VEHICLE_X, 4, "float")
    fSpeedY := readMem(hGTA, dwAddr + ADDR_VEHICLE_Y, 4, "float")
    fSpeedZ := readMem(hGTA, dwAddr + ADDR_VEHICLE_Z, 4, "float")
    
    fVehicleSpeed := ((sqrt((fSpeedX * fSpeedX) + (fSpeedY * fSpeedY) + (fSpeedZ * fSpeedZ))) * 100) * 1.43

    return fVehicleSpeed
}
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Yura105500Дата: Вторник, 12.06.2018, 01:01 | Сообщение # 19
Cheat-Master
Группа: Пользователи
Сообщений: 29
Статус: Offline
Было бы полезно проверка на открытый чат )
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
DrygokДата: Среда, 13.06.2018, 12:51 | Сообщение # 20
Любитель
Группа: Пользователи
Сообщений: 31
Статус: Offline
Yura105500,

Код

global ADDR_SAMP_INCHAT_PTR := 0x20DFFC
global ADDR_SAMP_INCHAT_PTR_OFF := 0x55

isInChat() {
    if(!checkHandles())
        return -1
    
    dwPtr := dwSAMP + ADDR_SAMP_INCHAT_PTR
    dwAddress := readDWORD(hGTA, dwPtr) + ADDR_SAMP_INCHAT_PTR_OFF
    if(ErrorLevel) {
        ErrorLevel := ERROR_READ_MEMORY
        return -1
    }
    
    dwInChat := readDWORD(hGTA, dwAddress)
    if(ErrorLevel) {
        ErrorLevel := ERROR_READ_MEMORY
        return -1
    }
    
    ErrorLevel := ERROR_OK
    if(dwInChat > 0) {
        return true
    } else {
        return false
    }
}

Добавлено (13.06.2018, 12:51)
---------------------------------------------
Может кому нужно будет.

Код

global FUNC_SAMP_SHOWDIALOG := 0x668C0
global SAMP_DIALOG_STRUCT_PTR := 0x20DFAC

showDialog(style, caption, text, button1, button2 := "", id := 1) {
    style += 0
    style := Floor(style)
    id += 0
    id := Floor(id)
    caption := "" caption
    text := "" text
    button1 := "" button1
    button2 := "" button2

    if (id < 0 || id > 32767 || style < 0 || style > 5 || StrLen(caption) > 64 || StrLen(text) > 4096 || StrLen(button1) > 10 || StrLen(button2) > 10)
  return false

    if (!checkHandles())
  return false

    dwFunc := dwSAMP + FUNC_SAMP_SHOWDIALOG
    sleep 200
    dwAddress := readDWORD(hGTA, dwSAMP + SAMP_DIALOG_STRUCT_PTR)
    if (ErrorLevel || !dwAddress) {
  ErrorLevel := ERROR_READ_MEMORY
  return false
    }

    writeString(hGTA, pParam5, caption)
    if (ErrorLevel)
  return false
    writeString(hGTA, pParam1, text)
    if (ErrorLevel)
  return false
    writeString(hGTA, pParam5 + 512, button1)
    if (ErrorLevel)
  return false
    writeString(hGTA, pParam5+StrLen(caption) + 1, button2)
    if (ErrorLevel)
  return false

    ;mov + 7 * push + call + retn
    dwLen := 5 + 7 * 5 + 5 + 1
    VarSetCapacity(injectData, dwLen, 0)

    NumPut(0xB9, injectData, 0, "UChar")       ;0 + 1    ;mov ecx
    NumPut(dwAddress, injectData, 1, "UInt")      ;1 + 4
    NumPut(0x68, injectData, 5, "UChar")       ;5 + 1    ;push send
    NumPut(1, injectData, 6, "UInt")        ;6 + 4
    NumPut(0x68, injectData, 10, "UChar")       ;10 + 1    ;push button2
    NumPut(pParam5 + StrLen(caption) + 1, injectData, 11, "UInt")    ;11 + 4
    NumPut(0x68, injectData, 15, "UChar")       ;15 + 1    ;push button1
    NumPut(pParam5 + 512, injectData, 16, "UInt")     ;16 + 4
    NumPut(0x68, injectData, 20, "UChar")       ;20 + 1    ;push text
    NumPut(pParam1, injectData, 21, "UInt")       ;21 + 4
    NumPut(0x68, injectData, 25, "UChar")       ;25 + 1    ;push caption
    NumPut(pParam5, injectData, 26, "UInt")       ;26 + 4
    NumPut(0x68, injectData, 30, "UChar")       ;30 + 1    ;push style
    NumPut(style, injectData, 31, "UInt")       ;31 + 4
    NumPut(0x68, injectData, 35, "UChar")       ;35 + 1    ;push id
    NumPut(id, injectData, 36, "UInt")        ;36 + 4

    NumPut(0xE8, injectData, 40, "UChar")       ;40 + 1 ;call
    offset := dwFunc - (pInjectFunc + 45)
    NumPut(offset, injectData, 41, "Int")       ;41 + 4
    NumPut(0xC3, injectData, 45, "UChar")       ;45 + 1    ;retn

    writeRaw(hGTA, pInjectFunc, &injectData, dwLen)
    if (ErrorLevel)
  return false

    hThread := createRemoteThread(hGTA, 0, 0, pInjectFunc, 0, 0, 0)
    if (ErrorLevel)
  return false

    waitForSingleObject(hThread, 0xFFFFFFFF)
    closeProcess(hThread)

    return true
}
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Phoenixxx_CzarДата: Среда, 13.06.2018, 16:15 | Сообщение # 21
AHK Скриптер
Группа: Младший модератор
Сообщений: 600
Статус: Offline
Drygok, мб еще и адрес чата есть? (который текст хранит)

Я в ВК
AHK скрипты на заказ(бесплатно | Актуально 26.05.2018 - **/**/****), помогаю с AHK.
--------
AHK
--------
Флудер для SAMP
Выбор в диалогах мышкой и enter`ом
Чекер Друзей и Админов for SAMP
Быстрый ответ на СМС for SAMP
Счетчик наигранного времени for SAMP
Счетчик заработанных денег за сутки для адвоката for Evolve RP
Auto Fisher for Revent RP
Flooder SMS for DRP
--------------------------------------------------------
Достижения:
------------------
- 26.02.2017 - 03.01.2018
- 03.01.2018 - 26.05.2018
- 26.05.2018
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Joni228Дата: Среда, 13.06.2018, 17:01 | Сообщение # 22
Боец
Группа: Читер CM
Сообщений: 255
Статус: Offline
Цитата Drygok ()
Может кому нужно будет.

Добавил все!


Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
DrygokДата: Среда, 13.06.2018, 20:25 | Сообщение # 23
Любитель
Группа: Пользователи
Сообщений: 31
Статус: Offline
Phoenixxx_Czar, 0x122EF8 ?
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Joni228Дата: Среда, 13.06.2018, 21:59 | Сообщение # 24
Боец
Группа: Читер CM
Сообщений: 255
Статус: Offline
Цитата Drygok ()
Phoenixxx_Czar, 0x122EF8 ?

Может тогда сразу все адреса напишешь? xD


Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Форум » Программирование » AHK Программирование » [Разработка] CRMP UDF | Дорабатываем вместе! (Разработка новых функций CRMP UDF)
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск:
Статистика Форума
Последнии темы Читаемые темы Лучшие пользователи Новые пользователи
♔♔♔♔ СКУПКА ПРОДАЖА ВИРТ ... [vsdfsfdfdddddddddd]

[FREE] АВАTAR ДЛЯ FОРУMA ... [Valentino007]

[Arizona Role Play] Транс... [Stepan2002Sh]

⚡Скупка/Продажа виртов AR... [Hu4789]

⏪⏪⏪⭐ОЧЕНЬ ДЕШЕВЫЕ ВИРТЫ ⏪... [cap_t1ma]

САМЫЕ ДЕШЕВЫЕ ВИРТЫ ARP❤D... [MonCl]

[CLEO] Сердечко над голов... [[CM]Jamaica]

Фейк рация [marvas81]

[1945991] rborn, невалид ... [rbоrn]

Ставлю тюнинг любой сложн... [marvas81]

ТЕЛЕПОРТ БЕЗ КИКА НА АРИЗ... [marvas81]

Скупка STEAM - 24/7 [CS:G... [Ersor]

[1]>[0.3z][RUS] S0beit modified by MishaN [10001]

[2]>Курилка [10000]

[3]>Поиск CLEO скриптов | Вопросы по клео скриптам [9988]

[4]>Флудильная [9936]

[5]>Курилка [9688]

[6]>Курилка [9614]

[7]>RakBot - Качай аккаунты не напрягаясь! [9604]

[8]>Общение читеров [CM] [9546]

[9]>S0beit - pr9n project for samp 0.3.7 [9490]

[10]>Часто задаваемые вопросы... [8225]

[11]>Скуплю Advance по 300р за 1кк и DIamond по 250р [7624]

[12]>[0.3.7][RUS] Sobeit modified by MishaN [6239]

[1]>АК_47 [31589]

[2]>GеNius [6990]

[3]>[CM]Russel [5525]

[4]>romka619 [5005]

[5]>[CM]AGRESSOR [4643]

[6]>Сэс [4405]

[7]>Snake_Firm [4351]

[8]>Artem_Buero [4186]

[9]>[CM]Durman [3129]

[10]>iMaddy [2859]

[11]>sky_Woker [2856]

[12]>[CM]Рафаэль [2757]

[13]>Sa1nteD [2678]

[14]>Ch0c0Cube [2446]

[15]>lanixchannel [2265]

migranov16 [22.06.2018|19:59]

bigim [22.06.2018|19:58]

prorok811 [22.06.2018|19:52]

Lexa_Sedov [22.06.2018|19:38]

ulizerro [22.06.2018|19:37]

LEGIOSHA [22.06.2018|19:30]

Urgant1337 [22.06.2018|19:29]

TheProdavesTOP [22.06.2018|19:16]

ensui [22.06.2018|19:16]

KodMisheaulo [22.06.2018|19:15]

Vladislav4ik1337 [22.06.2018|19:11]

kekovskiy1111 [22.06.2018|19:09]

adilmasterflomaster [22.06.2018|19:07]

Rahat2281488 [22.06.2018|19:04]

MixNotMix [22.06.2018|18:53]


CM Team © 2009-2018 Администрация не несёт ответственности за размещённые материалы. Условия пользования
Все материалы предоставлены в ознакомительных целях и администрация предлагает удалить их после ознакомления.

Положение о защите персональных данных на сайте, Пользовательское соглашение, Договор оказания услуг.