Вопросы по CLEO-скриптингу

Azller Lollison

я узбек
Друг
1,343
2,271
Сам сапмфункс всё это делает, сам выделяет, тебе ничего не надо делать. Получаешь ник по иду и не ебёшь себе мозги. Сампфункс загружается вместе с сампом, дядь. Если бы сампфункс не "загрузился" бы, ты даже и диалог не увидел и ничего не работало.На счёт того что я написал в посте выше подумай.
Поменял короче, теперь диалог Jail`a пустой, а мут и кик до сих пор не прогружаются..

Сам сапмфункс всё это делает, сам выделяет, тебе ничего не надо делать. Получаешь ник по иду и не ебёшь себе мозги. Сампфункс загружается вместе с сампом, дядь. Если бы сампфункс не "загрузился" бы, ты даже и диалог не увидел и ничего не работало.На счёт того что я написал в посте выше подумай.
Все пофиксил, кроме пустого jail`a..
CLEO:
                      alloc 0@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 7@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Jail" key "JailPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Jail" key "JailStr"
                      0AA5: call 0x8220AD num_params 5 pop 5 params 7@ 2@v 3@v "%d %d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Jail" key "JailNick"
                      0ad3: format_stirng 0@ = "Причину последнего jail`a смотреть в .ini!%cКол-во jail`ов: %d%cНа сколько минут был посажен игрок: %d%cКого посадили: {FBBC3C}%s" 0xA 5@ 0xA 2@ 0xA 8@
                      0B3B: samp show_dialog id 103 caption "{FBBC3C}AT by Azller v1.0a | Jail Stats" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 0@
                      free 6@
                      free 4@
                      free 7@
                      free 8@
 
Последнее редактирование модератором:

Azller Lollison

я узбек
Друг
1,343
2,271
Пиздец у меня подпекает уже от своего скрипта.
Короче, стало почему-то так, что первые 2 строчки показывает инфу об мутах, когда должно 1 строка об ответах,а вторая об другом чем-то (проверял, там всё равно мут)
и когда ввожу любую команду в скрипте, то уже вместо мута показывает кик, и уже первые 3 строчки. Что делать, кроме как юзать костыли?
Пожалуйста, сделайте что нибудь, почему оно так багается?
CLEO:
{$CLEO}
{$NOSOURCE}
0000:

const
    DIALOG_STYLE_MSGBOX = 0 // С текстом
    DIALOG_STYLE_INPUT = 1 // С полем для ввода текста
    DIALOG_STYLE_LIST = 2 // Со списком
    DIALOG_STYLE_PASSWORD = 3 // С полем для ввода текста, текст заменяется точками
    DIALOG_STYLE_TABLIST = 4 // Похож на DIALOG_STYLE_LIST, но может быть разбит на несколько колонок
    DIALOG_STYLE_TABLIST_HEADERS = 5 // Тот же, что и DIALOG_STYLE_TABLIST, но имеет заголовки для колонок
end

:Samp
wait 600
   SAMP.Available
jf @Samp
wait 5000
0AF8: "{FBBC3C}AT | {FFFFFF}Автор: Azller." 0xFBBC3C
0AF8: "{FBBC3C}AT | {FFFFFF}Скрипт был успешно загружен." 0xFBBC3C
0AF8: "{FBBC3C}AT | {FFFFFF}Большая просьба, не пытаться подкручивать себе значения." 0xFBBC3C
0AF8: "{FBBC3C}AT | {FFFFFF}Старшая администрация может смотреть Вашу точную статистику." 0xFBBC3C
0AF8: "{FBBC3C}AT | {FFFFFF}Приятного администрирования <3" 0xFBBC3C
0B34: samp register_client_command "ans" to_label @ans
0B34: samp register_client_command "mute" to_label @mute
0B34: samp register_client_command "kick" to_label @kick
0B34: samp register_client_command "jail" to_label @jail
0B34: samp register_client_command "warn" to_label @warn
0B34: samp register_client_command "ban" to_label @ban
0B34: "dlg" @dialog
0AAC: 15@ = load_audiostream "cleo\Song\smb_jump-small.mp3"
0AAC: 16@ = load_audiostream "cleo\Song\smb_coin.mp3"


