{ Taala-JSP CODE FOR JSX CONVERSION 17.12.2019 MEP } { Muista täpättää LaTeX labels: } { Lineaarialgebra: PNS-ratkaisu 3x2 geometrisesti} { IV. Kolmen yhtälön PNS-ratkaisuista } { JSX board name: GeomLSQR03C } { JSX element id: geomlsqr03c } { 3. Step by step construction from the point C } #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 C } $LperpAC Perpendicular($LCA,$A)[red,hidden]; {,dash(1)} $CircAC Circle($A,$C)[green,hidden]; {,dash(1)} $A3 Intersect2($LperpAC,$CircAC)[red,label('A3'),hidden]; {,label('ASUB{3}')} $LparAC Parallel($LCA,$A3)[red,hidden]; {,dash(1)} $SBAC ShowButton( 0, 0, 'Construct A3 line')($LperpAC,$CircAC,$A3,$LparAC)[red,bold]; {,text('Construct \\( ASUB{3} \\) line parallel with \\( CA \\)')} $HBAC HideButton(200, 0, 'Hide')($LperpAC,$CircAC)[red]; $LperpBC Perpendicular($LBC,$B)[blue,hidden]; {,dash(1)} $CircBC Circle($B,$C)[green,hidden]; {,dash(1)} $B3 Intersect2($LperpBC,$CircBC)[blue,label('B3'),hidden]; {,label('BSUB{3}')} $LparBC Parallel($LBC,$B3)[blue,hidden]; {,dash(1)} $SBBC ShowButton( 0, 20, 'Construct B3 line')($LperpBC,$CircBC,$B3,$LparBC)[blue,bold]; {,text('Construct \\( BSUB{3} \\) line parallel with \\( CB \\)')} $HBBC HideButton(200, 20, 'Hide')($LperpBC,$CircBC)[blue]; $O3 Intersect($LparAC,$LparBC)[magenta,label('O2'),hidden]; {,label('OSUB{3}')} $LCO Line($C,$O3)[magenta,hidden]; $SBO3 ShowButton( 0, 40, 'Construct O3 line')($A3,$LparAC,$B3,$LparBC,$O3,$LCO)[magenta,bold]; {,text('Construct \\( C OSUB{3} \\) line')} $HB03 HideButton(120, 40, 'Hide others')($LperpAC,$CircAC,$A3,$LparAC,$LperpBC,$CircBC,$B3,$LparBC)[magenta]; $HB03b HideButton( 0, 60, 'Hide O2 line')($LCO)[magenta]; {,text('Hide \\( C OSUB{3} \\) line')}