bewerking=bewerking3.proc
n=$teller
!if $graad=0
    R=$teller
!else
    R=$graad
!endif 
!if $taal=nl       
    taarten=!randitem appeltaart:1,kwarktaart:2,vruchtentaart:3,chocolade&nbsp;cake:4
    taart=!replace internal : by , in $taarten
    appeltaart=!item 1 of $taart
    ding=!item 2 of $taart
    
    !if $ding=1
	appels=!randitem appels,goudreinetten,notarisappels,sterappels,Schone&nbsp;van&nbsp;boskoop(reinet),Rode&nbsp;van&nbsp;boskoop(reinet),
    !endif
    !if $ding=2
	appels=!randitem verse&nbsp;kwark,boeren&nbsp;kwark,biologische&nbsp;kwark,lichte&nbsp;kwark,kwark
    !endif
    !if $ding=3
	appels=!randitem bosbessen,kruisbessen,aalbessen,bramen,frambozen,pruimen,abrikozen,aardbeien,kersen,vossebessen,veenbesen
    !endif
    !if $ding=4
	appels=!randitem chocolade&nbsp;vlokken,cacao,chocolade,witte&nbsp;chocolade,hagelslag,zwarte&nbsp;&nbsp;chocolade
    !endif

    Z=!randitem Zij:haar:43,Hij:zijn:42
    Z=!replace internal : by , in $Z
    ZIJ=!item 1 of $Z
    HAAR=!item 2 of $Z
    RR=!item 3 of $Z
    namen=!record $RR of woorden.$taal
    NAAM=!randitem $namen
    #bloem=!randitem bloem,meel,gezeefde bloem,tarwebloem,cakemeel
    bloem=!record 62 of woorden.$taal
    bloem=!randitem $bloem
    zout=!randitem zeezout,zout
    boter=!randitem margarine,boter,roomboter,echte&nbsp;boter
    eieren=!randitem eieren,scharrel&nbsp;eieren,kriel&nbsp;eieren
    rijsmiddel=!randitem rijsmiddel,natriumbicarbonaat,bakpoeder
!else
    #taal =en
    taarten=!randitem apple&nbsp;pie:1,cheese&nbsp;cake:2,fruit&nbsp;cake:3,chocolate&nbsp;cake:4
    taart=!replace internal : by , in $taarten
    appeltaart=!item 1 of $taart
    ding=!item 2 of $taart
    !if $ding=1
	appels=!randitem apples,Golden&nbsp;Delicious,Jonagold,Grany Smith,Braeburn&nbsp;apples
    !endif
    !if $ding=2
	appels=!randitem fresh&nbsp;quark,quark,farmers&nbsp;quark,light&nbsp;quark
    !endif
    !if $ding=3
	appels=!randitem blueberry,bilberry,cherry,gooseberry,raspberry,redcurrants
    !endif
    !if $ding=4
	appels=!randitem chocolate&nbsp;flakes,cacao,chocolate,white&nbsp;chocolate,dark&nbsp;chocolate
    !endif

    Z=!randitem She:her:43,He:his:42
    Z=!replace internal : by , in $Z
    ZIJ=!item 1 of $Z
    HAAR=!item 2 of $Z
    RR=!item 3 of $Z
    namen=!record $RR of woorden.$taal
    NAAM=!randitem $namen
    bloem=!record 62 of woorden.$taal
    bloem=!randitem $bloem
    zout=salt
    boter=!randitem butter,margarine,full&nbsp;cream&nbsp;butter
    eieren=eggs
    rijsmiddel=!randitem bakingpowder,sodiumbicarbonate
!endif

I1=!randitem 300,350,400,450,475,500,550,600,700
I2=!randitem 2,3,4,5,6
I3=!randitem 150,175,200,225,250,275,300
r=!randitem 3,4,5,6,7
rr=!randitem 25,30,35,40,45
I4=$[$r*$rr]
I5=!randitem 300,400,500,600,700,800,900,1000,1100,1200
I6=!randitem 6,7,8,9,10,11,12,13,14,15,20
totaal=$[$I1 + $I2 + $I3 + $I4 + $I5 + $I6]
X=!randitem 3,4,5,6