WHILE TRUE
wait 0
    IF 0B3C: samp is_dialog_responded id 5 button 1@ list_item 3@ input_text 0
    THEN
        if 1@ == 1
        then
              log "открылся"
              log "%d" 3@
              if 3@ == 0
              then
              0AAD: set_mp3 16@ perform_action 1
                      alloc 20@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsNick"
                      0ad3: format_stirng 20@ = "Текст ответа смотреть в .ini!%cКол-во ответов: %d%cКакому был ответ: {FBBC3C}%s" 0xA 5@ 0xA 8@
                      0B3B: samp show_dialog id 321 caption "{FBBC3C}AT by Azller v1.0a | Ans Stats" text 20@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 20@
                      free 6@
                      free 4@
                      free 8@
              end
              if 3@ == 1
              then
                      alloc 20@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsNick"
                      0ad3: format_stirng 20@ = "Текст ответа смотреть в .ini!%cКол-во ответов: %d%cКакому был ответ: {FBBC3C}%s" 0xA 5@ 0xA 8@
                      0B3B: samp show_dialog id 3214 caption "{FBBC3C}AT by Azller v1.0a | Ans Stats" text 20@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 20@
                      free 6@
                      free 4@
                      free 8@               
              end
              if 3@ == 2
              then
                      alloc 20@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsNick"
                      0ad3: format_stirng 20@ = "Текст ответа смотреть в .ini!%cКол-во ответов: %d%cКакому был ответ: {FBBC3C}%s" 0xA 5@ 0xA 8@
                      0B3B: samp show_dialog id 3214 caption "{FBBC3C}AT by Azller v1.0a | Ans Stats" text 20@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 20@
                      free 6@
                      free 4@
                      free 8@
              end
              if 3@ == 3
              then
                      alloc 22@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Kick" key "KickPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Kick" key "KickStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Kick" key "KickNick"
                      0ad3: format_stirng 22@ = "Причину последнего кика смотреть в .ini!%cКол-во киков: %d%cКого кикнули: {FBBC3C}%s" 0xA 5@ 0xA 8@
                      0B3B: samp show_dialog id 2203 caption "{FBBC3C}AT by Azller v1.0a | Kick Stats" text 22@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 22@
                      free 6@
                      free 4@
                      free 8@
              end
              if 3@ == 4
              then
                      alloc 21@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 7@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Mute" key "MutePoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Mute" key "MuteStr"
                      0AA5: call 0x8220AD num_params 5 pop 5 params 7@ 2@v 3@v "%d %d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Mute" key "MuteNick"
                      0ad3: format_stirng 21@ = "Причину последнего мута смотреть в .ini!%cКол-во мутов: %d%cНа сколько минут был выдан мут: %d%cКому был выдан мут: {FBBC3C}%s" 0xA 5@ 0xA 2@ 0xA 8@
                      0B3B: samp show_dialog id 1212 caption "{FBBC3C}AT by Azller v1.0a | Mute Stats" text 21@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 21@
                      free 6@
                      free 4@
                      free 7@
                      free 8@
              end
              if 3@ == 5
              then
                      alloc 0@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Warn" key "WarnPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Warn" key "WarnStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Warn" key "WarnNick"
                      0ad3: format_stirng 0@ = "Текст причины смотреть в {FBBC3C}.ini!%cКол-во варнов: {FBBC3C}%d%cКому выдали варн: {FBBC3C}%s%c" 0xA 5@ 0xA 8@ 0x0
                      0B3B: samp show_dialog id 112304 caption "{FBBC3C}AT by Azller v1.0a | Warn Stats" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 0@
                      free 6@
                      free 4@
                      free 8@
              end
              if 3@ == 6
              then
                      alloc 23@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 7@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Jail" key "JailPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Jail" key "JailStr"
                      0AA5: call 0x8220AD num_params 5 pop 5 params 7@ 2@v 3@v "%d %d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Jail" key "JailNick"
                      0ad3: format_stirng 23@ = "Причину последнего присона смотреть в .ini!%cКол-во присонов: %d%cНа сколько минут был посажен игрок: %d%cКого посадили: {FBBC3C}%s" 0xA 5@ 0xA 2@ 0xA 8@
                      0B3B: samp show_dialog id 13304 caption "{FBBC3C}AT by Azller v1.0a | Prison Stats" text 23@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 23@
                      free 6@
                      free 4@
                      free 7@
                      free 8@
              end
              if 3@ == 7
              then
                      alloc 25@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 7@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Ban" key "BanPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Ban" key "BanStr"
                      0AA5: call 0x8220AD num_params 5 pop 5 params 7@ 2@v 3@v "%d %d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Ban" key "BanNick"
                      0ad3: format_stirng 0@ = "Причину последнего бана смотреть в .ini!%cКол-во банов: %d%cНа сколько дней был выдан бан: %d%cКому дали бан: %s" 0xA 5@ 0xA 2@ 0xA 8@
                      0B3B: samp show_dialog id 12346 caption "{FBBC3C}AT by Azller v1.0a | Ban Stats" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 25@
                      free 6@
                      free 4@
                      free 7@
                      free 8@   
              end
        end
    END
