Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --TPT's Mod
- --Please use cracker64's script manager
- --VER 1.3 UPDATE http://pastebin.com/raw.php?i=jQZ58x68
- --Version 2
- function DrawHUD()
- function mouseclicky(mousex, mousey, button, event)
- if (event == 1) then
- var5 = 1
- end
- if (event == 2) then
- var5 = 2
- end
- end
- function keyclicky(key, nkey, modifier, event)
- if (key == "." and event == 1) then
- var6 = 1
- else
- var6 = 2
- end
- if (key == "," and event == 1) then
- var7 = 1
- else
- var7 = 2
- end
- if (key == "z" and event == 1) then
- var8 = 1
- else
- var8 = 2
- end
- if (key == "=" and event == 1) then
- var10 = 1
- end
- if (key == "-" and event == 1) then
- var10 = 2
- end
- end
- tpt.register_keypress(keyclicky)
- tpt.register_mouseclick(mouseclicky)
- if var7 == 1 then
- var9 = 1
- end
- if var6 == 1 then
- var9 = 2
- end
- if var9 == 1 then
- rect = graphics.drawText
- draw = graphics.fillRect
- var10 = 2
- var8 = 1
- else
- rect = graphics.fillRect
- draw = graphics.drawText
- end
- if var10 == 1 then
- draw1 = graphics.drawText
- rect1 = graphics.fillRect
- else
- draw1 = graphics.fillRect
- rect1 = graphics.drawText
- end
- if var8 ~= 1 then
- draw2 = graphics.drawText
- else
- draw2 = graphics.fillRect
- end
- if tpt.mousex >= 611 then
- x2 = 611
- else
- x2 = tpt.mousex
- end
- if tpt.mousey >= 383 then
- y2 = 383
- else
- y2 = tpt.mousey
- end
- local x, y = sim.adjustCoords(x2, y2)
- if tpt.get_property("type", x, y) >= 1 then
- ptype = tpt.element(tpt.get_property("type", x, y))
- else
- ptype = "Empty,"
- end
- if tpt.get_property("type", x, y) >= 1 then
- var1 = tpt.get_property("temp", x, y)-273.15
- else
- var1 = 293.15
- end
- local var2 = var1*100
- local var3 = math.floor(var2)/100
- if tpt.get_property("type", x, y) >= 1 then
- temp = var3
- else
- temp = "()"
- end
- if tpt.get_property("type", x, y) >= 1 then
- var12312389 = tpt.get_property("ctype", x, y)
- end
- if tpt.get_property("type", x, y) >= 1 and var12312389 >= 0 and var12312389 < sim.PT_NUM then
- ctype = tpt.element(tpt.get_property("ctype", x, y))
- end
- if tpt.get_property("type", x, y) == 0 or tpt.get_property("ctype", x, y) < 1 then
- ctype = "()"
- end
- if x >= 609 then
- x1 = 609/4
- else
- x1 = x/4
- end
- if y >= 381 then
- y1 = 381/4
- else
- y1 = y/4
- end
- local var4 = sim.pressure(x1, y1)*100
- local pressure = math.floor(var4)/100
- local parts = tpt.get_numOfParts()
- if tpt.get_property("type", x, y) >= 1 then
- tmp = tpt.get_property("tmp", x, y)
- else
- tmp = "0"
- end
- if tpt.get_property("type", x, y) >= 1 then
- life = tpt.get_property("life", x, y)
- else
- life = "0"
- end
- if tpt.get_property("type", x, y) >= 1 then
- tmp = tpt.get_property("tmp2", x, y)
- else
- tmp2 = "0"
- end
- if tpt.get_property("type", x, y) >= 1 then
- var11 = tpt.get_property("vy", x, y)*1000
- else
- var11 = 0
- end
- local vy = math.floor(var11)/1000
- if tpt.get_property("type", x, y) >= 1 then
- var12 = tpt.get_property("vx", x, y)*1000
- else
- var12 = 0
- end
- local vx = math.floor(var12)/1000
- rect(398, 13, 187, 12, 55, 55, 55, 200)
- rect(398, 27, 200, 12, 55, 55, 55, 200)
- rect(14, 13, 210, 12, 55, 55, 55, 200)
- rect1(398, 41, 180, 12, 55, 55, 55, 200)
- --{MAY BE USEFUL LATER???}graphics.drawText(6, 6, os.date("%a %b %d, %l:%M:%S %p"), 0, 255, 165, 200)
- draw(16, 15, os.date(), 0, 255, 165, 200)
- draw2(250, 6, "</> Turn HUD On/Off", 0, 255, 165, 150)
- draw2(250, 16, "-/+ Extra On/Off", 0, 255, 165, 150)
- draw(550, 30, x, 0, 255, 165, 200)
- draw(578, 30, y, 0, 255, 165, 200)
- draw(541, 30, "X:", 0, 255, 165, 200)
- draw(570, 30, "Y:", 0, 255, 165, 200)
- draw(435, 15, ctype, 0, 255, 165, 200)
- draw(400, 15, ptype, 0, 255, 165, 200)
- draw(558, 15, pressure, 0, 255, 165, 200)
- draw(465, 15, "Temp:", 0, 255, 165, 200)
- draw(465, 30, "Tmp:", 0, 255, 165, 200)
- draw(400, 30, "Life:", 0, 255, 165, 200)
- draw(535, 15, "Pres:", 0, 255, 165, 200)
- draw(160, 15, "Parts:", 0, 255, 165, 200)
- draw(490, 15, temp, 0, 255, 165, 200)
- draw(485, 30, tmp, 0, 255, 165, 200)
- draw(422, 30, life, 0, 255, 165, 200)
- draw(187, 15, parts, 0, 255, 165, 200)
- draw1(400, 44, "Tmp2:", 0, 255, 165, 200)
- draw1(425, 44, tmp2, 0, 255, 165, 200)
- draw1(465, 44, "VX:", 0, 255, 165, 200)
- draw1(535, 44, "VY:", 0, 255, 165, 200)
- draw1(480, 44, vx, 0, 255, 165, 200)
- draw1(550, 44, vy, 0, 255, 165, 200)
- end
- tpt.hud(0)
- tpt.register_step(DrawHUD)
- --Draws starting texts
- print("TPT's Mod")
- print("Version 2")
- print("Update 0")
- print("Created by Amy. All elements were reprogrammed and compiled into a single file.")
- print("Contact via email or http://powdertoy.co.uk")
- --TUNG Mod :D
- function moo(i, x, y, surround_space, nt)
- if sim.pressure(x/4, y/4)<-7 and sim.partProperty(i, sim.FIELD_LIFE)~=0 and surround_space~=0 then
- sim.partCreate(-1, x+math.random(-3,3), y+math.random(-3,3), elem.DEFAULT_PT_ELEC) end
- end
- tpt.element_func(moo, tpt.el.tung.id, 0)
- tpt.el.tung.description="Tungsten. Brittle metal with a very high melting point. When sparked under a pressure of -7, emits electrons."
- --METR Element
- local METR = elements.allocate("ELEMENT", "METR")
- elements.element(elements.ELEMENT_PT_METR, elements.element(elements.DEFAULT_PT_ELEC))
- elements.property(elements.ELEMENT_PT_METR, "Name", "METR")
- elements.property(elements.ELEMENT_PT_METR, "Description", "Meteors, Explode on impact. Use sparingly.")
- elements.property(elements.ELEMENT_PT_METR, "Colour", 0xFF7A0002)
- elements.property(elements.ELEMENT_PT_METR, "MenuSection", elem.SC_EXPLOSIVE)
- elements.property(elements.ELEMENT_PT_METR, "MenuVisible", 1)
- elements.property(elements.ELEMENT_PT_METR, "Weight", 100)
- elements.property(elements.ELEMENT_PT_METR, "Temperature", 9999)
- local function graphics1(i, colr, colg, colb)
- return 1,0x00010000,255,225,0,210,255,255,255,255
- end
- tpt.graphics_func(graphics1,METR)
- local function get_property(prop, x, y)
- if x >= 0 and x < sim.XRES and y >=0 and y < sim.YRES then
- return tpt.get_property(prop, x, y)
- end
- return 0
- end
- math.randomseed(os.time())
- function metr_update(i, x, y, s, n)
- if tpt.get_property("tmp",i)==0 then
- tpt.parts[i].tmp=1
- randvel=math.random(-20,20)/10
- tpt.parts[i].vx=randvel
- tpt.parts[i].vy=math.sqrt(8-(randvel^2))
- end
- xvel=tpt.get_property("vx",i)/2
- yvel=tpt.get_property("vy",i)/2
- if yvel <= 0 or math.abs(xvel) > 1 then
- tpt.delete(i)
- end
- xpos=x-xvel
- ypos=y-yvel
- elemtype=get_property("type",xpos,ypos)
- if elemtype == 0 then
- tpt.create(xpos,ypos,"bray")
- tpt.set_property("temp",5000,xpos,ypos)
- end
- tpt.parts[i].temp=9999
- elemtype25=get_property("type",x+xvel*5,y+yvel*5)
- elemtype24=get_property("type",x+xvel*4,y+yvel*4)
- elemtype23=get_property("type",x+xvel*3,y+yvel*3)
- elemtype22=get_property("type",x+xvel*2,y+yvel*2)
- elemtype21=get_property("type",x+xvel,y+yvel)
- if elemtype25 ~= 0 and elemtype25 ~= elements.ELEMENT_PT_METR and elemtype25 ~= tpt.el.bray.id and elemtype25 ~= tpt.el.dmnd.id and elemtype25 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype24 ~= 0 and elemtype24 ~= elements.ELEMENT_PT_METR and elemtype24 ~= tpt.el.bray.id and elemtype24 ~= tpt.el.dmnd.id and elemtype24 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype23 ~= 0 and elemtype23 ~= elements.ELEMENT_PT_METR and elemtype23 ~= tpt.el.bray.id and elemtype23 ~= tpt.el.dmnd.id and elemtype23 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype22 ~= 0 and elemtype22 ~= elements.ELEMENT_PT_METR and elemtype22 ~= tpt.el.bray.id and elemtype22 ~= tpt.el.dmnd.id and elemtype22 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype21 ~= 0 and elemtype21 ~= elements.ELEMENT_PT_METR and elemtype21 ~= tpt.el.bray.id and elemtype21 ~= tpt.el.dmnd.id and elemtype21 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- end
- end
- tpt.element_func(metr_update, elements.ELEMENT_PT_METR,1)
- --BMBR Element {Amy}
- local BMBR = elements.allocate("ELEMENT", "BMBR")
- elements.element(elements.ELEMENT_PT_BMBR, elements.element(elements.DEFAULT_PT_ELEC))
- elements.property(elements.ELEMENT_PT_BMBR, "Name", "BMBR")
- elements.property(elements.ELEMENT_PT_BMBR, "Description", "Right Shooting Bomb.")
- elements.property(elements.ELEMENT_PT_BMBR, "Colour", 0xFF31CBD9)
- elements.property(elements.ELEMENT_PT_BMBR, "MenuSection", elem.SC_EXPLOSIVE)
- elements.property(elements.ELEMENT_PT_BMBR, "MenuVisible", 1)
- elements.property(elements.ELEMENT_PT_BMBR, "Weight", 100)
- elements.property(elements.ELEMENT_PT_BMBR, "Temperature", 9999)
- local function graphics1(i, colr, colg, colb)
- return 1,0x00010000,255,225,0,210,255,255,255,255
- end
- tpt.graphics_func(graphics1,BMBR)
- local function get_property(prop, x, y)
- if x >= 0 and x < sim.XRES and y >=0 and y < sim.YRES then
- return tpt.get_property(prop, x, y)
- end
- return 0
- end
- math.randomseed(os.time())
- function BMBR_update(i, x, y, s, n)
- if tpt.get_property("tmp",i)==0 then
- tpt.parts[i].tmp=1
- --randvel=math.random(-20,20)/10
- tpt.parts[i].vx=3
- tpt.parts[i].vy=0
- end
- xvel=3
- yvel=0
- if math.abs(xvel) < 1 then
- tpt.delete(i)
- end
- xpos=x-xvel
- ypos=y-yvel
- elemtype=get_property("type",xpos,ypos)
- if elemtype == 0 then
- tpt.create(xpos,ypos,"bray")
- tpt.set_property("temp",5000,xpos,ypos)
- end
- tpt.parts[i].temp=9999
- elemtype25=get_property("type",x+xvel*5,y+yvel*5)
- elemtype24=get_property("type",x+xvel*4,y+yvel*4)
- elemtype23=get_property("type",x+xvel*3,y+yvel*3)
- elemtype22=get_property("type",x+xvel*2,y+yvel*2)
- elemtype21=get_property("type",x+xvel,y+yvel)
- if elemtype25 ~= 0 and elemtype25 ~= elements.ELEMENT_PT_BMBR and elemtype25 ~= tpt.el.bray.id and elemtype25 ~= tpt.el.dmnd.id and elemtype25 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype24 ~= 0 and elemtype24 ~= elements.ELEMENT_PT_BMBR and elemtype24 ~= tpt.el.bray.id and elemtype24 ~= tpt.el.dmnd.id and elemtype24 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype23 ~= 0 and elemtype23 ~= elements.ELEMENT_PT_BMBR and elemtype23 ~= tpt.el.bray.id and elemtype23 ~= tpt.el.dmnd.id and elemtype23 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype22 ~= 0 and elemtype22 ~= elements.ELEMENT_PT_BMBR and elemtype22 ~= tpt.el.bray.id and elemtype22 ~= tpt.el.dmnd.id and elemtype22 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype21 ~= 0 and elemtype21 ~= elements.ELEMENT_PT_BMBR and elemtype21 ~= tpt.el.bray.id and elemtype21 ~= tpt.el.dmnd.id and elemtype21 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- end
- end
- tpt.element_func(BMBR_update, elements.ELEMENT_PT_BMBR,1)
- --BMBL Element {Amy}
- local BMBL = elements.allocate("ELEMENT", "BMBL")
- elements.element(elements.ELEMENT_PT_BMBL, elements.element(elements.DEFAULT_PT_ELEC))
- elements.property(elements.ELEMENT_PT_BMBL, "Name", "BMBL")
- elements.property(elements.ELEMENT_PT_BMBL, "Description", "Left Shooting Bomb.")
- elements.property(elements.ELEMENT_PT_BMBL, "Colour", 0xFF20878E)
- elements.property(elements.ELEMENT_PT_BMBL, "MenuSection", elem.SC_EXPLOSIVE)
- elements.property(elements.ELEMENT_PT_BMBL, "MenuVisible", 1)
- elements.property(elements.ELEMENT_PT_BMBL, "Weight", 100)
- elements.property(elements.ELEMENT_PT_BMBL, "Temperature", 9999)
- local function graphics1(i, colr, colg, colb)
- return 1,0x00010000,255,225,0,210,255,255,255,255
- end
- tpt.graphics_func(graphics1,BMBL)
- local function get_property(prop, x, y)
- if x >= 0 and x < sim.XRES and y >=0 and y < sim.YRES then
- return tpt.get_property(prop, x, y)
- end
- return 0
- end
- math.randomseed(os.time())
- function BMBL_update(i, x, y, s, n)
- if tpt.get_property("tmp",i)==0 then
- tpt.parts[i].tmp=1
- --randvel=math.random(-20,20)/10
- tpt.parts[i].vx=-3
- tpt.parts[i].vy=0
- end
- xvel=-3
- yvel=0
- if math.abs(xvel) < 1 then
- tpt.delete(i)
- end
- xpos=x-xvel
- ypos=y-yvel
- elemtype=get_property("type",xpos,ypos)
- if elemtype == 0 then
- tpt.create(xpos,ypos,"bray")
- tpt.set_property("temp",5000,xpos,ypos)
- end
- tpt.parts[i].temp=9999
- elemtype25=get_property("type",x+xvel*5,y+yvel*5)
- elemtype24=get_property("type",x+xvel*4,y+yvel*4)
- elemtype23=get_property("type",x+xvel*3,y+yvel*3)
- elemtype22=get_property("type",x+xvel*2,y+yvel*2)
- elemtype21=get_property("type",x+xvel,y+yvel)
- if elemtype25 ~= 0 and elemtype25 ~= elements.ELEMENT_PT_BMBL and elemtype25 ~= tpt.el.bray.id and elemtype25 ~= tpt.el.dmnd.id and elemtype25 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype24 ~= 0 and elemtype24 ~= elements.ELEMENT_PT_BMBL and elemtype24 ~= tpt.el.bray.id and elemtype24 ~= tpt.el.dmnd.id and elemtype24 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype23 ~= 0 and elemtype23 ~= elements.ELEMENT_PT_BMBL and elemtype23 ~= tpt.el.bray.id and elemtype23 ~= tpt.el.dmnd.id and elemtype23 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype22 ~= 0 and elemtype22 ~= elements.ELEMENT_PT_BMBL and elemtype22 ~= tpt.el.bray.id and elemtype22 ~= tpt.el.dmnd.id and elemtype22 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype21 ~= 0 and elemtype21 ~= elements.ELEMENT_PT_BMBL and elemtype21 ~= tpt.el.bray.id and elemtype21 ~= tpt.el.dmnd.id and elemtype21 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- end
- end
- tpt.element_func(BMBL_update, elements.ELEMENT_PT_BMBL,1)
- --MRTR {Amy}
- local MRTR = elements.allocate("ELEMENT", "MRTR")
- elements.element(elements.ELEMENT_PT_MRTR, elements.element(elements.DEFAULT_PT_ELEC))
- elements.property(elements.ELEMENT_PT_MRTR, "Name", "MRTR")
- elements.property(elements.ELEMENT_PT_MRTR, "Description", "Mortar Right.")
- elements.property(elements.ELEMENT_PT_MRTR, "Colour", 0xFF2E01E3)
- elements.property(elements.ELEMENT_PT_MRTR, "MenuSection", elem.SC_EXPLOSIVE)
- elements.property(elements.ELEMENT_PT_MRTR, "MenuVisible", 1)
- elements.property(elements.ELEMENT_PT_MRTR, "Weight", 100)
- elements.property(elements.ELEMENT_PT_MRTR, "Temperature", 9999)
- local function graphics1(i, colr, colg, colb)
- return 1,0x00010000,255,225,0,210,255,255,255,255
- end
- tpt.graphics_func(graphics1,MRTR)
- local function get_property(prop, x, y)
- if x >= 0 and x < sim.XRES and y >=0 and y < sim.YRES then
- return tpt.get_property(prop, x, y)
- end
- return 0
- end
- math.randomseed(os.time())
- function MRTR_update(i, x, y, s, n)
- if tpt.get_property("tmp",i)==0 then
- tpt.parts[i].tmp=1
- --randvel=math.random(-20,20)/10
- tpt.parts[i].vx=3
- tpt.parts[i].vy=3
- end
- xvel=3
- yvel=3
- if math.abs(xvel) < 1 then
- tpt.delete(i)
- end
- xpos=x-xvel
- ypos=y-yvel
- elemtype=get_property("type",xpos,ypos)
- if elemtype == 0 then
- tpt.create(xpos,ypos,"bray")
- tpt.set_property("temp",5000,xpos,ypos)
- end
- tpt.parts[i].temp=9999
- elemtype25=get_property("type",x+xvel*5,y+yvel*5)
- elemtype24=get_property("type",x+xvel*4,y+yvel*4)
- elemtype23=get_property("type",x+xvel*3,y+yvel*3)
- elemtype22=get_property("type",x+xvel*2,y+yvel*2)
- elemtype21=get_property("type",x+xvel,y+yvel)
- if elemtype25 ~= 0 and elemtype25 ~= elements.ELEMENT_PT_MRTR and elemtype25 ~= tpt.el.bray.id and elemtype25 ~= tpt.el.dmnd.id and elemtype25 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype24 ~= 0 and elemtype24 ~= elements.ELEMENT_PT_MRTR and elemtype24 ~= tpt.el.bray.id and elemtype24 ~= tpt.el.dmnd.id and elemtype24 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype23 ~= 0 and elemtype23 ~= elements.ELEMENT_PT_MRTR and elemtype23 ~= tpt.el.bray.id and elemtype23 ~= tpt.el.dmnd.id and elemtype23 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype22 ~= 0 and elemtype22 ~= elements.ELEMENT_PT_MRTR and elemtype22 ~= tpt.el.bray.id and elemtype22 ~= tpt.el.dmnd.id and elemtype22 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype21 ~= 0 and elemtype21 ~= elements.ELEMENT_PT_MRTR and elemtype21 ~= tpt.el.bray.id and elemtype21 ~= tpt.el.dmnd.id and elemtype21 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- end
- end
- tpt.element_func(MRTR_update, elements.ELEMENT_PT_MRTR,1)
- --MRTL {Amy}
- local MRTL = elements.allocate("ELEMENT", "MRTL")
- elements.element(elements.ELEMENT_PT_MRTL, elements.element(elements.DEFAULT_PT_ELEC))
- elements.property(elements.ELEMENT_PT_MRTL, "Name", "MRTL")
- elements.property(elements.ELEMENT_PT_MRTL, "Description", "Motar Left.")
- elements.property(elements.ELEMENT_PT_MRTL, "Colour", 0xFF5068E4)
- elements.property(elements.ELEMENT_PT_MRTL, "MenuSection", elem.SC_EXPLOSIVE)
- elements.property(elements.ELEMENT_PT_MRTL, "MenuVisible", 1)
- elements.property(elements.ELEMENT_PT_MRTL, "Weight", 100)
- elements.property(elements.ELEMENT_PT_MRTL, "Temperature", 9999)
- local function graphics1(i, colr, colg, colb)
- return 1,0x00010000,255,225,0,210,255,255,255,255
- end
- tpt.graphics_func(graphics1,MRTL)
- local function get_property(prop, x, y)
- if x >= 0 and x < sim.XRES and y >=0 and y < sim.YRES then
- return tpt.get_property(prop, x, y)
- end
- return 0
- end
- math.randomseed(os.time())
- function MRTL_update(i, x, y, s, n)
- if tpt.get_property("tmp",i)==0 then
- tpt.parts[i].tmp=1
- --randvel=math.random(-20,20)/10
- tpt.parts[i].vx=-3
- tpt.parts[i].vy=3
- end
- xvel=-3
- yvel=3
- if math.abs(xvel) < 1 then
- tpt.delete(i)
- end
- xpos=x-xvel
- ypos=y-yvel
- elemtype=get_property("type",xpos,ypos)
- if elemtype == 0 then
- tpt.create(xpos,ypos,"bray")
- tpt.set_property("temp",5000,xpos,ypos)
- end
- tpt.parts[i].temp=9999
- elemtype25=get_property("type",x+xvel*5,y+yvel*5)
- elemtype24=get_property("type",x+xvel*4,y+yvel*4)
- elemtype23=get_property("type",x+xvel*3,y+yvel*3)
- elemtype22=get_property("type",x+xvel*2,y+yvel*2)
- elemtype21=get_property("type",x+xvel,y+yvel)
- if elemtype25 ~= 0 and elemtype25 ~= elements.ELEMENT_PT_MRTL and elemtype25 ~= tpt.el.bray.id and elemtype25 ~= tpt.el.dmnd.id and elemtype25 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype24 ~= 0 and elemtype24 ~= elements.ELEMENT_PT_MRTL and elemtype24 ~= tpt.el.bray.id and elemtype24 ~= tpt.el.dmnd.id and elemtype24 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype23 ~= 0 and elemtype23 ~= elements.ELEMENT_PT_MRTL and elemtype23 ~= tpt.el.bray.id and elemtype23 ~= tpt.el.dmnd.id and elemtype23 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype22 ~= 0 and elemtype22 ~= elements.ELEMENT_PT_MRTL and elemtype22 ~= tpt.el.bray.id and elemtype22 ~= tpt.el.dmnd.id and elemtype22 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- elseif elemtype21 ~= 0 and elemtype21 ~= elements.ELEMENT_PT_MRTL and elemtype21 ~= tpt.el.bray.id and elemtype21 ~= tpt.el.dmnd.id and elemtype21 ~= tpt.el.void.id then
- tpt.set_property("type","bomb",i)
- tpt.set_property("life",0,i)
- tpt.set_property("tmp",0,i)
- end
- end
- tpt.element_func(MRTL_update, elements.ELEMENT_PT_MRTL,1)
- --PLSM Copy For Explosives {Amy}
- local amy1 = elements.allocate("AMY", "IGNT")
- elements.element(elements.AMY_PT_IGNT, elements.element(elements.DEFAULT_PT_GAS))
- elements.property(elements.AMY_PT_IGNT, "Name", "IGNT")
- elements.property(elements.AMY_PT_IGNT, "Description", "Igniter. Use to ignite explosives, hotter than fire.")
- elements.property(elements.AMY_PT_IGNT, "Colour", 0xFFE52961)
- elements.property(elements.AMY_PT_IGNT, "MenuSection", 5)
- elements.property(elements.AMY_PT_IGNT, "MenuVisible", 1)
- elements.property(elements.AMY_PT_IGNT, "Temperature", 5000)
- elements.property(elements.AMY_PT_IGNT, "Weight", 0)
- elements.property(elements.AMY_PT_IGNT, "Flammable", 1)
- elements.property(elements.AMY_PT_IGNT, "Explosive", 0)
- --Strong Metal {Amy}
- local STEL = elements.allocate("AMY", "STEL")
- elements.element(elements.AMY_PT_STEL, elements.element(elements.DEFAULT_PT_TTAN))
- elements.property(elements.AMY_PT_STEL, "Name", "STEL")
- elements.property(elements.AMY_PT_STEL, "Description", "Special Steel. Resists heat transfer, and is nearly impossible to destroy.")
- elements.property(elements.AMY_PT_STEL, "Colour", 0x474747)
- elements.property(elements.AMY_PT_STEL, "MenuSection", elem.SC_SOLID)
- elements.property(elements.AMY_PT_STEL, "MenuVisible", 1)
- elements.property(elements.AMY_PT_STEL, "Weight", 1000)
- elements.property(elements.AMY_PT_STEL, "Temperature", 293)
- elements.property(elements.AMY_PT_STEL, "HeatConduct", 1)
- elements.property(elements.AMY_PT_STEL, "HighTemperature", 7000)
- --Strong Brick [Non Conductive] {Amy}
- local SNGB = elements.allocate("AMY", "SNGB")
- elements.element(elements.AMY_PT_SNGB, elements.element(elements.DEFAULT_PT_BRCK))
- elements.property(elements.AMY_PT_SNGB, "Name", "SNGB")
- elements.property(elements.AMY_PT_SNGB, "Description", "Extremely Strong Brick. Resists heat transfer.")
- elements.property(elements.AMY_PT_SNGB, "Colour", 0x989898)
- elements.property(elements.AMY_PT_SNGB, "MenuSection", elem.SC_SOLID)
- elements.property(elements.AMY_PT_SNGB, "MenuVisible", 1)
- elements.property(elements.AMY_PT_SNGB, "Weight", 1000)
- elements.property(elements.AMY_PT_SNGB, "Temperature", 293)
- elements.property(elements.AMY_PT_SNGB, "HeatConduct", 1)
- elements.property(elements.AMY_PT_SNGB, "HighTemperature", 7000)
- elements.property(elements.AMY_PT_SNGB, "HighPressure", 37)
- --Strong Glass [No Shatter] {Amy}
- local SNGL = elements.allocate("AMY", "SUGL")
- elements.element(elements.AMY_PT_SUGL, elements.element(elements.DEFAULT_PT_GLAS))
- elements.property(elements.AMY_PT_SUGL, "Name", "SUGL")
- elements.property(elements.AMY_PT_SUGL, "Description", "Super Glass. Hard to shatter.")
- elements.property(elements.AMY_PT_SUGL, "Colour", 0x007475)
- elements.property(elements.AMY_PT_SUGL, "MenuSection", elem.SC_SOLID)
- elements.property(elements.AMY_PT_SUGL, "MenuVisible", 1)
- elements.property(elements.AMY_PT_SUGL, "Weight", 750)
- elements.property(elements.AMY_PT_SUGL, "Temperature", 293)
- elements.property(elements.AMY_PT_SUGL, "HeatConduct", 3)
- elements.property(elements.AMY_PT_SUGL, "HighTemperature", 6750)
- elements.property(elements.AMY_PT_SUGL, "HighPressure", 37)
- elements.property(elements.AMY_PT_SUGL, "HighPressureTransition", elem.DEFAULT_PT_BGLA)
- --Copper {Amy}
- --[[{UNFINISHED}local COPR = elements.allocate("AMY", "COPR")
- elements.element(elements.AMY_PT_COPR, elements.element(elements.DEFAULT_PT_GOLD))
- elements.property(elements.AMY_PT_COPR, "Name", "COPR")
- elements.property(elements.AMY_PT_COPR, "Description", "Copper. Very conductive, with a low melting point.")
- elements.property(elements.AMY_PT_COPR, "Colour", 0xB36500)
- elements.property(elements.AMY_PT_COPR, "MenuSection", elem.SC_ELEC)
- elements.property(elements.AMY_PT_COPR, "MenuVisible", 1)
- elements.property(elements.AMY_PT_COPR, "Temperature", 293)
- elements.property(elements.AMY_PT_COPR, "HeatConduct", 100)
- elements.property(elements.AMY_PT_COPR, "HighTemperature", 1500)
- {DISREGARD THESE FUNCTIONS}
- --local function get_property(prop, x, y)
- --if sim.partNeighbours(x, y, 4, AMY_PT_COPR) == elem.DEFAULT_PT_SPRK then print("SPRKED")
- --end
- --if sim.partProperty(AMY_PT_COPR, FIELD_TYPE) == "sprk" then sim.partProperty(AMY_PT_COPR, object field, object value)
- -- end
- function sprk(i,x,y,s,n)
- if sim.partNeighbours(i, x, y, 4, AMY_PT_COPR) == elem.DEFAULT_PT_SPRK then print("SPRKED")
- end
- end
- ]]
- --Liquid Hydrogen {Extensively Edited by Amy}
- local LHYG = elements.allocate('AMY', 'LHYG')
- elements.element(LHYG, elements.element(elements.DEFAULT_PT_GLOW))
- elements.property(elements.AMY_PT_LHYG, "Name", "LHYG")
- elements.property(elements.AMY_PT_LHYG, "Description", "Liquid Hydrogen.")
- elements.property(elements.AMY_PT_LHYG, "Color", 0x99FFFF)
- elements.property(elements.AMY_PT_LHYG, "MenuSection", elem.SC_LIQUID)
- elements.property(elements.AMY_PT_LHYG, "Gravity", 0.4)
- elements.property(elements.AMY_PT_LHYG, "Falldown", 2)
- elements.property(elements.AMY_PT_LHYG, "Flammable", 16384)
- elements.property(elements.AMY_PT_LHYG, "Explosive", 1)
- elements.property(elements.AMY_PT_LHYG, "Temperature", 0)
- elements.property(elements.AMY_PT_LHYG, "HighTemperature", 60)
- elements.property(elements.AMY_PT_LHYG, "HighTemperatureTransition", elem.DEFAULT_PT_HYGN)
- local function Lflare(i, colr, colg, colb)
- return 1, 0x00000004, 255, 153, 255, 255, 255, 153, 255, 255
- end
- tpt.graphics_func(Lflare, elements.AMY_PT_LHYG)
- --Change HYGN so it changes states with LHYG
- elements.property(elements.DEFAULT_PT_HYGN, "LowTemperature", 60)
- elements.property(elements.DEFAULT_PT_HYGN, "LowTemperatureTransition", elements.AMY_PT_LHYG)
- --BPDR Element
- local element1 = elements.allocate("FEYNMAN", "BPDR")
- elements.element(elements.FEYNMAN_PT_BPDR, elements.element(elements.DEFAULT_PT_BCOL))
- elements.property(elements.FEYNMAN_PT_BPDR, "Name", "BPDR")
- elements.property(elements.FEYNMAN_PT_BPDR, "Description", "Black Powder, Very explosive.")
- elements.property(elements.FEYNMAN_PT_BPDR, "Colour", 0x353535)
- elements.property(elements.FEYNMAN_PT_BPDR, "MenuSection", 5)
- elements.property(elements.FEYNMAN_PT_BPDR, "Gravity", .5)
- elements.property(elements.FEYNMAN_PT_BPDR, "Flammable", 10000)
- elements.property(elements.FEYNMAN_PT_BPDR, "Explosive", 1)
- elements.property(elements.FEYNMAN_PT_BPDR, "Loss", 1)
- elements.property(elements.FEYNMAN_PT_BPDR, "AirLoss", .5)
- elements.property(elements.FEYNMAN_PT_BPDR, "AirDrag", .01)
- elements.property(elements.FEYNMAN_PT_BPDR, "Advection", .01)
- elements.property(elements.FEYNMAN_PT_BPDR, "Weight", 0)
- elements.property(elements.FEYNMAN_PT_BPDR, "Diffusion", 0)
- --Clouds Mod
- local a = elements.allocate("MOD", "UCLD")
- elements.element(elements.MOD_PT_UCLD, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.MOD_PT_UCLD, "Name", "UCLD")
- elements.property(elements.MOD_PT_UCLD, "Description", "Uranium Cloud. First type of radioactive cloud.")
- elements.property(elements.MOD_PT_UCLD, "Colour", 0xAAAAFF)
- elements.property(elements.MOD_PT_UCLD, "MenuSection", 10)
- elements.property(elements.MOD_PT_UCLD, "Gravity", 0)
- elements.property(elements.MOD_PT_UCLD, "Explosive", 0)
- elements.property(elements.MOD_PT_UCLD, "Weight", 0)
- elements.property(elements.MOD_PT_UCLD, "Diffusion", 1)
- elements.property(elements.MOD_PT_UCLD, "Hardness", 0)
- elements.property(elements.MOD_PT_UCLD, "Flammable", 0)
- elements.property(elements.MOD_PT_UCLD, "AirDrag", 0.01)
- function rain(i,x,y,s,n)
- if math.random(1,500) < 5 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'uran')
- end
- if math.random(1,500) == 20 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'boyl')
- end
- end
- tpt.element_func(rain,a)
- local b = elements.allocate("MOD2", "RACD")
- elements.element(elements.MOD2_PT_RACD, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.MOD2_PT_RACD, "Name", "RACD")
- elements.property(elements.MOD2_PT_RACD, "Description", "Rain Cloud.")
- elements.property(elements.MOD2_PT_RACD, "Colour", 0xA9ACB6)
- elements.property(elements.MOD2_PT_RACD, "MenuSection", 6)
- elements.property(elements.MOD2_PT_RACD, "Gravity", 0)
- elements.property(elements.MOD2_PT_RACD, "Explosive", 0)
- elements.property(elements.MOD2_PT_RACD, "Weight", 0)
- elements.property(elements.MOD2_PT_RACD, "Diffusion", 1)
- elements.property(elements.MOD2_PT_RACD, "Hardness", 0)
- elements.property(elements.MOD2_PT_RACD, "Flammable", 0)
- elements.property(elements.MOD2_PT_RACD, "AirDrag", 0.01)
- elements.property(elements.MOD2_PT_RACD, "LowTemperature", 273.15)
- elements.property(elements.MOD2_PT_RACD, "LowTemperatureTransition", "MOD_PT_SCLD")
- elements.property(elements.MOD2_PT_RACD, "Temperature", 295.15)
- function rain(i,x,y,s,n)
- if math.random(1,500) == 20 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'watr')
- end
- end
- tpt.element_func(rain,b)
- local c = elements.allocate("MOD3", "SCLD")
- elements.element(elements.MOD3_PT_SCLD, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.MOD3_PT_SCLD, "Name", "SCLD")
- elements.property(elements.MOD3_PT_SCLD, "Description", "Snow Cloud.")
- elements.property(elements.MOD3_PT_SCLD, "Colour", 0x8F8FBC)
- elements.property(elements.MOD3_PT_SCLD, "MenuSection", 6)
- elements.property(elements.MOD3_PT_SCLD, "Gravity", 0)
- elements.property(elements.MOD3_PT_SCLD, "Explosive", 0)
- elements.property(elements.MOD3_PT_SCLD, "Weight", 0)
- elements.property(elements.MOD3_PT_SCLD, "Diffusion", 1)
- elements.property(elements.MOD3_PT_SCLD, "Hardness", 0)
- elements.property(elements.MOD3_PT_SCLD, "Flammable", 0)
- elements.property(elements.MOD3_PT_SCLD, "AirDrag", 0.01)
- elements.property(elements.MOD3_PT_SCLD, "HighTemperature", 273.15)
- elements.property(elements.MOD3_PT_SCLD, "HighTemperatureTransition", "MOD_PT_RACD")
- elements.property(elements.MOD3_PT_SCLD, "Temperature", 263.15 )
- elements.property(elements.MOD3_PT_SCLD, "LowTemperature", 245.15)
- elements.property(elements.MOD3_PT_SCLD, "LowTemperatureTransition", "MOD_PT_ICE")
- function rain(i,x,y,s,n)
- if math.random(1,500) == 20 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'snow')
- end
- end
- tpt.element_func(rain,c)
- local d = elements.allocate("MOD4", "DRCD")
- elements.element(elements.MOD4_PT_DRCD, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.MOD4_PT_DRCD, "Name", "DRCD")
- elements.property(elements.MOD4_PT_DRCD, "Description", "Distilled Rain Cloud.")
- elements.property(elements.MOD4_PT_DRCD, "Colour", 0x506987)
- elements.property(elements.MOD4_PT_DRCD, "MenuSection", 6)
- elements.property(elements.MOD4_PT_DRCD, "Gravity", 0)
- elements.property(elements.MOD4_PT_DRCD, "Explosive", 0)
- elements.property(elements.MOD4_PT_DRCD, "Weight", 0)
- elements.property(elements.MOD4_PT_DRCD, "Diffusion", 1)
- elements.property(elements.MOD4_PT_DRCD, "Hardness", 0)
- elements.property(elements.MOD4_PT_DRCD, "Flammable", 0)
- elements.property(elements.MOD4_PT_DRCD, "AirDrag", 0.01)
- elements.property(elements.MOD4_PT_DRCD, "LowTemperature", 273.15)
- elements.property(elements.MOD4_PT_DRCD, "LowTemperatureTransition", "MOD_PT_SCLD")
- elements.property(elements.MOD4_PT_DRCD, "Temperature", 295.15)
- function rain(i,x,y,s,n)
- if math.random(1,500) == 20 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'dstw')
- end
- end
- tpt.element_func(rain,d)
- local e = elements.allocate("MOD5", "SRCD")
- elements.element(elements.MOD5_PT_SRCD, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.MOD5_PT_SRCD, "Name", "SRCD")
- elements.property(elements.MOD5_PT_SRCD, "Description", "Saltwater Rain Cloud.")
- elements.property(elements.MOD5_PT_SRCD, "Colour", 0x380474)
- elements.property(elements.MOD5_PT_SRCD, "MenuSection", 6)
- elements.property(elements.MOD5_PT_SRCD, "MenuVisible", 0)
- elements.property(elements.MOD5_PT_SRCD, "Gravity", 0)
- elements.property(elements.MOD5_PT_SRCD, "Explosive", 0)
- elements.property(elements.MOD5_PT_SRCD, "Weight", 0)
- elements.property(elements.MOD5_PT_SRCD, "Diffusion", 1)
- elements.property(elements.MOD5_PT_SRCD, "Hardness", 0)
- elements.property(elements.MOD5_PT_SRCD, "Flammable", 0)
- elements.property(elements.MOD5_PT_SRCD, "AirDrag", 0.01)
- elements.property(elements.MOD5_PT_SRCD, "LowTemperature", 273.15)
- elements.property(elements.MOD5_PT_SRCD, "LowTemperatureTransition", "MOD_PT_SCLD")
- elements.property(elements.MOD5_PT_SRCD, "Temperature", 295.15)
- function rain(i,x,y,s,n)
- if math.random(1,500) == 20 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'sltw')
- end
- end
- tpt.element_func(rain,e)
- local f = elements.allocate("MOD6", "TSCD")
- elements.element(elements.MOD6_PT_TSCD, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.MOD6_PT_TSCD, "Name", "TSCD")
- elements.property(elements.MOD6_PT_TSCD, "Description", "Thunderstorm Cloud.")
- elements.property(elements.MOD6_PT_TSCD, "Colour", 0x302B54)
- elements.property(elements.MOD6_PT_TSCD, "MenuSection", 6)
- elements.property(elements.MOD6_PT_TSCD, "MenuVisible", 0)
- elements.property(elements.MOD6_PT_TSCD, "Gravity", 0)
- elements.property(elements.MOD6_PT_TSCD, "Explosive", 0)
- elements.property(elements.MOD6_PT_TSCD, "Weight", 0)
- elements.property(elements.MOD6_PT_TSCD, "Diffusion", 1)
- elements.property(elements.MOD6_PT_TSCD, "Hardness", 0)
- elements.property(elements.MOD6_PT_TSCD, "Flammable", 0)
- elements.property(elements.MOD6_PT_TSCD, "AirDrag", 0.01)
- elements.property(elements.MOD6_PT_TSCD, "LowTemperature", 273.15)
- elements.property(elements.MOD6_PT_TSCD, "LowTemperatureTransition", "MOD_PT_SCLD")
- elements.property(elements.MOD6_PT_TSCD, "Temperature", 303.15)
- function rain(i,x,y,s,n)
- if math.random(1,500) == 20 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'ligh')
- end
- end
- tpt.element_func(rain,f)
- --Explosives
- --The Highly Explosive mod for Powder Toy
- local function explosion(x, y, s)
- for px = -1, 1 do
- for py = -1, 1 do
- tpt.create(x + px, y - py, "PLSM")
- local pressure = sim.pressure((x + px) / 4.0, (y + py) / 4.0)
- sim.pressure((x + px) / 4.0, (y + py) / 4.0, pressure + s * 10)
- sim.velocityX((x + px) / 4.0, y / 4.0, px * s)
- sim.velocityY((x + px) / 4.0, (y - py) / 4.0, -py * s)
- end
- end
- end
- local WBOMB = elements.allocate("MEXPL", "HELD")
- elements.element(elements.MEXPL_PT_HELD, elements.element(elements.DEFAULT_PT_GLOW))
- elements.property(elements.MEXPL_PT_HELD, "Color", "0xFFFEAF27")
- elements.property(elements.MEXPL_PT_HELD, "Name", "HELD")
- elements.property(elements.MEXPL_PT_HELD, "Description", "Highly Explosive Liquid.")
- elements.property(elements.MEXPL_PT_HELD, "MenuVisible", 1)
- elements.property(elements.MEXPL_PT_HELD, "MenuSection", 5)
- elements.property(elements.MEXPL_PT_HELD, "Advection", 0.1)
- elements.property(elements.MEXPL_PT_HELD, "AirDrag", 0.1)
- elements.property(elements.MEXPL_PT_HELD, "AirLoss", 0.9)
- elements.property(elements.MEXPL_PT_HELD, "Loss", 0.9)
- elements.property(elements.MEXPL_PT_HELD, "Falldown", 2)
- elements.property(elements.MEXPL_PT_HELD, "Hardness", 0.8)
- elements.property(elements.MEXPL_PT_HELD, "Weight", 12)
- elements.property(elements.MEXPL_PT_HELD, "Temperature", 340)
- elements.property(elements.MEXPL_PT_HELD, "HeatConduct", 100)
- elements.property(elements.MEXPL_PT_HELD, "State", 2)
- elements.property(elements.MEXPL_PT_HELD, "Properties", 2)
- elements.property(elements.MEXPL_PT_HELD, "Explosive", 1)
- local function HELD_update(i, x, y, s, n)
- local r = 1
- if sim.pressure(x / 4.0, y / 4.0) >= 7.5 then
- explosion(x, y, 1)
- tpt.delete(i)
- elseif tpt.get_property("temp", i) >= 450 then
- explosion(x, y, 1)
- tpt.delete(i)
- end
- end
- tpt.element_func(HELD_update, elements.MEXPL_PT_HELD)
- local SBOMB = elements.allocate("MEXPL", "HESD")
- elements.element(elements.MEXPL_PT_HESD, elements.element(elements.DEFAULT_PT_BANG))
- elements.property(elements.MEXPL_PT_HESD, "Color", "0xFFFF5000")
- elements.property(elements.MEXPL_PT_HESD, "Name", "HESD")
- elements.property(elements.MEXPL_PT_HESD, "Description", "Highly Explosive Solid.")
- elements.property(elements.MEXPL_PT_HESD, "MenuVisible", 1)
- elements.property(elements.MEXPL_PT_HESD, "MenuSection", 5)
- elements.property(elements.MEXPL_PT_HESD, "Hardness", 0.8)
- elements.property(elements.MEXPL_PT_HESD, "Temperature", 293)
- elements.property(elements.MEXPL_PT_HESD, "HeatConduct", 100)
- elements.property(elements.MEXPL_PT_HESD, "Falldown", 0)
- elements.property(elements.MEXPL_PT_HESD, "State", 1)
- elements.property(elements.MEXPL_PT_HESD, "Properties", 4)
- elements.property(elements.MEXPL_PT_HESD, "Explosive", 1)
- local function HESD_update(i, x, y, s, n)
- local r = 1
- if sim.pressure(x / 4.0, y / 4.0) >= 7.5 then
- explosion(x, y, 1)
- tpt.delete(i)
- elseif tpt.get_property("temp", i) >= 450 then
- explosion(x, y, 1)
- tpt.delete(i)
- end
- end
- tpt.element_func(HESD_update, elements.MEXPL_PT_HESD)
- local GBOMB = elements.allocate("MEXPL", "HEGS")
- elements.element(elements.MEXPL_PT_HEGS, elements.element(elements.DEFAULT_PT_GAS))
- elements.property(elements.MEXPL_PT_HEGS, "Color", "0xFFEBFE5D")
- elements.property(elements.MEXPL_PT_HEGS, "Name", "HEGS")
- elements.property(elements.MEXPL_PT_HEGS, "Description", "Highly Explosive Gas.")
- elements.property(elements.MEXPL_PT_HEGS, "MenuVisible", 1)
- elements.property(elements.MEXPL_PT_HEGS, "MenuSection", 5)
- elements.property(elements.MEXPL_PT_HEGS, "Hardness", 0.8)
- elements.property(elements.MEXPL_PT_HEGS, "Temperature", 390)
- elements.property(elements.MEXPL_PT_HEGS, "HeatConduct", 100)
- elements.property(elements.MEXPL_PT_HEGS, "Falldown", 0)
- elements.property(elements.MEXPL_PT_HEGS, "Diffusion", 0.5)
- elements.property(elements.MEXPL_PT_HEGS, "State", 3)
- elements.property(elements.MEXPL_PT_HEGS, "Explosive", 1)
- local function HEGS_update(i, x, y, s, n)
- local r = 1
- if sim.pressure(x / 4.0, y / 4.0) >= 7.5 then
- explosion(x, y, 1)
- tpt.delete(i)
- elseif tpt.get_property("temp", i) >= 450 then
- explosion(x, y, 1)
- tpt.delete(i)
- end
- end
- tpt.element_func(HEGS_update, elements.MEXPL_PT_HEGS)
- local PBOMB = elements.allocate("MEXPL", "HEPR")
- elements.element(elements.MEXPL_PT_HEPR, elements.element(elements.DEFAULT_PT_DUST))
- elements.property(elements.MEXPL_PT_HEPR, "Color", "0xFFFFFF00")
- elements.property(elements.MEXPL_PT_HEPR, "Name", "HEPR")
- elements.property(elements.MEXPL_PT_HEPR, "Description", "Highly Explosive Powder.")
- elements.property(elements.MEXPL_PT_HEPR, "MenuVisible", 1)
- elements.property(elements.MEXPL_PT_HEPR, "MenuSection", 5)
- elements.property(elements.MEXPL_PT_HEPR, "Hardness", 0.8)
- elements.property(elements.MEXPL_PT_HEPR, "Temperature", 293)
- elements.property(elements.MEXPL_PT_HEPR, "HeatConduct", 100)
- elements.property(elements.MEXPL_PT_HEPR, "Falldown", 1)
- elements.property(elements.MEXPL_PT_HEPR, "Explosive", 1)
- elements.property(elements.MEXPL_PT_HELD, "Advection", 0.1)
- elements.property(elements.MEXPL_PT_HELD, "AirDrag", 0.1)
- elements.property(elements.MEXPL_PT_HELD, "AirLoss", 0.9)
- elements.property(elements.MEXPL_PT_HELD, "Loss", 0.9)
- elements.property(elements.MEXPL_PT_HELD, "Hardness", 0.8)
- elements.property(elements.MEXPL_PT_HELD, "Weight", 12)
- elements.property(elements.MEXPL_PT_HEPR, "State", 1)
- elements.property(elements.MEXPL_PT_HEPR, "Properties", 4)
- local function HEPR_update(i, x, y, s, n)
- local r = 1
- if sim.pressure(x / 4.0, y / 4.0) >= 7.5 then
- explosion(x, y, 1)
- tpt.delete(i)
- elseif tpt.get_property("temp", i) >= 450 then
- explosion(x, y, 1)
- tpt.delete(i)
- end
- end
- tpt.element_func(HEPR_update, elements.MEXPL_PT_HEPR)
- elements.property(elements.MEXPL_PT_HESD, "HighTemperature", 327)
- elements.property(elements.MEXPL_PT_HESD, "HighTemperatureTransition", elements.MEXPL_PT_HELD)
- elements.property(elements.MEXPL_PT_HESD, "HighPressure", 2)
- elements.property(elements.MEXPL_PT_HESD, "HighPressureTransition", elements.MEXPL_PT_HEPR)
- elements.property(elements.MEXPL_PT_HEPR, "HighTemperature", 326)
- elements.property(elements.MEXPL_PT_HEPR, "HighTemperatureTransition", elements.MEXPL_PT_HELD)
- elements.property(elements.MEXPL_PT_HEGS, "LowTemperature", 365)
- elements.property(elements.MEXPL_PT_HEGS, "LowTemperatureTransition", elements.MEXPL_PT_HELD)
- elements.property(elements.MEXPL_PT_HELD, "HighTemperature", 365)
- elements.property(elements.MEXPL_PT_HELD, "HighTemperatureTransition", elements.MEXPL_PT_HEGS)
- elements.property(elements.MEXPL_PT_HELD, "LowTemperature", 327)
- elements.property(elements.MEXPL_PT_HELD, "LowTemperatureTransition", elements.MEXPL_PT_HESD)
- --"New Elements"
- local function heat()
- tpt.set_property("temp", 9999, "HETR")
- tpt.set_property("temp", 0, "COLR")
- end
- tpt.register_step(heat)
- elements.allocate('YOSHI', 'HETR')
- elements.element(elements.YOSHI_PT_HETR, elements.element(elements.DEFAULT_PT_DMND))
- elements.property(elements.YOSHI_PT_HETR, 'Name', 'HETR')
- elements.property(elements.YOSHI_PT_HETR, 'Description', 'Heats Elements.')
- elements.property(elements.YOSHI_PT_HETR, 'Color', '0xFF1111')
- elements.property(elements.YOSHI_PT_HETR, 'MenuSection', '2')
- elements.property(elements.YOSHI_PT_HETR, 'HeatConduct', '65535')
- local g = function(i, x, y, s, n)
- --Update Function
- end
- tpt.element_func(g, tpt.element('HETR'))
- local function heat()
- end
- tpt.register_step(heat)
- elements.allocate('YOSHI', 'COLR')
- elements.element(elements.YOSHI_PT_COLR, elements.element(elements.DEFAULT_PT_DMND))
- elements.property(elements.YOSHI_PT_COLR, 'Name', 'COLR')
- elements.property(elements.YOSHI_PT_COLR, 'Description', 'Cools Elements.')
- elements.property(elements.YOSHI_PT_COLR, 'Color', '0x1111FF')
- elements.property(elements.YOSHI_PT_COLR, 'MenuSection', '2')
- elements.property(elements.YOSHI_PT_COLR, 'HeatConduct', '65535')
- local g = function(i, x, y, s, n)
- --Update Function
- end
- tpt.element_func(g, tpt.element('COLR'))
- elements.allocate('YOSHI', 'HCTD')
- elements.element(elements.YOSHI_PT_HCTD, elements.element(elements.DEFAULT_PT_DMND))
- elements.property(elements.YOSHI_PT_HCTD, 'Name', 'HCTD')
- elements.property(elements.YOSHI_PT_HCTD, 'Description', 'Heat conductor.')
- elements.property(elements.YOSHI_PT_HCTD, 'Color', '0x11FF11')
- elements.property(elements.YOSHI_PT_HCTD, 'MenuSection', '2')
- elements.property(elements.YOSHI_PT_HCTD, 'HeatConduct', '65535')
- local g = function(i, x, y, s, n)
- --Update Function
- end
- tpt.element_func(g, tpt.element('HCTD'))
- local a = elements.allocate("YOSHI", "RCLD")
- elements.element(elements.YOSHI_PT_RCLD, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.YOSHI_PT_RCLD, "Name", "RCLD")
- elements.property(elements.YOSHI_PT_RCLD, "Description", "Radioactive cloud, Second type.")
- elements.property(elements.YOSHI_PT_RCLD, "Colour", 0x11FF22)
- elements.property(elements.YOSHI_PT_RCLD, "MenuSection", 10)
- elements.property(elements.YOSHI_PT_RCLD, "Gravity", 0)
- elements.property(elements.YOSHI_PT_RCLD, "Explosive", 0)
- elements.property(elements.YOSHI_PT_RCLD, "Weight", 0)
- elements.property(elements.YOSHI_PT_RCLD, "Diffusion", 1)
- elements.property(elements.YOSHI_PT_RCLD, "Hardness", 0)
- elements.property(elements.YOSHI_PT_RCLD, "Flammable", 100000)
- elements.property(elements.YOSHI_PT_RCLD, "AirDrag", 0.01)
- function rain(i,x,y,s,n)
- if math.random(1,500) < 5 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'plut')
- end
- if math.random(1,500) == 20 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'uran')
- end
- if math.random(1,500) == 30 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'isoz')
- end
- if math.random(1,500) == 40 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'deut')
- end
- if math.random(1,500) == 50 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'bvbr')
- end
- end
- tpt.element_func(rain,a)
- --[[ {NOT USEFUL ATM} local a = elements.allocate("YOSHI", "SULF")
- elements.element(elements.YOSHI_PT_SULF, elements.element(elements.DEFAULT_PT_COAL))
- elements.property(elements.YOSHI_PT_SULF, "Name", "SULF")
- elements.property(elements.YOSHI_PT_SULF, "Description", "Basic Sulphur.")
- elements.property(elements.YOSHI_PT_SULF, "Colour", 0xFFFF11)
- elements.property(elements.YOSHI_PT_SULF, "MenuSection", 9)
- elements.property(elements.YOSHI_PT_SULF, "Gravity", 0)
- elements.property(elements.YOSHI_PT_SULF, "Explosive", 0)
- elements.property(elements.YOSHI_PT_SULF, "Weight", 10)
- elements.property(elements.YOSHI_PT_SULF, "Diffusion", 0)
- elements.property(elements.YOSHI_PT_SULF, "Hardness", 0)
- elements.property(elements.YOSHI_PT_SULF, "Flammable", 10)]]
- --[[ {MAY BE USEFUL LATER?}local a = elements.allocate("YOSHI", "SACD")
- elements.element(elements.YOSHI_PT_SACD, elements.element(elements.DEFAULT_PT_ACID))
- elements.property(elements.YOSHI_PT_SACD, "Name", "SACD")
- elements.property(elements.YOSHI_PT_SACD, "Description", "Sulphuric acid, does nothing yet.")
- elements.property(elements.YOSHI_PT_SACD, "Colour", 0xEEEE11)
- elements.property(elements.YOSHI_PT_SACD, "MenuSection", 7)
- elements.property(elements.YOSHI_PT_SACD, "Gravity", 1)
- elements.property(elements.YOSHI_PT_SACD, "Explosive", 0)
- elements.property(elements.YOSHI_PT_SACD, "Weight", 10)
- elements.property(elements.YOSHI_PT_SACD, "Diffusion", 0.1)
- elements.property(elements.YOSHI_PT_SACD, "Hardness", 0)
- elements.property(elements.YOSHI_PT_SACD, "Flammable", 0)]]--
- local a = elements.allocate("YOSHI", "RMTL")
- elements.element(elements.YOSHI_PT_RMTL, elements.element(elements.DEFAULT_PT_TTAN))
- elements.property(elements.YOSHI_PT_RMTL, "Name", "RMTL")
- elements.property(elements.YOSHI_PT_RMTL, "Description", "Realistic metal.")
- elements.property(elements.YOSHI_PT_RMTL, "Colour", 0x666666)
- elements.property(elements.YOSHI_PT_RMTL, "MenuSection", 9)
- elements.property(elements.YOSHI_PT_RMTL, "Gravity", 0)
- elements.property(elements.YOSHI_PT_RMTL, "Explosive", 0)
- elements.property(elements.YOSHI_PT_RMTL, "Weight", 100)
- elements.property(elements.YOSHI_PT_RMTL, "Diffusion", 0)
- elements.property(elements.YOSHI_PT_RMTL, "Hardness", 0)
- elements.property(elements.YOSHI_PT_RMTL, "Flammable", 0)
- elements.property(elements.YOSHI_PT_RMTL, "AirLoss", 0)
- elements.property(elements.YOSHI_PT_RMTL, "Temperature", 273.15 + 22)
- elements.property(elements.YOSHI_PT_RMTL, "HighTemperature", 1798)
- elements.property(elements.YOSHI_PT_RMTL, "HighTemperatureTransition", elements.YOSHI_PT_MRMT)
- local a = elements.allocate("YOSHI", "MRMT")
- elements.element(elements.YOSHI_PT_MRMT, elements.element(elements.DEFAULT_PT_MERC))
- elements.property(elements.YOSHI_PT_MRMT, "Name", "MRMT")
- elements.property(elements.YOSHI_PT_MRMT, "Description", "Molten realistic metal.")
- elements.property(elements.YOSHI_PT_MRMT, "Colour", 0xFEDCBA)
- elements.property(elements.YOSHI_PT_MRMT, "MenuSection", 4)
- elements.property(elements.YOSHI_PT_MRMT, "MenuVisible", 0)
- elements.property(elements.YOSHI_PT_MRMT, "Gravity", 1)
- elements.property(elements.YOSHI_PT_MRMT, "Explosive", 0)
- elements.property(elements.YOSHI_PT_MRMT, "Weight", 100)
- elements.property(elements.YOSHI_PT_MRMT, "Diffusion", 0)
- elements.property(elements.YOSHI_PT_MRMT, "Hardness", 0)
- elements.property(elements.YOSHI_PT_MRMT, "Flammable", 0)
- elements.property(elements.YOSHI_PT_MRMT, "Temperature", 1799)
- elements.property(elements.YOSHI_PT_MRMT, "LowTemperature", 1798)
- elements.property(elements.YOSHI_PT_MRMT, "LowTemperatureTransition", elements.YOSHI_PT_RMTL)
- local a = elements.allocate("YOSHI", "THNL")
- elements.element(elements.YOSHI_PT_THNL, elements.element(elements.DEFAULT_PT_NITR))
- elements.property(elements.YOSHI_PT_THNL, "Name", "THNL")
- elements.property(elements.YOSHI_PT_THNL, "Description", "Thermonucleum, Extremely explosive.")
- elements.property(elements.YOSHI_PT_THNL, "Colour", 0x3F94EC)
- elements.property(elements.YOSHI_PT_THNL, "MenuSection", 10)
- elements.property(elements.YOSHI_PT_THNL, "Gravity", 1)
- elements.property(elements.YOSHI_PT_THNL, "Explosive", 50)
- elements.property(elements.YOSHI_PT_THNL, "Weight", 10)
- elements.property(elements.YOSHI_PT_THNL, "Diffusion", 0)
- elements.property(elements.YOSHI_PT_THNL, "Hardness", 0)
- elements.property(elements.YOSHI_PT_THNL, "Flammable", 100000)
- elements.property(elements.YOSHI_PT_THNL, "Temperature", 295.15)
- elements.property(elements.YOSHI_PT_THNL, "AirDrag", 0.5)
- elements.allocate('AU3FGEN', 'GNTM')
- elements.element(elements.AU3FGEN_PT_GNTM, elements.element(elements.DEFAULT_PT_DMND))
- elements.property(elements.AU3FGEN_PT_GNTM, 'Name', 'GNTM')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Description', 'Gentium, Strange and laggy.')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Color', '0x1F7F3F')
- elements.property(elements.AU3FGEN_PT_GNTM, 'MenuSection', '10')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Gravity', '0')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Flammable', '65535')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Explosive', '1')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Loss', '0')
- elements.property(elements.AU3FGEN_PT_GNTM, 'AirLoss', '1')
- elements.property(elements.AU3FGEN_PT_GNTM, 'AirDrag', '0')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Advection', '1')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Weight', '1024')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Diffusion', '0')
- elements.property(elements.AU3FGEN_PT_GNTM, 'Falldown', '0')
- local g = function(i, x, y, s, n)
- --Update Function
- end
- tpt.element_func(g, tpt.element('GNTM'))
- local g = function(i, r, g, b)
- local function gfunc(i, r, g, b)
- return 1, 0x0003007F, math.random(0,255), math.random(0,255), math.random(0,255), math.random(0,255), math.random(0,255), math.random(0,255), math.random(0,255), math.random(0,255)
- end
- tpt.graphics_func(gfunc, tpt.element('GNTM'))
- end
- tpt.graphics_func(g, tpt.element('GNTM'))
- --Radioactive Mod
- --Changes
- -- You can change this from on/off.
- on=40
- off=0
- elements.property(elements.DEFAULT_PT_ACID, "Flammable", off)
- -- Added Elements.
- local a = elements.allocate("X", "C")
- elements.element(elements.X_PT_C, elements.element(elements.DEFAULT_PT_WOOD))
- elements.property(elements.X_PT_C, "Name", "SAWD")
- elements.property(elements.X_PT_C, "Description", "Saw Dust, Flammable.")
- elements.property(elements.X_PT_C, "Colour", 0xFFFF66)
- elements.property(elements.X_PT_C, "MenuSection", 8)
- elements.property(elements.X_PT_C, "Gravity", 1)
- elements.property(elements.X_PT_C, "Flammable", 30)
- elements.property(elements.X_PT_C, "Explosive", 0)
- elements.property(elements.X_PT_C, "Weight", 20)
- elements.property(elements.X_PT_C, "Diffusion", 0.5)
- elements.property(elements.X_PT_C, "Falldown", 1)
- local a = elements.allocate("C", "Q")
- elements.element(elements.C_PT_Q, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.C_PT_Q, "Name", "????")
- elements.property(elements.C_PT_Q, "Description", "????")
- elements.property(elements.C_PT_Q, "Colour", 0xFFFF0080)
- elements.property(elements.C_PT_Q, "MenuSection", 10)
- elements.property(elements.C_PT_Q, "Gravity", 0.3)
- elements.property(elements.C_PT_Q, "Explosive", 1)
- elements.property(elements.C_PT_Q, "Weight", 66)
- elements.property(elements.C_PT_Q, "Diffusion", 0)
- elements.property(elements.C_PT_Q, "HotAir", -0.1)
- elements.property(elements.C_PT_Q, "Hardness", 0)
- local q={0x99FFFF,0x9999FF,0xCCFF00,0x00FFCC,0x00CC00,0x330099}
- local z=q[math.random(1,6)]
- elements.property(elements.C_PT_Q, "Colour", z)
- function light(i,x,y,s,n)
- if math.random(1,300000) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'ligh')
- end
- end
- tpt.element_func(light,a)
- local a = elements.allocate("B", "Q")
- elements.element(elements.B_PT_Q, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.B_PT_Q, "Name", "LCLD")
- elements.property(elements.B_PT_Q, "Description", "Lava Clouds.")
- elements.property(elements.B_PT_Q, "Colour", 0xCC0000)
- elements.property(elements.B_PT_Q, "MenuSection", 6)
- elements.property(elements.B_PT_Q, "Gravity", 0.1)
- elements.property(elements.B_PT_Q, "Explosive", 0)
- elements.property(elements.B_PT_Q, "Weight", 66)
- elements.property(elements.B_PT_Q, "Temperature", math.huge)
- elements.property(elements.B_PT_Q, "Diffusion", 0.1)
- elements.property(elements.B_PT_Q, "Hardness", 0)
- function fire(i,x,y,s,n)
- if math.random(1,750) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'lava')
- end
- end
- tpt.element_func(fire,a)
- --[[
- local a = elements.allocate("V", "X")
- elements.element(elements.V_PT_X, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.V_PT_X, "Name", "CLDS")
- elements.property(elements.V_PT_X, "Description", "Clouds. Produce Water.")
- elements.property(elements.V_PT_X, "Colour", 0x3366CC)
- elements.property(elements.V_PT_X, "MenuSection", 6)
- elements.property(elements.V_PT_X, "Gravity", 0.3)
- elements.property(elements.V_PT_X, "Explosive", 0)
- elements.property(elements.V_PT_X, "Weight", 88)
- elements.property(elements.V_PT_X, "Diffusion", 0.2)
- elements.property(elements.V_PT_X, "Hardness", 0)
- function rain(i,x,y,s,n)
- if math.random(1,750) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'watr')
- end
- end
- tpt.element_func(rain,a)]]--
- local a = elements.allocate("V", "W")
- elements.element(elements.V_PT_W, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.V_PT_W, "Name", "ACLD")
- elements.property(elements.V_PT_W, "Description", "Acid Cloud.")
- elements.property(elements.V_PT_W, "Colour", 0xFF0066)
- elements.property(elements.V_PT_W, "MenuSection", 6)
- elements.property(elements.V_PT_W, "Gravity", 0.1)
- elements.property(elements.V_PT_W, "Explosive", 0)
- elements.property(elements.V_PT_W, "Weight", -400)
- elements.property(elements.V_PT_W, "Diffusion", 0.1)
- elements.property(elements.V_PT_W, "Hardness", 0)
- function acid(i,x,y,s,n)
- if math.random(1,750) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'acid')
- end
- end
- tpt.element_func(acid,a)
- local a = elements.allocate("T", "N")
- elements.element(elements.T_PT_N, elements.element(elements.DEFAULT_PT_LAVA))
- elements.property(elements.T_PT_N, "Name", "NBLI")
- elements.property(elements.T_PT_N, "Description", "A liquid that releases NBLE. Very Hot.")
- elements.property(elements.T_PT_N, "Colour", 0xFF3300)
- elements.property(elements.T_PT_N, "Temperature", math.huge)
- elements.property(elements.T_PT_N, "Gravity", 3)
- elements.property(elements.T_PT_N, "Diffusion", 0.2)
- function RLS(i,x,y,s,n)
- if math.random(1,550) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'nble')
- if math.random(1,1300) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'plsm')
- end
- end
- end
- tpt.element_func(RLS,a)
- l="IFOUNDIT"
- local a = elements.allocate("R","D")
- elements.element(elements.R_PT_D, elements.element(elements.DEFAULT_PT_PHOT))
- elements.property(elements.R_PT_D, "Name", "SPRB")
- elements.property(elements.R_PT_D, "Color", 0xFF0099)
- elements.property(elements.R_PT_D, "MenuSection", elem.SC_SPECIAL)
- elements.property(elements.R_PT_D, "Advection", 0.2)
- elements.property(elements.R_PT_D, "Collision", 1.0)
- elements.property(elements.R_PT_D, "Gravity", 3.0)
- elements.property(elements.R_PT_D, "Diffusion", 0.3)
- elements.property(elements.R_PT_D, "Weight", 40.45)
- elements.property(elements.R_PT_D, "Temperature", 100000.0)
- elements.property(elements.R_PT_D, "HeatConduct", 100000.0)
- elements.property(elements.R_PT_D, "Description", "Super Ball. Very Hot. Bounces.")
- elements.property(elements.R_PT_D, "Properties", PROP_DEADLY)
- local a = elements.allocate("V1", "X1")
- elements.element(elements.V1_PT_X1, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.V1_PT_X1, "Name", "STRM")
- elements.property(elements.V1_PT_X1, "Description", "Storm Clouds. Produces More Water Than RCLD, and Lightning.")
- elements.property(elements.V1_PT_X1, "Colour", 0x999999)
- elements.property(elements.V1_PT_X1, "MenuSection", 6)
- elements.property(elements.V1_PT_X1, "Gravity", 0.1)
- elements.property(elements.V1_PT_X1, "Explosive", 0)
- elements.property(elements.V1_PT_X1, "Weight", 30)
- elements.property(elements.V1_PT_X1, "Diffusion", 0.1)
- elements.property(elements.V1_PT_X1, "Hardness", 0)
- function rain2(i,x,y,s,n)
- if math.random(1,350) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'watr')
- if math.random(1,750) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'ligh')
- end
- end
- end
- tpt.element_func(rain2,a)
- local a = elements.allocate("N", "H")
- elements.element(elements.N_PT_H, elements.element(elements.DEFAULT_PT_WOOD))
- elements.property(elements.N_PT_H, "Name", "TR0N")
- elements.property(elements.N_PT_H, "Description", "Produces TRON. A Solid. A Home.")
- elements.property(elements.N_PT_H, "Colour", 0x66FFFF)
- elements.property(elements.N_PT_H, "Flammable", 0)
- elements.property(elements.N_PT_H, "MenuSection", elem.SC_SPECIAL)
- function tron(i,x,y,s,n)
- if math.random(1,100) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'tron')
- end
- end
- tpt.element_func(tron,a)
- local a = elements.allocate("E", "O")
- elements.element(elements.E_PT_O, elements.element(elements.DEFAULT_PT_GUN))
- elements.property(elements.E_PT_O, "Name", "PC-4")
- elements.property(elements.E_PT_O, "Description", "Powder C4. Explosive.")
- elements.property(elements.E_PT_O, "Colour", 0xFF33FF)
- elements.property(elements.E_PT_O, "Gravity", 2.0)
- elements.property(elements.E_PT_O, "Diffusion", 0.2)
- elements.property(elements.E_PT_O, "Weight", 30.20)
- elements.property(elements.E_PT_O, "Flammable", 3000.34)
- local a = elements.allocate("J", "O")
- elements.element(elements.J_PT_O, elements.element(elements.DEFAULT_PT_DUST))
- elements.property(elements.J_PT_O, "Name", "FLY")
- elements.property(elements.J_PT_O, "Description", "Fly. Annoying Pestering Bug.")
- elements.property(elements.J_PT_O, "Colour", 0x333333)
- elements.property(elements.J_PT_O, "MenuSection", 11)
- elements.property(elements.J_PT_O, "Gravity", 0.1)
- elements.property(elements.J_PT_O, "Flammable", 1)
- elements.property(elements.J_PT_O, "Explosive", 0)
- elements.property(elements.J_PT_O, "Weight", -3000)
- elements.property(elements.J_PT_O, "Diffusion", 0.9)
- elements.property(elements.J_PT_O, "Falldown", 0.8)
- local a = elements.allocate("C", "T")
- elements.element(elements.C_PT_T, elements.element(elements.DEFAULT_PT_GLOW))
- elements.property(elements.C_PT_T, "Name", "NPLM")
- elements.property(elements.C_PT_T, "Description", "Napalm. Very explosive.")
- elements.property(elements.C_PT_T, "Colour", 0x380520)
- elements.property(elements.C_PT_T, "MenuSection", 5)
- elements.property(elements.C_PT_T, "Gravity", 0.5)
- elements.property(elements.C_PT_T, "Flammable", 1000)
- elements.property(elements.C_PT_T, "Explosive", 1)
- elements.property(elements.C_PT_T, "Loss", 0)
- elements.property(elements.C_PT_T, "Weight", 20)
- local a = elements.allocate("G", "H")
- elements.element(elements.G_PT_H, elements.element(elements.DEFAULT_PT_WOOD))
- elements.property(elements.G_PT_H, "Name", "BHIV")
- elements.property(elements.G_PT_H, "Description", "BEE Hive. Produces BEEs. Obviously.")
- elements.property(elements.G_PT_H, "Colour", 0x999966)
- elements.property(elements.G_PT_H, "Flammable", 10)
- elements.property(elements.G_PT_H, "MenuSection", elem.SC_SPECIAL)
- function bee(i,x,y,s,n)
- if math.random(1,330) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'bee')
- end
- end
- tpt.element_func(bee,a)
- local a = elements.allocate("B", "O")
- elements.element(elements.B_PT_O, elements.element(elements.DEFAULT_PT_DUST))
- elements.property(elements.B_PT_O, "Name", "BEE")
- elements.property(elements.B_PT_O, "Description", "BEE. Pestering Demons. Move Faster Then FLY.")
- elements.property(elements.B_PT_O, "Colour", 0xFFFF00)
- elements.property(elements.B_PT_O, "MenuSection", 11)
- elements.property(elements.B_PT_O, "Gravity", 0.1)
- elements.property(elements.B_PT_O, "Flammable", 10)
- elements.property(elements.B_PT_O, "Explosive", 0)
- elements.property(elements.B_PT_O, "Weight", -6000)
- elements.property(elements.B_PT_O, "Diffusion", 2)
- elements.property(elements.B_PT_O, "Falldown", 0.2)
- function beeh(i,x,y,s,n)
- if math.random(1,9000) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'bhiv')
- end
- end
- tpt.element_func(beeh,a)
- local a = elements.allocate("T", "X")
- elements.element(elements.T_PT_X, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.T_PT_X, "Name", "TORN")
- elements.property(elements.T_PT_X, "Description", "Tornado. Work in progress.")
- elements.property(elements.T_PT_X, "Colour", 0x333333)
- elements.property(elements.T_PT_X, "MenuSection", 11)
- elements.property(elements.T_PT_X, "Gravity", 0.5)
- elements.property(elements.T_PT_X, "Explosive", 0)
- elements.property(elements.T_PT_X, "HotAir", -0.5)
- elements.property(elements.T_PT_X, "Weight", 99)
- elements.property(elements.T_PT_X, "Diffusion", 0.2)
- elements.property(elements.T_PT_X, "Hardness", 0)
- function rt(i,x,y,s,n)
- if math.random(1,550) == 10 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'watr')
- end
- end
- tpt.element_func(rt,a)
- local a = elements.allocate("A","G")
- elements.element(elements.A_PT_G, elements.element(elements.DEFAULT_PT_HYGN))
- elements.property(elements.A_PT_G, "Name", "LAG")
- elements.property(elements.A_PT_G, "Description", "Worlds Worst Creation.")
- elements.property(elements.A_PT_G, "Colour", 0x578985)
- elements.property(elements.A_PT_G, "MenuSection", 10)
- elements.property(elements.A_PT_G, "HotAir", 0.1)
- function acid(i,x,y,s,n)
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'lag')
- end
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-1,1), y + math.random(-3,3), 'hygn')
- end
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'neut')
- end
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'prot')
- end
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'elec')
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'phot')
- end
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'neut')
- end
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'tron')
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'nble')
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'boyl')
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'watr')
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'dstw')
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'sltw')
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'glow')
- if math.random(1,100) == 50 then
- tpt.create(x + math.random(-4,4), y + math.random(-6, 6), 'soap')
- end
- end
- end
- end
- end
- end
- end
- end
- end
- end
- tpt.element_func(acid,a)
- --WTF
- local WTF = elements.allocate('CJB', 'WTF')
- elements.element(elements.CJB_PT_WTF, elements.element(elements.DEFAULT_PT_BCOL))
- elements.property(elements.CJB_PT_WTF, 'Name', 'WTF')
- elements.property(elements.CJB_PT_WTF, 'Description', 'Derpy, volatile gas/solid/I have no bloody idea.')
- elements.property(elements.CJB_PT_WTF, 'Color', '0xB87503')
- elements.property(elements.CJB_PT_WTF, 'MenuSection', '11')
- elements.property(elements.CJB_PT_WTF, 'Gravity', '0.4')
- elements.property(elements.CJB_PT_WTF, 'Flammable', '16384')
- elements.property(elements.CJB_PT_WTF, 'Explosive', '1')
- elements.property(elements.CJB_PT_WTF, 'Loss', '1')
- elements.property(elements.CJB_PT_WTF, 'AirLoss', '20')
- elements.property(elements.CJB_PT_WTF, 'AirDrag', '0.02')
- elements.property(elements.CJB_PT_WTF, 'Advection', '1')
- elements.property(elements.CJB_PT_WTF, 'Weight', '20')
- elements.property(elements.CJB_PT_WTF, 'Diffusion', '16384')
- elements.property(elements.CJB_PT_WTF, 'Temperature', '16384')
- elements.property(elements.CJB_PT_WTF, 'HotAir', '900')
- local function Lflare(i, colr, colg, colb)
- return 1, 0x00000004, 255, 184, 117, 3, 255, 184, 117, 3
- end
- tpt.graphics_func(Lflare, WTF)
- --Credits, I hope?
- --[[
- FeynmanLogomaker, timpfeifer, CeeJayBee, Videogamer555, 00yoshi, RadioActiveLua. If you were left out, email me at amywilsonmaster@gmail.com
- ]]--
- local a = "1"
- local b = Window:new(-1,-1,200,200)
- local c = Label:new(10,5,140,16, "TPT's Mod")
- local d = Label:new(10,25,121,16, "Compiled by Amy")
- local e = Label:new(10,85,170,16, "Credit to: jacob1, FeynmanLogomaker,")
- local f = Label:new(135,5,88,16, ("AMY"))
- local g = Label:new(10,95,180,16, "timpfeifer, CeeJayBee, Videogamer555,")
- local h = Label:new(10,105,170,16,"00yoshi, and RadioActiveLua.")
- local i = Label:new(10,125,180,16,"Report Bugs/Suggest for Next Version:")
- local j = Label:new(10,135,170,16,"amywilsonmaster@gmail.com")
- local Close = Button:new(10, 174, 60, 16, "Close")
- Close:action(function() interface.closeWindow(b) end)
- b:onTryExit(function() interface.closeWindow(b) end)
- b:addComponent(Close);
- local Button1 = Button:new(613, 97, 15, 15, "CR", "Open Info and Credits.")
- Button1:action(function() interface.showWindow(b) end)
- bb = Label:new(10,45,138,16, "Special Thanks To jacob1")
- cc = Label:new(10,55,60,16, "Version 2")
- dd = Label:new(10,65,57,16, "Update 0")
- b:addComponent(bb)
- b:addComponent(dd)
- b:addComponent(cc)
- b:addComponent(c)
- b:addComponent(d)
- b:addComponent(e)
- b:addComponent(f)
- b:addComponent(g)
- b:addComponent(h)
- b:addComponent(i)
- b:addComponent(j)
- interface.addComponent(Button1)
- local a1 = "2"
- local b1 = Window:new(-1,-1,200,200)
- local c1 = Label:new(10,5,80,16, "SECRET MODE")
- local d1 = Label:new(10,15,121,16, "Created By RadioActiveLua")
- local f1 = Label:new(135,5,88,16, ("RAM V."..a))
- local Close1 = Button:new(10, 174, 60, 16, "Close")
- local Start1 = Button:new(10, 194, 60, 16, "Enter")
- Close1:action(function() interface.closeWindow(b1) end)
- b1:onTryExit(function() interface.closeWindow(b1) end)
- b1:addComponent(Close1);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement