Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- dbcol = colors.white
- dtcol = colors.black
- mon = peripheral.wrap("top")
- delay = 0.1
- function cbut(cx,cy,text,bcol,tcol)
- if bcol == nil then
- bcol = dbcol
- end
- if tcol == nil then
- tcol = dtcol
- end
- mon.setCursorPos(cx,cy)
- mon.setBackgroundColor(bcol)
- mon.setTextColor(tcol)
- mon.write(text)
- mon.setBackgroundColor(dbcol)
- mon.setTextColor(dtcol)
- end
- gx,gy = mon.getSize()
- mon.setBackgroundColor(dbcol)
- mon.setTextColor(dtcol)
- mon.clear()
- function create_blink()
- for a = gy+4,-4,-1 do
- mod = a % 2
- if mod == 0 then
- cbut(2,a," ",colors.lightBlue)
- cbut(gx-2,a," ",colors.lightBlue)
- cbut(10,a,"MUZZE HOME",colors.lightBlue)
- cbut(14,a+2,"^",colors.lightBlue)
- cbut(12,a+3,"/ | \\",colors.lightBlue)
- cbut(10,a+4,"/ | \\",colors.lightBlue)
- cbut(10,a+5," | ",colors.lightBlue)
- cbut(10,a+6," | ",colors.lightBlue)
- cbut(2,a+4," ",colors.lightBlue)
- cbut(gx-2,a+4," ",colors.lightBlue)
- sleep(delay)
- cbut(2,a," ")
- cbut(gx-2,a," ")
- cbut(4,a,string.rep(" ",20))
- cbut(4,a+2,string.rep(" ",20))
- cbut(4,a+3,string.rep(" ",20))
- cbut(4,a+4,string.rep(" ",20))
- cbut(4,a+5,string.rep(" ",20))
- cbut(4,a+6,string.rep(" ",20))
- cbut(2,a+4," ")
- cbut(gx-2,a+4," ")
- else
- cbut(2,a," ")
- cbut(gx-2,a," ")
- cbut(2,a+4," ")
- cbut(gx-2,a+4," ")
- sleep(delay)
- cbut(2,a," ",colors.lightBlue)
- cbut(gx-2,a," ",colors.lightBlue)
- cbut(2,a+4," ",colors.lightBlue)
- cbut(gx-2,a+4," ",colors.lightBlue)
- end
- end
- end
- while true do
- create_blink()
- sleep(1)
- end
Advertisement
Add Comment
Please, Sign In to add comment