Есть ли такое cleo?

[Shindji]

В общем лазал на Ютубе увидел такие звезды:

Но это на сервере так заменяется. Вопрос: Есть ли такое Cleo? Или можно бы сделать такое cleo?

 

[©Ded_Fedot]

В общем лазал на Ютубе увидел такие звезды:
Посмотреть вложение 9095 Посмотреть вложение 9096
Но это на сервере так заменяется. Вопрос: Есть ли такое Cleo? Или можно бы сделать такое cleo?

В место звезд надпись?

 

[Shindji]

В место звезд надпись?

Да.

 

[©Ded_Fedot]

Да.

Видеть не видел, но сделать можно

 

[Shindji]

Видеть не видел, но сделать можно

Было бы просто ОГОНЬ))

 

[kennex]

Видеть не видел, но сделать можно

ради интереса делаешь?

 

[Vovich]

{$CLEO}
{$INCLUDE SF}
0000:
0B6D: render 0@ = create_font "Verdana" height 13 flags 5

while true
    wait 0
if 010F: player $PLAYER_CHAR wanted_level > 0
then
    0B6F: render font 0@ draw_text "WANTED" pos 100 100 color 0xFFff0000
end
end

 

[DmitriX_Camaro]

Если я не ошибаюсь, то это не мод, а на реверте такая фигня стоит, а вот клакер я хз что это

 

[yxTbl]

{$CLEO}
{$INCLUDE SF}
0000:
0B6D: render 0@ = create_font "Verdana" height 13 flags 5

while true
    wait 0
if 010F: player $PLAYER_CHAR wanted_level > 0
then
    0B6F: render font 0@ draw_text "WANTED" pos 100 100 color 0xFFff0000
end
end

Возможно ли сделать так, чтобы при 1 звезде загоралась 1 буква, при 2 звездах 2 и т.д.?

 

[DarkP1xel]

Возможно ли сделать так, чтобы при 1 звезде загоралась 1 буква, при 2 звездах 2 и т.д.?

Возможно.

 

[©Ded_Fedot]

Возможно ли сделать так, чтобы при 1 звезде загоралась 1 буква, при 2 звездах 2 и т.д.?

{$CLEO}

0000:
0B6D: render 0@ = create_font "Verdana" height 13 flags 5

while true
    wait 0
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 1
then
    0B6F: render font 0@ draw_text "W" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 2
then
    0B6F: render font 0@ draw_text "WA" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 3
then
    0B6F: render font 0@ draw_text "WAN" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 4
then
    0B6F: render font 0@ draw_text "WANT" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 5
then
    0B6F: render font 0@ draw_text "WANTE" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 6
then
    0B6F: render font 0@ draw_text "WANTED" pos 300 300 color 0xFFff0000
end
end

:getWantedLevel
0A8D: 0@ = read_memory 0x58DB60 size 1 virtual_protect 0
0AB2: ret 1 0@

 

[MISTER_GONWIK]

{$CLEO}

0000:
0B6D: render 0@ = create_font "Verdana" height 13 flags 5

while true
    wait 0
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 1
then
    0B6F: render font 0@ draw_text "W" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 2
then
    0B6F: render font 0@ draw_text "WA" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 3
then
    0B6F: render font 0@ draw_text "WAN" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 4
then
    0B6F: render font 0@ draw_text "WANT" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 5
then
    0B6F: render font 0@ draw_text "WANTE" pos 300 300 color 0xFFff0000
end
0AB1: @getWantedLevel 0 return_to 1@
if 1@ == 6
then
    0B6F: render font 0@ draw_text "WANTED" pos 300 300 color 0xFFff0000
end
end

:getWantedLevel
0A8D: 0@ = read_memory 0x58DB60 size 1 virtual_protect 0
0AB2: ret 1 0@

ужасный код, дед, ужасный

 

[Dark_Knight]

ужасный код, дед, ужасный

На это что скажешь?

Спойлер

{$CLEO}
const
Font = 0@
WantedLevel = 1@
String = 2@
StringDeleteVar = 3@
NULL = 0
StringSize = 16
end

while not samp.Available()
wait 200
end

0B6D: render Font = create_font "Verdana" height 12 flags 13
0ac8: String StringSize
0c11: memset NULL StringSize
format String "WANTED" 

while true
wait 0
    0AB1: @getWantedLevel 0 return_to WantedLevel
    if WantedLevel > 0
    then
        0a8f: StringDeleteVar = 6 - WantedLevel
        if 3@ > 0
        then
            call @delete_last_chars_from_string 2 String  StringDeleteVar
        end
        0B6F: render font Font draw_text String pos 300 300 color 0xFFff0000
    end
end

:getWantedLevel
0A8D: 0@ = read_memory 0x58DB60 size 1 virtual_protect 0
0AB2: ret 1 0@

:delete_last_chars_from_string
var
0@: int
1@: int
2@: int
end
0C17: 2@ = strlen 0@
2@ -= 1@
0@ += 2@
0C11: memset 0@ 0 1@
ret 0

 

[LUCHARE]

Он попросил не код, а уже скомпилированный скрипт. Вы человеку помогаете или письками меряетесь?

 

[sаnеk]

Он попросил не код, а уже скомпилированный скрипт. Вы человеку помогаете или письками меряетесь?

скомпилить он и сам может