n=$counter
questiontype=0
applet=1
image=0
cols=25
rows=1
draw=0
math=0
inputs=0
# inputs=1 geeft ook invulveld
checkfile=exos/checkfile2.proc
!if $level=0
    R=$counter
!else
    R=$level
!endif
helptext=$empty
kleuren=!record 7 of lang/remarks.$taal
vv=!record 1 of lang/remarks.$taal
kleuren=!randitem $kleuren
kleur=!replace internal @ by , in $kleuren
kleur1=!item 2 of $kleur
color1=!item 1 of $kleur

scherpe=!item 1 of $vv
stompe=!item 2 of $vv
haakse=!item 3 of $vv
!if $R=1
    hoek=!randitem 10,20,35,35,40,45,50,55,60,65,70,75,80,85
!endif
!if $R>1
    hoek=!randint 5,180
!endif

!if $hoek<90
    vorm=$scherpe
    x2=10
    y2=$[5*(tan(pi*$hoek/180))]
!else
    !if $hoek >90
	vorm=$stompe
	x2=0    
	y2=$[-5*(tan(pi*$hoek/180))]
    !else
	vorm=$haakse
	x2=0
	y2=5
    !endif
!endif    	
answer$n=$hoek    
XSIZE=640
YSIZE=350
insdraw_size=$XSIZE,$YSIZE
# image 640x328 pixels
# oppassen met de dimensies van't image; het wordt zeer snel bagger
# komt door de rand aan de onderkant van de applet ca 0.36 px

!insdraw transparent white\
xrange 0,10\
yrange 0,5\
copy 0,5,-1,-1,-1,-1,gifs/geodriehoek2.jpg\
linewidth 5\
segment 5,0.36,10,0.36,$color1


image$n=transparent white\
xrange 0,10\
yrange -0.36,5\
copy 0,5,-1,-1,-1,-1,gifs/geodriehoek2.jpg\
linewidth 3\
segment 5,0,10,0,$color1\
line 5,0,$x2,$y2,green\
arc 5,0,6,6,0,$hoek,green\
linewidth 3\
hline 0,0,$green

ss=!record 10 of lang/remarks.$taal
#! Teken in de applet op de geodriehoek een lijn die een $vorm hoek van $hoek <sup>o</sup> maakt met de $kleur1 lijn
question$n=$ss
object$n=<applet codebase="java" archive="input.jar" code="input.class" width="$XSIZE" height="$YSIZE"><param name=retry value="DELETE"><param name=prompt value="$send"><param name="background" value="$ins_url"><param name="type" value="line"><param name=replyurl value=$wims_ref_name?module=$module&+session=$session&cmd=reply&reply$n=$java_reply>$geenjava</applet>

!exit    

