n=$teller
bewerking=bewerking1.proc
rc=!randitem de richtingsco&euml;fficient(=hellingsgetal), het hellingsgetal
nivo_title=Vul de tabel in aan de hand van een gegeven vergelijking
#soort is HAVO/VMBO of VWO
!if $graad=0
    R=$teller
!else
    R=$graad
!endif        
!if $printbaar=0
    white=white
!else
    white=magenta
!endif    
!if $soort=1
#gewoon gekopieerd : moet nog wel wat gestroomlijnd
    p=!randitem 1,2,3,4
    letter1=!item $p of g,t,t,x
    letter2=!item $p of u,h,s,y
    q=!randint 1,20
    m=!randint 2,10
    mp=!randitem -1,1
    m=$[$m*$mp]
    pm=!randitem +,-
    !if $m >0
	stijgend=stijgend
    !else
	stijgend=dalend
    !endif
    lijn=$m*x $pm $q
    !if $R=1
        X=0
	D=1
    !else
	!if $R=2
    	    X=!randitem -2,-1,1,2
	    D=!randitem 1,2
	!else
	    X=!randint -10,-2
	    D=!randitem 2,3
	!endif
    !endif
    !if $wims_user=supervisor
	!for p=1 to $aantal_vragen
	    ant=$[$m*$X $pm $q]
	    goed$n=!append item $ant to $(goed$n)
	    TD=!append line <td><font size="+1">$X</font></td><td><input size=15 name="ant$p" value="$ant"></td><tr> to $TD
	    X=$[$X + $D]
	!next p
	TDD=$TD
    !else
	!for p=1 to $aantal_vragen
	    ant=$[$m*$X $pm $q]
	    goed$n=!append item $ant to $(goed$n)
	    TD=!append line <td><font size="+1">$X</font></td><td><input size=15 name="ant$p" value=""></td><tr> to $TD
	    TDD=!append line <td><font size="+1">$X</font></td><td><input size=4 name="ant$p" value="$ant"></td><tr> to $TDD
	    X=$[$X + $D]
	!next p
    !endif	
    GOED$n=$m
    !if $PLAATJE=1
	XSIZE=300
	YSIZE=400
	knipperen=0
	plaatje$n=$XSIZE,$YSIZE\
	transparent $white\
	xrange -20,20\
	yrange -40,40\
	linewidth 3\
	vline 0,0,blue\
	hline 0,0,blue\
	linewidth 2\
	curve red,$lijn\
	rect -20,-40,20,40,black\
	text black,12,-1,huge,$letter1 -as\
	arrow 12,-1,18,-1,10,cyan\
	textup black,-4,30,huge,$letter2 -as\
	arrow -1,30,-1,39,10,cyan
    !endif
    somtekst$n=<p align="left">Gegeven is de lijn <b><em>$letter2 = <font size=-1>$m</font>$letter1 $pm $q</em></b> <br>\
		Vul de onderstaande tabel in...</p><p align="center">\
		<table border=1 cellpadding="10"><th><em>$letter1-waarde</em></th><th><em>$letter2-waarde</em></th><tr>$TD</table>\
		<p>Wat denk je $voornaam, is dit een stijgende of een dalende lijn.
    antwoord$n=
    hint=geen hints vandaag
!endif

