Advertisement
Puding999

run

Nov 27th, 2014
135
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.70 KB | None | 0 0
  1.  
  2.  
  3. -- ########################## -- Funktionen -- ############################ --
  4. local function s(...) return sleep(...) end
  5. local function w(...) return write(...) end
  6. local function p(...) return print(...) end
  7. local function tw(...) return term.write(...) end
  8. local function scp(...) return term.setCursorPos(...) end
  9. local function sbc(...) return term.setBackgroundColor(...) end
  10. local function stc(...) return term.setTextColor(...) end
  11. local function tc(...) return term.clear(...) end
  12. local function tcl(...) return term.clearLine() end
  13. local function scb(...) return term.setCursorBlink(...) end
  14. local function ts(...) return term.scroll(...) end
  15. local function r(...) return shell.run(...) end
  16. local function para(...) return parallel.waitForAny(...) end
  17. local function sw(...) return textutils.slowWrite(...) end
  18. local function sp(...) return textutils.slowPrint(...) end
  19. -- ########################## -- Einstellungen -- ############################ --
  20.  
  21. resetScreen()
  22. breaktask1 = 0
  23. closetask1 = 0
  24. timeprint1()
  25. scp(10,3)
  26. w(" Futtat ")
  27. sbc(16384)
  28. w("X")
  29. sbc(256)
  30. scp(10,4)
  31. w(" ")
  32. scp(10,5)
  33. w(" Futtathato programok: ")
  34. scp(10,6)
  35. w(" ")
  36. sbc(128)
  37. w(" ")
  38. sbc(256)
  39. w(" ")
  40. scp(10,7)
  41. w(" ")
  42. scp(10,8)
  43. w(" %")
  44. scp(11,6)
  45. sbc(128)
  46. inputrun = read()
  47. function openrun()
  48. if inputrun == "" then
  49. scp(11,6)
  50. inputrun = "hello"
  51. end
  52. if closetask1 == 0 then
  53. sbc(1)
  54. r("clear")
  55. sbc(2048)
  56. scp(1,1)
  57. write(" ")
  58. scp(1,1)
  59. write(inputrun)
  60. scp(50,1)
  61. sbc(16384)
  62. write("_X")
  63. stc(1)
  64. sbc(8192)
  65. scp(1,19)
  66. w([[ Start ]])
  67. sbc(2048)
  68. w([[ ]])
  69. timeprint1()
  70. sbc(1)
  71. stc(32768)
  72. scp(2,3)
  73. r(inputrun)
  74. end
  75. end
  76. openrun()
  77. function breaktask1()
  78. breaktask1 = 1
  79. closetask1 = 1
  80. end
  81. function openrun2()
  82. while true do
  83. event, button, X, Y = os.pullEvent("mouse_click")
  84.  
  85. if X >= 1 and X <= 6 and Y == 19 then
  86. startmenu()
  87. error("Terminated")
  88. break
  89. end
  90.  
  91. if X >= 51 and X <= 51 and Y == 1 then
  92. closetask1 = 1
  93. writetask = fs.open("GombiOS/Task/task", "w")
  94. writetask.write([[]])
  95. writetask.close()
  96. resetDesktop()
  97. breaktask1()
  98. end
  99. if X >= 50 and X <= 50 and Y == 1 then
  100. resetScreen()
  101. scp(8,19)
  102. sbc(2048)
  103. w(" ")
  104. scp(8,19)
  105. sbc(8)
  106. w(inputrun)
  107. timeprint1()
  108. writetask = fs.open("GombiOS/Task/task", "w")
  109. writetask.write([[]])
  110. writetask.close()
  111. writetask = fs.open("GombiOS/Task/task", "w")
  112. writetask.write([[write("]])
  113. writetask.write(inputrun)
  114. writetask.write([[")]])
  115. writetask.close()
  116.  
  117. while true do
  118. event, button, X, Y = os.pullEvent("mouse_click")
  119. if X >= 8 and X <= 20 and Y == 19 and closetask1 == 0 then
  120. openrun()
  121. openrun2()
  122. end
  123.  
  124. if X >= 1 and X <= 6 and Y == 19 then
  125. startmenu()
  126. error("Terminated")
  127. break
  128. end
  129. if breaktask1 == 1 then
  130. error("Terminated")
  131. break
  132. end
  133.  
  134. end
  135. end
  136. end
  137. end
  138. openrun2()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement