Ich habe es jetzt mal folgendermaßen geändert, aber es brachte auch nichts. Hm bleibt nun die fRage was mit diesem Initfilesystem nicht richtig ist.
Naja trotzdem danke, immerhin beruhigt es mich schon fast,dass ein weitaus erfahrener es auch nicht gleich sieht. Wobei..nein eigentlich ist das letztlich doch eher beunruhigend.



Code:
'---------------------------------------------------------------------------------------------------------------------------------------------------
'Hauptprogramm
'---------------------------------------------------------------------------------------------------------------------------------------------------




'---------------------------SD Anfang---------------------------------------------
$include "Config_MMC.BAS"
$include "CONFIG_AVR-DOS.BAS"

IF Gbdriveerror <> 0 THEN
   Lcd_string = "Drive error" : Lx1 = 1 : Ly1 = 50 : Fontsize = 1 : Lcd_fcolor = Rot : Lcd_bcolor = Weiss
   Gosub Lcd_print
END IF

Btemp1 = Initfilesystem(1)

IF Btemp1 <> 0 THEN
   Lcd_string = "File system Error" : Lx1 = 1 : Ly1 = 51 : Fontsize = 1 : Lcd_fcolor = Rot : Lcd_bcolor = Weiss
   Gosub Lcd_print
ELSE
   Lcd_string = "Card setup OK " : Lx1 = 1 : Ly1 = 52 : Fontsize = 1 : Lcd_fcolor = Rot : Lcd_bcolor = Weiss
   Gosub Lcd_print
END IF

Wait 3
Gosub Lcd_cls


Do


Voutxw = Getadc(0)
Waitms 10


Voutx = Voutxw / 1024

Voutx = Voutx * Referenzspannung


Voutxstr = Fusing(voutx , "#.####")


Lcd_string = "Voutx " : Lx1 = 2 : Ly1 = 50 : Fontsize = 1 : Lcd_fcolor = Rot : Lcd_bcolor = Weiss
Gosub Lcd_print
Lcd_string = Voutxstr : Lx1 = 8 : Ly1 = 50 : Fontsize = 1 : Lcd_fcolor = Rot : Lcd_bcolor = Weiss
Gosub Lcd_print

Open "Daten.txt" For Append As #10

'Hier werden einmal die daten auf die Karte geschrieben


Close #10
                                                 'Datei auf SD Karte schließen
Loop


End

würde es vielleicht helfen wenn ich hier mal den kompletten code poste?