ggbVarialeVerschwindet

FriedrichLaher shared this problem 7 months ago
New

be erster Ausgabe mit confirm ist toDs noch bekann, zum zweiten kommt es aber garnicht, sondern

bei nächstem Nutzzugrif "nicht definiert" verschwunden warum? ( läuft bei Klick auf Punkt D )

Comments (1)

photo
1

{var a = ggbApplet , c = a.evalCommand , n = '\n'
   , q , r , S , C
;
function RoTate(txt, ang, Ds){

    c('w  = '+ang) ; ang = a.getValue('w')
    c('Ds = '+ Ds )

    q = Math.floor( 2 * ang / Math.PI )
    r = ang - q*Math.PI / 2

    S = Math.sin(r) ; C = Math.cos(r)

    if ( q & 1) { var h = S; S = C; C = h }

    c('m = { {-'+S+',-'+C+'} , {'+C+','+S+'} } '
    )
    c('h = y( Corner('+txt+',4))-y( Corner('+txt+', 1))'
    )
    c('b = x( Corner('+txt+',2))-x( Corner('+txt+', 1))'
    )
    c('hb = {{h},{b}}'
    )
    c('toDs = .5*Dot(m , hb)')

    c('xULC = x(Ds) + toDs(1)')

    c('yULC = y(Ds)+toDs(2)')

    c('Text2=\
       Text( RotateText('+txt+',w),\
            (xULC(1),yULC(1)),true,true )'
    )
    a.setVisible(ang,0)
    a.setPointSize(Ds,2)
}
}(0)
RoTate('Text1',"Angle(xAchse,f)" , "C")

hat sich erstmal geklärt, einfacher als ich dachte.n Irgendwo einen Punkt C kreiire, auf diesen wird der Textmittelpunkt plaziert, die Punkte A,B bestimmen den Winkel . Klick auf D führt Drehen und schieben durch .

© 2019 International GeoGebra Institute