API tools faq
paste
DanielGalrito

crystals

DanielGalrito
Nov 5th, 2016
153
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.83 KB | None | 0 0
raw download clone embed print report
  1. local Rauth = elem.allocate("EXOTIC", "RWTR")
  2. elem.element(Rauth, elem.element(elem.DEFAULT_PT_GLOW))
  3. elem.property(Rauth, "Name", "RWTR")
  4. elem.property(Rauth, "Description", "Rauth's water, universal crystal solution, used to grow synthetic crystals.")
  5.  
  6.  
  7.  
  8. local Red97a = elem.allocate("EXOTIC", "R97A")
  9. elem.element(Red97a, elem.element(elem.DEFAULT_PT_QRTZ))
  10. elem.property(Red97a, "Name", "R97A")
  11. elem.property(Red97a, "Description", "Red-97a crystal, often suddently decays creating a shockwave.")
  12. elem.property(Red97a, "Weight", 101.5)
  13. elem.property(Red97a, "Temperature", 295.15)
  14. elem.property(Red97a, "Hardness", -1)
  15. elem.property(Red97a, "Color", 0xFFC80000)
  16. --elem.property(Red97a, "MenuSection", elem.SC_NUCLEAR)
  17. --elem.property(Red97a, "MenuVisible", 0)
  18.  
  19.  
  20. function Red97a(i, x, y, surround, nt)
  21. if math.random(1,100000) == 1 then
  22. sim.partChangeType(i, tpt.element('y119'))
  23. sim.pressure(x/4,y/4,(sim.pressure(x/4,y/4)+50))
  24. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_PROT)
  25. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_PROT)
  26. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_PROT)
  27. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_PROT)
  28. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_PROT)
  29. end
  30.  
  31. local r = sim.partID(math.random(x-1, x+1), math.random(y-1, y+1))
  32. if r ~= nil then
  33. if sim.partProperty(r, "type") == tpt.element('rwtr') then
  34. if math.random(1,2000) == 1 then
  35. sim.partChangeType(r, tpt.element('r97a'))
  36. end
  37. end
  38. end
  39.  
  40. if sim.partProperty(i, "temp") < 10 then
  41. sim.partChangeType(i, tpt.element('ciso'))
  42. end
  43.  
  44. end
  45. tpt.element_func(Red97a, tpt.element('r97a'))
  46.  
  47. local function Red97aGlow(i, r, g, b)
  48. return 1, 0x00010001, 255, 200, 0, 0, 20, 200, 0, 0
  49. end
  50. tpt.graphics_func(Red97aGlow, tpt.element('r97a'))
  51.  
  52.  
  53.  
  54. local Yellow119 = elem.allocate("EXOTIC", "Y119")
  55. elem.element(Yellow119, elem.element(elem.DEFAULT_PT_QRTZ))
  56. elem.property(Yellow119, "Name", "Y119")
  57. elem.property(Yellow119, "Description", "Yellow-119, grows more rapidly than other crystals, decays with NEUT.")
  58. elem.property(Yellow119, "Weight", 101.5)
  59. elem.property(Yellow119, "Temperature", 295.15)
  60. elem.property(Yellow119, "Hardness", -1)
  61. elem.property(Yellow119, "Color", 0xFFFFFF00)
  62. --elem.property(Yellow119, "MenuSection", elem.SC_NUCLEAR)
  63. --elem.property(Yellow119, "MenuVisible", 0)
  64.  
  65.  
  66. function Yellow119(i, x, y, surround, nt)
  67. if math.random(1,100000) == 1 then
  68. sim.partChangeType(i, tpt.element('g73c'))
  69. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  70. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  71. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  72. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  73. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  74. end
  75.  
  76. local r = sim.partID(math.random(x-1, x+1), math.random(y-1, y+1))
  77. if r ~= nil then
  78. if sim.partProperty(r, "type") == tpt.element('rwtr') then
  79. if math.random(1,1000) == 1 then
  80. sim.partChangeType(r, tpt.element('y119'))
  81. end
  82. end
  83. end
  84.  
  85. if sim.partProperty(i, "temp") < 10 then
  86. sim.partChangeType(i, tpt.element('ciso'))
  87. end
  88.  
  89. end
  90. tpt.element_func(Yellow119, tpt.element('y119'))
  91.  
  92. local function Yellow119Glow(i, r, g, b)
  93. return 1, 0x00010001, 255, 255, 255, 0, 20, 255, 255, 0
  94. end
  95. tpt.graphics_func(Yellow119Glow, tpt.element('y119'))
  96.  
  97.  
  98.  
  99. local Green73c = elem.allocate("EXOTIC", "G73C")
  100. elem.element(Green73c, elem.element(elem.DEFAULT_PT_QRTZ))
  101. elem.property(Green73c, "Name", "G73C")
  102. elem.property(Green73c, "Description", "Green-73c.")
  103. elem.property(Green73c, "Weight", 101.5)
  104. elem.property(Green73c, "Temperature", 295.15)
  105. elem.property(Green73c, "Hardness", -1)
  106. elem.property(Green73c, "Color", 0xFF00C800)
  107. --elem.property(Green73c, "MenuSection", elem.SC_NUCLEAR)
  108. --elem.property(Green73c, "MenuVisible", 0)
  109.  
  110.  
  111. function Green73c(i, x, y, surround, nt)
  112. if math.random(1,100000) == 1 then
  113. sim.partChangeType(i, tpt.element('cn15'))
  114. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  115. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  116. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  117. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  118. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  119. end
  120.  
  121. local r = sim.partID(math.random(x-1, x+1), math.random(y-1, y+1))
  122. if r ~= nil then
  123. if sim.partProperty(r, "type") == tpt.element('rwtr') then
  124. if math.random(1,2000) == 1 then
  125. sim.partChangeType(r, tpt.element('g73c'))
  126. end
  127. end
  128. end
  129.  
  130. if sim.partProperty(i, "temp") < 10 then
  131. sim.partChangeType(i, tpt.element('ciso'))
  132. end
  133.  
  134. end
  135. tpt.element_func(Green73c, tpt.element('g73c'))
  136.  
  137. local function Green73cGlow(i, r, g, b)
  138. return 1, 0x00010001, 255, 0, 200, 0, 20, 0, 200, 0
  139. end
  140. tpt.graphics_func(Green73cGlow, tpt.element('g73c'))
  141.  
  142.  
  143.  
  144. local Cyan15 = elem.allocate("EXOTIC", "CN15")
  145. elem.element(Cyan15, elem.element(elem.DEFAULT_PT_QRTZ))
  146. elem.property(Cyan15, "Name", "CN15")
  147. elem.property(Cyan15, "Description", "Cyan-15, most stable crystal, emits scarce gamma radiation (PHOT).")
  148. elem.property(Cyan15, "Weight", 101.5)
  149. elem.property(Cyan15, "Temperature", 295.15)
  150. elem.property(Cyan15, "Hardness", -1)
  151. elem.property(Cyan15, "Color", 0xFF00C8C8)
  152. --elem.property(Cyan15, "MenuSection", elem.SC_NUCLEAR)
  153. --elem.property(Cyan15, "MenuVisible", 0)
  154.  
  155.  
  156. function Cyan15(i, x, y, surround, nt)
  157. if math.random(1,500000) == 1 then
  158. sim.partChangeType(i, tpt.element('bl63'))
  159. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  160. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  161. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  162. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  163. --sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  164. end
  165.  
  166. local r = sim.partID(math.random(x-1, x+1), math.random(y-1, y+1))
  167. if r ~= nil then
  168. if sim.partProperty(r, "type") == tpt.element('rwtr') then
  169. if math.random(1,2000) == 1 then
  170. sim.partChangeType(r, tpt.element('cn15'))
  171. end
  172. end
  173. end
  174.  
  175. if sim.partProperty(i, "temp") < 10 then
  176. sim.partChangeType(i, tpt.element('ciso'))
  177. end
  178.  
  179. end
  180. tpt.element_func(Cyan15, tpt.element('cn15'))
  181.  
  182. local function Cyan15Glow(i, r, g, b)
  183. return 1, 0x00010001, 255, 0, 200, 200, 20, 0, 200, 200
  184. end
  185. tpt.graphics_func(Cyan15Glow, tpt.element('cn15'))
  186.  
  187.  
  188.  
  189. local Blue63 = elem.allocate("EXOTIC", "BL63")
  190. elem.element(Blue63, elem.element(elem.DEFAULT_PT_QRTZ))
  191. elem.property(Blue63, "Name", "BL63")
  192. elem.property(Blue63, "Description", "Blue-63, doesn't grow with RWTR, also found in small quantities on Jupiter.")
  193. elem.property(Blue63, "Weight", 101.5)
  194. elem.property(Blue63, "Temperature", 295.15)
  195. elem.property(Blue63, "Hardness", -1)
  196. elem.property(Blue63, "Color", 0xFF0000C8)
  197. --elem.property(Blue63, "MenuSection", elem.SC_NUCLEAR)
  198. --elem.property(Blue63, "MenuVisible", 0)
  199.  
  200.  
  201. function Blue63(i, x, y, surround, nt)
  202. if math.random(1,100000) == 1 then
  203. sim.partChangeType(i, tpt.element('m201'))
  204. end
  205.  
  206. if math.random(1,2000) == 1 then
  207. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  208. end
  209.  
  210. if sim.partProperty(i, "temp") < 10 then
  211. sim.partChangeType(i, tpt.element('ciso'))
  212. end
  213.  
  214. end
  215. tpt.element_func(Blue63, tpt.element('bl63'))
  216.  
  217. local function Blue63Glow(i, r, g, b)
  218. return 1, 0x00010001, 255, 0, 0, 200, 20, 0, 0, 200
  219. end
  220. tpt.graphics_func(Blue63Glow, tpt.element('bl63'))
  221.  
  222.  
  223.  
  224. local Magenta201 = elem.allocate("EXOTIC", "M201")
  225. elem.element(Magenta201, elem.element(elem.DEFAULT_PT_QRTZ))
  226. elem.property(Magenta201, "Name", "M201")
  227. elem.property(Magenta201, "Description", "Magenta-201, generates ionized NBLE around while decaying..")
  228. elem.property(Magenta201, "Weight", 101.5)
  229. elem.property(Magenta201, "Temperature", 295.15)
  230. elem.property(Magenta201, "Hardness", -1)
  231. elem.property(Magenta201, "Color", 0xFFC800C8)
  232. --elem.property(Magenta201, "MenuSection", elem.SC_NUCLEAR)
  233. --elem.property(Magenta201, "MenuVisible", 0)
  234.  
  235.  
  236. function Magenta201(i, x, y, surround, nt)
  237. if math.random(1,100000) == 1 then
  238. sim.partChangeType(i, tpt.element('dmnd'))
  239. end
  240.  
  241. if math.random(1,2000) == 1 then
  242. sim.partCreate(-3, x+math.random(-1,1), y+math.random(-1,1), elem.DEFAULT_PT_NEUT)
  243. end
  244.  
  245. if sim.partProperty(i, "temp") < 10 then
  246. sim.partChangeType(i, tpt.element('ciso'))
  247. end
  248.  
  249. end
  250. tpt.element_func(Magenta201, tpt.element('m201'))
  251.  
  252. local function Magenta201Glow(i, r, g, b)
  253. return 1, 0x00010001, 255, 200, 0, 200, 20, 200, 0, 200
  254. end
  255. tpt.graphics_func(Magenta201Glow, tpt.element('m201'))
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
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!