
:redo
x=!random -0.3*$rg, 0.3*$rg
!for t in $taken2
 !if abs($x-$t)<0.1*$rg
  !goto redo
 !endif
!next t
taken2=$x

y1=!random -0.9*$rg,-0.3*$rg
y2=!random max(0.5*$rg,$y1+$rg),0.95*$rg

coeff=$[($y2-$y1)/($rg+abs($x))^2]

f=!rawmath $coeff*(t+$x)^2+$y1

