!Macro zum Schreiben von Daten
!lmuss im Arbeitsverzeichnis mit *.mac liegen

*cfopen, ergebnis,txt,
*do, k, nr, nr
	*do, i, 1, 1
		*vwrite, rforce1(i,2,k), rforce1(i,3,k), rforce1(i,1,k), rforce1(i,4,k)		!Daten aus Array
		(3x,F10.2,3x,F10.4,3x,F10.1,3x,F10.6,)						!Formatierung der Daten, ganz wichtig!
	*enddo
*enddo
*cfclose