Rectpolar (Dest, Source) - Campbell Scientific CR1000 Manuel D'utilisation

Chapitre 8. Instructions mathématiques de calculs

RectPolar (Dest, Source)

8-24
Public rTime(9)
Alias rTime(1) = Year
Alias rTime(2) = Month
Alias rTime(3) = Day
Alias rTime(4) = Hour
Alias rTime(5) = Minute
Alias rTime(6) = Second
Alias rTime(7) = uSecond
Alias rTime(8) = WeekDay
Alias rTime(9) = Day_of_Year
DataTable (VALUES, 1, 100)
DataInterval(0, 1, mSec, 0)
' Sample(1, Year, IEEE4)
' Sample(1, Month, IEEE4)
' Sample(1, Day, IEEE4)
' Sample(1, Hour, IEEE4)
' Sample(1, Minute, IEEE4)
' Sample(1, Second, IEEE4)
' Sample(1, uSecond, IEEE4)
' Sample(1, WeekDay, IEEE4)
' Sample(1, Day_of_Year, IEEE4)
Sample(9, rTime(), IEEE4)
EndTable
BeginProg
Scan (1, Sec, 0, 0)
RealTime(rTime())
CallTable VALUES
Next Scan
EndProg
Cette instruction convertit des coordonnées rectangulaires en coordonnées polaires.
Paramètres
Entrée
& type de donnée
La ligne de données variable dans laquelle on stocke 2 valeurs résultantes.
Dest
Ligne de données La longueur du vecteur est enregistrée dans l'élément de destination
spécifiée, et l'angle en radians (+ ou - π), dans l'élément suivant de la ligne
de données.
La ligne de données variable qui contient les coordonnées X et Y à convertir
Source
Ligne de données en coordonnées polaires. La valeur de X doit être dans la ligne de donnée
destination spécifiée, et la valeur de Y doit être l'élément suivant dans la
ligne de données.
Exemple : Dans l'exemple suivant, un compteur (Deg) est incrémenté entre 0 et 360
degrés. Le cosinus et le sinus de l'angle sont pris afin de transformer X et Y en
coordonnées rectangulaires. RecPolar est alors utilisé afin de convertir les
coordonnées polaires.
Dim XY(2), Polar(2), Deg, AngleDeg
Const Pi=4*ATN(1)
Alias XY(1)=X
Alias XY(2)=Y
Alias Polar(1) = Longueur
Alias Polar(2) = AngleRad
Data Table(RtoP,1,500)
Sample(1,Deg)
Sample(2,XY)
Sample(2,Polar)
Sample(1,AngleDeg)
EndTable
'déclare comme public et dimensionne rTime à 9
'assigne la variable alias Year à rTime(1)
'assigne la variable alias Month à rTime(2)
'assigne la variable alias Day à rTime(3)
'assigne la variable alias Hour à rTime(4)
'assigne la variable alias Minuteà rTime(5)
'assigne la variable alias Second à rTime(6)
'assigne la variable alias uSecond à rTime(7)
'assigne la variable alias WeekDay à rTime(8)
'assigne la variable alias Day_of_Year à rTime(9)
'configuration de la table de données (data table)
'configuration de la table de données ( data table)
'place Year dans la table VALUES
'place Month dans la table VALUES
'place Day dans la table VALUES
'place Hour dans la table VALUES
'place Minute dans la table VALUES
'place Second dans la table VALUES
'place uSecond dans la table VALUES
'place WeekDay dans la table VALUES
'place Day_of_Year dans la table VALUES
'place tous les 9 segments dans la table VALUES