Гайд Пишем проверку обновлений скрипта и скачку его онлайн.

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

Stas07

Известный
Проверенный
266
113
Код:
{$CLEO .cs}
0000:
{$Include sf}

:Test
wait 0
0ADC:   test_cheat "upd"
jf @Test
0AC8: 0@ = allocate_memory_size 60
0AC8: 1@ = allocate_memory_size 256
0AD3: 0@ = format "CLEO\AsProject.cs"
0AD3: 1@ = format "https:%c/www.dropbox.com/s/6iz0u41mg8t45cl/AsProject.cs?dl=1" 47

0AB1: call_scm_func @URLDownloadToFileA 2 0@ 1@ // Êà÷àåì ôàéë.
0AB1: call_scm_func @DeleteUrlCacheEntryA 1 1@ // Î÷èùàåì ìóñîð.
0AC9: free_allocated_memory 0@
0AC9: free_allocated_memory 1@
jump @Test
:URLDownloadToFileA // 0AB1: call_scm_func @URLDownloadToFileA 2 0@ 1@
0AA2: 25@ = load_library "Urlmon.DLL"
0AA4: 26@ = get_proc_address "URLDownloadToFileA" library 25@
0AA7: call_function 26@ num_params 5 pop 0 0 0 0@ 1@ 0 20@ // 0@ - Ïóòü | 1@ - Ññûëêà.
0AA3: free_library 25@
0AB2: ret 0
:DeleteUrlCacheEntryA // 0AB1: call_scm_func @DeleteUrlCacheEntryA 1 1@
0AA2: 25@ = load_library "Wininet.DLL"
0AA4: 26@ = get_proc_address "DeleteUrlCacheEntryA" library 25@
0AA7: call_function 26@ num_params 1 pop 0 0@ 20@ // 0@ - Ññûëêà.
0AA3: free_library 25@
0AB2: ret 0

Что не так?
 
Последнее редактирование:
Статус
В этой теме нельзя размещать новые ответы.