two new elements

  • beecom
    3rd Dec 2015 Member 0 Permalink

    UPDATE: SIX ELEMENTS!

     

    CODE:

     

     

    elements.allocate('AU3FGEN', 'GROS')
    elements.element(elements.AU3FGEN_PT_GROS, elements.element(elements.DEFAULT_PT_BCOL))
    elements.property(elements.AU3FGEN_PT_GROS, 'Name', 'GROS')
    elements.property(elements.AU3FGEN_PT_GROS, 'Description', 'Description')
    elements.property(elements.AU3FGEN_PT_GROS, 'Color', '0x000000')
    elements.property(elements.AU3FGEN_PT_GROS, 'MenuSection', '10')
    elements.property(elements.AU3FGEN_PT_GROS, 'Gravity', '0')
    elements.property(elements.AU3FGEN_PT_GROS, 'Flammable', '0')
    elements.property(elements.AU3FGEN_PT_GROS, 'Explosive', '0')
    elements.property(elements.AU3FGEN_PT_GROS, 'Loss', '0')
    elements.property(elements.AU3FGEN_PT_GROS, 'AirLoss', '1')
    elements.property(elements.AU3FGEN_PT_GROS, 'AirDrag', '0')
    elements.property(elements.AU3FGEN_PT_GROS, 'Advection', '1')
    elements.property(elements.AU3FGEN_PT_GROS, 'Weight', '0')
    elements.property(elements.AU3FGEN_PT_GROS, 'Diffusion', '0')
    elements.property(elements.AU3FGEN_PT_GROS, 'Diffusion', '0')
    grsa=2000
    imer=0
    local g = function(i, x, y, s, n)
    grsa=grsa-1
    if grsa>0 then
    tpt.set_property("life",grsa,"GROS")
    tpt.create(x,y-1,"NEUT")
    tpt.create(x-1,y-1,"NEUT")
    tpt.create(x+1,y-1,"NEUT")
    tpt.create(x-2,y-1,"NEUT")
    tpt.create(x+2,y-1,"NEUT")
    tpt.create(x-3,y-1,"NEUT")
    tpt.create(x+3,y-1,"NEUT")
    tpt.create(x-1,y-2,"PROT")
    tpt.create(x+1,y-2,"PROT")
    tpt.create(x-2,y-2,"PROT")
    tpt.create(x+2,y-2,"PROT")
    tpt.create(x-3,y-2,"PROT")
    tpt.set_property("temp",99999,0,0,611,383)
    else
    tpt.create(x+1,y,"METL")
    if imer==0 then
    imer=1
    end
    imer=imer+1
    end
    if imer==1000 then
    grsa=2000
    imer=0
    end
    end
    tpt.element_func(g, tpt.element('GROS'))
    local g = function(i, r, g, b)
    local cola, colr, colg, colb, firea, firer, fireg, fireb
    cola = 255 -- Alpha
    colr = 0 -- Red
    colg = 50 -- Green
    colb = 0 -- Blue
    firea = 255 -- Alpha Glow
    firer = 255 -- Red Glow
    fireg = 255 -- Green Glow
    fireb = 255 -- Blue Glow
    --See Pixel Mode Values Table for more info
    return 0, 0x00000001, cola, colr, colg, colb, firea, firer, fireg, fireb
    end
    tpt.graphics_func(g, tpt.element('GROS'))

    elements.allocate('AU3FGEN', 'NEGC')
    elements.element(elements.AU3FGEN_PT_NEGC, elements.element(elements.DEFAULT_PT_GAS))
    elements.property(elements.AU3FGEN_PT_NEGC, 'Name', 'NEGC')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Description', 'NEW ELEMENT BOMB CREATED!')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Color', '0x003300')
    elements.property(elements.AU3FGEN_PT_NEGC, 'MenuSection', '5')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Gravity', '-1')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Flammable', '0')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Explosive', '0')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Loss', '0')
    elements.property(elements.AU3FGEN_PT_NEGC, 'AirLoss', '1')
    elements.property(elements.AU3FGEN_PT_NEGC, 'AirDrag', '1')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Advection', '1')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Weight', '-40')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Diffusion', '0')
    elements.property(elements.AU3FGEN_PT_NEGC, 'Diffusion', '0')
    local g = function(i, x, y, s, n)
    tpt.create(x+1,y+1,"NEUT")
    tpt.create(x-1,y+1,"NEUT")
    tpt.create(x+2,y+1,"PROT")
    tpt.create(x-2,y+1,"PROT")
    tpt.create(x+3,y+1,"NEUT")
    tpt.create(x-3,y+1,"NEUT")
    tpt.create(x+4,y+1,"PROT")
    tpt.create(x-4,y+1,"PROT")
    tpt.create(x+1,y+2,"NBLE")
    tpt.create(x-1,y+2,"NBLE")
    tpt.create(x,y+3,"FIRE")
    tpt.set_property("temp",9999,x-20,y-20,40,40)
    end
    tpt.element_func(g, tpt.element('NEGC'))
    local g = function(i, r, g, b)
    local cola, colr, colg, colb, firea, firer, fireg, fireb
    cola = 255 -- Alpha
    colr = math.random(0,50) -- Red
    colg = 51 -- Green
    colb = 0 -- Blue
    firea = 255 -- Alpha Glow
    firer = 255 -- Red Glow
    fireg = 255 -- Green Glow
    fireb = 255 -- Blue Glow
    --See Pixel Mode Values Table for more info
    return 0, 0x00000001, cola, colr, colg, colb, firea, firer, fireg, fireb
    end
    tpt.graphics_func(g, tpt.element('NEGC'))

    elements.allocate('AU3FGEN', 'TORF')
    elements.element(elements.AU3FGEN_PT_TORF, elements.element(elements.DEFAULT_PT_BCOL))
    elements.property(elements.AU3FGEN_PT_TORF, 'Name', 'TORF')
    elements.property(elements.AU3FGEN_PT_TORF, 'Description', 'for landshtaft')
    elements.property(elements.AU3FGEN_PT_TORF, 'Color', '0x23A3FF')
    elements.property(elements.AU3FGEN_PT_TORF, 'MenuSection', '7')
    elements.property(elements.AU3FGEN_PT_TORF, 'Gravity', '1')
    elements.property(elements.AU3FGEN_PT_TORF, 'Flammable', '0')
    elements.property(elements.AU3FGEN_PT_TORF, 'Explosive', '0')
    elements.property(elements.AU3FGEN_PT_TORF, 'Loss', '0')
    elements.property(elements.AU3FGEN_PT_TORF, 'AirLoss', '1')
    elements.property(elements.AU3FGEN_PT_TORF, 'AirDrag', '1')
    elements.property(elements.AU3FGEN_PT_TORF, 'Advection', '1')
    elements.property(elements.AU3FGEN_PT_TORF, 'Weight', '0')
    elements.property(elements.AU3FGEN_PT_TORF, 'Diffusion', '0')
    elements.property(elements.AU3FGEN_PT_TORF, 'Falldown', '2')
    local g = function(i, x, y, s, n)
    tpt.create(x+1,y,"CLST")
    tpt.create(x-1,y,"CLST")
    tpt.create(x+2,y,"SAND")
    tpt.create(x-2,y,"SAND")
    tpt.create(x+3,y,"BREL")
    tpt.create(x-3,y,"BREL")
    end
    tpt.element_func(g, tpt.element('TORF'))
    local g = function(i, r, g, b)
    local cola, colr, colg, colb, firea, firer, fireg, fireb
    cola = 255 -- Alpha
    colr = 255 -- Red
    colg = 0 -- Green
    colb = 255 -- Blue
    firea = 255 -- Alpha Glow
    firer = 255 -- Red Glow
    fireg = 255 -- Green Glow
    fireb = 255 -- Blue Glow
    --See Pixel Mode Values Table for more info
    return 0, 0x00000001, cola, colr, colg, colb, firea, firer, fireg, fireb
    end
    tpt.graphics_func(g, tpt.element('TORF'))

    elements.allocate('AU3FGEN', 'EXPO')
    elements.element(elements.AU3FGEN_PT_EXPO, elements.element(elements.DEFAULT_PT_BCOL))
    elements.property(elements.AU3FGEN_PT_EXPO, 'Name', 'EXPO')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Description', 'for arts')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Color', '0x1111FF')
    elements.property(elements.AU3FGEN_PT_EXPO, 'MenuSection', '5')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Gravity', '1')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Flammable', '0.6')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Explosive', '2')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Loss', '0')
    elements.property(elements.AU3FGEN_PT_EXPO, 'AirLoss', '1')
    elements.property(elements.AU3FGEN_PT_EXPO, 'AirDrag', '0')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Advection', '1')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Weight', '50')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Diffusion', '0')
    elements.property(elements.AU3FGEN_PT_EXPO, 'Diffusion', '0')
    local g = function(i, x, y,b)
    tpt.create(x+1,y,"METL")
    tpt.create(x-1,y,"METL")
    tpt.create(x,y+1,"METL")
    tpt.create(x,y+3,"SMKE")
    end
    tpt.element_func(g, tpt.element('EXPO'))
    local g = function(i, r, g, b)
    local cola, colr, colg, colb, firea, firer, fireg, fireb
    cola = 0 -- Alpha
    colr = 0-- Red
    colg = math.random(0,2) -- Green
    colb = 255 -- Blue
    firea = 255 -- Alpha Glow
    firer = 0 -- Red Glow
    fireg = 0 -- Green Glow
    fireb = 255 -- Blue Glow
    --See Pixel Mode Values Table for more info
    return 0, 0x00000001, cola, colr, colg, colb, firea, firer, fireg, fireb
    end
    tpt.graphics_func(g, tpt.element('EXPO'))
    --two part
    elements.allocate('AU3FGEN', 'EXP1')
    elements.element(elements.AU3FGEN_PT_EXP1, elements.element(elements.DEFAULT_PT_BCOL))
    elements.property(elements.AU3FGEN_PT_EXP1, 'Name', 'EXP1')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Description', 'for arts')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Color', '0x1111FF')
    elements.property(elements.AU3FGEN_PT_EXP1, 'MenuSection', '5')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Gravity', '1')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Flammable', '0.6')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Explosive', '2')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Loss', '0')
    elements.property(elements.AU3FGEN_PT_EXP1, 'AirLoss', '1')
    elements.property(elements.AU3FGEN_PT_EXP1, 'AirDrag', '0')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Advection', '1')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Weight', '50')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Diffusion', '0')
    elements.property(elements.AU3FGEN_PT_EXP1, 'Diffusion', '0')
    local g = function(i, x, y,b)
    tpt.create(x+1,y,"METL")
    tpt.create(x-1,y,"METL")
    tpt.create(x,y+1,"METL")
    end
    tpt.element_func(g, tpt.element('EXP1'))
    local g = function(i, r, g, b)
    local cola, colr, colg, colb, firea, firer, fireg, fireb
    cola = 0 -- Alpha
    colr = 0-- Red
    colg = math.random(0,2) -- Green
    colb = 255 -- Blue
    firea = 255 -- Alpha Glow
    firer = 0 -- Red Glow
    fireg = 0 -- Green Glow
    fireb = 255 -- Blue Glow
    --See Pixel Mode Values Table for more info
    return 0, 0x00000001, cola, colr, colg, colb, firea, firer, fireg, fireb
    end
    tpt.graphics_func(g, tpt.element('EXP1'))

    elements.allocate('AU3FGEN', 'BTRM')
    elements.element(elements.AU3FGEN_PT_BTRM, elements.element(elements.DEFAULT_PT_BCOL))
    elements.property(elements.AU3FGEN_PT_BTRM, 'Name', 'BTRM')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Description', 'Description')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Color', '0xFF0000')
    elements.property(elements.AU3FGEN_PT_BTRM, 'MenuSection', '1')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Gravity', '0')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Flammable', '0')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Explosive', '1')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Loss', '0')
    elements.property(elements.AU3FGEN_PT_BTRM, 'AirLoss', '0')
    elements.property(elements.AU3FGEN_PT_BTRM, 'AirDrag', '0')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Advection', '0')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Weight', '0')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Diffusion', '0')
    elements.property(elements.AU3FGEN_PT_BTRM, 'Diffusion', '0')
    local g = function(i, x, y, s, n)
    tpt.create(x,y+1,"BRCK")
    tpt.create(x,y-1,"BRCK")
    tpt.create(x+1,y+1,"BRCK")
    tpt.create(x-1,y-1,"BRCK")
    tpt.create(x+1,y-1,"BRCK")
    tpt.create(x-1,y-1,"BRCK")
    tpt.create(x+1,y+1,"BRCK")
    tpt.create(x-1,y+1,"BRCK")
    tpt.create(x+1,y,"SPRK")
    tpt.create(x+1,y,"METL")
    tpt.create(x-1,y,"METL")
    tpt.create(x+2,y,"METL")
    tpt.create(x-2,y,"METL")
    tpt.create(x+2,y-1,"NSCN")
    tpt.create(x-2,y-1,"NSCN")
    tpt.create(x+2,y-2,"TUNG")
    tpt.create(x-2,y-2,"TUNG")
    tpt.create(x+1,y-2,"TUNG")
    tpt.create(x-1,y-2,"TUNG")
    tpt.create(x+2,y-4,"TUNG")
    tpt.create(x-2,y-4,"TUNG")
    tpt.create(x+1,y-4,"TUNG")
    tpt.create(x-1,y-4,"TUNG")
    tpt.create(x,y-4,"TUNG")
    tpt.create(x-2,y-3,"TUNG")
    tpt.create(x+2,y-3,"TUNG")
    tpt.create(x-1,y-3,"TUNG")
    tpt.create(x+1,y-3,"TUNG")
    tpt.create(x,y-3,"TUNG")
    end
    tpt.element_func(g, tpt.element('BTRM'))
    local g = function(i, r, g, b)
    local cola, colr, colg, colb, firea, firer, fireg, fireb
    cola = 255 -- Alpha
    colr = 255 -- Red
    colg = 2 -- Green
    colb = 2 -- Blue
    firea = 255 -- Alpha Glow
    firer = 255 -- Red Glow
    fireg = 25 -- Green Glow
    fireb = 0-- Blue Glow
    --See Pixel Mode Values Table for more info
    return 0, 0x00000001, cola, colr, colg, colb, firea, firer, fireg, fireb
    end
    tpt.graphics_func(g, tpt.element('BTRM'))

    Edited once by beecom. Last: 2nd Apr 2016