helptext=$empty
checkfile=exos/checkfile1.proc
questiontype=0
image=0
draw=1
colls=35
rows=1
math=0
!set n=$counter
!if $level=0
    R=$counter
!else
    R=$level
!endif
XSIZE=200
YSIZE=200
!if $printexo=1
    image=1
    draw=1
    plot=0
    exotext=$empty
    helptext=$empty
!else
    exotext=!record 2 of lang/remarks.$taal
    helptext=<a href="javascript:showimage();">help</a>
    exotext=<a onmouseover="this.T_OFFSETX=-150;return escape('<img src= $wims_ref_name?&session=$session&module=$module&cmd=getins&special_parm=insert-1.gif>')">$exotext</a>
!endif

!if $R<3
    !if $R=1
	hoek1=0
	x1=1
	y1=0
	s=30
	S=90
	hoek2=!randitem 30,60,90,120,150,180,210,240,270,300,330
    !endif
    !if $R=2
	hoek1=0
	x1=1
	y1=0
	s=15
	S=45
	hoek2=!randitem 15,30,45,60,75,90,105,120,135,150,165,180,195,210,225,240,255,270,285,300,315,330
    !endif	
    answer$n=$hoek2
    !if $(answer$n) > 180
	answer$n=$[360-$(answer$n)]
    !endif	
    x2=$[cos($hoek2*pi/180)]
    y2=$[sin($hoek2*pi/180)]
    !for q=0 to 360 step $s
	x=$[cos($q*pi/180)]
	y=$[sin($q*pi/180)]
	scale=!append line segment $[1.1*$x],$[1.1*$y],$[0.9*$x],$[0.9*$y],blue to $scale
    !next q
    !for q=0 to 360 step $S
	x=$[cos($q*pi/180)]
	y=$[sin($q*pi/180)]
	scale=!append line segment $[1.2*$x],$[1.2*$y],$[0.9*$x],$[0.9*$y],red to $scale
    !next q
    xmin=-1.4
    xmax=1.4
    ymax=$xmax
    ymin=$xmin
    xrange=$[$xmax+$ymax]
    yrange=$xrange
    !if $hoek > 180
	h1=$hoek2
	h2=$hoek1
    !else
	h2=$hoek2
	h1=$hoek1
    !endif		
    
    plaatje=\
    xrange $xmin,$xmax\
    yrange $ymin,$ymax\
    transparent white\
    fellipse 0,0,2,2,black\
    fellipse 0,0,0.1,0.1,white\
    linewidth 2\
    $scale \
    arrow 0,0,$x1,$y1,15,white\
    arrow 0,0,$x2,$y2,15,white\
    insdraw_size=300,300
    
    !if $printexo=1
	image$n=$plaatje
    !else
	!insdraw $plaatje
    !endif
    #arc 0,0,1,1,$h1,$h2,white
    
    ss=!record 14 of lang/remarks.$taal
    #@ Als je weet dat een cirkel 360<sup>o</sup> graden is...<br>wat is dan de aangegeven hoek tussen de twee pijlen<br><em><small>neem bij voorkeur de kleinste hoek...<br>maar het maakt voor je cijfer niks uit als je de grootste neemt</small></em>
    rr=!record 15 of lang/remarks.$taal
    #@ De hoek tussen de twee pijlen is $(answer$n)<sup>o</sup><br>maar $[360-$(answer$n)]<sup>o</sup> was natuurlijk niet fout geweest ;)
    question$n=$ss
    textanswer$n=$rr
!exit
!endif

!if $R>2
    telwoorden=!record 59 of $remarkdir/commonremarks.$taal
    uren=!randitem 1,2,3,4,5,6,7,8,9,10,11
    minuten=0
    seconden=!randint 5,15
    wims_read_parm=$uren:$minuten:$seconden
    style=!randitem 1,2    
    !readproc slib/draw/clock $wims_read_parm,200,$style
    insdraw_size=200,200
    
    !if $printexo=1
	image$n=$slib_out
    !else	
	!insdraw $slib_out
    !endif
    
    laat=!item $uren of $telwoorden
    ss=!record 16 of lang/remarks.$taal
    #@ Als je weet dat een cirkel 360<sup>o</sup> graden is...<br>hoeveel graden zit er dan tussen de kleine en de grote wijzer<br><em>De klok geeft nu precies $laat uur aan?<br>neem bij voorkeur de kleinste hoek...</em>
    question$n=$ss    
    answer$n=$[$uren*30]
    !if $(answer$n) > 180
	answer$n=$[360-$(answer$n)]
    !endif	
    rr=!record 17 of lang/remarks.$taal
    #@ Er zijn 12 hele uren op zo'n klok<br>Elk uur is dus 360<sup>o</sup> &divide; 12 = 30<sup>o</sup><br>De kleine wijzer staat op $uren precies : de grote wijzer staat op 12 (of 0)<br>Dus de hoek is $uren &times; 30<sup>o</sup> = $[30*$uren] <br>De kleinste hoek is dus: $(answer$n) <sup>o</sup>
    textanswer$n=$rr
 !exit    
!endif

