Помощь в изменении скриптов

[FYP]

Здесь вы можете попросить других пользователей внести какие-то небольшие изменения в скрипт, например, изменить активацию.
Для вопросов по программированию и разработке на форуме есть отдельная категория Разработка.

Рекомендации:

1. Не просите о редактировании .asi, .sf, .luac, .dll, .exe и прочих файлов, не поддающихся простой декомпиляции. Скрипты формата .ahk (AutoHotKey), .lua (Lua/MoonLoader) и .cs (CLEO) легко поддаются изменению.
2. Сообщения по типу "спасибо, помог" по правилам форума считаются флудом и скорее всего будут удалены. Если вам помогли, вы можете нажать кнопку Мне нравится под ответом - это даст понять, что ответ верный.
3. За злонамеренное распространение вредоносного ПО - перманентный бан. Имейте это в виду.

Удаление копирайтов является нарушением авторских прав, если автор не дал на это своего разрешения. Правила BlastHack запрещают нарушать авторские права, поэтому если вам нужно их убрать - обращайтесь к автору.

 

[Impossible In Rage]

Как это можно выровнять по центру?

Спойлер: 1

{$CLEO .cs}
0000: NOP
0@ = Render.CreateFont("Arial", 12, 7)

:1
wait 0
0B60: convert_game_screen_coords 569.0 67.0 to_window_screen_coords 7@ 8@
if
SAMP.IsLocalPlayerSpawned
jf @1
4@ = Actor.Health($PLAYER_ACTOR)
not 4@ == 0
else_jump @6
alloc 5@ 24
format 5@ "%d" 4@
Render.DrawText(0@, 5@, 7@, 8@, 0xFFFFFFFF)  // 5-ÕÏ  1136.0 153.0
0B60: convert_game_screen_coords 568.7 44.2 to_window_screen_coords 9@ 10@
04DD: 3@ = actor $PLAYER_ACTOR armour
not 3@ == 0
else_jump @5
alloc 2@ 24
format 2@ "%d" 3@
Render.DrawText(0@, 2@, 9@, 10@, 0xFFFFFFFF)  // 2-Áðîíü
free 2@
free 5@
jump @1

:6
free 2@
free 5@
jump @1

:5
free 2@
jump @1

помню что с центрированием связан опкод 0342 , но это не точно , очень давно юзал

 

[MAHEKEH]

помню что с центрированием связан опкод 0342 , но это не точно , очень давно юзал

да, но эт только для текстдравов

 

[Zheka13131]

Возможно создать ini файл для этого луа чтобы погода и время установилась одна и не менялась? если возможно то сделайте пожалуйста;)

 

[Broadway]

Может кто-то сделать этот скрипт визуальным, чтобы было видно только мне. Сам скрипт меняет цвет машины. И желательно, чтобы античит не кикал

 

[Impossible In Rage]

да, но эт только для текстдравов

аааааа , понял , тогда хз , надо спрашивать у гуру этого дела

 

[Лебiгович]

Добавьте чтбы после того как хп пополнялось писало в /me использовал аптечку

Так же еще сделайте вторую версию пожалуйста, чтобы пополняло хп при ниже 20 хп и писало тоже в /me использовал аптечку

 

[Renty]

Добавьте чтбы после того как хп пополнялось писало в /me использовал аптечку

Так же еще сделайте вторую версию пожалуйста, чтобы пополняло хп при ниже 20 хп и писало тоже в /me использовал аптечку

Должно работать но я не тестил, проверь

 

[Izvinisb]

Должно работать но я не тестил, проверь

мммммм поток в цикле, по кайфу

 

[Renty]

мммммм поток в цикле, по кайфу

Ля затупил. Просто в скрипте гараздо проще сделать команду к примеру /hp и там уже все будет.

 

[Matteo_GoldieLOX]

С луа в клео пж

 

[M1m1k]

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

 

[Renty]

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

В скрипте ж есть эта функция со звуком вот строчка за которую это отвечает:

Спойлер: Строчка

 

[Deleted member 240777]

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

{$CLEO}
{$INCLUDE SF}
0000:

WHILE NOT SAMP.Available()
    WAIT 0
END

0B34: "change_color" @color
0B34: "hud_reload" @reload

IF 8AAB:   file_exists "CLEO\COLOR_HUD.ini"
THEN
    ALLOC 30@ 256
    0AD3: 30@ = format "0xFF1D19B4"
    0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "HPColor"
    0AD3: 30@ = format "0xFF2C6836"
    0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "MONEYColor"
    0AD3: 30@ = format "0xFF106290"
    0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "STARSColor"
    0AD3: 30@ = format "0xFF106290"
    0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "RADIOColor"
    FREE 30@   
END
0AF0: 0@ = get_int_from_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "HPColor"
0AF0: 1@ = get_int_from_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "MONEYColor"
0AF0: 2@ = get_int_from_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "STARSColor"
0AF0: 3@ = get_int_from_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "RADIOColor"

WHILE TRUE
    WAIT 0
    0A8C: write_memory 12235308 size 4 value 0@  virtual_protect 0 
    0A8C: write_memory 12235312 size 4 value 1@  virtual_protect 0   
    0A8C: write_memory 12235332 size 4 value 2@  virtual_protect 0   
    0A8C: write_memory 12235340 size 4 value 3@  virtual_protect 0   
END

:color
// CREATING DIALOG
ALLOC 10@ 256
0ad3: format_stirng 10@ = "DEFAULT Style%cWKOLA Style" 0xA
0B3B: samp show_dialog id 222 caption "COLOR HUD" text 10@ button_1 "Çàêðûòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
FREE 10@

// GETTING RESPONCE
IF 0B3C: samp is_dialog_responded id 222 button 0 list_item 12@ input_text 0
THEN
    IF 12@ == 0
    THEN
        PRINTF "DEFAULT" 2000
        ALLOC 30@ 256
        0AD3: 30@ = format "0xFF1D19B4"
        0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "HPColor"
        0AD3: 30@ = format "0xFF2C6836"
        0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "MONEYColor"
        0AD3: 30@ = format "0xFF106290"
        0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "STARSColor"
        0AD3: 30@ = format "0xFF106290"
        0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "RADIOColor"
        FREE 30@
    END
    IF 12@ == 1
    THEN
        PRINTF "WKOLA" 2000
        ALLOC 30@ 256
        0AD3: 30@ = format "0xFFFF80FF"
        0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "HPColor"
        0AD3: 30@ = format "0xFF80FF80"
        0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "MONEYColor"
        0AD3: 30@ = format "0xFF106290"
        0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "STARSColor"
        0AD3: 30@ = format "0xFF106290"
        0AF5: write_string 30@ to_ini_file "CLEO\COLOR_HUD.ini" section "MAIN" key "RADIOColor"
        FREE 30@
    END
END
RUN "COLOR_HUD.cs"
END_THREAD
SAMP.CmdRet()

:reload
RUN "COLOR_HUD.cs"
PRINTF "SCRIPT COLOR_HUD.CS ~n~ RELOAD" 2000
END_THREAD
SAMP.CmdRet()

 

[Zheka13131]

Сделайте пожалуйста чтобы при нажатии левого shift + 4 реконнектило с задержкой 15 секунд

 

[davkek]

1)В аиме убрать лишние функции, оставить только аим по колёсам))
2)В shotmaxdamage сделайте, чтоб работал когда зажата клавиша, например X