n=$teller
bewerking=bewerking2.proc
nivo_title=Stel een formule op van de rechte lijn tussen een punt en de Oorsprong.
!if $graad=0
    R=$teller
!else
    R=$graad
!endif 
!if $printbaar=0
    white=white
!else
    white=magenta
!endif
!if $soort=1
    mp=!randitem 1,-1
    m=!randint 2,6
    m=$[$mp*$m]
    X1=!randint 2,5
    pm=!randitem 1,-1
    X1=$[$pm*$X1] 
    Y1=!exec pari $m*$X1

    p=!randitem 1,2,3,4
    A=!randitem A,C,D,E,F,G,H
    letter1=!item $p of g,t,t,x
    letter2=!item $p of u,h,s,y
    wims_rawmath_variables=$letter1
    GOED$n= $letter2=$m*$letter1
    lijn=$m*x
    somtekst$n=Gegeven het punt $A met<ul><li>$letter1-co&ouml;rdinaat : $X1<li>\
    $letter2-co&ouml;rdinaat :$Y1<li>dus het punt ($X1:$Y1)</ul>\
    Geef de formule van de rechte lijn door punt $A en de Oorsprong (O).\
    in het <font size=+1>$letter1,$letter2-vlak</font>
    !if $PLAATJE=1
	XSIZE=500
	YSIZE=300
	XRANGE=-20,20
	YRANGE=-30,30
	knipperen=1
	aantal_beeldjes=2
        plaatje$n=300,300\
	transparent $white\
	xrange $XRANGE\
	yrange $YRANGE\
	linewidth 1\
	vline 0,0,blue\
	hline 0,0,blue\
	linewidth 2\
	curve red,$lijn\
	text black,13,-1,huge,$letter1-as\
	arrow 13,-1,16,-1,10,cyan\
	textup black,-1,19,huge,$letter2-as\
	arrow -1,19,-1,27,10,cyan\
	linewidth s*18\
	points green,0,0,$X1,$Y1\
	text black,0,0,normal,De oorsprong (O)\
	text black,$X1,$Y1,normal,punt $A ($X1:$Y1)
    !endif    
    antwoord$n=$(somtekst$n)<p>De vergelijking van de rechte door Punt $A en <br>de Oorsprong moest zijn:<br><center> $(GOED$n)
!endif
!if $soort=2
    nivo_title=Stel een formule op van de rechte lijn tussen een punt en de Oorsprong.
    mp=!randitem 1,-1
    m=!randint 1,10
    m=$[$mp*$m]
    X1=!randint 3,15
    pm=!randitem 1,-1
    X1=$[$pm*$X1] 
    Y1=!exec pari $m*$X1

    !if $teller=2 or $teller>3
	A=!randitem A,C,D,E,F,G,H,X,Y,Z
        letter1=!randitem l,k,j,h,f,p,t,r,w,x
	letter2=!randitem z,a,s,v,b,c,q,u,d,y
	wims_rawmath_variables=$letter1
	GOED$n= $letter2=$m*$letter1
	lijn=$m*x
	somtekst$n=Gegeven het punt $A met<ul><li>$letter1-co&ouml;rdinaat : $X1<li>\
	$letter2-co&ouml;rdinaat :$Y1<li>dus het punt ($X1:$Y1)</ul>\
	Geef de formule van de rechte lijn door punt $A en de Oorsprong (O).\
	in het <font size=+1>$letter1,$letter2-vlak</font>
    !else
	letter1=x
	letter2=y
	wims_rawmath_variables=$letter1
	GOED$n= $letter2=$m*$letter1
	lijn=$m*x
        somtekst$n=Gegeven het punt $A<em> met de <em>x,y</em>-co&ouml;rdinaten ($X1:$Y1).</em><br>\
	Geef de formule van de rechte door punt $A en de Oorsprong (O).

    !endif

    !if $PLAATJE=1
	XSIZE=500
	YSIZE=300
	XRANGE=-60,80
	!if $Y1>0
	    YRANGE=$[-1.5*$Y1],$[1.5*$Y1]
	!else
	    YRANGE=$[1.5*$Y1],$[-1.5*$Y1]
	!endif
	knipperen=1
	aantal_beeldjes=2
        plaatje$n=300,300\
	transparent $white\
	xrange $XRANGE\
	yrange $YRANGE\
	linewidth 1\
	vline 0,0,blue\
	hline 0,0,blue\
	linewidth 2\
	curve red,$lijn\
	linewidth s*18\
	points green,0,0,$X1,$Y1\
	text black,0,0,normal,De oorsprong (O)\
	text black,$X1,$Y1,normal,punt $A ($X1:$Y1)\
	text black,70,$[0.1*$Y1],huge,$letter1-as\
	textup black,-3,$Y1,huge,$letter2-as
    !endif    

    ggg=!htmlmath $(GOED$n)
    antwoord$n=$(somtekst$n)<p>De vergelijking van de rechte door Punt $A en de Oorsprong moest zijn:<br><center> $ggg 
!endif 