END


:ans
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %s" 12@ 13@
if
14@ == 2
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Ans" key "AnsStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Ans" key "AnsNick"
wait 5
0AF9: samp say_msg "./ans %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:mute
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %d %s" 12@ 13@ 15@
if
14@ == 3
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Mute" key "MuteStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Mute" key "MuteNick"
wait 5
0AF9: samp say_msg "./mute %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Mute" key "MutePoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Mute" key "MutePoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:kick
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %s" 12@ 13@
if
14@ == 2
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Kick" key "KickStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Kick" key "KickNick"
wait 5
0AF9: samp say_msg "./kick %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Kick" key "KickPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Kick" key "KickPoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:jail
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %d %s" 12@ 13@ 15@
if
14@ == 3
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Jail" key "JailStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Jail" key "JailNick"
wait 5
0AF9: samp say_msg "./pridon %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Jail" key "JailPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Jail" key "JailPoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:warn
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %s" 12@ 13@
if
14@ == 2
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Warn" key "WarnStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Warn" key "WarnNick"
wait 5
0AF9: samp say_msg "./warn %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Warn" key "WarnPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Warn" key "WarnPoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:ban
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %d %s" 12@ 13@ 15@
if
14@ == 3
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Ban" key "BanStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Ban" key "BanNick"
wait 5
0AF9: samp say_msg "./ban %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Ban" key "BanPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Ban" key "BanPoint"
0AF5: write_string 4@ to_ini_file "cleo\at.ini" section "Ban" key "BanStr"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:error
0AAD: set_mp3 15@ perform_action 1
0AF8: "{FBBC3C}AT | {FFFFFF}Вы ввели неверное кол-во аргументов. Команда не была засчитана." 0xFBBC3C
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:dialog
0AC6: 30@ = label @hex offset
0B3B: samp show_dialog id 5 caption "{FBBC3C}Admin Tools by Azller v1.0a" text 30@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
SAMP.CmdRet()

:hex
hex
"Добро пожаловать, админ\n"
"Ниже предоставлена вся статистика\n"
"Информация о ответах\n"
"Информация о киках\n"
"Информация о мутах\n"
"Информация о варнах\n"
"Информация о присонах\n"
"Информация о банах\0"
end
 

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,460
Ну емана, но можно же реализовать, почему бы и не сделать?
То, что ты хочешь сделать со строкой (вывести её в диалог), тебе придется по несколько раз форматировать строки и объединять её с конечной (к примеру, с помощью strcat), которую необходимо вывести.
Эта особенность выражается в ограничении опкода 0AD3.
 

Azller Lollison

я узбек
Друг
1,343
2,271
Пиздец у меня подпекает уже от своего скрипта.
Короче, стало почему-то так, что первые 2 строчки показывает инфу об мутах, когда должно 1 строка об ответах,а вторая об другом чем-то (проверял, там всё равно мут)
и когда ввожу любую команду в скрипте, то уже вместо мута показывает кик, и уже первые 3 строчки. Что делать, кроме как юзать костыли?
Пожалуйста, сделайте что нибудь, почему оно так багается?
CLEO:
{$CLEO}
{$NOSOURCE}
0000:

const
    DIALOG_STYLE_MSGBOX = 0 // С текстом
    DIALOG_STYLE_INPUT = 1 // С полем для ввода текста
    DIALOG_STYLE_LIST = 2 // Со списком
    DIALOG_STYLE_PASSWORD = 3 // С полем для ввода текста, текст заменяется точками
    DIALOG_STYLE_TABLIST = 4 // Похож на DIALOG_STYLE_LIST, но может быть разбит на несколько колонок
    DIALOG_STYLE_TABLIST_HEADERS = 5 // Тот же, что и DIALOG_STYLE_TABLIST, но имеет заголовки для колонок
end

:Samp
wait 600
   SAMP.Available
