Turret Control

@name Turret control
@inputs Next Screen:wirelink
@outputs X Y Z On Target:string
@persist Trg:entity List:array N Max

if(first()) {
    N = 1
    Trg = players()[N, entity]
    Max = players():count()
}

if(first() | clk("update")) {
    List = players()
    timer("update", 2000)
}

if(~Next & Next) {
    N += 1
    if(N > Max) {
        N = 1
    }
    Trg = Trg = players()[N, entity]
} else {
    interval(100)

    On = 1

    X = Trg:pos():x()
    Y = Trg:pos():y()
    Z = Trg:pos():z() + 50

    Target = Trg:name() + "\n" + teamName(Trg:team()) + "\n" + Trg:health()

    Screen[2041] = 1

    Screen:writeString("Turret Control", 0, 0)
    Screen:writeString("By Darkwater", 1, 1)
    Screen:writeString(Trg:name(), 1, 3)
    Screen:writeString("+ " + Trg:health(), 1, 4)
    Screen:writeString(teamName(Trg:team()), 1, 5)

    for(I=1, players():count()) {
        P = " "
        if(I==N) {
            P = ">"
        }
        Screen:writeString(P + " " + players()[I,entity]:name(), 1, I + 6)
    }
}