@name Touch screen Gunshop Menu
@inputs Wirelink:wirelink User:entity  StockAmmo StockAK StockSupper StockDegal
@outputs BuyAmmo BuyAK BuySupper BuyDegal
@persist [Name Clip Damage Description Price]:string MoneyPot  Ammo AK Super Degal
@trigger all

if(first() | dupefinished()){
    Wirelink:egpDrawTopLeft(1)

    Wirelink:egpBox(1,vec2(0,0),vec2(510,90))      # top banner and text (static)
    Wirelink:egpColor(1,vec4(20,20,20,255))
    Wirelink:egpText(2,"Click one of the wepons below to view it",vec2(100,45))
    Wirelink:egpColor(2,vec4(120,255,255,255))


    Wirelink:egpBox(3,vec2(0,90),vec2(200,50))   # Ammo Button
    Wirelink:egpColor(3,vec4(50,50,50,255))
    Wirelink:egpBoxOutline(4,vec2(0,90),vec2(200,50))
    Wirelink:egpColor(4,vec4(0,0,0,255))
    Wirelink:egpText(5,"Ammo",vec2(3,93))
    Wirelink:egpColor(5,vec4(255,199,0,255))


    Wirelink:egpBox(6,vec2(0,140),vec2(200,50))   # AK74 button
    Wirelink:egpColor(6,vec4(50,50,50,255))
    Wirelink:egpBoxOutline(7,vec2(0,140),vec2(200,50))
    Wirelink:egpColor(7,vec4(0,0,0,255))
    Wirelink:egpText(8,"AK74",vec2(3,143))
    Wirelink:egpColor(8,vec4(255,199,0,255))


    Wirelink:egpBox(9,vec2(0,190),vec2(200,50))   # Super90 shotgun button
    Wirelink:egpColor(9,vec4(50,50,50,255))
    Wirelink:egpBoxOutline(10,vec2(0,190),vec2(200,50))
    Wirelink:egpColor(10,vec4(0,0,0,255))
    Wirelink:egpText(11,"Super90",vec2(3,193))
    Wirelink:egpColor(11,vec4(255,199,0,255))


    Wirelink:egpBox(12,vec2(0,240),vec2(200,50))  # Desert Egal button
    Wirelink:egpColor(12,vec4(50,50,50,255))
    Wirelink:egpBoxOutline(13,vec2(0,240),vec2(200,50))
    Wirelink:egpColor(13,vec4(0,0,0,255))
    Wirelink:egpText(14,"Deagal",vec2(3,243))
    Wirelink:egpColor(14,vec4(255,199,0,255))





    Wirelink:egpBox(30,vec2(0,450),vec2(510,60))  #bottom banner
    Wirelink:egpColor(30,vec4(20,20,20,255))



    Wirelink:egpText(35,"made by Hydrogen_poo",vec2(365,497))       # credit
    Wirelink:egpColor(35,vec4(255,30,30,255))
    Wirelink:egpSize(35,15)


    Wirelink:egpRoundedBox(50,vec2(200,90),vec2(310,360))       #backround for info screen
    Wirelink:egpColor(50,vec4(120,120,120,100))
    Wirelink:egpBoxOutline(51,vec2(200,90),vec2(310,55))
    Wirelink:egpColor(51,vec4(0,0,0,255))

    Wirelink:egpBoxOutline(53,vec2(200,145),vec2(310,55))      # seporators for info screen
    Wirelink:egpColor(53,vec4(0,0,0,255))

    Wirelink:egpBoxOutline(55,vec2(200,200),vec2(310,55))
    Wirelink:egpColor(55,vec4(0,0,0,255))

    Wirelink:egpBoxOutline(57,vec2(200,201),vec2(310,55))
    Wirelink:egpColor(57,vec4(0,0,0,255))



Wirelink:egpRoundedBox(59,vec2(300,377),vec2(150,70))      # nice green 'buy' button
Wirelink:egpColor(59,vec4(0,195,0,255))



}

function number isPressed(Index){       #a simple function to tell if someone has pressed a given button
    HitPos = Wirelink:egpCursor(User)
    return inrange(HitPos, Wirelink:egpPos(Index), Wirelink:egpPos(Index) + Wirelink:egpSize(Index))

}


Wirelink:egpText(70,"Name: "+Name,vec2(203,93))     #text for info
Wirelink:egpColor(70,vec4(0,0,0,255))
Wirelink:egpOrder(70,100)

Wirelink:egpText(71,"Damage: "+Damage,vec2(203,148))
Wirelink:egpColor(71,vec4(0,0,0,255))
Wirelink:egpOrder(71,100)

Wirelink:egpText(72,"Clip: "+Clip,vec2(203,203))
Wirelink:egpColor(72,vec4(0,0,0,255))
Wirelink:egpOrder(72,100)

Wirelink:egpText(73,"Description: "+Description,vec2(203,258))
Wirelink:egpColor(73,vec4(0,0,0,255))



Wirelink:egpText(74,"Buy $"+Price,vec2(320,400))    #text for buy button
Wirelink:egpColor(74,vec4(255,255,255,255))

Wirelink:egpText(75,"Buy $"+Price,vec2(320,400))    #text for buy button
Wirelink:egpColor(75,vec4(255,255,255,255))

Wirelink:egpText(76,"Buy $"+Price,vec2(320,400))    #text for buy button
Wirelink:egpColor(76,vec4(255,255,255,255))


if(isPressed(3)){
    Name="Ammo"
    Damage="N/A"
    Clip="one Mag worth (any gun)"
    Description="universal ammo "
    Price="200"
    Ammo=1
    AK=0
    Super=0
    Degal=0
}

if(isPressed(6)){
    Name="AK74"
    Damage="32"
    Clip="30"
    Description="full/semi assalt rifle"
    Price="1250"
    Ammo=0
    AK=1
    Super=0
    Degal=0
}

if(isPressed(9)){
    Name="Super90"
    Damage="101.5 (on average)"
    Clip="8"
    Description="semi auto shotgun"
    Price="1550"
    Ammo=0
    AK=0
    Super=1
    Degal=0
}
if(isPressed(12)){
    Name="IMI Desert Eagle"
    Damage="68.75"
    Clip="8"
    Description="semi auto high caliber pistol"
    Price="1050"
    Ammo=0
    AK=0
    Super=0
    Degal=1
}


if(isPressed(59) & Ammo==1 & MoneyPot>=Price:toNumber()){


}


if(isPressed(59) & AK==1 & MoneyPot>=Price:toNumber()){


}



if(isPressed(59) & Super==1 & MoneyPot>=Price:toNumber()){


}


if(isPressed(59) & Degal==1 & MoneyPot>=Price:toNumber()){


}

if(clk("clear")){
    BuyAmmo=0
    BuyAK=0
    BuySuper=0
    BuyDegal=0
}