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

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

{ JSX board name: GeomLSQR01 }
{ JSX element id: geomlsqr01 }

{ 1. Step by step construction from the point A }

#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 A }
$LperpCA 	Perpendicular($LCA,$C)[red,hidden];
{,dash(1)}
$SBLperpCA 	ShowButton( 0, 24, 'Construct perpendicular line for CA at C')($LperpCA)[red];
{,text('Construct line perpendicular to \\( CA \\) at \\( C \\)')}

$CircCA	  	Circle($C,$A)[green,hidden];
{,dash(1)}
$SBCircCA 	ShowButton( 0, 44, 'Draw circle at C from A')($CircCA)[red];
{,text('Draw circle at \\( C \\) from \\( A \\)')}

$C1		Intersect2($LperpCA,$CircCA)[red,label('C1'),hidden];
{,label('CSUB{1}')}
$SBC1 		ShowButton( 0, 64, 'Their intersection')($C1)[red];

$LparCA	 	Parallel($LCA,$C1)[red,hidden];
{,dash(1)}
$SBLparCA 	ShowButton( 0, 84, 'Construct at C1 line parallel to CA')($LparCA)[red];
{,text('Construct at \\( CSUB{1} \\) line parallel with \\( CA \\)')}

$HBstepCA 	HideButton(  0,104, 'Hide others')($CircCA,$LperpCA)[black];

$LperpBA 	Perpendicular($LAB,$B)[blue,hidden];
{,dash(1)}
$SBLperpBA 	ShowButton( 0, 130, 'Construct perpendicular line for AB at B')($LperpBA)[blue];
{,text('Construct line perpendicular to \\( AB \\) at \\( B \\)')}

$CircBA	 	Circle($B,$A)[green,hidden];
{,dash(1)}
$SBCircBA 	ShowButton( 0, 150, 'Draw circle at B from A')($CircBA)[blue];
{,text('Draw circle at \\( B \\) from \\( A \\)')}

$B1	 	Intersect2($LperpBA,$CircBA)[blue,label('B1'),hidden];
{,label('BSUB{1}')}
$SBB1 		ShowButton( 0, 170, 'Their intersection')($B1)[blue];

$LparBA	 	Parallel($LAB,$B1)[blue,hidden];
{,dash(1)}
$SBLparBA 	ShowButton( 0, 190, 'Construct at B1 line parallel to BA')($LparBA)[blue];
{,text('Construct at \\( BSUB{1} \\) line parallel with \\( BA \\)')}

$HBstepBA 	HideButton(  0,210, 'Hide others')($CircBA,$LperpBA)[black];

$O1	Intersect($LparCA,$LparBA)[magenta,label('O1'),hidden];
{,label('OSUB{1}')}
$LAO	Line($A,$O1)[magenta,hidden];

$SBO1  	 ShowButton(  0, 240, 'Construct O1 line')($C1,$LparCA,$B1,$LparBA,$O1,$LAO)[magenta,bold];
{,text('Construct \\( A OSUB{1} \\) line')}

$HB01  	 HideButton(115, 240, 'Hide others')($LperpCA,$CircCA,$C1,$LparCA,$LperpBA,$CircBA,$B1,$LparBA)[magenta];
$HB01b 	 HideButton(  0, 262, 'Hide O1 line')($LAO)[magenta];
{,text('Hide \\( A OSUB{1} \\) line')}

$SBButtons ShowButton(  0,   0, 'Construction buttons')($SBLperpCA,$SBCircCA,$SBC1,$SBLparCA,$HBstepCA,$SBLperpBA,$SBCircBA,$SBB1,$SBLparBA,$SBLparBA,$HBstepBA,$SBO1,$HB01,$HB01b)[black,bold];
$HBButtons HideButton(140,   0, 'Hide buttons')(        $SBLperpCA,$SBCircCA,$SBC1,$SBLparCA,$HBstepCA,$SBLperpBA,$SBCircBA,$SBB1,$SBLparBA,$SBLparBA,$HBstepBA,$SBO1,$HB01,$HB01b)[black,bold];
</JSP>