Arena APS e2

@name Arena APS
@inputs Active Det Ar:array Cl
@outputs
@persist B [Ent]:entity [Banks Positions Angles Rem]:array A Trg:entity K
@model
@trigger

if(first()|dupefinished()){
    #Based on Rekless's AMPS
    Positions=array(
        vec(1,0,10.5),
        vec(1,0,11),
        vec(1,0,11.5),
        vec(1,0,12),
        vec(1,0,12.5),
        vec(1,0,13),
        vec(1,0,13.5),
        vec(1,0,14),
        vec(1,0,14.5),
        vec(1,0,15),
        vec(1,0,15.5),
        vec(1,0,16)
    )

    Angles=array(
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90),
        ang(0,0,90)
    )

    findByClass("prop_phys")
    findIncludeModel("models/props_c17/streetsign004f.mdl")
    findInSphere(entity():pos(),50)
    Rem=findToArray()
    #print(Rem)
    if(Rem){

        Rem:propDelete()

    }
entity():setAlpha(0)
holoCreate(1)
holoModel(1,"hq_cylinder")
holoScale(1,vec(0.2,0.2,0.8))
holoAng(1,entity():toWorld(ang(0,90,-45)))
holoPos(1,entity():toWorld(vec(4,0,2)))
holoColor(1,vec(50,75,30))
holoMaterial(1,"sprops/textures/sprops_metal3")
holoParent(1,entity())

holoCreate(2)
holoModel(2,"hq_cylinder")
holoScale(2,vec(0.2,0.2,0.8))
holoAng(2,entity():toWorld(ang(10,90,20)))
holoPos(2,entity():toWorld(vec(-2,-2,2)))
holoColor(2,vec(50,75,30))
holoMaterial(2,"sprops/textures/sprops_metal3")
holoParent(2,entity())

holoCreate(3)
holoModel(3,"hq_cylinder")
holoScale(3,vec(0.2,0.2,0.8))
holoAng(3,entity():toWorld(ang(-10,90,20)))
holoPos(3,entity():toWorld(vec(-2,2,2)))
holoColor(3,vec(50,75,30))
holoMaterial(3,"sprops/textures/sprops_metal3")
holoParent(3,entity())

holoCreate(4)
holoModel(4,"hq_cylinder")
holoScale(4,vec(0.4,0.4,1))
holoAng(4,entity():toWorld(ang(0,0,0)))
holoPos(4,entity():toWorld(vec(0,0,10)))
holoColor(4,vec(50,75,30))
holoMaterial(4,"sprops/textures/sprops_metal3")
holoParent(4,entity())

holoCreate(5)
holoModel(5,"models/sprops/geometry/hdisc_24.mdl")
holoScale(5,vec(0.6,1.5,0.6))
holoAng(5,entity():toWorld(ang(0,90,90)))
holoPos(5,entity():toWorld(vec(4,0,12)))
holoColor(5,vec(50,75,30))
holoMaterial(5,"sprops/textures/sprops_metal3")
holoParent(5,entity())

holoCreate(6)
holoModel(6,"models/sprops/geometry/hhex_24.mdl")
holoScale(6,vec(0.58,3,0.58))
holoAng(6,entity():toWorld(ang(0,90,90)))
holoPos(6,entity():toWorld(vec(3,0,18.5)))
holoColor(6,vec(50,75,30))
holoMaterial(6,"sprops/textures/sprops_metal3")
holoParent(6,entity())

holoCreate(7)
holoModel(7,"")
holoScale(7,vec(0.4,1.16,1))
holoAng(7,entity():toWorld(ang(0,0,0)))
holoPos(7,entity():toWorld(vec(-2.4,0,17)))
holoColor(7,vec(50,75,30))
holoMaterial(7,"sprops/textures/sprops_metal3")
holoParent(7,entity())

holoCreate(8)
holoModel(8,"")
holoScale(8,vec(0.6,1.2,0.38))
holoAng(8,entity():toWorld(ang(0,0,0)))
holoPos(8,entity():toWorld(vec(-2.4,0,12)))
holoColor(8,vec(50,75,30))
holoMaterial(8,"sprops/textures/sprops_metal3")
holoParent(8,entity())
findIncludeClass("acf_missile")

holoCreate(9)
holoModel(9,"models/sprops/geometry/fhex_12.mdl")
holoScale(9,vec(0.5,1,0.5))
holoAng(9,entity():toWorld(ang(0,90,0)))
holoPos(9,entity():toWorld(vec(5,0,17.5)))
holoColor(9,vec(25,30,15))
holoMaterial(9,"sprops/textures/sprops_metal3")
holoParent(9,entity())

holoCreate(10)
holoModel(10,"models/sprops/geometry/fhex_12.mdl")
holoScale(10,vec(0.5,1,0.5))
holoAng(10,entity():toWorld(ang(0,-30,0)))
holoPos(10,entity():toWorld(vec(2.5,4.3,17.5)))
holoColor(10,vec(25,30,15))
holoMaterial(10,"sprops/textures/sprops_metal3")
holoParent(10,entity())

holoCreate(11)
holoModel(11,"models/sprops/geometry/fhex_12.mdl")
holoScale(11,vec(0.5,1,0.5))
holoAng(11,entity():toWorld(ang(0,30,0)))
holoPos(11,entity():toWorld(vec(2.5,-4.3,17.5)))
holoColor(11,vec(25,30,15))
holoMaterial(11,"sprops/textures/sprops_metal3")
holoParent(11,entity())

holoCreate(12)
holoModel(12,"models/sprops/geometry/fhex_12.mdl")
holoScale(12,vec(0.4,5,0.5))
holoAng(12,entity():toWorld(ang(0,0,0)))
holoPos(12,entity():toWorld(vec(-2.4,0,17.5)))
holoColor(12,vec(25,30,15))
holoMaterial(12,"sprops/textures/sprops_metal3")
holoParent(12,entity())
    for(I=1,12){
    Banks:pushEntity(propSpawn("models/props_c17/streetsign004f.mdl",entity():toWorld(Positions[I,vector]),entity():toWorld(Angles[I,angle]),0))
    Banks[I,entity]:parentTo(entity())
    Banks[I,entity]:setAlpha(0)
    Banks[I,entity]:setMass(1)
    entity():setMass(10)
    }

    A=1
    K=0
#[    for(I=1,6){
        Banks[I,entity]:removeConstraint("Weld")
    }]#
}



Trg=Ar[1,entity]

if(Active){
    Ent=Banks[A,entity]

    if(Det & Cl){
        K=Trg:owner() != owner()
        if(!B & K){
        Ent:parentTo()
        B=1
        timer("S",10)
        entity():soundPlay(1,0,"acf_extra/cannons/mortars-launchers/mortar_81mm.wav")
        }

    }
    if(clk("S")){

        Ent:propFreeze(1)
        Ent:setPos(Trg:toWorld(vec(100,0,0)))
        Ent:setAng((Ent:pos()-Trg:pos()):toAngle()+ang(0,90,0))
        timer("A",1000)
    }
    if(clk("A")){
        Ent:propDelete()
        B=0
        A+=1
    }
}