bewerking=bewerking4.proc
bewegen=0
n=$teller
KLEUREN=red,green,blue,orange,cyan,darkred,lightgreen,purple
KLEUREN=!shuffle $KLEUREN
keuze=!randitem 46,47,48,49,61,62,63,64,54,51,42,43
AANTAL=$empty
tabel=$empty
PARAM=$empty
verzameling=!record $keuze of woorden.$taal
verzameling=!shuffle $verzameling
     
!if $taal=nl
    !if $keuze=42
	onderwerp=Voornamen van Jongens 
	aantallen=geregistreerde aantallen
	!goto KLAAR
    !endif
    !if $keuze=43
	onderwerp=meisjes voornamen 
	aantallen=geregistreerde aantallen
	!goto KLAAR
    !endif
    !if $keuze=46
	onderwerp=Automerken 
	aantallen=Verkochte exemplaren
	!goto KLAAR
    !endif
    !if $keuze=47
	onderwerp=Motorfietsmerken 
	aantallen=Verkochte aantallen
	!goto KLAAR
    !endif
    !if $keuze=48
	onderwerp=Fietssoorten 
	aantallen=Verkochte aantallen
	!goto KLAAR
    !endif
    !if $keuze=49
	onderwerp=lijmsoorten 
	aantallen=Verkochte kilo's
    !endif
    !if $keuze=61
	onderwerp=fruitsoorten
	aantallen=Verkochte kilo's
	!goto KLAAR
    !endif
    !if $keuze=62
	onderwerp=meelsoorten 
	aantallen=Verkochte kilo's
	!goto KLAAR
    !endif
    !if $keuze=63
	onderwerp=vet en olie 
	aantallen=Verkochte kilo's
	!goto KLAAR
    !endif
    !if $keuze=64
	onderwerp=zoetstoffen 
	aantallen=Verkochte kilo's
	!goto KLAAR
    !endif
    !if $keuze=54
	onderwerp=bouwgrondstoffen 
	aantallen=Verkochte kilo's
	!goto KLAAR
    !endif
    !if $keuze=51
	onderwerp=oplosmiddelen en verfverdunners 
	aantallen=Verkochte liter's
	!goto KLAAR
    !endif
!else
    !if $keuze=42
	onderwerp=names of Boys 
	aantallen=registered numbers
	!goto KLAAR
    !endif
    !if $keuze=43
	onderwerp=names of Girls
	aantallen=registered numbers
	!goto KLAAR
    !endif
    !if $keuze=46
	onderwerp=Car brandnames
	aantallen=sold cars
	!goto KLAAR
    !endif
    !if $keuze=47
	onderwerp=Motorcycle brandnames
	aantallen=sold numbers
	!goto KLAAR
    !endif
    !if $keuze=48
	onderwerp=Bicycle types 
	aantallen=sold copies
	!goto KLAAR
    !endif
    !if $keuze=61
	onderwerp=Fruit
	aantallen=sold metric tons
    !endif
    !if $keuze=62
	onderwerp=Flower
	aantallen=sold kilograms
	!goto KLAAR
    !endif
    !if $keuze=63
	onderwerp=Fats and Oils 
	aantallen=Sold litres
	!goto KLAAR
    !endif
    !if $keuze=64
	onderwerp=Sweetners 
	aantallen=sold kilograms
	!goto KLAAR
    !endif
    !if $keuze=54
	onderwerp=construction Materials 
	aantallen=sold metric tons
	!goto KLAAR
    !endif
    !if $keuze=51
	onderwerp=Solvents and Thinners 
	aantallen=Sold litres
	!goto KLAAR
    !endif
    !if $keuze=49
	onderwerp=Glues and adhesives 
	aantallen=sold kilograms
    !endif
!endif
:KLAAR
!if $graad=0
    R=$[$teller + 1]
!else
    R=$[$graad +1]    
!endif
GOED$n=!randint 1,$R
aantal_vragen=$R
    KLEUREN=red,green,blue,orange,cyan,magenta
    KLEUREN=!shuffle $KLEUREN
    APPLET=1
    !for w=1 to $R
	tabel=
	!for p=1 to $R
	    	kleur=!item $p of $KLEUREN
		merk=!item $p of $verzameling
		    !if $w=$(GOED$n)
	    		aantal=!randint 100,1000
			PARAM=!append line <param name="Plabel$p" value="$merk"> to $PARAM
			PARAM=!append line <param name="Pvalue$p" value="$aantal"> to $PARAM
			PARAM=!append line <param name="Pcolor$p" value="$kleur"> to $PARAM
		    !else
			aantal=!randint 200,3000
		    !endif
			tabel=!append line <td><font color=$kleur><b>$merk</b></font></td><td><center>$aantal</td><tr> to $tabel
	!next p
	tabel$w=<table border=1 cellpadding="1"  cellspacing="1"  width=80%><td>$onderwerp</td><td>$aantallen</td><tr>$tabel</table>
    !next w
    applet$n=<applet codebase="$appletdir" archive="2D_pie.jar" code="PieChart.class" width="500" height="320" >\
	<param name=title value="$onderwerp & $aantallen">\
	<param name=showlabel   value="yes">\
	<param name=showpercent value="yes">\
	<param name=bgcolor value="white">\
	<param name=columns value="$R">$PARAM \
	$geenjava</applet>
    
