Помогите скомпилировать

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

serhiyrubin

Известный
Автор темы
396
106
Надеюсь while'ы глаза мозолить не будут скриптерам:
Код:
{$CLEO}
0000:
if not 0@ = Samp.Base()
then 0A93: // Если заходим не в MP (MultiPlayer), то вырубаем скрипт
end
repeat
  wait 400 // Ждём запуска сампа
until Samp.Available()
0@ = Render.CreateFont("Arial", 12, 5) // Создаём шрифт
WHILE TRUE
  wait 0
  if key_down 116 // Проверяем нажатие клавиши
  then
  while key_down 116
  wait 0 // Ждём момента, когда клавиша будет отпущена
  end
  alloc 1@ 4 // Выделяем память для текста
 
  while not key_down 116
  wait 0
  0C8B: samp 2@ = get_player_count streamed_only true // Получаем кол-во игроков в стриме
  2@ -= 1 // Не считаем локального игрока
  format 1@ "%d" 2@ // Форматируем строку
  Render.DrawText(0@, 1@, 5, 5, -1) // Выводим текст с заданным шрифтом, текстом, координатами и цветом
  end
 
  free 1@ // Освобождаем ранее выделеную память
  while key_down 116
  wait 0 // Ждём момента, когда клавиша будет отпущена
  end
  end
END
Спасибо большое!!!
Все работает!!!
 
Статус
В этой теме нельзя размещать новые ответы.