- 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