Devil9313

Да, Delphi XE7

Я создал тем чтобы кто нибудь взялся писать движок предварительно сказав сколько будет стоить

23 минуты назад, mrPTyshnik сказал:

))ты платить кому-то за это собираешься?

Да

Здравствуйте ребят, сколько будет  стоит MemoryHack.pas с данным функционалом ? 

1.Поиск адреса по сигнатуре
2.Запись значения байтами
3.Запись значения типа Float,duble, integer  
4.Выделение памяти под свой код
5.Иньекция своего кода 
6.Чтение значения типа Float,duble,integer c выводом значения в label

в общем нужен полноценный движок для написания трейнера 

Ребят никто не поможет ? 

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

Читает но почему-то не то значение указал адрес считывает но значения совсем разные 

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

Нет нету сейчас найду скину

и перемещение по координатам срабатывает почему-то 1 раз нажал  кнопку переместился потом отошел от этого места куда переместился и нажал снова и не сработало второй раз 

Да конечно без проблем Delphi XE7 

45 минут назад, Vlad2 сказал:

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

43 минуты назад, Vlad2 сказал:

Твоя процедура MemoryWriteValue принимает тип Cardinal (целое число), а ты передаешь ей значение типа Real. Отсюда и конфликт.

Поправил твой модуль.

Можешь теперь передавить процедуре MemoryWriteValue два типа данных: Cardinal, Double (тип с плавающей запятой);

P.S. Тебе лучше использовать Double, вместо Real.

MemoryHack.pas

Огромное спасибо за помощь!!! Сейчас посмотрю что там.

Ребят сможете помочь ? если конечно не трудно за помощь буду благодарен 
я просто не работал со значениями типа Float не приходилось а теперь понадобилось но вот не знаю как прочитать значения и записывать их 

Нужно выводит значение координат в label сохранять текущие и телепортироваться на сохраненные  

Что-то у меня не выходит, может что не так делаю, посмотрите пожалуйста исходник. 

Исходник

6 минут назад, Xipho сказал:

В делфи все переменные объявляются в секции var с указанием типа ) 

x: Real;

И только потом в коде идет присвоение значения

x := -669.569;

Спасибо, сейчас попробую. 

Здравствуйте подскажите как записать значение типа Float (-669.56872343) В Delphi 

2 часа назад, Xipho сказал:

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

Как время будет сможете помочь ? я вам скину готовую форму я визуально сделал всё как мне нужно

Для чего вообще создан раздел платный запросы?! Всё равно же за работу никто не берется!!!

В 25.02.2016в20:59, afro228offical сказал:

Да сканеров полно на этом ресурсе ) Бери любой ) Да и уроков по его созданию немало ...

Дай мне ссылочку хоть на один путевый сканер и именно такой какой хочу я

В 21.02.2016в05:04, Devil9313 сказал:

В 23.02.2016в10:44, Xipho сказал:

Давненько на делфи не кодил. Но если никто до конца недели не возьмется, попробую помочь.

Мне один написал типа сделает за 3000 рублей ну это как бы много хотя бы за 1000 - 1500 да и то мне кажется за исходник сканера 1500 это много можешь дать свой Skype ?

Здравствуйте! Мне нужен исходник сканера адресов для игры с использованием сигнатуры и маски

функционал сканера : 
1.Кнопка старт\стоп (Сканирование адресов чтобы работал в потоке без зависания формы во время сканирования плюс прогресс бар оповещающие о том сколько осталось до конца сканирования)
2.Сохранение адреса из Memo в файл
3.Копирование из Memo в буфер 

Ну и лог сканирования и чтобы не рабочие адреса пропускались и записывалось в лог сколько не рабочих адресов и сколько рабочих 

и дополнительную функцию конвертер сигнатур чтобы из  FE 5E 0F 45 конвертировалось в массив байт  0xFE, 0x5E, 0x0F, 0x45 и в C++ \xFE\x5E\x0F\x45
в общем я форму подготовил сделал всё как нужно на форме кто возьмется за работу пишите в Skype: scorpion94949494 о цене договоримся там же 
сканер адресов должен быть написан на Delphi XE

tlhelp32 для этой функции не нужен подключил библиотеку psapi

ошибка осталась только тут 

if AnsiCompareText(Name, ModuleName) = 0 then

Vlad2, ESP_Name константа с нужным мне адресом 

const

ESP_Name = $6749AF;  // ESP подсветка ников 

подключил библиотеку SysUtils шибок нет

У меня несколько ошибок

1. TModuleInfo;               // Ошибка

2. EnumProcessModules   // Ошибка

3. GetModuleBaseName   // Ошибка

4. if AnsiCompareText      // Ошибка

5. GetModuleInformation  // Ошибка

6. lpBaseOfDll                 // Ошибка

Delphi XE7