jf @Samp
wait 5000
0AF8: "{FBBC3C}AT | {FFFFFF}Автор: Azller." 0xFBBC3C
0AF8: "{FBBC3C}AT | {FFFFFF}Скрипт был успешно загружен." 0xFBBC3C
0AF8: "{FBBC3C}AT | {FFFFFF}Большая просьба, не пытаться подкручивать себе значения." 0xFBBC3C
0AF8: "{FBBC3C}AT | {FFFFFF}Старшая администрация может смотреть Вашу точную статистику." 0xFBBC3C
0AF8: "{FBBC3C}AT | {FFFFFF}Приятного администрирования <3" 0xFBBC3C
0B34: samp register_client_command "ans" to_label @ans
0B34: samp register_client_command "mute" to_label @mute
0B34: samp register_client_command "kick" to_label @kick
0B34: samp register_client_command "jail" to_label @jail
0B34: samp register_client_command "warn" to_label @warn
0B34: samp register_client_command "ban" to_label @ban
0B34: "dlg" @dialog
0AAC: 15@ = load_audiostream "cleo\Song\smb_jump-small.mp3"
0AAC: 16@ = load_audiostream "cleo\Song\smb_coin.mp3"


WHILE TRUE
wait 0
    IF 0B3C: samp is_dialog_responded id 5 button 1@ list_item 3@ input_text 0
    THEN
        if 1@ == 1
        then
              log "открылся"
              log "%d" 3@
              if 3@ == 0
              then
              0AAD: set_mp3 16@ perform_action 1
                      alloc 20@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsNick"
                      0ad3: format_stirng 20@ = "Текст ответа смотреть в .ini!%cКол-во ответов: %d%cКакому был ответ: {FBBC3C}%s" 0xA 5@ 0xA 8@
                      0B3B: samp show_dialog id 321 caption "{FBBC3C}AT by Azller v1.0a | Ans Stats" text 20@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 20@
                      free 6@
                      free 4@
                      free 8@
              end
              if 3@ == 1
              then
                      alloc 20@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsNick"
                      0ad3: format_stirng 20@ = "Текст ответа смотреть в .ini!%cКол-во ответов: %d%cКакому был ответ: {FBBC3C}%s" 0xA 5@ 0xA 8@
                      0B3B: samp show_dialog id 3214 caption "{FBBC3C}AT by Azller v1.0a | Ans Stats" text 20@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 20@
                      free 6@
                      free 4@
                      free 8@              
              end
              if 3@ == 2
              then
                      alloc 20@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Ans" key "AnsNick"
                      0ad3: format_stirng 20@ = "Текст ответа смотреть в .ini!%cКол-во ответов: %d%cКакому был ответ: {FBBC3C}%s" 0xA 5@ 0xA 8@
                      0B3B: samp show_dialog id 3214 caption "{FBBC3C}AT by Azller v1.0a | Ans Stats" text 20@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 20@
                      free 6@
                      free 4@
                      free 8@
              end
              if 3@ == 3
              then
                      alloc 22@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Kick" key "KickPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Kick" key "KickStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Kick" key "KickNick"
                      0ad3: format_stirng 22@ = "Причину последнего кика смотреть в .ini!%cКол-во киков: %d%cКого кикнули: {FBBC3C}%s" 0xA 5@ 0xA 8@
                      0B3B: samp show_dialog id 2203 caption "{FBBC3C}AT by Azller v1.0a | Kick Stats" text 22@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 22@
                      free 6@
                      free 4@
                      free 8@
              end
              if 3@ == 4
              then
                      alloc 21@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 7@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Mute" key "MutePoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Mute" key "MuteStr"
                      0AA5: call 0x8220AD num_params 5 pop 5 params 7@ 2@v 3@v "%d %d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Mute" key "MuteNick"
                      0ad3: format_stirng 21@ = "Причину последнего мута смотреть в .ini!%cКол-во мутов: %d%cНа сколько минут был выдан мут: %d%cКому был выдан мут: {FBBC3C}%s" 0xA 5@ 0xA 2@ 0xA 8@
                      0B3B: samp show_dialog id 1212 caption "{FBBC3C}AT by Azller v1.0a | Mute Stats" text 21@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 21@
                      free 6@
                      free 4@
                      free 7@
                      free 8@
              end
              if 3@ == 5
              then
                      alloc 0@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Warn" key "WarnPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Warn" key "WarnStr"
                      0AA5: call 0x8220AD num_params 4 pop 4 params 4@ 3@v "%d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Warn" key "WarnNick"
                      0ad3: format_stirng 0@ = "Текст причины смотреть в {FBBC3C}.ini!%cКол-во варнов: {FBBC3C}%d%cКому выдали варн: {FBBC3C}%s%c" 0xA 5@ 0xA 8@ 0x0
                      0B3B: samp show_dialog id 112304 caption "{FBBC3C}AT by Azller v1.0a | Warn Stats" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 0@
                      free 6@
                      free 4@
                      free 8@
              end
              if 3@ == 6
              then
                      alloc 23@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 7@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Jail" key "JailPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Jail" key "JailStr"
                      0AA5: call 0x8220AD num_params 5 pop 5 params 7@ 2@v 3@v "%d %d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Jail" key "JailNick"
                      0ad3: format_stirng 23@ = "Причину последнего присона смотреть в .ini!%cКол-во присонов: %d%cНа сколько минут был посажен игрок: %d%cКого посадили: {FBBC3C}%s" 0xA 5@ 0xA 2@ 0xA 8@
                      0B3B: samp show_dialog id 13304 caption "{FBBC3C}AT by Azller v1.0a | Prison Stats" text 23@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 23@
                      free 6@
                      free 4@
                      free 7@
                      free 8@
              end
              if 3@ == 7
              then
                      alloc 25@ 512
                      alloc 6@ 512
                      alloc 4@ 512
                      alloc 7@ 512
                      alloc 8@ 512
                      0AF0: 5@ = get_int_from_ini_file "cleo\at.ini" section "Ban" key "BanPoint"
                      0AF4: 6@ = read_string_from_ini_file "cleo\at.ini" section "Ban" key "BanStr"
                      0AA5: call 0x8220AD num_params 5 pop 5 params 7@ 2@v 3@v "%d %d %s" 6@
                      0AF4: 8@ = read_string_from_ini_file "cleo\at.ini" section "Ban" key "BanNick"
                      0ad3: format_stirng 0@ = "Причину последнего бана смотреть в .ini!%cКол-во банов: %d%cНа сколько дней был выдан бан: %d%cКому дали бан: %s" 0xA 5@ 0xA 2@ 0xA 8@
                      0B3B: samp show_dialog id 12346 caption "{FBBC3C}AT by Azller v1.0a | Ban Stats" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
                      free 25@
                      free 6@
                      free 4@
                      free 7@
                      free 8@  
              end
        end
    END
