Не могу получить HWID в cleo.

Статус
В этой теме нельзя размещать новые ответы.

etereon

MQ-Team
Автор темы
Проверенный
324
837
Крч хочу получить HWID для привязки в скрипте, а он при кадждом запуске разный почему-то. Код ниже.
CLEO:
 {$CLEO}

0000: 1

repeat
wait 0
until 0AFA:


0AB1: call_scm_func @GetVolumeInformationA 0 | Serial_TO 0@
0AC8: 1@ = allocate_memory_size 16
0AD3: 1@ = format "%X" 0@
0AF5: write_string 1@ to_ini_file "CLEO\MyHDDSerial.INI" section "Main" key "Serial"
0AC9: free_allocated_memory 1@
0A93: end_custom_thread

:GetVolumeInformationA
0AA2: 25@ = load_library "Kernel32.DLL"
0AA4: 26@ = get_proc_address "GetVolumeInformationA" library 25@
0AC7: 27@ = var 27@ offset
0AA7: call_function 26@ num_params 8 pop 0 nFileSystemNameSize 0 lpFileSystemNameBuffer 0 lpFileSystemFlags 0 lpMaximumComponentLength 0 lpVolumeSerialNumber 27@ nVolumeNameSize 0 lpVolumeNameBuffer 0 lpRootPathName 0 28@
0AA3: free_library 25@
0AB2: ret 1 27@
Запускаю с одного диска, на остальных также
dE6DUNyX8UM.jpg
RNsUEp7PUok.jpg
dQw8GaVH8aE.jpg
 
Решение
Должно работать по идее, так что хуй знает, попробуй так что-ли (ненужное удали потом):

CLEO:
{$CLEO}
0000:

repeat
wait 0
until 0AFA:

while true
wait 0
    if
    0C89:  key_just_pressed 49 // 1
    then
    0AA7: call_function 0x81E532 num_params 8 pop 0 | 0 0 0 0 0@v 0 0 0 1@
        if 1@ == true
        then
        0AC8: 2@ = allocate_memory_size 16
        0AD3: 2@ = format "%X" 0@
        chatmsg 2@ -1
        0AF5: write_string 2@ to_ini_file "CLEO\MyHDDSerial.INI" section "Main" key "Serial"
        0AC9: free_allocated_memory 2@
        end
    end
end

etereon

MQ-Team
Автор темы
Проверенный
324
837
xUAfW1eL81Y.jpg
IxSDqUaRkRk.jpg

{$CLEO}

0000: 1

repeat
wait 0
until 0AFA:


0AB1: call_scm_func @GetVolumeInformationA 0 | Serial_TO 0@
0AC8: 1@ = allocate_memory_size 16
0AD3: 1@ = format "%X" 0@
0AF1: write_string 1@ to_ini_file "CLEO\MyHDDSerial.INI" section "Main" key "Serial"
0AC9: free_allocated_memory 1@
0A93: end_custom_thread

:GetVolumeInformationA
0AA2: 25@ = load_library "Kernel32.DLL"
0AA4: 26@ = get_proc_address "GetVolumeInformationA" library 25@
0AC7: 27@ = var 27@ offset
0AA7: call_function 26@ num_params 8 pop 0 nFileSystemNameSize 0 lpFileSystemNameBuffer 0 lpFileSystemFlags 0 lpMaximumComponentLength 0 lpVolumeSerialNumber 27@ nVolumeNameSize 0 lpVolumeNameBuffer 0 lpRootPathName 0 28@
0AA3: free_library 25@
0AB2: ret 1 27@
help me
 
Последнее редактирование:

D3.Pheonix

🎹
Модератор
2,817
1,597
Должно работать по идее, так что хуй знает, попробуй так что-ли (ненужное удали потом):

CLEO:
{$CLEO}
0000:

repeat
wait 0
until 0AFA:

while true
wait 0
    if
    0C89:  key_just_pressed 49 // 1
    then
    0AA7: call_function 0x81E532 num_params 8 pop 0 | 0 0 0 0 0@v 0 0 0 1@
        if 1@ == true
        then
        0AC8: 2@ = allocate_memory_size 16
        0AD3: 2@ = format "%X" 0@
        chatmsg 2@ -1
        0AF5: write_string 2@ to_ini_file "CLEO\MyHDDSerial.INI" section "Main" key "Serial"
        0AC9: free_allocated_memory 2@
        end
    end
end
 
  • Нравится
Реакции: McLore и etereon

etereon

MQ-Team
Автор темы
Проверенный
324
837
Должно работать по идее, так что хуй знает, попробуй так что-ли (ненужное удали потом):

CLEO:
{$CLEO}
0000:

repeat
wait 0
until 0AFA:

while true
wait 0
    if
    0C89:  key_just_pressed 49 // 1
    then
    0AA7: call_function 0x81E532 num_params 8 pop 0 | 0 0 0 0 0@v 0 0 0 1@
        if 1@ == true
        then
        0AC8: 2@ = allocate_memory_size 16
        0AD3: 2@ = format "%X" 0@
        chatmsg 2@ -1
        0AF5: write_string 2@ to_ini_file "CLEO\MyHDDSerial.INI" section "Main" key "Serial"
        0AC9: free_allocated_memory 2@
        end
    end
end
Спасибо, чекну и отпишу сразу
 

etereon

MQ-Team
Автор темы
Проверенный
324
837
Ну дело в общем не в функции, может ты какой софт ставил на комп, хз. Можешь погуглить, почему меняется hwid
именно тут не меняется, щас сам уж постараюсь дальше в гм это добавить
 

D3.Pheonix

🎹
Модератор
2,817
1,597
именно тут не меняется, щас сам уж постараюсь дальше в гм это добавить
Дак это по сути то же самое, просто сразу записан конечный адрес.
Ну если работает то заебись
 
  • Нравится
Реакции: etereon
Статус
В этой теме нельзя размещать новые ответы.