OIDs

Post Reply
User avatar
Mr. Kibernetik
Site Admin
Posts: 4410
Joined: Mon Nov 19, 2012 10:16 pm
My devices: iPad, iPhone, MacBook
Location: Russia
Flag: Russia

OIDs

Post by Mr. Kibernetik » Sat Jan 13, 2018 10:22 pm

Вдохновленный этой темой, я сделал скоростную анимацию того, о чем рассказывается на видео:

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,1,1):3)
    #.drawline(x1,y1,x2,y2)
  <
  #.scr()
  #.delay(1/25)
<

Post Reply