03.07.2023, 14:56
(This post was last modified: 04.07.2023, 17:23 by wilfriedh.
Edit Reason: unnötiges Zitat meines eigenen Beitrags gelöscht
)
...
Der Stadtradeln Support hat geantwortet, meine Mail würde an das Entwickler-Team weitergeleitet.
Für die Zwischenzeit ist hier ist das Script zum Konvertieren der Zeitstempel aus der Stadtradeln-App in das Standard GPX Format.
Zum Ausführen muss ein REXX Interpreter installiert sein, z.B. Regina Rexx.
Der Stadtradeln Support hat geantwortet, meine Mail würde an das Entwickler-Team weitergeleitet.
Für die Zwischenzeit ist hier ist das Script zum Konvertieren der Zeitstempel aus der Stadtradeln-App in das Standard GPX Format.
Zum Ausführen muss ein REXX Interpreter installiert sein, z.B. Regina Rexx.
Code:
/* Stadtradeln gpx file (Unix Zeitstempel) in Standard gpx konvertieren */
parse arg infile outfile
if outfile='' then do
say "Es muessen 2 Dateinamen angegeben werden"
exit 1
end
/* Kopfzeilen unveraendert ausgeben */
do i = 1 to 4
line = linein(infile)
lout = line
rc = lineout(outfile,lout)
end
/* Zeilenweise konvertieren */
do while lines(infile)>0
line = linein(infile)
if line = '</trkseg>' then leave
parse var line beginn "<time>" uxtime "</time>" schluss
uxdays = uxtime % 86400000 /* Integer Division */
uxstart = DATE('B','1 Jan 1970','N')
rxdays = uxstart + uxdays
hrs = (uxtime - (uxdays*86400000)) / 3600000
sec = TRUNC(60*60*hrs)
lout = beginn'<time>'DATE('I',rxdays,'B')'T'TIME('N',sec,'S')'Z</time>'schluss
rc = lineout(outfile,lout)
end
/* Schlusszeilen ausgeben */
lout = line
rc = lineout(outfile,lout)
do while lines(infile)>0
line = linein(infile)
lout = line
rc = lineout(outfile,lout)
end