#!if $R>3
#    colors.put("green", Color.green);
#    colors.put("red", Color.red);
#    colors.put("blue", Color.blue);
#    colors.put("yellow", Color.yellow);
#    colors.put("magenta", Color.magenta);
#    colors.put("cyan", Color.cyan);
#    colors.put("orange", Color.orange);
#    colors.put("pink", Color.pink);
#    colors.put("white", Color.white);
#    colors.put("black", Color.black);
#    !if $taal=nl
#	nivo_title=Cirkeldiagrammen<br>Bereken het percentage en klik op de tabel
#    !else
#	nivo_title=Circle diagramms<br>Calculate the percentages and click on the corresponding table
#    !endif
#    KLEUREN=red,green,blue,magenta,black,cyan
#    KLEUREN=!shuffle $KLEUREN
#    !for w=1 to $R
#	tabel=$empty
#	!for p=1 to $R
#	    kleur=!item $p of $KLEUREN
#	    merk=!item $p of $verzameling
#		!if $w=$(GOED$n)
#	    	    aantal=!randint 1,100
#		    parameter=!nospace $aantal - $kleur
#		    PARAM=!append item $parameter to $PARAM 
#		!else
#		    aantal=!randint 1,100
#		!endif
#		tabel=!append line <td><font color=$kleur><b>$merk</b></font></td><td><center>$aantal</td><tr> to $tabel
#	!next p
#	tabel$w=<table border=1 cellpadding="1"  cellspacing="1" bgcolor=$bgcolor2  width=80%><td>$onderwerp</td><td>$aantallen</td><tr>$tabel</table>
#    !next w
#    PARAM=!nospace $PARAM
#    applet$n=<applet codebase="$appletdir" archive="3D_pie.jar" code="PieChart.class" width="400" height="250">\
#    <param name=depth value="30">\
#    <param name=piewidth value="300">\
#    <param name="values" value="$PARAM">\
#    <param name=title value="$onderwerp & $aantallen">\
#    $geenjava</applet>
#!endif    


!if $taal=nl    
    nivo_title=Cirkeldiagrammen<br>Bereken het percentage en klik op de tabel
    somtekst$n=Een cirkeldiagram (ook wel <em>taartpunt</em>diagram genoemd)<br>\
    geeft op een handige manier in 1 oogopslag\
    de verhouding weer tussen allerhande dingen,<br>\
     zoals bijvoorbeeld hieronder de weergave van:<b>" $onderwerp  & $aantallen"</b><br><br>\
    hieronder staat een cirkeldiagram<br>\
    Klik met je muis op de tabel dat volgens jou het best overeenkomt met de gegevens uit het cirkeldiagram

    opgave$n=<font size=+1>Klik op de <font color=$fontcolor6>tabel</font> die hoort bij dit cirkeldiagram<br>\
    <small><small>de kleuren corresponderen met de taartpunten uit het cirkeldiagram</small></small>\
    <br><small>onnodig te zeggen dat de bovenstaande gegevens volstrekte nonsens zijn</small>
    
    goedenummer=!item $(GOED$n) of $rangwoorden
    antwoord$n=Het goede antwoord is de $goedenummer tabel<br>$(tabel$(GOED$n))
!else
    nivo_title=Circle diagramms<br>Calculate the percentages and click on the corresponding table
    somtekst$n=A circlediagram (also called <em>pie</em>diagram)<br>\
    is a very handy way of showing the relation between different things<br>\
    For instance like here below the relation between <br><b>" $onderwerp & $aantallen " </b><br><br>\
    click on one table that matches the circlediagram

    opgave$n=<font size=+1>Click on the <font color=$fontcolor6>table</font> that belongs to the circlediagram<br>\
    <small><small>the colors between table and pie diagram are matching</small></small>\
    <br><small>needless to say that the figures used in this exercise are complete nonsens?</small>
    
    goedenummer=!item $(GOED$n) of $telwoorden
    antwoord$n=The correct answer table number $goedenummer <br>$(tabel$(GOED$n))

    hint=just could an educated guess... :)
!endif



