bewerking=nivo/bewerking1.proc
!set n=$teller
plaatje=0
R=$teller
soort=!randitem 0,1
keus=!randitem 0,1
    
!if $soort=1
    Domein=!record 14 of lang/remarks.$taal
    x=x
    !if $keus=1
	DB=D_f \,:\,
    !else
	DB=D_f \,=\,
    !endif
!else
    Domein=!record 15 of lang/remarks.$taal
    x=y
    !if $keus=1
	DB=B_f \,:\,
    !else
	DB=B_f \,=\,	
    !endif    
!endif
    
nivo_title=!record 16 of lang/remarks.$taal
# De schrijfwijzen voor Domein en Bereik.
text=!record 17 of lang/remarks.$taal
somtekst$n=$text
# Welke schrijfwijze voor het <tt>$Domein</tt> komt overeen met?
records=!shuffle 1,2,3,4,5,6,7,8
aantal_vragen=!randitem 2,3,4
GOED$n=!randint 1,$aantal_vragen
a=!randint -200,200
plus=!randint 1,200
b=$[$a+$plus]

!if $R=1
    !for p=1 to $aantal_vragen
	num=!item $p of $records
	vraag=!record $num of nivo/lijst1.def
	!if $p=$(GOED$n)
	    opgave$n=!line 5 of $vraag
	    opgave$n=$DB $(opgave$n)
	    som$p=!line 1 of $vraag
	    goed$n=$(opgave$n) \leftrightarrow $(som$p)
	!else
	    keuze=!randitem 1,2,3,4
	    som$p=!line $keuze of $vraag
	!endif
	som$p=$DB $(som$p)
    !next p
    !exit
!endif

!if $R=2
    !for p=1 to $aantal_vragen
	num=!item $p of $records
	vraag=!record $num of nivo/lijst1.def
	!if $p=$(GOED$n)
	    opgave$n=!line 1 of $vraag
	    opgave$n=$DB $(opgave$n)
	    som$p=!line 5 of $vraag
	    goed$n=$(opgave$n) \leftrightarrow $(som$p)
	!else
	    keuze=!randitem 5,6,7,8
	    som$p=!line $keuze of $vraag
	!endif
	som$p=$DB $(som$p)
    !next p
    !exit
!endif

!if $R>2
    aantal_vragen=!randitem 5,6,7,8
    k=!randitem 1,2
    !if $k=1
	!for p=1 to $aantal_vragen
	    num=!item $p of $records
	    vraag=!record $num of nivo/lijst1.def
	    !if $p=$(GOED$n)
		opgave$n=!line 5 of $vraag
		opgave$n=$DB $(opgave$n)
		som$p=!line 1 of $vraag
		goed$n=$(opgave$n) \leftrightarrow $(som$p)
	    !else
		keuze=!randitem 1,2,3,4
		som$p=!line $keuze of $vraag
	    !endif
	    som$p=$DB $(som$p)
	!next p
    !else
	!for p=1 to $aantal_vragen
	    num=!item $p of $records
	    vraag=!record $num of nivo/lijst1.def
	    vraag=!replace internal @ by , in $vraag
    	    !if $p=$(GOED$n)
		opgave$n=!line 1 of $vraag
		opgave$n=$DB $(opgave$n)
		som$p=!line 5 of $vraag
		goed$n=$(opgave$n) \leftrightarrow $(som$p)
	    !else
		keuze=!randitem 5,6,7,8
		som$p=!line $keuze of $vraag
	    !endif
	    som$p=$DB $(som$p)
	!next p
    !endif
    !exit
!endif