!if $soort=2
    rc=!randitem de richtingsco&euml;fficient, het hellingsgetal
    !if $R=1
	nivo_title=Vul de tabel in aan de hand van een gegeven vergelijking
	letter1=!randitem u,v,w,a,b,c
	letter2=!randitem r,s,t,d,f,g
	q=!randint 1,20
	m=!randint 2,10
	mp=!randitem -1,1
	m=$[$m*$mp]
	pm=!randitem +,-
	lijn=$m*x $pm $q
	X=!randint -10,10
	D=!randitem 1,2
	!if $wims_user=supervisor
	    !for p=1 to $aantal_vragen
		ant=$[$m*$X $pm $q]
		goed$n=!append item $ant to $(goed$n)
		TD=!append line <td><font size="+1">$X</font></td><td><input size=15 name="ant$p" value="$ant"></td><tr> to $TD
		X=$[$X + $D]
	    !next p
	    TDD=$TD
	!else
	    !for p=1 to $aantal_vragen
		ant=$[$m*$X $pm $q]
		goed$n=!append item $ant to $(goed$n)
		TD=!append line <td><font size="+1">$X</font></td><td><input size=15 name="ant$p" value=""></td><tr> to $TD
		TDD=!append line <td><font size="+1">$X</font></td><td><input size=4 name="ant$p" value="$ant"></td><tr> to $TDD
		X=$[$X + $D]
	    !next p
	!endif    
    
	!if $m >0
	    stijgend=stijgende
	!else
	    stijgend=dalende
	!endif

	GOED$n=$m
	!if $PLAATJE=1
	    XSIZE=300
	    YSIZE=400
	    knipperen=0
	    plaatje$n=$XSIZE,$YSIZE\
	    transparent $white\
	    xrange -20,20\
	    yrange -40,40\
	    linewidth 3\
	    vline 0,0,blue\
	    hline 0,0,blue\
	    linewidth 2\
	    curve red,$lijn\
	    rect -20,-40,20,40,black
	!endif
	somtekst$n=<p align="left">Gegeven is de lijn <b><em>$letter2 = <font size=-1>$m</font>$letter1 $pm $q</em></b> <br>\
	Vul de onderstaande tabel in...</p><p align="center">\
	<table border=1 cellpadding="10"><th><em>$letter1-waarde</em></th><th><em>$letter2-waarde</em></th><tr>$TD</table>\
	<p>Wat denk je $voornaam, is dit een stijgende of een dalende lijn.

	antwoord$n=Voor het goede antwoord zie de tabel aan de rechter kant<br>\
	Het was dus een $stijgend lijn<br>\
	<table border=1 cellpadding="10"><th<em>$letter1-waarde</em></th><th><em>$letter2-waarde</em></th><tr>$TDD</table> 
    !endif
    !if $R>1 
	nivo_title=Vul een tabel in aan de hand van een java applet
	m=!randitem 2,3,1,1/2,1/4,1/3,1/5,-2,-3,-1,-1/2,-1/4,-1/3,-1/5
	letter1=x
	letter2=y
	wims_rawmath_variables=$letter1
	GOED$n=$m
	!if $m >0
	    stijgend=stijgende
	!else
	    stijgend=dalende
	!endif
	Xmin=!randint -5,0
	Xmax=$[$Xmin + $aantal_vragen]
	Ymin=abs($[$m*$Xmin])
	Ymax=abs($[$m*$Xmax])
	!if $Ymax > $Ymin
	    Ymin=$[-1*$Ymax]
	!else
	    Ymax=$Ymin
	    Ymin=$[-1*$Ymin]
	!endif    
	!for q=$[$Xmin] to $[$Xmax]
	    getallen=!append item $q to $getallen
	!next q
    	!if $wims_user=supervisor
	    !for p=1 to $aantal_vragen
		getal=!item $p of $getallen
		ant=$[$m*$getal] 
		goed$n=!append item $ant to $(goed$n)
    		TD=!append line <td><font size="+1">$getal</font></td><td><input size=15 name="ant$p" value="$ant"></td><tr> to $TD
	    !next p
	    TDD=$TD
	!else
	    !for p=1 to $aantal_vragen
		getal=!item $p of $getallen
		ant=$[$m*$getal] 
		goed$n=!append item $ant to $(goed$n)
    		TD=!append line <td><font size="+1">$getal</font></td><td><input size=15 name="ant$p" value=""></td><tr> to $TD
		TDD=!append line <td><font size="+1">$getal</font></td><td><input size=5 name="ant$p" value="$ant"></td><tr> to $TDD
	    !next p
	!endif
	
	somtekst$n=<p align="left">Bekijk de grafiek goed, en vul aan de hand van het plaatje de tabel in\
	<br><small>ga ervan uit dat het mooie ronde getallen zijn...</small></p>\
	<p align="left"><font size=-2>Let op:<br>je kunt ook "inzoomen" door de<br>\
	<em>xmin & xmax</em> en <em>ymin &  ymax</em> te veranderen...<br>\
	gevolgd door op <table bgcolor=lightgrey><th>Set Limits</th></table> in de applet te drukken<br>\
	met de schuifknop kun je het kruisje langs de lijn laten bewegen.<br>\
	Door op &eacute;&eacute;n van de "pijlen" te klikken kun het <font size=+1>+</font> punt gehoorlijk nauwkeurig bewegen\
	<br>ook kun je gewoon een gewenste <em>x</em>-waarde intypen en <em>enter</em> indrukken...</font></p>\
	<div align="center"><table border=1 cellpadding="10"><th><em>$letter1-waarde</em></th><th><em>$letter2-waarde</em></th><tr>$TD</table>\
	En is deze rechte lijn stijgend of dalend ?\

	antwoord$n=De vergelijking van de rechte moest zijn:<br> <b>$letter2 = <font size=-1>$m</font>$letter1</b><br>\
	dus $rc =$(GOED$n) en is dus een $stijgend lijn.\
	<table border=1 cellpadding="10"><th<em>$letter1-waarde</em></th><th><em>$letter2-waarde</em></th><tr>$TDD</table>

	PLAATJE=0
	APPLET=1
	BGCOLOR2=176 160 240
    	applet$n=<applet  codebase="$appletdir" archive="jcm1.0-config.jar" code="SimpleGraph.class" width="400" height="400">\
    		<param name="BackgroundColor" value="$BGCOLOR2">\
    		<param name="Limits" value="-10,10,-10,10">\
    		<param name="PanelBackground" value="$BGCOLOR2">\
    		<param name="CanvasColor" value="255, 255, 200">\
    		<param name="UseMouseZoom" value="no">\
    		<param name="UsePanner" value = "yes">\
    		<param name="UseRestoreButton" value="yes">\
    		<param name="UseFunctionInput" value="no">\
    		<param name-"ShowPoint" value="yes">\
		<param name="OptionalStars" value="yes">\
    		<param name="GraphColor" value="180 0 0">\
    		<param name="UseGrid" value="yes">\
    		<param name="LineColor" value="black">\
    		<param name="Function" value="$m*x">\
		</applet>
    !endif
    hint=geen hints vandaag
!endif