Moin!
Wie lege ich ein einzelnes Bit im Eram ab?
In solchen Fällen habe ich mir bisher immer damit geholfen , daß ich im Hauptprogramm ein bit in ein Hilfsbyte kopiert habe, um das Hilfsbyte dann als Eram Byte abzuspeichern.
Kann man das Bit nicht DIREKT im Eram ablegen? Folgender Code funktioniert. Nach dem Neustart leuchtet die LED oder nicht- je nachdem wie sie zuvor getogglet wurde.
Wie erspare ich mir nun den Umweg über Bit-->> byte--> Byte Eram? Ich will Bit--> Bit Eram!
$regfile = "m328pdef.dat"
$crystal = 16000000
$hwstack = 100
$swstack = 100
$framesize = 100
Ddrd = &B11101111
Ddrb = &B11111111
Ddrc = &B11111111
led alias portb.0
Taster Alias Pind.4
config debounce = 20
dim LED_eram as eram byte
Portd.4 = 1
if led_eram > 1 then
led= 1
else
led= 0
end if
do
Debounce Taster , 0 , Led_check , Sub
Loop
led_check:
toggle led
if led= 1 then
led_eram=2
else
led_eram = 1
end if
Return
Wie lege ich ein einzelnes Bit im Eram ab?
In solchen Fällen habe ich mir bisher immer damit geholfen , daß ich im Hauptprogramm ein bit in ein Hilfsbyte kopiert habe, um das Hilfsbyte dann als Eram Byte abzuspeichern.
Kann man das Bit nicht DIREKT im Eram ablegen? Folgender Code funktioniert. Nach dem Neustart leuchtet die LED oder nicht- je nachdem wie sie zuvor getogglet wurde.
Wie erspare ich mir nun den Umweg über Bit-->> byte--> Byte Eram? Ich will Bit--> Bit Eram!
$regfile = "m328pdef.dat"
$crystal = 16000000
$hwstack = 100
$swstack = 100
$framesize = 100
Ddrd = &B11101111
Ddrb = &B11111111
Ddrc = &B11111111
led alias portb.0
Taster Alias Pind.4
config debounce = 20
dim LED_eram as eram byte
Portd.4 = 1
if led_eram > 1 then
led= 1
else
led= 0
end if
do
Debounce Taster , 0 , Led_check , Sub
Loop
led_check:
toggle led
if led= 1 then
led_eram=2
else
led_eram = 1
end if
Return