END


:ans
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %s" 12@ 13@
if
14@ == 2
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Ans" key "AnsStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Ans" key "AnsNick"
wait 5
0AF9: samp say_msg "./ans %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Ans" key "AnsPoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:mute
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %d %s" 12@ 13@ 15@
if
14@ == 3
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Mute" key "MuteStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Mute" key "MuteNick"
wait 5
0AF9: samp say_msg "./mute %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Mute" key "MutePoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Mute" key "MutePoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:kick
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %s" 12@ 13@
if
14@ == 2
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Kick" key "KickStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Kick" key "KickNick"
wait 5
0AF9: samp say_msg "./kick %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Kick" key "KickPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Kick" key "KickPoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:jail
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %d %s" 12@ 13@ 15@
if
14@ == 3
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Jail" key "JailStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Jail" key "JailNick"
wait 5
0AF9: samp say_msg "./pridon %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Jail" key "JailPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Jail" key "JailPoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:warn
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %s" 12@ 13@
if
14@ == 2
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Warn" key "WarnStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Warn" key "WarnNick"
wait 5
0AF9: samp say_msg "./warn %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Warn" key "WarnPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Warn" key "WarnPoint"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:ban
   SAMP.IsCommandTyped(0@)
alloc 5@ 256
0B35: samp 4@ = get_last_command_params
0AD3: 5@ = format "%s" 4@
0AD4: 14@ = scan_string 0@ format "%d %d %s" 12@ 13@ 15@
if
14@ == 3
jf @error
0B36: samp 8@ = get_player_nickname 12@
0AF5: write_string 5@ to_ini_file "cleo\at.ini" section "Ban" key "BanStr"
0AF5: write_string 8@ to_ini_file "cleo\at.ini" section "Ban" key "BanNick"
wait 5
0AF9: samp say_msg "./ban %s" 4@
0AAD: set_mp3 16@ perform_action 1
0AF0: 3@ = get_int_from_ini_file "cleo\at.ini" section "Ban" key "BanPoint"
0A8E: 6@ = 3@ + 1
0AF1: write_int 6@ to_ini_file "cleo\at.ini" section "Ban" key "BanPoint"
0AF5: write_string 4@ to_ini_file "cleo\at.ini" section "Ban" key "BanStr"
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:error
0AAD: set_mp3 15@ perform_action 1
0AF8: "{FBBC3C}AT | {FFFFFF}Вы ввели неверное кол-во аргументов. Команда не была засчитана." 0xFBBC3C
0AC9: free_allocated_memory 5@
SAMP.CmdRet()

