Другое Скомпилировать Cleo-script.

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

TwenKey

Новичок
Автор темы
8
0
Я ашот немного, не поможете скомпилировать этот скрипт?
Заранее спасибо!

CLEO:
{$CLEO .cs}
0000:
repeat
    wait 0
until 0afa:

if 8AAB:   file_exists "ANIM\anim.ini"
    then gosub @CreateINI
else gosub @LoadINI
end 

0B34: samp register_client_command "animizer" to_label @cmdToggle
0B34: samp register_client_command "animizerr" to_label @cmdReload

0AC8: 0@ = allocate_memory_size 260
2@ = 1
for 3@ = 1 to 64
    0AD3: 0@ = format "ANIM\Frames\%d.png" 3@
    if 8AAB:   file_exists 0@
        then
        0B71: render 1@ = load_texture_from_file 0@
        0A8F: 4@ = 3@ - 2@
        0ab1: @sVar 2 4@ 1@
    else inc(2@) //2@ += 1
    end
end

while true
    wait 0
    if 31@ == 1
        then
        for 3@ = 0 to 64
            0ab1: @gVar 1 3@ 1@
            if 1@ <> 0
                then
                32@ = 0
                repeat
                    wait 0
                    0B73: render draw_texture 1@ pos 25@ 26@ size 27@ 28@ rotation 29@ color 30@
                until 002D: 32@ >= 24@
            else break
            end
        end
    end
end

:CreateINI
0AF1: write_int 300 to_ini_file "ANIM\anim.ini" section "Position" key "X"
0AF1: write_int 300 to_ini_file "ANIM\anim.ini" section "Position" key "Y"
0AF1: write_int 0 to_ini_file "ANIM\anim.ini" section "ONOFF" key "ONOFF"
0AF1: write_int 90 to_ini_file "ANIM\anim.ini" section "Size" key "X"
0AF1: write_int 90 to_ini_file "ANIM\anim.ini" section "Size" key "Y"
//0AF1: write_int 18 to_ini_file "ANIM\anim.ini" section "Anim" key "Frames"
0AF1: write_int 100 to_ini_file "ANIM\anim.ini" section "Anim" key "Pause"
0AF3: write_float 0.0 to_ini_file "ANIM\anim.ini" section "Anim" key "Rotation"
0AF1: write_int -1 to_ini_file "ANIM\anim.ini" section "Anim" key "Color"
gosub @LoadINI
return
:LoadINI
0AF0: 25@ = get_int_from_ini_file "ANIM\anim.ini" section "Position" key "X"
0AF0: 26@ = get_int_from_ini_file "ANIM\anim.ini" section "Position" key "Y"
0AF0: 31@ = get_int_from_ini_file "ANIM\anim.ini" section "ONOFF" key "ONOFF"
0AF0: 27@ = get_int_from_ini_file "ANIM\anim.ini" section "Size" key "X"
0AF0: 28@ = get_int_from_ini_file "ANIM\anim.ini" section "Size" key "Y"
//0AF0: 23@ = get_int_from_ini_file "ANIM\anim.ini" section "Anim" key "Frames"
0AF0: 24@ = get_int_from_ini_file "ANIM\anim.ini" section "Anim" key "Pause"
0AF2: 29@ = get_float_from_ini_file "ANIM\anim.ini" section "Anim" key "Rotation"
0AF0: 30@ = get_int_from_ini_file "ANIM\anim.ini" section "Anim" key "Color"
return

:cmdToggle
0B12: 31@ = 31@ XOR 1
0AF1: write_int 31@ to_ini_file "ANIM\anim.ini" section "ONOFF" key "ONOFF"
if 31@ == 1
    then 0AF8: samp add_message_to_chat "Animizer ON" color 0xFFFF
else 0AF8: samp add_message_to_chat "Animizer OFF" color 0xFFFF
end
cmdret
:cmdReload
gosub @LoadINI
0AF8: samp add_message_to_chat "Animizer | Íàñòðîéêè ïåðåçàãðóæåííû" color 0xFFFF
cmdret

