Page 1 of 1

OIDs

Posted: Sat Jan 13, 2018 10:22 pm
by Mr. Kibernetik
Inspired by this topic, I made high-speed animation of what is explained on the video:

Code: Select all

p(a)<=.w/2-#.cos(a)*.r,.h/2-#.sin(a)*.r
w,h = #.scrsize()
r = #.min(w,h)*0.45
#.angle(#.degrees)
#.scroff()
> s, 0..360,.1
  #.scrclear(0,0,0)
  > a, 0..360
    x1,y1 = p(a)
    x2,y2 = p(a*s)
    #.drawcolor(#.hsv2rgb(a+s,1,1):3)
    #.drawline(x1,y1,x2,y2)
  <
  #.scr()
  #.delay(1/25)
<