Streetboy_xD

[Computercraft][OpenPeripheral] Uhr mit NachrichtenEmpfang

Apr 26th, 2014
432
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.91 KB | None | 0 0
  1. -- Variablen
  2.  
  3. sideAdapter = "right" -- Hier die Seite des Adapters eintragen
  4. sideModem = "top" -- Hier die Seite des Modems eintragen
  5.  
  6. net = peripheral.wrap(sideAdapter)
  7. rednet.open("top") -- Hier bitte dies Seite des Modems eintragen
  8.  
  9.  
  10. -- Funktionen
  11.  
  12. -- Uhr Format
  13.  
  14. function fill(number)
  15.  
  16. if number < 10 then
  17. number = "0" .. number
  18. end
  19.  
  20. return number
  21.  
  22. end
  23.  
  24.  
  25. function aktzeit()
  26.  
  27. Hour = math.floor(os.time())
  28. Minute = math.floor((os.time() - Hour) * 60)
  29.  
  30. Zeit = fill(Hour) .. ":" .. fill(Minute) .. " Uhr"
  31.  
  32. return Zeit
  33.  
  34. end
  35.  
  36. -- Design
  37.  
  38. function box(x, y, width, height, hexcol, opac)
  39.  
  40. net.addBox(x, y, width, height, hexcol, opac)
  41.  
  42. end
  43.  
  44.  
  45. function text(x, y, text, color, scale)
  46.  
  47. text = net.addText(x, y, text, color)
  48. text.setScale(scale)
  49. --text.setZIndex(5)
  50.  
  51. end
  52.  
  53.  
  54. function mainDesign()
  55.  
  56. box(5,5,200,50,0xFFFFFF,0.5)
  57. text(30,17,aktzeit(),0x000000,3)
  58.  
  59. sleep(0.1)
  60.  
  61. end
  62.  
  63.  
  64. function mainCode()
  65.  
  66. a,message,c = rednet.receive(0.5)
  67.  
  68. if a ~= nil then
  69.  
  70. if string.len(message) > 30 then
  71.  
  72. count = string.len(message) / 30
  73. line = 60
  74. boxLine = 55
  75.  
  76. for i = 1,math.ceil(count) do
  77.  
  78. printedLine = string.sub(message,1,30)
  79. message = string.sub(message,30,-1)
  80.  
  81. box(5,boxLine,200,15,0xFFFFFF,0.5)
  82. text(10,line,printedLine,0x000000,1)
  83.  
  84. line = line + 10
  85. boxLine = boxLine + 15
  86.  
  87. end
  88.  
  89. else
  90.  
  91. box(5,55,200,15,0xFFFFFF,0.5)
  92. text(10,60,message,0x000000,1)
  93.  
  94. end
  95.  
  96. sleep(3)
  97.  
  98. else
  99.  
  100. net.clear()
  101. mainDesign()
  102.  
  103. end
  104.  
  105. end
  106.  
  107. -- Hauptteil
  108.  
  109. while true do
  110.  
  111. mainCode()
  112.  
  113. end
Advertisement
Add Comment
Please, Sign In to add comment