
!if random(1)>0.5
 cc=!random 0.1,0.3
 c2=!random 0.8,1
 c0=!random 0.3,0.6
 f=!rawmath $c2(x+$cc)^2-$c0-$cc
 f2=!rawmath -$c2(x-$cc)^2+$c0+$cc
 l=$[(1-sqrt(1+4*$c0*$c2))/(2*$c2)-$cc]
 r=$[(1+sqrt(1+4*$c0*$c2))/(2*$c2)-$cc]
 ll=$[-$r-2*$cc]
 h=$[max(-2,-sqrt((2+$c0+$cc)/$c2)-$cc)]
 e=0.05
 u=!random $ll+$e,$l-$ecart
 v=$l+$ecart,$r-$ecart
 u1=!randitem $u,$u,$v
 good=$l
 !if random(1)>0.5 and $ll-$h>2*$e
  bad=$l
  good=out
  u1=!random $h+$e,$ll-$e
 !endif
!else
 cc=!random 0.2,0.4
 c2=!random 1.5,2
 c0=!random 1.5/$c2,1.75/$c2
 f=!rawmath $c2(x+$cc)^2-$c0-$cc
 f2=!rawmath -$c2(x-$cc)^2+$c0+$cc
 l=$[(1-sqrt(1+4*$c0*$c2))/(2*$c2)-$cc]
 r=$[(1+sqrt(1+4*$c0*$c2))/(2*$c2)-$cc]
 ll=$[-$r-2*$cc]
 rr=$[-($l)-2*$cc]
 h=$[max(-2,-sqrt((2+$c0+$cc)/$c2)-$cc)]
 e=0.03
 u=!random $ll+$e,$l-$ecart
 v=$l+$ecart,$rr-$e
 w=$rr+$e,$r-$ecart
 u1=!randitem $u,$u,$u,$v,$w
 good=osci
 bad=$l
 !if random(1)>0.65 and $ll-$h>2*$e
  good=out
  u1=!random $h+$e,$ll-$e
 !endif
!endif

out=plus
!if random(1)>0.5
 out=minus
 f=$f2
 u1=$[-($u1)]
 !if $good=$l
  good=$[-($l)]
 !else
  bad=$[-($l)]
 !endif
!endif