:sVar
//0ab1: @sVar 2 _bufVar _fromVar
0AC6: 2@ = label @Buffer offset
0@ *= 5
005A: 2@ += 0@ // (int)
0A8C: write_memory 2@ size 4 value 1@ virtual_protect 1
ret 0
:gVar
//0ab1: @gVar 1 _bufVar _toVar
0AC6: 1@ = label @Buffer offset
0@ *= 5
005A: 1@ += 0@ // (int)
0A8D: 1@ = read_memory 1@ size 4 virtual_protect 1
ret 1 1@
:Buffer //https://www.blast.hk/threads/8249/
hex //65 êàäðîâ íîðì
00 00 00 00 00 //0
00 00 00 00 00 //1
00 00 00 00 00 //2
00 00 00 00 00 //3
00 00 00 00 00 //4
00 00 00 00 00 //5
00 00 00 00 00 //6
00 00 00 00 00 //7
00 00 00 00 00 //8
00 00 00 00 00 //9
00 00 00 00 00 //11
00 00 00 00 00 //12
00 00 00 00 00 //13
00 00 00 00 00 //14
00 00 00 00 00 //15
00 00 00 00 00 //16
00 00 00 00 00 //17
00 00 00 00 00 //18
00 00 00 00 00 //19
00 00 00 00 00 //20
00 00 00 00 00 //21
00 00 00 00 00 //22
00 00 00 00 00 //23
00 00 00 00 00 //24
00 00 00 00 00 //25
00 00 00 00 00 //26
00 00 00 00 00 //27
00 00 00 00 00 //28
00 00 00 00 00 //29
00 00 00 00 00 //30
00 00 00 00 00 //31
00 00 00 00 00 //32
00 00 00 00 00 //33
00 00 00 00 00 //34
00 00 00 00 00 //35
00 00 00 00 00 //36
00 00 00 00 00 //37
00 00 00 00 00 //38
00 00 00 00 00 //39
00 00 00 00 00 //40
00 00 00 00 00 //41
00 00 00 00 00 //42
00 00 00 00 00 //43
00 00 00 00 00 //44
00 00 00 00 00 //45
00 00 00 00 00 //46
00 00 00 00 00 //47
00 00 00 00 00 //48
00 00 00 00 00 //49
00 00 00 00 00 //50
00 00 00 00 00 //51
00 00 00 00 00 //52
00 00 00 00 00 //53
00 00 00 00 00 //54
00 00 00 00 00 //55
00 00 00 00 00 //56
00 00 00 00 00 //57
00 00 00 00 00 //58
00 00 00 00 00 //59
00 00 00 00 00 //60
00 00 00 00 00 //61
00 00 00 00 00 //62
00 00 00 00 00 //63
00 00 00 00 00 //64
end // hex
 

LaRossa

Потрачен
429
117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Я ашот немного, не поможете скомпилировать этот скрипт?
Заранее спасибо!

CLEO:
{$CLEO .cs}
0000:
repeat
    wait 0
until 0afa:

if 8AAB:   file_exists "ANIM\anim.ini"
    then gosub @CreateINI
else gosub @LoadINI
end

0B34: samp register_client_command "animizer" to_label @cmdToggle
0B34: samp register_client_command "animizerr" to_label @cmdReload

0AC8: 0@ = allocate_memory_size 260
2@ = 1
for 3@ = 1 to 64
    0AD3: 0@ = format "ANIM\Frames\%d.png" 3@
    if 8AAB:   file_exists 0@
        then
        0B71: render 1@ = load_texture_from_file 0@
        0A8F: 4@ = 3@ - 2@
        0ab1: @sVar 2 4@ 1@
    else inc(2@) //2@ += 1
    end
end

while true
    wait 0
    if 31@ == 1
        then
        for 3@ = 0 to 64
            0ab1: @gVar 1 3@ 1@
            if 1@ <> 0
                then
                32@ = 0
                repeat
                    wait 0
                    0B73: render draw_texture 1@ pos 25@ 26@ size 27@ 28@ rotation 29@ color 30@
                until 002D: 32@ >= 24@
            else break
            end
        end
    end
end

:CreateINI
0AF1: write_int 300 to_ini_file "ANIM\anim.ini" section "Position" key "X"
0AF1: write_int 300 to_ini_file "ANIM\anim.ini" section "Position" key "Y"
0AF1: write_int 0 to_ini_file "ANIM\anim.ini" section "ONOFF" key "ONOFF"
0AF1: write_int 90 to_ini_file "ANIM\anim.ini" section "Size" key "X"
0AF1: write_int 90 to_ini_file "ANIM\anim.ini" section "Size" key "Y"
//0AF1: write_int 18 to_ini_file "ANIM\anim.ini" section "Anim" key "Frames"
0AF1: write_int 100 to_ini_file "ANIM\anim.ini" section "Anim" key "Pause"
0AF3: write_float 0.0 to_ini_file "ANIM\anim.ini" section "Anim" key "Rotation"
0AF1: write_int -1 to_ini_file "ANIM\anim.ini" section "Anim" key "Color"
gosub @LoadINI
return
:LoadINI
0AF0: 25@ = get_int_from_ini_file "ANIM\anim.ini" section "Position" key "X"
0AF0: 26@ = get_int_from_ini_file "ANIM\anim.ini" section "Position" key "Y"
0AF0: 31@ = get_int_from_ini_file "ANIM\anim.ini" section "ONOFF" key "ONOFF"
0AF0: 27@ = get_int_from_ini_file "ANIM\anim.ini" section "Size" key "X"
0AF0: 28@ = get_int_from_ini_file "ANIM\anim.ini" section "Size" key "Y"
//0AF0: 23@ = get_int_from_ini_file "ANIM\anim.ini" section "Anim" key "Frames"
0AF0: 24@ = get_int_from_ini_file "ANIM\anim.ini" section "Anim" key "Pause"
0AF2: 29@ = get_float_from_ini_file "ANIM\anim.ini" section "Anim" key "Rotation"
0AF0: 30@ = get_int_from_ini_file "ANIM\anim.ini" section "Anim" key "Color"
return

