n=$counter
inputs=0
mathview=0
questiontype=4
math=0
!if $level=0
    R=$counter
!else
    R=$level
!endif
showToolBar=true
showMenuBar=false                                                                                             
framePossible=false
list_of_things=['circle','point','polygon','line']; 
!if $teaching=1
    ggb=ggb/nogrid.ggb
!else
    ggb=ggb/nogrid.ggb
!endif
!if $R=1
    keuze=!randitem 1,2,3
    !if $keuze=1
	customToolBar=" 0 | 2 | 10 | 40 | 6  | 41 | 42"
	checkfile=exos/checkfile14.proc
	question$n=!record 17 of lang/remarks.$taal
	#@ Construeer op de simpelste manier,alleen met een "passer & lineaal" twee loodrechte lijnen<br>Gebruik maar 2 cirkels...<br><small>Laat alle "constructie stappen" (zoals hulpcirkels) in het plaatje staan.</small>
	answer$n=4,2,0,2,1
	# 4 punten 2 cirkel 0 polygon 2 lijn type=1
	plaatje=S1.jpg
	!goto READY
    !endif
    !if $keuze=2
	customToolBar=" 0 | 2 | 10 | 40 | 6  | 41 | 42"
	checkfile=exos/checkfile14.proc
	question$n=!record 18 of lang/remarks.$taal
	#@ Construeer op de simpelste manier,alleen met een "passer & lineaal" twee parallele lijnen<br>Gebruik maar 2 cirkels...<br><small>Laat alle "constructie stappen" (zoals hulpcirkels) in het plaatje staan.</small>
	answer$n=4,2,0,2,2
	# 4 punten 3 cirkel 1 polygon 2 lijn type=2
	plaatje=S2.jpg
	!goto READY
    !endif
    !if $keuze=3
	checkfile=exos/checkfile2.proc
	list_of_things=['circle','point','line']; 
	customToolBar=" 0 | 1 | 2 | 10 | 34 | 40 | 6 | 41 | 42 "
	question$n=!record 67 of lang/remarks.$taal
	#@ Gegeven lijnstuk AB<br>Construeer een punt C op dit lijnstuk<br>precies in het midden van AB.<br>waar dus geldt <em>d<sub>AC</sub>=d<sub>BC</sub></em>
	answer$n=5,2,0,1,1,1
	# 5 punten,2 cirkel,0 polygon,1 lijn,type=1,check=1
	plaatje=T1.jpg
	helptext=$empty
	textanswer$n=<img src=$module_dir/gifs/$plaatje width="640">
	xa=!randitem 0,-1,-2,-3,-4,-5
	ya=!randitem 0,1,2,3,4,5
	xb=!randitem 5,6,7,8,9,10
	r=!randitem 1,2,3,-1,-2,-3
	yb=$[$ya+($r)]
	# nooit vertikale loodlijn
	var1=$[(($xa)+($xb))/2]
	var2=$[(($ya)+($yb))/2]
	appletcommand=document.applets[0].evalCommand("Aa_x=$xa");\
	document.applets[0].evalCommand("Aa_y=$ya");\
	document.applets[0].evalCommand("Bb_x=$xb");\
	document.applets[0].evalCommand("Bb_y=$yb");\
	document.applets[0].evalCommand("A = (Aa_x,Aa_y)");\
	document.applets[0].evalCommand("B = (Bb_x,Bb_y)");\
	document.applets[0].evalCommand("s1 = Segment[A,B]");
	!goto READY
    !endif
!endif
!if $R>1
    checkfile=exos/checkfile14.proc
    customToolBar=" 0 | 2 | 10 | 40 | 6 | 41 | 42 " 
    m=!randint 1,100
    pm=!randitem -1,1
    m=$[$pm*$m/50]
    lijn=$m*x - y =0
    xa=0
    ya=10
    appletcommand=document.applets[0].evalCommand("Aa_x=$xa");\
    document.applets[0].evalCommand("Aa_y=$ya");\
    document.applets[0].evalCommand("A = (Aa_x,Aa_y)");\
    document.applets[0].evalCommand("L:$lijn");\
    document.applets[0].setColor('L',255,0,0);
    
    question$n=!record 66 of lang/remarks.$taal
    #@ Gegeven punt A en lijn L<br>Construeer met  "passer & lineaal" een loodrechte lijn door A op L<br><small>Gebruik niet meer hulplijnen,cirkels en punten dan noodzakelijk<br>en laat alle constuctie elementen staan</small>
    answer$n=5,3,0,2,1
    # 5 punten 3 cirkel 1 polygon 1 lijn type=1
    plaatje=S3.jpg
    helptext=!record 16 of lang/remarks.$taal
    #@ Kijk hier</a> voor wat info over GeoGebra
!endif

:READY
textanswer$n=<img src=$module_dir/gifs/$plaatje width="345">
!if $teaching=1
    exotext=!record 11 of lang/remarks.$taal
    #@ <font color=blue>klik</font></a> hier voor het voorbeeld plaatje
    exotext=<a  onclick='window.open("$module_dir/gifs/$plaatje"," ","width=345,height=380,left=0,top=0")'>$exotext
    helptext=!record 16 of lang/remarks.$taal
    #@ Kijk hier</a> voor wat info over GeoGebra
!else
    exotext=$empty
    helptext=$empty
!endif


    
