[Release]EGP clock+EGP radar

[Maxaxle]

quote my post, and extract code from there -.-

edit: Iv changed it to code tags, since the new forum just sucks, why did they even update?! Also, the highlight=e2 thing is STILL unfixed.

Thanks!
*saves as .txt*

[meatsauce]

Any chance of having these updated for egp v3? They were both very useful; especially the radar.

[Teh Reborn Devil]

-.-

[Unsmart]

Its a valid point. I could convert it to EGP3 today in about 30 mins. But not the clock, cba to do that.

[techtuts]

@name EGP clock
@inputs W:wirelink 
@outputs Ratio:vector2 Test Str:string
@persist Mid Min Hour Sec
@trigger 

interval(500)

if(first())
{
    W:egpClear()
    timer("draw",500)
}

Min = time("min")
    Sec = time("sec")
    Hour = time("hour")

if(clk("draw"))
{
    
    
    #base
    #edit me
    RatioReal=vec2(1,1)
    RatioReal=clamp(RatioReal,vec2(0.1,0.1),vec2(1.2,1.2))
    
    Size=220
    Size=clamp(Size,10,220)
    Ratio=RatioReal*Size
    Mid=256
    #dont edit me  below
    #base 4 digits
    W:egpBox(12,vec2(Mid-5,Mid-Ratio:x()-5),vec2(10,10))
    W:egpBox(6,vec2(Mid-5,Mid+Ratio:x()-5),vec2(10,10))
    
    W:egpBox(3,vec2(Mid+Ratio:y()-5,Mid-5),vec2(10,10))
    W:egpBox(9,vec2(Mid-Ratio:y()-5,Mid-5),vec2(10,10))
    
    #other
    W:egpBox(1,vec2(Mid-sin(30*11)*Ratio:y()-5,Mid-cos(30*11)*Ratio:x()-5),vec2(10,10))
    W:egpBox(2,vec2(Mid-sin(30*10)*Ratio:y()-5,Mid-cos(30*10)*Ratio:x()-5),vec2(10,10))
    
    W:egpBox(11,vec2(Mid-sin(30*1)*Ratio:y()-5,Mid-cos(30*1)*Ratio:x()-5),vec2(10,10))
    W:egpBox(10,vec2(Mid-sin(30*2)*Ratio:y()-5,Mid-cos(30*2)*Ratio:x()-5),vec2(10,10))
    
    W:egpBox(4,vec2(Mid-sin(30*8)*Ratio:y()-5,Mid-cos(30*8)*Ratio:x()-5),vec2(10,10))
    W:egpBox(5,vec2(Mid-sin(30*7)*Ratio:y()-5,Mid-cos(30*7)*Ratio:x()-5),vec2(10,10))
    
    W:egpBox(8,vec2(Mid-sin(30*4)*Ratio:y()-5,Mid-cos(30*4)*Ratio:x()-5),vec2(10,10))
    W:egpBox(7,vec2(Mid-sin(30*5)*Ratio:y()-5,Mid-cos(30*5)*Ratio:x()-5),vec2(10,10))
    
    #render
 
    timer("hands",100)#max FPs=12 D:
}

#Hour++ #for server thats GMT+0 and youyr gmt+1
#Hour=Hour%24

if(clk("hands"))
{
    
    #hands
    W:egpLine(20,vec2(Mid,Mid),vec2(Mid+1,Mid+1))#sec
    W:egpLine(21,vec2(Mid,Mid),vec2(Mid+1,Mid-1))#min
    W:egpLine(22,vec2(Mid,Mid),vec2(Mid-1,Mid-1))#hour
    
    #digital timed
    Str=""
    if((Hour+""):length()==1){Str+="0"+Hour+":"}else{Str+=""+Hour+":"}
    if((Min+""):length()==1){Str+="0"+Min+":"}else{Str+=""+Min+":"}
    if((Sec+""):length()==1){Str+="0"+Sec}else{Str+=""+Sec}
    W:egpText(23,Str,vec2(Mid-50,Mid+50))#,vec(255,0,0),255)
    
    #circle
   # W:egpCircle(-1,vec2(Mid,Mid),vec2(100,100))
    
    
    
 
}

#clock is only 12 hours!
if(Hour>12){Test=Hour-12}else{Test=Hour}

W:egpPos(20,vec2(Mid-cos((Sec+15)*(360/60))*Ratio:y(),Mid-sin((Sec+15)*(360/60))*Ratio:x()))
W:egpPos(21,vec2(Mid-cos((Min+15)*(360/60))*Ratio:y(),Mid-sin((Min+15)*(360/60))*Ratio:x()))
W:egpPos(22,vec2(Mid-cos((Test+3)*(360/12))*Ratio:y(),Mid-sin((Test+3)*(360/12))*Ratio:x()))


Str=""
    if((Hour+""):length()==1){Str+="0"+Hour+":"}else{Str+=""+Hour+":"}
    if((Min+""):length()==1){Str+="0"+Min+":"}else{Str+=""+Min+":"}
    if((Sec+""):length()==1){Str+="0"+Sec}else{Str+=""+Sec}
    W:egpText(23,Str,vec2(Mid-50,Mid+50))

You will have to add color

[meatsauce]

Its a valid point. I could convert it to EGP3 today in about 30 mins. But not the clock, cba to do that.

The radar is by-far the most useful! Thanks.

[userman122]

EGP is an unofficial addon for E2 that lets you draw to screens like it's a GPU, only it's controlled directly from E2 with a special set of functions.

Is it UNOFFICAL?

[Divran]

Is it UNOFFICAL?

Read the date.

[Unsmart]

Is it UNOFFICAL?

its now part of wiremod SVN

[meatsauce]

EGP is awesome. I've gotten better with drawing things out, but still learning some of the action aspects of the displays.

I'm trying to teach myself by rewriting the radar for egp3 ...not working out so good though.