:dialog
0AC6: 30@ = label @hex offset
0B3B: samp show_dialog id 5 caption "{FBBC3C}Admin Tools by Azller v1.0a" text 30@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
SAMP.CmdRet()

:hex
hex
"Добро пожаловать, админ\n"
"Ниже предоставлена вся статистика\n"
"Информация о ответах\n"
"Информация о киках\n"
"Информация о мутах\n"
"Информация о варнах\n"
"Информация о присонах\n"
"Информация о банах\0"
end
 

Alexkrat

Новичок
14
1
Хотел бы узнать как правильно отправлять несколько фейк позиций?
Так ли?
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
0BBA: samp store_player 3@ onfoot_data 4@
0BBA: samp store_player 3@ onfoot_data 5@
ALLOC 5@ 68
0C0D: struct 5@ offset 6 size 4 = -2161.21
0C0D: struct 5@ offset 10 size 4 = 641.42
0C0D: struct 5@ offset 14 size 4 = 1052.38
0BC0: samp send_onfoot_data 5@
WAIT 500
ALLOC 4@ 68
0C0D: struct 4@ offset 6 size 4 = -2161.1233
0C0D: struct 4@ offset 10 size 4 = 640.3557
0C0D: struct 4@ offset 14 size 4 = 1052.3817
0BC0: samp send_onfoot_data 4@
0BD1: samp send_picked_up_pickup 1497
0B4E: samp 1@ = get_current_dialog_id
FREE 5@
FREE 4@
 
1,417
1,029
Хотел бы узнать как правильно отправлять несколько фейк позиций?
Так ли?
CLEO:
:fakepos
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
    
    0BBA: samp store_player 3@ onfoot_data 4@
    ALLOC 4@ 68
    0C0D: struct 4@ offset 6 size 4 = 0@
    0C0D: struct 4@ offset 10 size 4 = 1@
    0C0D: struct 4@ offset 14 size 4 = 2@
    0BC0: samp send_onfoot_data 4@
    free 4@
    ret 0
Код:
call @fakepos 3 XYZ // первая фейк позиция
call @fakepos 3 XYZ // вторая фейк позиция
вместо xyz переменные с координатой, или сами координаты
 

Alexkrat

Новичок
14
1
CLEO:
:fakepos
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
   
    0BBA: samp store_player 3@ onfoot_data 4@
    ALLOC 4@ 68
    0C0D: struct 4@ offset 6 size 4 = 0@
    0C0D: struct 4@ offset 10 size 4 = 1@
    0C0D: struct 4@ offset 14 size 4 = 2@
    0BC0: samp send_onfoot_data 4@
    free 4@
    ret 0
Код:
call @fakepos 3 XYZ // первая фейк позиция
call @fakepos 3 XYZ // вторая фейк позиция
вместо xyz переменные с координатой, или сами координаты
СПС

фейк позиция с помощью хука лучше обычной фейк позиции?
 
Последнее редактирование модератором:

LaRossa

Потрачен
429
117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Подскажите как узнать координаты шкалы HP.
 

Alexkrat

Новичок
14
1
Что имеешь ввиду под обычной фейк позицией?
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
0BBA: samp store_player 3@ onfoot_data 4@
ALLOC 4@ 68
0C0D: struct 4@ offset 6 size 4 = -2161.1233
0C0D: struct 4@ offset 10 size 4 = 640.3557
0C0D: struct 4@ offset 14 size 4 = 1052.3817
0BC0: samp send_onfoot_data 4@
0BD1: samp send_picked_up_pickup 1497

Ну вот фейк позицию через хук могу сделать ,но с хуками не оч умею пока что
 

BlackKnigga

Известный
BH Team
922
445
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
0BBA: samp store_player 3@ onfoot_data 4@
ALLOC 4@ 68
0C0D: struct 4@ offset 6 size 4 = -2161.1233
0C0D: struct 4@ offset 10 size 4 = 640.3557
0C0D: struct 4@ offset 14 size 4 = 1052.3817
0BC0: samp send_onfoot_data 4@
0BD1: samp send_picked_up_pickup 1497

Ну вот фейк позицию через хук могу сделать ,но с хуками не оч умею пока что
Лучше или нет зависит от ситуации. В твоем случае лучше удобнее делать как у тебя. Ток аллоцировать мемори надо перед записью
 
Последнее редактирование: