Wie Daten Array in Eeprom unter Bascom ablegen??

[ipirk (Gast)]

Hallo!
Ich hab mal ne frage - wei kann ich in Bascom ein Datenarray erzeugen??

Dim EEProm_Byte as byte                   'Hilfsbyte für die EEprom com.

Dim Counter_Info as byte                  'Zähler im Program
Dim Status_Info(100) as byte              'Status von 100 Ventielen

Dim Counter_Info_eeprom as eram Byte      'Eram Speicher vom Zähler
dim Status_info_eeprom(100) as Eram Byte  'Status Speicher vom 
Ventielzustand

... im Program wird jedem Status Byte ein Wert zugewiesen, für jedes 
Status Byte wird im Program der Counter um 1 incr.

Speicherung: (erfolgt in einer Schleife bei der Counter_info immer um 1 
erhöht wird)

   EEprom_Byte = Status_info(Counter_info)
   Writeeeprom = EEProm_Byte , Status_info_eeprom(Counter_info)

end

Fehler Meldung: Numeric Parameter expected [Counter_info]


Was mach ich falsch, oder kann man die Bytes im EEprom nicht so 
behandeln wie die normalen im SRAM??

MFG

[Klaus D. (kolisson)]

Hi,

ich würde das ja eher so machen:

Dim Status_Info(100) as byte              'Status von 100 Ventielen
Dim Status_info_eeprom(100) As Eram Byte
Dim I As Byte

For I = 1 To 100

Status_info_eeprom(i) = Status_info(i)

Next I

**** und nicht vergessen : In Bascom ist das erste Arrayelement (1) und
nicht (0)



Gruss Klaus

[ipirk (Gast)]

Danke für die Antwort, aber kann man den im EEprom einfach daten 
speichern in dem man einfach

Variable_EEprom = Variable_SRam

Schreibt

Ich dachte immer man muss das so machen

Writeeeprom Variable_SRam , Variable_EEprom

oder liege ich da falsch?? (Bascom giebt mir keinen Fehler aus, aber obs 
in wirklichkeit funzt weis ich nicht - hab keine Hardware zum Testen da)

MFG