!if $R=1
    percentage=0
    s=!randitem 2,3,4,5
    keuze=!randitem 1,2,3,4,5,6
    !if $keuze=1
	ingredient=$bloem
	!goto KLAAR1
    !endif
    !if $keuze=2
	ingredient=$zout
	!goto KLAAR1
    !endif
    !if $keuze=3
	ingredient=$boter
	!goto KLAAR1
    !endif
    !if $keuze=4
	ingredient=$eieren
	!goto KLAAR1
    !endif
    !if $keuze=5
	ingredient=$appels
	!goto KLAAR1
    !endif
    !if $keuze=6
	ingredient=$rijsmiddel
    !endif
    :KLAAR1
    !if $taal=nl
	vraag=$NAAM moet echter geen $appeltaart maken voor<b> $X </b> ,<br>maar voor<b> $[$s*$X] </b>personen !<br>hoeveel gram (of kilo, pond, ons) $ingredient moet $ZIJ dan dus gebruiken ?
	GOED$n=$[$s*$(I$keuze)]
	antwoord$n= $(GOED$n) gram 
        nivo_title=Hoeveel kilo $appeltaart willen we ?
    !else
	vraag=But $NAAM does not want to make $appeltaart for <b> $X </b> ,<br>but for<b> $[$s*$X] </b>people !<br>how much (grams or kilo, pound, ounce) of $ingredient does $ZIJ need ?
	GOED$n=$[$s*$(I$keuze)]
	antwoord$n= $(GOED$n) gram 
        nivo_title=Howmuch $appeltaart do we want ?
    !endif
!endif

!if $R=2
    percentage=1
    keuze=!randitem 1,2,3,4,5,6
    !if $keuze=1
	ingredient=$bloem
	!goto KLAAR2
    !endif
    !if $keuze=2
	ingredient=$zout
	!goto KLAAR2
    !endif
    !if $keuze=3
	ingredient=$boter
	!goto KLAAR2
    !endif
    !if $keuze=4
	ingredient=$eieren
	!goto KLAAR2
    !endif
    !if $keuze=5
	ingredient=$appels
	!goto KLAAR2
    !endif
    !if $keuze=6
	ingredient=$rijsmiddel
    !endif
    :KLAAR2
    !if $taal=nl
	vraag=Wat is het gewichts <b>percentage $ingredient </b>in deze receptuur ?\
	<br>Rond je antwoord af op 1 decimaal<br>
	GOED$n=$[round(1000*$(I$keuze)/$totaal)/10]
	antwoord$n= $(GOED$n) %
	nivo_title=Hoeveel procent $appels in de $appeltaart ?
    !else
	vraag=Wat is the weight <b>percentage $ingredient </b>in this recipe ?\
	<br>round off at 1 decimal<br>
	GOED$n=$[round(1000*$(I$keuze)/$totaal)/10]
	antwoord$n= $(GOED$n) %
	nivo_title=What percentage $appels in the $appeltaart ?
    !endif
!endif
!if $R>2
    percentage=0
    keuze=!randitem 1,3,4,5
    s=!randint 10,90   
    s=$[$s/100]
    gram=gram
    !if $keuze=1
	Y=$[$s*$I1]
	ingredient=$bloem
	!goto KLAAR3
    !endif
#    !if $keuze=2
#	Y=$[$s*$I2]
#	ingredient=$zout
#	!goto KLAAR3
#    !endif
    !if $keuze=3
	Y=$[$s*$I3]
	ingredient=$boter
	!goto KLAAR3
    !endif
    !if $keuze=4
	q=!randitem 1,2
	Y=$[$r-$q]
	s=$[$Y/$r]
	gram=$empty
	ingredient=$eieren
	!goto KLAAR3
    !endif
    !if $keuze=5
	Y=$[$s*$I5]
	ingredient=$appels
	!goto KLAAR3
    !endif
