Софт [CLEO PLUGIN] MGFUNCS 4.3 (0.3x / 0.3z)

[SR_team]

У меня код в голове находится, но такое лучше не говорить, а то разрабы сампа вообще клео запретят.

И будем фигачить на C++ :D Там и возможностей больше

 

[Dark_Knight]

И будем фигачить на C++ :D Там и возможностей больше

Больше то больше, но ты не думал, что они сделают АЧ как в МТА?

 

[FYP]

Если ты знаешь как запустить, то скажи пожалуйста! Мне давно надо было))

простейший вариант запуска dll, код которой находится в теле скрипта. писал давным давно лишь для проверки, использовать ни разу не пришлось.

Спойлер

{$CLEO}

wait 0

while true
wait 0 
if key_down 0x31
then
call @makefile 0
0a93:
end
end

var 
3@ : int
4@ : int
end

:makefile
0A9A: 0@ = openfile "cleo\test.bin" mode "wb+" // IF and SET
call @getfilesize 2 @file @endoffile 1@
0AC6: 2@ = label @file offset
for 3@ = 0 to 1@
0A8E: 4@ = 2@ + 3@ // int
0A8D: 4@ = read_memory 4@ size 1 virtual_protect 0

0A9E: writefile 0@ size 1 from 4@
end
0A9B: closefile 0@
0AA2: 0@ = load_library "cleo\test.bin" // IF and SET
0AA5: call 6@ num_params 0 pop 0
//wait 1000
//0AA3: free_library 0@
//0B00: delete_file "cleo\test.bin" //IF and SET
ret 0

:getfilesize
// 0@ - label, 1@ - end of file
0AC6: 0@ = label 0@ offset
0AC6: 1@ = label 1@ offset
0062: 1@ -= 0@
dec(1@)
ret 1 1@

:file
hex
// здесь должен быть hex-код всего исполняемого файла
end
:endoffile

0000:

 

[gcode]

простейший вариант запуска dll, код которой находится в теле скрипта. писал давным давно лишь для проверки, использовать ни разу не пришлось.

Спойлер

{$CLEO}
 
wait 0
 
while true
wait 0
if key_down 0x31
then
call @makefile 0
0a93:
end
end
 
var
3@ : int
4@ : int
end
 
:makefile
0A9A: 0@ = openfile "cleo\test.bin" mode "wb+" // IF and SET
call @getfilesize 2 @file @endoffile 1@
0AC6: 2@ = label @file offset
for 3@ = 0 to 1@
0A8E: 4@ = 2@ + 3@ // int
0A8D: 4@ = read_memory 4@ size 1 virtual_protect 0
 
0A9E: writefile 0@ size 1 from 4@
end
0A9B: closefile 0@
0AA2: 0@ = load_library "cleo\test.bin" // IF and SET
0AA5: call 6@ num_params 0 pop 0
//wait 1000
//0AA3: free_library 0@
//0B00: delete_file "cleo\test.bin" //IF and SET
ret 0
 
:getfilesize
// 0@ - label, 1@ - end of file
0AC6: 0@ = label 0@ offset
0AC6: 1@ = label 1@ offset
0062: 1@ -= 0@
dec(1@)
ret 1 1@
 
:file
hex
// здесь должен быть hex-код всего исполняемого файла
end
:endoffile
 
0000:

Это теперь можно писать свои dll-функции и юзать их без regsrv32 ? Или так можно было делать и без занесения кода библиотеки в скрипт ?)

 

[spiceman]

Это теперь можно писать свои dll-функции и юзать их без regsrv32 ? Или так можно было делать и без занесения кода библиотеки в скрипт ?)

ну этот код создает файлик и запускает его же.
тоже самое, что поместить куда-либо файл и запустить его.

 

[FYP]

Это теперь можно писать свои dll-функции и юзать их без regsrv32 ? Или так можно было делать и без занесения кода библиотеки в скрипт ?)

так можно было делать и без занесения кода библиотеки в скрипт, нужно лишь загрузить dll и вызывать требуемые функции. чтоб удобнее было их использовать сделай экспорты функций и получай их адреса по именам с помощью опкода 0AA4: $hPROC = get_proc_address "GetVersion" library $hLIB // IF and SET

 

[hnnssy]

Убери ограничение на кол-во символов, пожалуйста, в опкоде рендера текста.

0D94: draw_text "New Young Pony Club" pos_xy 64 64 align_xy 0.5 0.0 color 0xFF0000 shadow 1

 

[SR_team]

Запили опкод устанавливающий метку на карте, хочу сохранение метки при перезапуске игры сделать

 

[MogAika]

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

 

[Dark_Knight]

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

Из ряда.

Спойлер

 

[MogAika]

обнова для 0.3z, также увеличены буфферы для рисования текста. Теперь по 512 символов за раз.
Так-же вернул опкоды для маркеров
Версию можно назвать Beta, поэтому при багах желательно отписываться в этой теме.

 

[hnnssy]

Зарендерил более 128 символов - пошли варнинги.

 

[MogAika]

Зарендерил более 128 символов - пошли варнинги.

еще багов не замечено?

 

[hnnssy]

еще багов не замечено?

Мною нет.

 

[MogAika]

Мною нет.

а ты передаешь указатель на строку? или строку прям в санни вставляешь, в кавычки?