[Решено] админ чекер (помогите сделать)

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

Clopster

Известный
Автор темы
143
96
Ни разу не пользовался txt файлами для чтения, только запись, а тут понадобилось, но никак не могу понять как это работает. Неизвестные мне опкоды и т.д.
Что-то накалякал, жму Р - флудит ошибкам и крашит.
/╲/\╭༼ : ❛ ◡ ❛ : ༽╮/\╱\

Warning(s007): Exception 0xC0000005 at 0x5528ACB9

CLEO:
{$CLEO}
0000: NOP

repeat
wait 1000
until samp

:1
alloc 0@ 256
alloc 22@ 32
alloc 12@ 32
alloc 5@ 32
alloc 6@ 20
0A9A: 0@ = openfile "cleo\admins.txt" mode "r"
0AC8: 10@ = allocate_memory_size 800
0AC8: 11@ = allocate_memory_size 20
0C11: memset destination 10@ value 0x0 size 800
0C11: memset destination 11@ value 0x0 size 20
jump @2

:2
if
    0AD7: read_string_from_file 0@ to 11@ size 19 // Копируем строку из файла в буфер + проверяем, прошло ли чтение удачно
then
    0C15: strcat destination 10@ source 11@ // Присоединяем строку ко второму буферу
    0C11: memset destination 11@ value 0x0 size 20 // Очищаем буфер, чтобы при следующем чтении не попало какой-то лишней информации
end
if
    0AD6:   end_of_file 0@ reached
then
    0A9B: closefile 0@
else
    jump @2
end

while true
wait 0
    if
        cheat "p"
    then
        for 4@ = 0 to 999
            if 0B23: samp is_player_connected 4@
            then
            0B36: samp 5@ = get_player_nickname 4@
                for 11@ = 1 to 40
                0C1F: 6@ = string_array 10@ element 11@ size 20
                0AA5: call 0x8220AD num_params 3 pop 3 params 12@v "%s" 6@
                    if 0C21: stricmp string1 12@ string2 5@
                    then
                        0AD3: 22@ = format "%s в сети" 12@
                    end
                end
            end
        end
    end
end
 

Clopster

Известный
Автор темы
143
96
крашить перестало, но не выводится в чат. бля :sad_frog:

CLEO:
{$CLEO}
0000: NOP

repeat
wait 1000
until samp

:1
alloc 0@ 256
alloc 12@ 32
alloc 5@ 32
alloc 6@ 20 
0A9A: 0@ = openfile "cleo\admins.txt" mode "r"
0AC8: 10@ = allocate_memory_size 800
0AC8: 11@ = allocate_memory_size 20
0C11: memset destination 10@ value 0x0 size 800
0C11: memset destination 11@ value 0x0 size 20
jump @2

:2
if
    0AD7: read_string_from_file 0@ to 11@ size 19 // Копируем строку из файла в буфер + проверяем, прошло ли чтение удачно
then
    0C15: strcat destination 10@ source 11@ // Присоединяем строку ко второму буферу
    0C11: memset destination 11@ value 0x0 size 20 // Очищаем буфер, чтобы при следующем чтении не попало какой-то лишней информации
end
if
    0AD6:   end_of_file 0@ reached
then
    0A9B: closefile 0@
else
    jump @2
end

while true
wait 0
    if
        cheat "p"
    then
        for 4@ = 0 to 999
            if 0B23: samp is_player_connected 4@
            then
            0B36: samp 5@ = get_player_nickname 4@
                for 20@ = 1 to 40
                0C1F: 6@ = string_array 11@ element 20@ size 20
                0AA5: call 0x8220AD num_params 3 pop 3 params 12@v "%s" 6@
                    if 0C21: stricmp string1 12@ string2 5@
                    then
                        msg "%s в сети" -1 12@
                    end
                end
            end
        end
    end
end
 
Статус
В этой теме нельзя размещать новые ответы.