#    !if $keuze=6
#	Y=$[$s*$I6]
#	ingredient=$rijsmiddel
#    !endif
    :KLAAR3
    !if $taal=nl
	vraag=$ZIJ heeft maar $Y $gram $ingredient in huis ,<br> hoeveel gram  (of kilo, pond, ons)  $appeltaart kan $NAAM daar dan van maken?<br>Rond je antwoord af op 1 decimaal<br>
	GOED$n=$[$s*$totaal]
	antwoord$n= $(GOED$n) gram $appeltaart kon $NAAM maken<br>
	nivo_title=Hoeveel kilo $appeltaart kunnen we toch nog maken ?
    !else
	vraag=$ZIJ has just $Y grams of $ingredient  ,<br> howmuch  (grams, kilo, pound, ounce)  $appeltaart could $NAAM make of this?<br><br>round off at 1 decimal<br>
	GOED$n=$[$s*$totaal]
	antwoord$n= $(GOED$n) grams  $appeltaart could $NAAM make<br>
	nivo_title=Howmuch $appeltaart could we still make ?    
    !endif
!endif


!if $taal=nl
    !if $printbaar=0
	somtekst$n=$NAAM wil een $appeltaart gaan maken .<br>\
	$ZIJ heeft in een oud recepten boekje van $HAAR moeder een leuk recept gevonden.<br>\
	Hieronder staat deze receptuur voor $X personen:<br>\
	<center>\
<textarea readonly cols=45 rows=3>\
$bloem	$I1 gram\
$zout	$I2 gram\
$boter	$I3 gram\
$eieren ($rr gr. per stuk) $r stuks\
$appels	$I5 gram\
$rijsmiddel	$I6 gram\
\
\
\
\
\
\
</textarea></center><br>\
$vraag
    !else
	somtekst$n=$NAAM wil een $appeltaart gaan maken .<br>\
	$ZIJ heeft in een oud recepten boekje van $HAAR moeder een leuk recept gevonden.<br>\
	Hieronder staat deze receptuur voor $X personen:<br>\
	<ul>\
	<li>$bloem			$I1 gram</li>\
	<li>$zout	 		$I2 gram</li>\
	<li>$boter			$I3 gram</li>\
	<li>$eieren ($rr gr. per stuk)	$r stuks</li>\
	<li>$appels 			$I5 gram</li>\
	<li>$rijsmiddel		 	$I6 gram</li>\
	</ul>\
	$vraag
    !endif
    antwoord$n= $(GOED$n)
    PLAATJE=0
    APPLET=0
    !if $HINT=1
	hint=nog geen hints
    !endif
!else
# taal=en
    !if $printbaar=0
	somtekst$n=$NAAM wants to make some $appeltaart  .<br>\
	$ZIJ has found a very nice recipe in $HAAR mothers old cooking book.<br>\
	Here is the recipe for $X people:<br>\
	<center>\
<textarea readonly cols=45 rows=3>\
$bloem	$I1 gramm\
$zout	$I2 gramm\
$boter	$I3 gramm\
$eieren ($rr gram per ei) $r pieces\
$appels	$I5 gramm\
$rijsmiddel	$I6 gramm\
\
\
\
\
\
\
</textarea></center><br>\
$vraag

    !else
	somtekst$n=$NAAM wants to make some $appeltaart  .<br>\
	$ZIJ has found a very nice recipe in $HAAR mothers old cooking book.<br>\
	Here is the recipe for $X people:<br>\
	<ul>\
	<li>$bloem		$I1 grams</li>\
	<li>$zout	 	$I2 grams</li>\
	<li>$boter		$I3 grams</li>\
	<li>$eieren ($rr gramms/egg) $r pieces</li>\
	<li>$appels 		$I5 grams</li>\
	<li>$rijsmiddel 	$I6 grams</li>\
	</ul>\
	$vraag
    !endif
    antwoord$n= $(GOED$n)
    PLAATJE=0
    APPLET=0
    !if $HINT=1
	hint=no hints
    !endif
!endif
!exit