<JSP>
{ Taala-JSP CODE FOR JSX CONVERSION 20.12.2019 MEP }
{ Muista täpättää LaTeX labels: }

{ Lineaarialgebra: PNS-ratkaisu 3x2 geometrisesti}
{ IV. Kolmen yhtälön PNS-ratkaisuista }

{ JSX board name: GeomLSQR02B }
{ JSX element id: geomlsqr02B }

{ 2. Step by step construction from the point B }

#CODE	  = "GSP.class"
#CODEBASE = "..\jsp"
#ARCHIVE  = "jsp4.jar"
#WIDTH    = 500
#HEIGHT   = 400
#ALIGN    = Center
*Frame          =  1
*TextFont       =   "Courier"
*TextBold       =   0
*TextSize       =  14
*LabelFont      =   "Courier"
*LabelBold      =   0
*LabelSize      =  14
*MeasureFont        =   "Courier"
*MeasureSize        =  12
*MeasureBold        =   0
*MeasureInDegrees = 1
*DirectedAngles	  = 0
*Backblue       = 255
*BackGreen	= 255
*Backred	= 255

${
$reset  FixedText(485,15,'Reset = ''R''')[black,bold,justifyRight];
$Clear  FixedText(370,413,'Puhdistus: x ->')[red,plain,font('Courier'),justifyRight];
$xText  FixedText(385,195,'x1')[bold, black, justifyCenter];
$yText  FixedText(192, 10,'x2')[bold, black, justifyCenter];
$}

{ The free points A, B and C }
$A	Point(260,200)[yellow, label('A')];
{,LabelAlign(5,5), psize(2), highlight}
$B	Point(240,240)[yellow, label('B')];
{,LabelAlign(5,5), psize(2), highlight}
$C	Point(295,250)[yellow, label('C')];
{,LabelAlign(5,5), psize(2), highlight}


{ The three lines }
$LBC	Line($B,$C)[white];
$LCA	Line($C,$A)[white];
$LAB	Line($A,$B)[white];


{ The triangle ABC yellow }
$Triang	Polygon($A,$B,$C)[yellow];

{ Construction from B }
$LperpAB Perpendicular($LAB,$A)[red,hidden];
 {,dash(1)}

$CircAB	 Circle($A,$B)[green,hidden];
{,dash(1)}

$A2	 Intersect2($LperpAB,$CircAB)[red,label('A2'),hidden];
{,label('ASUB{2}')}

$LparAB	 Parallel($LAB,$A2)[red,hidden];
{,dash(1)}

$SBAB  	 ShowButton(  0,  0, 'Construct A2 line')($LperpAB,$CircAB,$A2,$LparAB)[red,bold];
{,text('Construct \\( ASUB{2} \\) line parallel with \\( BA \\)')}
$HBAB  	 HideButton(200,  0, 'Hide')($LperpAB,$CircAB)[red];

$LperpCB Perpendicular($LBC,$C)[blue,hidden];
{,dash(1)}

$CircCB	 Circle($C,$B)[green,hidden];
{,dash(1)}
$C2	 Intersect2($LperpCB,$CircCB)[blue,label('C2'),hidden];
{,label('CSUB{2}')}

$LparCB	 Parallel($LBC,$C2)[blue,hidden];
{,dash(1)}

$SBCB  	 ShowButton(  0, 20, 'Construct C2 line')($LperpCB,$CircCB,$C2,$LparCB)[blue,bold];
{,text('Construct \\( CSUB{2} \\) line parallel with \\( BC \\)')}
$HBCB  	 HideButton(200, 20, 'Hide')($LperpCB,$CircCB)[blue];

$O2	Intersect($LparAB,$LparCB)[magenta,label('O2'),hidden];
{,label('OSUB{2}')}

$LBO	Line($B,$O2)[magenta,hidden];

$SBO2  	 ShowButton(  0, 40, 'Construct O2 line')($A2,$LparAB,$C2,$LparCB,$O2,$LBO)[magenta,bold];
{,text('Construct \\( B OSUB{2} \\) line')}
$HB02  	 HideButton(120, 40, 'Hide others')($LperpAB,$CircAB,$A2,$LparAB,$LperpCB,$CircCB,$C2,$LparCB)[magenta];

$HB02b 	 HideButton(  0, 60, 'Hide O2 line')($LBO)[magenta];
{,text('Hide \\( B OSUB{2} \\) line')}
</JSP>