Hallo PickNick,

nun... ich habe es so wie Du vorgeschlagen hast ausprobiert. Leider hat es nicht funktioniert. kann es vielleicht daran liegen wie ich die Bits dimensioniert habe?:
Code:
Dim Ds1307_sram As Byte
Dim F_bad_pic_0 As Bit , F_kue_pic_0 As Bit , F_wo_pic_0 As Bit , F_wo_rechts_pic_0 As Bit , F_wo_mitte_pic_0 As Bit , F_wo_links_pic_0 As Bit
Müssen alle Bits in der Art:
Code:
dim F_bad_pic_0 As Bit
dim  F_kue_pic_0 As Bit 
.
.
untereinander geschrieben werden und erkennt das Bascom nur dann so?
ich habe nun es mit nem "Alias" gemacht und es funktioniert so.

Gruß MAT