checkfile=$checkdir/multiplechoice.proc
mathview=0
n=$counter
!if $level=0
    R=$counter
!else
    R=$level
!endif
questiontype=7
javascript=js/exo3.js
!if $R>0
    image=1
    inputs=0
    draw=1
    helptext=$empty
    formula$n=$empty
    XSIZE=180
    YSIZE=180
    question$n=!record 11 of lang/remarks.$taal
    hoek=!randitem 30,45,60,80,90,120,130,140,160,180
    keuze=!randitem 1,2
    !if $keuze=1
	lijn=line 0,0,10,0,blue
	!if $hoek=180
	    answer$n=4
	    arc=arc 0,0,-8,8,0,$hoek,red
    	!else
	    !if $hoek >90
		answer$n=2
		arc=arc 0,0,8,8,0,$hoek,red
	    !else
		!if $hoek<90
		    answer$n=1
		    arc=arc 0,0,8,8,0,$hoek,red
		!else    
		    answer$n=3
		    arc=rect 0,0,2,2,red
		!endif
	    !endif
	!endif	
    !else
	lijn=line -10,0,10,0,blue
	!if $hoek=180
	    answer$n=4
	    arc=arc 0,0,-8,8,0,$hoek,red
	!else
	    !if $hoek <90
		answer$n=2
		arc=arc 0,0,-8,8,0,$[180-$hoek],red
	    !else
		!if $hoek>90
		    arc=arc 0,0,-8,8,0,$[180-$hoek],red
		    answer$n=1
		!else
		    answer$n=3
		    arc=rect 0,0,2,2,red
		!endif
	    !endif
	!endif	
    !endif
    rad=$[pi*$hoek/180]
    x=$[10*cos($rad)]
    y=$[10*sin($rad)]
    
    image$n=180,180\
    transparent white\
    xrange -10,10\
    yrange -10,10\
    linewidth 4\
    $arc\
    $lijn\
    line  0,0,$x,$y,blue
    
    exotext=$empty
    nummers=$empty
    choicetext=!record 12 of lang/remarks.$taal
    #@ 5@Ik zou het echt niet weten,1@Scherpe hoek,2@Stompe hoek,3@Rechte hoek,4@Gestrekte hoek,6@Flauwe hoek,7@Stijle hoek,8@Moeilijke hoek
    options=!itemcnt $choicetext
    !for p=1 to $options
	nummers=!append item $p to $nummers
    !next p
    nummers=!shuffle $nummers
    !for p in $nummers
	q=!item $p of $choicetext
	q=!replace internal @ by , in $q
	q1=!item 1 of $q
	q2=!item 2 of $q
	exotext=!append line <option value="$q1">$q2</option> to $exotext
	!if $q1=$(answer$n)
	    textanswer$n=$q2
	!endif
    !next p
    exotext=<form name=myform1><select  style=$textareastyle name="reply$n" size="1">$exotext</select></form>
!endif
