API tools faq
paste
Advertisement
Himitsu_Chan

Untitled

Himitsu_Chan
Feb 29th, 2016
54
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.74 KB | None | 0 0
raw download clone embed print report diff
  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("Metals")
  36.  
  37. monitor.setCursorPos(2,4)
  38. monitor.write("Alloys")
  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,6)
  69. monitor.write("Glold")
  70.  
  71. monitor.setCursorPos(2,8)
  72. monitor.write("Coal")
  73.  
  74. monitor.setCursorPos(2,10)
  75. monitor.write("Unstable")
  76.  
  77. monitor.setCursorPos(2,12)
  78. monitor.write("Silver")
  79.  
  80. monitor.setCursorPos(2,14)
  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,6)
  90. monitor.write("Iron")
  91.  
  92. monitor.setCursorPos(15,8)
  93. monitor.write("Emerald")
  94.  
  95. monitor.setCursorPos(15,10)
  96. monitor.write("Nickel")
  97.  
  98. monitor.setCursorPos(15,12)
  99. monitor.write("Steel")
  100.  
  101. --monitor.setCursorPos(15,14)
  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,6)
  111. monitor.write("Lead")
  112.  
  113. monitor.setCursorPos(28,8)
  114. monitor.write("Mana Metal")
  115.  
  116. monitor.setCursorPos(28,10)
  117. monitor.write("Res Ender")
  118.  
  119. monitor.setCursorPos(28,12)
  120. monitor.write("Tin")
  121.  
  122. --monitor.setCursorPos(28,14)
  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,6)
  132. monitor.write("Redstone")
  133.  
  134. monitor.setCursorPos(41,8)
  135. monitor.write("Mithril")
  136.  
  137. monitor.setCursorPos(41,10)
  138. monitor.write("Shiny")
  139.  
  140. monitor.setCursorPos(41,12)
  141. monitor.write("Uranium")
  142.  
  143. --monitor.setCursorPos(41,14)
  144. --monitor.write("")
  145.  
  146. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  147.  
  148. CML = 1
  149. elseif CML == 1 then
  150.  
  151. monitor.clear()
  152.  
  153. monitor.setBackgroundColour((colours.lime))
  154.  
  155. monitor.setCursorPos(2,2)
  156. monitor.write("Metals")
  157.  
  158. monitor.setCursorPos(2,4)
  159. monitor.write("Alloys")
  160.  
  161. monitor.setCursorPos(2,6)
  162. monitor.write("Liquids")
  163.  
  164. monitor.setCursorPos(2,8)
  165. monitor.write("Blocks")
  166.  
  167. monitor.setBackgroundColour((colours.black))
  168.  
  169. CML = 0
  170.  
  171. end
  172.  
  173. elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 4 then
  174.  
  175. if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- ALLOYS HERE!
  176.  
  177. monitor.clear() -- Clear Monitor
  178.  
  179. monitor.setBackgroundColour((colours.lime))
  180.  
  181. monitor.setCursorPos(2,4)------------------- 1
  182. monitor.write("Back")
  183.  
  184. monitor.setCursorPos(2,6)
  185. monitor.write("Red Alloy")
  186.  
  187. monitor.setCursorPos(2,8)
  188. monitor.write("Lumium")
  189.  
  190. --monitor.setCursorPos(2,10)
  191. --monitor.write("")
  192.  
  193. --monitor.setCursorPos(2,12)
  194. --monitor.write("")
  195.  
  196. --monitor.setCursorPos(2,14)
  197. --monitor.write("")
  198.  
  199. --monitor.setCursorPos(2,16)
  200. --monitor.write("")
  201.  
  202. monitor.setCursorPos(15,4)------------------- 2
  203. monitor.write("Alum Brass")
  204.  
  205. monitor.setCursorPos(15,6)
  206. monitor.write("Electrum")
  207.  
  208. monitor.setCursorPos(15,8)
  209. monitor.write("Manyullyn")
  210.  
  211. --monitor.setCursorPos(15,10)
  212. --monitor.write("")
  213.  
  214. --monitor.setCursorPos(15,12)
  215. --monitor.write("")
  216.  
  217. --monitor.setCursorPos(15,14)
  218. --monitor.write("")
  219.  
  220. --monitor.setCursorPos(15,16)
  221. --monitor.write("")
  222.  
  223. monitor.setCursorPos(28,4)------------------ 3
  224. monitor.write("Alumite")
  225.  
  226. monitor.setCursorPos(28,6)
  227. monitor.write("Enderium")
  228.  
  229. monitor.setCursorPos(28,8)
  230. monitor.write("Pig Iron")
  231.  
  232. --monitor.setCursorPos(28,10)
  233. --monitor.write("")
  234.  
  235. --monitor.setCursorPos(28,12)
  236. --monitor.write("")
  237.  
  238. --monitor.setCursorPos(28,14)
  239. --monitor.write("")
  240.  
  241. --monitor.setCursorPos(28,16)
  242. --monitor.write("")
  243.  
  244. monitor.setCursorPos(41,4)------------------ 4
  245. monitor.write("Bronze")
  246.  
  247. monitor.setCursorPos(41,6)
  248. monitor.write("Invar")
  249.  
  250. monitor.setCursorPos(41,8)
  251. monitor.write("Signalium")
  252.  
  253. --monitor.setCursorPos(41,10)
  254. --monitor.write("")
  255.  
  256. --monitor.setCursorPos(41,12)
  257. --monitor.write("")
  258.  
  259. --monitor.setCursorPos(41,14)
  260. --monitor.write("")
  261.  
  262. --monitor.setCursorPos(41,16)
  263. --monitor.write("")
  264.  
  265. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  266.  
  267. CAL = 1
  268. elseif CAL == 1 then
  269.  
  270. monitor.clear()
  271.  
  272. monitor.setBackgroundColour((colours.lime))
  273.  
  274. monitor.setCursorPos(2,2)
  275. monitor.write("Metals")
  276.  
  277. monitor.setCursorPos(2,4)
  278. monitor.write("Alloys")
  279.  
  280. monitor.setCursorPos(2,6)
  281. monitor.write("Liquids")
  282.  
  283. monitor.setCursorPos(2,8)
  284. monitor.write("Blocks")
  285.  
  286. monitor.setBackgroundColour((colours.black))
  287.  
  288. CAL = 0
  289.  
  290. end
  291.  
  292. elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 6 then
  293.  
  294. if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- LIQUIDS HERE!
  295.  
  296. monitor.clear() -- Clear Monitor
  297.  
  298. monitor.setBackgroundColour((colours.lime))
  299.  
  300. monitor.setCursorPos(2,6)------------------- 1
  301. monitor.write("Back")
  302.  
  303. monitor.setCursorPos(2,8)
  304. monitor.write("Glue")
  305.  
  306. --monitor.setCursorPos(2,10)
  307. --monitor.write("")
  308.  
  309. --monitor.setCursorPos(2,12)
  310. --monitor.write("")
  311.  
  312. --monitor.setCursorPos(2,14)
  313. --monitor.write("")
  314.  
  315. --monitor.setCursorPos(2,16)
  316. --monitor.write("")
  317.  
  318. --monitor.setCursorPos(2,18)
  319. --monitor.write("")
  320.  
  321. monitor.setCursorPos(15,6)------------------- 2
  322. monitor.write("Pyrotheum")
  323.  
  324. monitor.setCursorPos(15,8)
  325. monitor.write("Lava")
  326.  
  327. --monitor.setCursorPos(15,10)
  328. --monitor.write("")
  329.  
  330. --monitor.setCursorPos(15,12)
  331. --monitor.write("")
  332.  
  333. --monitor.setCursorPos(15,14)
  334. --monitor.write("")
  335.  
  336. --monitor.setCursorPos(15,16)
  337. --monitor.write("")
  338.  
  339. --monitor.setCursorPos(15,18)
  340. --monitor.write("")
  341.  
  342. monitor.setCursorPos(28,6)------------------ 3
  343. monitor.write("Blood")
  344.  
  345. monitor.setCursorPos(28,8)
  346. monitor.write("Water")
  347.  
  348. --monitor.setCursorPos(28,10)
  349. --monitor.write("")
  350.  
  351. --monitor.setCursorPos(28,12)
  352. --monitor.write("")
  353.  
  354. --monitor.setCursorPos(28,14)
  355. --monitor.write("")
  356.  
  357. --monitor.setCursorPos(28,16)
  358. --monitor.write("")
  359.  
  360. --monitor.setCursorPos(28,18)
  361. --monitor.write("")
  362.  
  363. monitor.setCursorPos(41,6)------------------ 4
  364. monitor.write("Cryotheum")
  365.  
  366. --monitor.setCursorPos(41,8)
  367. --monitor.write("")
  368.  
  369. --monitor.setCursorPos(41,10)
  370. --monitor.write("")
  371.  
  372. --monitor.setCursorPos(41,12)
  373. --monitor.write("")
  374.  
  375. --monitor.setCursorPos(41,14)
  376. --monitor.write("")
  377.  
  378. --monitor.setCursorPos(41,16)
  379. --monitor.write("")
  380.  
  381. --monitor.setCursorPos(41,18)
  382. --monitor.write("")
  383.  
  384. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  385.  
  386. CLL = 1
  387. elseif CLL == 1 then
  388.  
  389. monitor.clear()
  390.  
  391. monitor.setBackgroundColour((colours.lime))
  392.  
  393. monitor.setCursorPos(2,2)
  394. monitor.write("Metals")
  395.  
  396. monitor.setCursorPos(2,4)
  397. monitor.write("Alloys")
  398.  
  399. monitor.setCursorPos(2,6)
  400. monitor.write("Liquids")
  401.  
  402. monitor.setCursorPos(2,8)
  403. monitor.write("Blocks")
  404.  
  405. monitor.setBackgroundColour((colours.black))
  406.  
  407. CLL = 0
  408.  
  409. end
  410.  
  411. elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 8 then
  412.  
  413. if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- BLOCKS HERE!
  414.  
  415. monitor.clear() -- Clear Monitor
  416.  
  417. monitor.setBackgroundColour((colours.lime))
  418.  
  419. monitor.setCursorPos(2,8)------------------- 1
  420. monitor.write("Back")
  421.  
  422. --monitor.setCursorPos(2,10)
  423. --monitor.write("")
  424.  
  425. --monitor.setCursorPos(2,12)
  426. --monitor.write("")
  427.  
  428. --monitor.setCursorPos(2,14)
  429. --monitor.write("")
  430.  
  431. --monitor.setCursorPos(2,16)
  432. --monitor.write("")
  433.  
  434. --monitor.setCursorPos(2,18)
  435. --monitor.write("")
  436.  
  437. --monitor.setCursorPos(2,20)
  438. --monitor.write("")
  439.  
  440. monitor.setCursorPos(15,8)------------------- 2
  441. monitor.write("Obsidian")
  442.  
  443. --monitor.setCursorPos(15,10)
  444. --monitor.write("")
  445.  
  446. --monitor.setCursorPos(15,12)
  447. --monitor.write("")
  448.  
  449. --monitor.setCursorPos(15,14)
  450. --monitor.write("")
  451.  
  452. --monitor.setCursorPos(15,16)
  453. --monitor.write("")
  454.  
  455. --monitor.setCursorPos(15,18)
  456. --monitor.write("")
  457.  
  458. --monitor.setCursorPos(15,20)
  459. --monitor.write("")
  460.  
  461. monitor.setCursorPos(28,8)------------------ 3
  462. monitor.write("Seared Stone")
  463.  
  464. --monitor.setCursorPos(28,10)
  465. --monitor.write("")
  466.  
  467. --monitor.setCursorPos(28,12)
  468. --monitor.write("")
  469.  
  470. --monitor.setCursorPos(28,14)
  471. --monitor.write("")
  472.  
  473. --monitor.setCursorPos(28,16)
  474. --monitor.write("")
  475.  
  476. --monitor.setCursorPos(28,18)
  477. --monitor.write("")
  478.  
  479. --monitor.setCursorPos(28,20)
  480. --monitor.write("")
  481.  
  482. monitor.setCursorPos(41,8)------------------ 4
  483. monitor.write("Glass")
  484.  
  485. --monitor.setCursorPos(41,10)
  486. --monitor.write("")
  487.  
  488. --monitor.setCursorPos(41,12)
  489. --monitor.write("")
  490.  
  491. --monitor.setCursorPos(41,14)
  492. --monitor.write("")
  493.  
  494. --monitor.setCursorPos(41,16)
  495. --monitor.write("")
  496.  
  497. --monitor.setCursorPos(41,18)
  498. --monitor.write("")
  499.  
  500. --monitor.setCursorPos(41,20)
  501. --monitor.write("")
  502.  
  503. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  504.  
  505. CBL = 1
  506. elseif CBL == 1 then
  507. monitor.clear()
  508.  
  509. monitor.setBackgroundColour((colours.lime))
  510.  
  511. monitor.setCursorPos(2,2)
  512. monitor.write("Metals")
  513.  
  514. monitor.setCursorPos(2,4)
  515. monitor.write("Alloys")
  516.  
  517. monitor.setCursorPos(2,6)
  518. monitor.write("Liquids")
  519.  
  520. monitor.setCursorPos(2,8)
  521. monitor.write("Blocks")
  522.  
  523. monitor.setBackgroundColour((colours.black))
  524.  
  525. CBL = 0
  526.  
  527. end
  528.  
  529.  
  530. end
  531. end -- ends the function
  532.  
  533.  
  534.  
  535.  
  536.  
  537.  
  538.  
  539. repeat
  540.  
  541. event,p1,p2,p3 = os.pullEvent() -- Get Event data. event,p1,p2,p3 from os.pullEvent()
  542.  
  543. if event=="monitor_touch" then -- Event Mouse_touch (right click monitor)
  544.  
  545. mouseWidth = p2 -- sets mouseWidth -- Set Mouse Width to p2
  546. mouseHeight = p3 -- and mouseHeight -- Set Mouse Height to p3
  547. checkClickPosition() -- this runs our function -- Runs the pervious CheckClickPosition Function
  548.  
  549. end -- End the IF statement
  550.  
  551. 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
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!