n=$teller
bewerking=bewerking5.proc
woordmax=10
!if $taal=nl
    optellen=optellen
    aftrekken=aftrekken
    nivo_title=Optellen & Aftrekken
    !if $HINT=1
    hint=<table bgcolor=$fontcolor1><th>Werk de som eerst uit op papier</th><tr><td>schrijf de getallen recht onderelkaar\
    </td><tr><td>tel eerst de meest rechtse kolom op: de enkelen\
    <td><tr><td>Dus optellen:<br>445<br>389<hr align="left" width="30">834\
    </td><tr><td>Komt de som van de enkelen boven de 10 uit , bijvoorbeeld 5+9=14: onthoud dan de 1 en noteer de 4\
    </td><tr><td>Komt de som van de tientallen boven de 10 uit, bijvoorbeeld 4+8+1<sub>&larr;<small>van daarnet</small></sub>=13: onthoud dan de 1 en noteer de 3\
    </td><tr><td>De honderdtallen zijn dus nu 4 + 3 + 1<sub>&larr;<small>van daarnet</small></sub>=8\
    </table>
    !endif
!else
    optellen=add
    aftrekken=subtract
    nivo_title=Addition and Subtraction
    !if $HINT=1
    hint=no hints today
    !endif
!endif    

!for n=1 to $aantal_sommen
    !if $graad=0
	R=$n
    !else
	R=$graad
    !endif        
    getal0=!randint $n,20
    delta=$[$teller*20]
    !for p=1 to 6
	getal$p=!randint $(getal$[$p-1]),$[$(getal$[$p-1]) + $delta ]
    !next

    !if $R=1 or $R=3
	operator1=!randitem +,-    
	!if $operator1=+
	    OPERATOR=$optellen
	!else
    	    OPERATOR=$aftrekken
	!endif
	!if $R=1
    	    opgave$n=$getal2 <font size="+2">$operator1</font> $getal1 = <input size="8" name="ANT$n" value=$(ANT$n)>
    	    GOED$n=$[$getal2 $operator1 $getal1]
	    antwoord$n= $getal2 $operator1 $getal1 = <input size="3" value="$(GOED$n)" readonly> 
	!else
    	    GOED$n=$[$getal2 - $getal1]
	    !if $operator1=+
    		opgave$n=$getal1 <font size="+2">+</font> <input size="8" name="ANT$n" value=$(ANT$n)> = $getal2
		antwoord$n= $getal1 + <input size="3"  value=$(GOED$n) readonly> = $getal2
    	    !else
    	        opgave$n=$getal2 <font size="+2">-</font> <input size="8" name="ANT$n" value=$(ANT$n)> = $getal1
		antwoord$n= $getal2 - <input size="3"  value=$(GOED$n) readonly> = $getal1
	    !endif	
        !endif
    !endif

    !if $R=2 or $R=4
	operator1=!randitem +,-
	!if $operator1=+
	    operator2=-
	!else
	    operator2=+
	!endif    
	!if $R=2
	    opgave$n=$getal5 <font size="+2">$operator1</font> $getal2 <font size="+2">$operator2</font> $getal1=<input size="8" name="ANT$n" value=$(ANT$n)>
    	    GOED$n=$[$getal5 $operator1 $getal2 $operator2 $getal1]
	    antwoord$n=$getal5 $operator1 $getal2 $operator2 $getal1=<input size="3" value=$(GOED$n) readonly>
	!else
	    !if $operator1=+
		opgave$n=$getal3 <font size="+2">+</font> <input size="8" name="ANT$n" value=$(ANT$n)> <font size="+2">-</font> $getal1 = $getal5
		GOED$n=$[$getal5 - $getal3 + $getal1]
		antwoord$n=$getal3 + <input size="3" value=$(GOED$n) readonly> - $getal1 = $getal5
	    !else
		opgave$n=$getal6 <font size="+2">-</font> <input size="8" name="ANT$n" value=$(ANT$n)> <font size="+2">+</font> $getal1 = $getal1
		GOED$n=$[-1*($getal1 -$getal6 -$getal1) ]
		antwoord$n=$getal6 - <input size="3" value=$(GOED$n) readonly> + $getal1 = $getal1
	    !endif
	!endif
    !endif
    !if $R>4
	operator1=!randitem +,-
	!if $operator1=+
	    operator2=-
	!else
	    operator2=+
	!endif
	!if $R=5 or $R=7 or $R=9
	    opgave$n=$getal6 <font size="+2">$operator1</font> $getal1 <font size="+2">$operator2</font> $getal2 <font size="+2">$operator1</font> $getal3 = <input size="8" name="ANT$n" value=$(ANT$n)>
	    GOED$n=$[$getal6 $operator1 $getal1 $operator2 $getal2 $operator1 $getal3]
	    antwoord$n=$getal6 $operator1 $getal1 $operator2 $getal2 $operator1 $getal3 = <input size="3"  value=$(GOED$n) readonly>
	!else
	    !if $operator1=+
		opgave$n=$getal3 <font size="+2">+</font> <input size="8" name="ANT$n" value=$(ANT$n)> <font size="+2">-</font>  $getal2 <font size="+2">+</font> $getal1 = $getal6 
		GOED$n=$[$getal6 - $getal3 + $getal2 - $getal1]	
		antwoord$n=$getal3 + <input size="3"  value=$(GOED$n) readonly> -  $getal2 + $getal1 = $getal6 
    	    !else
		opgave$n=$getal3 <font size="+2">-</font> <input size="8" name="ANT$n" value=$(ANT$n)> <font size="+2">+</font>  $getal6 <font size="+2">-</font> $getal4 = $getal5 
		GOED$n=$[-1*($getal5 - $getal3 - $getal6 + $getal4)]	
		antwoord$n=$getal3 - <input size="3"  value=$(GOED$n) readonly> +  $getal6 - $getal4 = $getal5 
	    !endif
	!endif
    !endif
!next n
teller=$aantal_sommen