Himitsu_Chan

Untitled

Feb 29th, 2016
59
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- Variables
  2.  
  3. CMO = 0 -- Counter Metal Input
  4. CES = 0 -- Counter Empty Smeltery
  5. CML = 0 -- Counter Metal List
  6. CAL = 0 -- COunter Alloy List
  7. CLL = 0 -- Counter Liquid List
  8. CBL = 0 -- Counter Block List
  9.  
  10. mouseWidth = 0 -- Create MouseWidth Variable
  11. mouseHeight = 0 -- Create MouseHeight Variable
  12.  
  13. --------------------------------------------------------
  14. monitor = peripheral.wrap("right") -- Wrap monitor_0 monitor to "monitor"
  15.  
  16. monitor.setBackgroundColour((colors.black)) -- Return to standart color BEFORE clearing the screen
  17. monitor.clear() -- Clear Monitor
  18. monitor.setCursorPos(1,1) -- Set Cursor to Pos 1,1
  19.  
  20. w,h=monitor.getSize() -- set W to Width of Monitor and H to Height
  21.  
  22.  
  23. -------------------------------------------------------------------------
  24. print(w) -- Print Width
  25. print(h) -- Print Height
  26. -------------------------------------------------------------------------
  27.  
  28.  
  29. monitor.setBackgroundColour((colours.lime)) -- Set monitor Background Color For button creation
  30.  
  31. -- What the montior writes here
  32.  
  33.  
  34. monitor.setCursorPos(2,2)
  35. monitor.write("Alloys")
  36.  
  37. monitor.setCursorPos(2,4)
  38. monitor.write("Metals")
  39.  
  40. monitor.setCursorPos(2,6)
  41. monitor.write("Liquids")
  42.  
  43. monitor.setCursorPos(2,8)
  44. monitor.write("Blocks")
  45.  
  46. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53. function checkClickPosition()
  54.  
  55. if mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 2 then
  56. if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- METALS HERE!
  57.  
  58. monitor.clear() -- Clear Monitor
  59.  
  60. monitor.setBackgroundColour((colours.lime))
  61.  
  62. monitor.setCursorPos(2,2)------------------- 1
  63. monitor.write("Back")
  64.  
  65. monitor.setCursorPos(2,4)
  66. monitor.write("Cobalt")
  67.  
  68. monitor.setCursorPos(2,8)
  69. monitor.write("Glold")
  70.  
  71. monitor.setCursorPos(2,10)
  72. monitor.write("Coal")
  73.  
  74. monitor.setCursorPos(2,12)
  75. monitor.write("Unstable")
  76.  
  77. monitor.setCursorPos(2,18)
  78. monitor.write("Silver")
  79.  
  80. monitor.setCursorPos(2,20)
  81. monitor.write("Yellorium")
  82.  
  83. monitor.setCursorPos(15,2)------------------- 2
  84. monitor.write("Aluminium")
  85.  
  86. monitor.setCursorPos(15,4)
  87. monitor.write("Copper")
  88.  
  89. monitor.setCursorPos(15,8)
  90. monitor.write("Iron")
  91.  
  92. monitor.setCursorPos(15,10)
  93. monitor.write("Emerald")
  94.  
  95. monitor.setCursorPos(15,12)
  96. monitor.write("Nickel")
  97.  
  98. monitor.setCursorPos(15,18)
  99. monitor.write("Steel")
  100.  
  101. --monitor.setCursorPos(15,20)
  102. --monitor.write("")
  103.  
  104. monitor.setCursorPos(28,2)------------------ 3
  105. monitor.write("Ardite")
  106.  
  107. monitor.setCursorPos(28,4)
  108. monitor.write("Dark Iron")
  109.  
  110. monitor.setCursorPos(28,8)
  111. monitor.write("Lead")
  112.  
  113. monitor.setCursorPos(28,10)
  114. monitor.write("Mana Metal")
  115.  
  116. monitor.setCursorPos(28,12)
  117. monitor.write("Res Ender")
  118.  
  119. monitor.setCursorPos(28,18)
  120. monitor.write("Tin")
  121.  
  122. --monitor.setCursorPos(28,20)
  123. --monitor.write("")
  124.  
  125. monitor.setCursorPos(41,2)------------------ 4
  126. monitor.write("Bedrockium")
  127.  
  128. monitor.setCursorPos(41,4)
  129. monitor.write("Des Redstone")
  130.  
  131. monitor.setCursorPos(41,8)
  132. monitor.write("Redstone")
  133.  
  134. monitor.setCursorPos(41,10)
  135. monitor.write("Mithril")
  136.  
  137. monitor.setCursorPos(41,12)
  138. monitor.write("Shiny")
  139.  
  140. monitor.setCursorPos(41,18)
  141. monitor.write("Uranium")
  142.  
  143. --monitor.setCursorPos(41,20)
  144. --monitor.write("")
  145.  
  146. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  147.  
  148. CML = 1
  149. elseif CML == 1 then
  150. end
  151.  
  152. elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 4 then
  153.  
  154. if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- ALLOYS HERE!
  155.  
  156. monitor.clear() -- Clear Monitor
  157.  
  158. monitor.setBackgroundColour((colours.lime))
  159.  
  160. monitor.setCursorPos(2,2)------------------- 1
  161. monitor.write("Back")
  162.  
  163. monitor.setCursorPos(2,4)
  164. monitor.write("Red Alloy")
  165.  
  166. monitor.setCursorPos(2,8)
  167. monitor.write("Lumium")
  168.  
  169. --monitor.setCursorPos(2,10)
  170. --monitor.write("")
  171.  
  172. --monitor.setCursorPos(2,12)
  173. --monitor.write("")
  174.  
  175. --monitor.setCursorPos(2,18)
  176. --monitor.write("")
  177.  
  178. --monitor.setCursorPos(2,20)
  179. --monitor.write("")
  180.  
  181. monitor.setCursorPos(15,2)------------------- 2
  182. monitor.write("Alum Brass")
  183.  
  184. monitor.setCursorPos(15,4)
  185. monitor.write("Electrum")
  186.  
  187. monitor.setCursorPos(15,8)
  188. monitor.write("Manyullyn")
  189.  
  190. --monitor.setCursorPos(15,10)
  191. --monitor.write("")
  192.  
  193. --monitor.setCursorPos(15,12)
  194. --monitor.write("")
  195.  
  196. --monitor.setCursorPos(15,18)
  197. --monitor.write("")
  198.  
  199. --monitor.setCursorPos(15,20)
  200. --monitor.write("")
  201.  
  202. monitor.setCursorPos(28,2)------------------ 3
  203. monitor.write("Alumite")
  204.  
  205. monitor.setCursorPos(28,4)
  206. monitor.write("Enderium")
  207.  
  208. monitor.setCursorPos(28,8)
  209. monitor.write("Pig Iron")
  210.  
  211. --monitor.setCursorPos(28,10)
  212. --monitor.write("")
  213.  
  214. --monitor.setCursorPos(28,12)
  215. --monitor.write("")
  216.  
  217. --monitor.setCursorPos(28,18)
  218. --monitor.write("")
  219.  
  220. --monitor.setCursorPos(28,20)
  221. --monitor.write("")
  222.  
  223. monitor.setCursorPos(41,2)------------------ 4
  224. monitor.write("Bronze")
  225.  
  226. monitor.setCursorPos(41,4)
  227. monitor.write("Invar")
  228.  
  229. monitor.setCursorPos(41,8)
  230. monitor.write("Signalium")
  231.  
  232. --monitor.setCursorPos(41,10)
  233. --monitor.write("")
  234.  
  235. --monitor.setCursorPos(41,12)
  236. --monitor.write("")
  237.  
  238. --monitor.setCursorPos(41,18)
  239. --monitor.write("")
  240.  
  241. --monitor.setCursorPos(41,20)
  242. --monitor.write("")
  243.  
  244. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  245.  
  246. CAL = 1
  247. elseif CAL == 1 then
  248. end
  249.  
  250. elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 8 then
  251.  
  252. if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- LIQUIDS HERE!
  253.  
  254. monitor.clear() -- Clear Monitor
  255.  
  256. monitor.setBackgroundColour((colours.lime))
  257.  
  258. monitor.setCursorPos(2,2)------------------- 1
  259. monitor.write("Back")
  260.  
  261. monitor.setCursorPos(2,4)
  262. monitor.write("Glue")
  263.  
  264. --monitor.setCursorPos(2,8)
  265. --monitor.write("")
  266.  
  267. --monitor.setCursorPos(2,10)
  268. --monitor.write("")
  269.  
  270. --monitor.setCursorPos(2,12)
  271. --monitor.write("")
  272.  
  273. --monitor.setCursorPos(2,18)
  274. --monitor.write("")
  275.  
  276. --monitor.setCursorPos(2,20)
  277. --monitor.write("")
  278.  
  279. monitor.setCursorPos(15,2)------------------- 2
  280. monitor.write("Pyrotheum")
  281.  
  282. monitor.setCursorPos(15,4)
  283. monitor.write("Lava")
  284.  
  285. --monitor.setCursorPos(15,8)
  286. --monitor.write("")
  287.  
  288. --monitor.setCursorPos(15,10)
  289. --monitor.write("")
  290.  
  291. --monitor.setCursorPos(15,12)
  292. --monitor.write("")
  293.  
  294. --monitor.setCursorPos(15,18)
  295. --monitor.write("")
  296.  
  297. --monitor.setCursorPos(15,20)
  298. --monitor.write("")
  299.  
  300. monitor.setCursorPos(28,2)------------------ 3
  301. monitor.write("Blood")
  302.  
  303. monitor.setCursorPos(28,4)
  304. monitor.write("Water")
  305.  
  306. --monitor.setCursorPos(28,8)
  307. --monitor.write("")
  308.  
  309. --monitor.setCursorPos(28,10)
  310. --monitor.write("")
  311.  
  312. --monitor.setCursorPos(28,12)
  313. --monitor.write("")
  314.  
  315. --monitor.setCursorPos(28,18)
  316. --monitor.write("")
  317.  
  318. --monitor.setCursorPos(28,20)
  319. --monitor.write("")
  320.  
  321. monitor.setCursorPos(41,2)------------------ 4
  322. monitor.write("Cryotheum")
  323.  
  324. --monitor.setCursorPos(41,4)
  325. --monitor.write("")
  326.  
  327. --monitor.setCursorPos(41,8)
  328. --monitor.write("")
  329.  
  330. --monitor.setCursorPos(41,10)
  331. --monitor.write("")
  332.  
  333. --monitor.setCursorPos(41,12)
  334. --monitor.write("")
  335.  
  336. --monitor.setCursorPos(41,18)
  337. --monitor.write("")
  338.  
  339. --monitor.setCursorPos(41,20)
  340. --monitor.write("")
  341.  
  342. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  343.  
  344. CLL = 1
  345. elseif CLL == 1 then
  346. end
  347.  
  348. elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 8 then
  349.  
  350. if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- BLOCKS HERE!
  351.  
  352. monitor.clear() -- Clear Monitor
  353.  
  354. monitor.setBackgroundColour((colours.lime))
  355.  
  356. monitor.setCursorPos(2,2)------------------- 1
  357. monitor.write("Back")
  358.  
  359. monitor.setCursorPos(2,4)
  360. monitor.write("Glass")
  361.  
  362. --monitor.setCursorPos(2,8)
  363. --monitor.write("")
  364.  
  365. --monitor.setCursorPos(2,10)
  366. --monitor.write("")
  367.  
  368. --monitor.setCursorPos(2,12)
  369. --monitor.write("")
  370.  
  371. --monitor.setCursorPos(2,18)
  372. --monitor.write("")
  373.  
  374. --monitor.setCursorPos(2,20)
  375. --monitor.write("")
  376.  
  377. monitor.setCursorPos(15,2)------------------- 2
  378. monitor.write("Obsidian")
  379.  
  380. --monitor.setCursorPos(15,4)
  381. --monitor.write("")
  382.  
  383. --monitor.setCursorPos(15,8)
  384. --monitor.write("")
  385.  
  386. --monitor.setCursorPos(15,10)
  387. --monitor.write("")
  388.  
  389. --monitor.setCursorPos(15,12)
  390. --monitor.write("")
  391.  
  392. --monitor.setCursorPos(15,18)
  393. --monitor.write("")
  394.  
  395. --monitor.setCursorPos(15,20)
  396. --monitor.write("")
  397.  
  398. monitor.setCursorPos(28,2)------------------ 3
  399. monitor.write("Seared Stone")
  400.  
  401. --monitor.setCursorPos(28,4)
  402. --monitor.write("")
  403.  
  404. --monitor.setCursorPos(28,8)
  405. --monitor.write("")
  406.  
  407. --monitor.setCursorPos(28,10)
  408. --monitor.write("")
  409.  
  410. --monitor.setCursorPos(28,12)
  411. --monitor.write("")
  412.  
  413. --monitor.setCursorPos(28,18)
  414. --monitor.write("")
  415.  
  416. --monitor.setCursorPos(28,20)
  417. --monitor.write("")
  418.  
  419. --monitor.setCursorPos(41,2)------------------ 4
  420. --monitor.write("")
  421.  
  422. --monitor.setCursorPos(41,4)
  423. --monitor.write("")
  424.  
  425. --monitor.setCursorPos(41,8)
  426. --monitor.write("")
  427.  
  428. --monitor.setCursorPos(41,10)
  429. --monitor.write("")
  430.  
  431. --monitor.setCursorPos(41,12)
  432. --monitor.write("")
  433.  
  434. --monitor.setCursorPos(41,18)
  435. --monitor.write("")
  436.  
  437. --monitor.setCursorPos(41,20)
  438. --monitor.write("")
  439.  
  440. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  441.  
  442. CBL = 1
  443. elseif CBL == 1 then
  444. end
  445.  
  446. elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 2 then
  447. if CML == 1 or CAL == 1 or CLL == 1 or CBL == 1 then
  448. shell.run("Touch")
  449. end
  450. end
  451. end -- ends the function
  452.  
  453.  
  454.  
  455.  
  456.  
  457.  
  458.  
  459. repeat
  460.  
  461. event,p1,p2,p3 = os.pullEvent() -- Get Event data. event,p1,p2,p3 from os.pullEvent()
  462.  
  463. if event=="monitor_touch" then -- Event Mouse_touch (right click monitor)
  464.  
  465. mouseWidth = p2 -- sets mouseWidth -- Set Mouse Width to p2
  466. mouseHeight = p3 -- and mouseHeight -- Set Mouse Height to p3
  467. checkClickPosition() -- this runs our function -- Runs the pervious CheckClickPosition Function
  468.  
  469. end -- End the IF statement
  470.  
  471. until event=="char" and p1==("x") -- Until the event "char" position 1 is X (aka when X is pressed) the programm will loop
Advertisement
Add Comment
Please, Sign In to add comment