I have the following code for writing accelerometer values.
I would like to write this values after every 10 minutes. Please help..am stuck
B4X:
Sub Accelerometer_AccelerometerChanged (X As Float, Y As Float, Z As Float)
Dim Ax As Float
Dim Ay As Float
Dim Az As Float
Ax=X
Ay=Y
Az=Z
xval.Text=Ax
yval.Text=Ay
zval.Text=Az
'
For i = 1 To 10
WriteTextWriter(xval.Text&","&yval.Text&","&zval.Tex)
Next