Advertisement
N1nt3nd0

RunString

Jun 24th, 2018
209
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.91 KB | None | 0 0
  1. local component = require('component') -- либа компонентов
  2. local event = require('event') -- либа событий
  3. local term = require('term') -- либа терминала
  4. local unicode = require('unicode') -- либа юникода
  5. local gpu = component.gpu -- компонент видеокарты
  6.  
  7. local text = '-FSOCIETY-' -- выводимая строка
  8. local trigger = 'key_down' -- событие на котором сработает выход (нажатие клавиши)
  9. local wOld,hOld = 80,25 -- разрешение при выходе
  10. local w,h = 30,5 -- разрешение при выполнении
  11. local delay = 0.07 -- задержка бегущей строки
  12. local work = true -- пока true цикл работает
  13.  
  14. function stopkran() -- стопкран
  15.     work = false
  16. end
  17.  
  18. gpu.setBackground(0x000000) -- цвет фона (чёрный)
  19. event.listen(trigger,stopkran) -- активация слушателя клавиатуры
  20.  
  21. while work do -- основной цикл
  22.     gpu.setResolution(w,h) -- костыль чтоб при ребуте сервера резоль не слетал
  23.     gpu.setForeground(math.random(9999999)) -- сет рандомного цвета текста
  24.     for i = -unicode.len(text),w do -- цикл передвижения текста
  25.         term.clear() -- очистка экрана
  26.         gpu.set(i,math.ceil(h/2),text) -- сет строки по координатам
  27.         os.sleep(delay) -- задержка
  28.         if not work then -- для выхода из цикла for
  29.             break
  30.         end
  31.     end
  32. end
  33.  
  34. event.ignore(trigger,stopkran) -- деактивация слушателя
  35. term.clear() -- очистка экрана
  36. gpu.setForeground(0xffffff) -- сет белого цвета текста
  37. gpu.setResolution(wOld,hOld) -- установка разрешения при выходе
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement