uses gdip

Screen 320, 200, 1
SetCaption "SMOOTHING"
SetSmoothMode 2

single y1, y2, y3,y4, angle
single os=60, sc=40, spd= 0.05

While Key(27)=0
clsColor 85,80,200,255
y1 = os + sin(angle) * sc
y2 = os + sin(angle + 0.4) * sc
y3 = os + sin(angle + 0.8) * sc
y4 = os + sin(angle + 1.2) * sc

FillOval  80, y1, 42, 42, ARGB 155,255,0,0
FillOval 120, y2, 42, 42, ARGB 155,0,255,0
FillOval 160, y3, 42, 42, ARGB 155,0,0,255
FillOval 200, y4, 42, 42, ARGB 155,255,0,255
angle += spd
Flip
SetFps 60
Wend
Ends