:cmdToggle
0B12: 31@ = 31@ XOR 1
0AF1: write_int 31@ to_ini_file "ANIM\anim.ini" section "ONOFF" key "ONOFF"
if 31@ == 1
    then 0AF8: samp add_message_to_chat "Animizer ON" color 0xFFFF
else 0AF8: samp add_message_to_chat "Animizer OFF" color 0xFFFF
end
cmdret
:cmdReload
gosub @LoadINI
0AF8: samp add_message_to_chat "Animizer | Íàñòðîéêè ïåðåçàãðóæåííû" color 0xFFFF
cmdret

:sVar
//0ab1: @sVar 2 _bufVar _fromVar
0AC6: 2@ = label @Buffer offset
0@ *= 5
005A: 2@ += 0@ // (int)
0A8C: write_memory 2@ size 4 value 1@ virtual_protect 1
ret 0
:gVar
//0ab1: @gVar 1 _bufVar _toVar
0AC6: 1@ = label @Buffer offset
0@ *= 5
005A: 1@ += 0@ // (int)
0A8D: 1@ = read_memory 1@ size 4 virtual_protect 1
ret 1 1@
:Buffer //https://www.blast.hk/threads/8249/
hex //65 êàäðîâ íîðì
00 00 00 00 00 //0
00 00 00 00 00 //1
00 00 00 00 00 //2
00 00 00 00 00 //3
00 00 00 00 00 //4
00 00 00 00 00 //5
00 00 00 00 00 //6
00 00 00 00 00 //7
00 00 00 00 00 //8
00 00 00 00 00 //9
00 00 00 00 00 //11
00 00 00 00 00 //12
00 00 00 00 00 //13
00 00 00 00 00 //14
00 00 00 00 00 //15
00 00 00 00 00 //16
00 00 00 00 00 //17
00 00 00 00 00 //18
00 00 00 00 00 //19
00 00 00 00 00 //20
00 00 00 00 00 //21
00 00 00 00 00 //22
00 00 00 00 00 //23
00 00 00 00 00 //24
00 00 00 00 00 //25
00 00 00 00 00 //26
00 00 00 00 00 //27
00 00 00 00 00 //28
00 00 00 00 00 //29
00 00 00 00 00 //30
00 00 00 00 00 //31
00 00 00 00 00 //32
00 00 00 00 00 //33
00 00 00 00 00 //34
00 00 00 00 00 //35
00 00 00 00 00 //36
00 00 00 00 00 //37
00 00 00 00 00 //38
00 00 00 00 00 //39
00 00 00 00 00 //40
00 00 00 00 00 //41
00 00 00 00 00 //42
00 00 00 00 00 //43
00 00 00 00 00 //44
00 00 00 00 00 //45
00 00 00 00 00 //46
00 00 00 00 00 //47
00 00 00 00 00 //48
00 00 00 00 00 //49
00 00 00 00 00 //50
00 00 00 00 00 //51
00 00 00 00 00 //52
00 00 00 00 00 //53
00 00 00 00 00 //54
00 00 00 00 00 //55
00 00 00 00 00 //56
00 00 00 00 00 //57
00 00 00 00 00 //58
00 00 00 00 00 //59
00 00 00 00 00 //60
00 00 00 00 00 //61
00 00 00 00 00 //62
00 00 00 00 00 //63
00 00 00 00 00 //64
end // hex
 

Вложения

  • Anim.cs
    23.1 KB · Просмотры: 23
  • Нравится
Реакции: TwenKey
Статус
В этой теме нельзя размещать новые ответы.

Похожие темы

  1. Ответы
    497
    Просмотры
    257K
  2. Ответы
    67
    Просмотры
    56K
  3. Ответы
    17
    Просмотры
    3K