ATNEL tech-forum

Re: Instrukcja Incr i Decr warunek jak napisać

2013-07-17T18:31:47+01:00

Nie możesz nić zrobić bo program przestał się wykonywać.
Nie dałeś return na końcu pod podprogramów.
po linii 46 oraz 52 dodaj return i usuń end z linii 53
_----edit----- dodane po czasie--------
W tym momencie program wykonuje się tylko raz po naciśnięciu przycisku
Polecam używanie symulatora wbudowane w kompilator.
Pozwoli ci na przetestowanie i rozwiązanie 99% twoich problemów.
Jeśli nie wiesz jak go używać pytaj.

Statystyki: Napisane przez pikczu — 17 lip 2013, o 18:31

Re: Instrukcja Incr i Decr warunek jak napisać

2013-07-14T08:42:53+01:00

Bo z tego co pamiętam nie można operować bezpośrednio na zmiennych zapisanych w eepromie. Przynajmniej ja jak chciałem to robić to nie dało rady.
Jeśli ja chcę coś zapisywać w eepromie co się zmienia to daję daną zmienną do eeprom ale dodaję jednocześnie zmienną na bieżące obliczenia. Wtedy u mnie wygląda to tak:

[syntax=basic4gl]Dim zmienna as byte
Dim zmienna_eprom as eram byte at &h00 'tu adres zależy od ilości zmiennych i ich wielkości
'albo je adresuję pamiętając która gdzie, alo nie adresuję wcale
'a kompilator sam je zaadresuje i działa to u mnie bardzo dobrze[/syntax]

Teraz obliczenia robię na zmiennej w programie a na koniec wpisuję do zmiennej_eprom a wygląda to tak:

[syntax=basic4gl]Readeeprom zmienna, zmienna_eprom

zmienna = zmienna + 30 'tu wykonuję działania na zwykłej zmiennej
zmienna = zmienna / 2 'tu wykonuję działania na zwykłej zmiennej
zmienna_eprom = zmienna 'tu przepisuję wartość obliczeń do zmiennej w eepromie

Writeeeprom zmienna, zmienna_eprom 'i dopiero na rządanie wpisuję do eepromu[/syntax]

Taki zabieg z wpisywaniem zmiennej na rządanie pozwoli na max zaoszczędzenie cykli zapisu do eepromu co jest bardzo istotne.

Statystyki: Napisane przez matrix — 14 lip 2013, o 08:42

Re: Instrukcja Incr i Decr warunek jak napisać

2013-07-14T07:06:39+01:00

Próbuje to napisać od początku[syntax=basic4gl]$regfile = "m644pdef.dat" ' specify the used micro
$crystal = 16000000
$baud = 9600
$hwstack = 64
$swstack = 64
$framesize = 64

'-----------------------------------------------------------------
'konfiguracja wyświetlacza
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Porta.4 , Db5 = Porta.5 , Db6 = Porta.6 , Db7 = Porta.7 , E = Porta.3 , Rs = Porta.2

'-----------------------------------------------------------------

Dim A As Byte
Dim Bank_memory As Byte
Config Portd.0 = Input
Config Portd.1 = Input
Config Portd.2 = Input
Config Portd.3 = Input
Config Portd.4 = Input
Config Portd.5 = Input
Config Portd.6 = Input
Config Portd.7 = Input

Portd = &B11111111

Cls
Readeeprom Bank_memory , 250
'assign value to a

Do 'begin a do..loop

Debounce Pind.0 , 0 , Minus , Sub
Debounce Pind.1 , 0 , Plus , Sub

Loop
End

Minus:
If Pind.0 = 0 Then

Decr Bank_memory : Locate 1 , 1 : Lcd "M " ; Bank_memory

End If :
Plus:

If Pind.1 = 0 Then
Incr Bank_memory : Locate 1 , 1 : Lcd "M " ; Bank_memory

End If
End[/syntax]
a teraz wyświetla mi się tylko wartość zmiennej Bank_memory nie mogę zwiększać zmniejszać za pomocą klawiszy tej wartości

Statystyki: Napisane przez slawek3000 — 14 lip 2013, o 07:06

Re: Instrukcja Incr i Decr warunek jak napisać

2013-07-13T20:40:52+01:00

Opisz kłopot dokładniej bo to co napisałeś to jakaś makabra jest. Nic po polskiemu.

Statystyki: Napisane przez matrix — 13 lip 2013, o 20:40

Instrukcja Incr i Decr warunek jak napisać

2013-07-13T17:58:08+01:00

Witam ,
mam mały problem z napisaniem warunku do instrukcji incr i decr , w kodzie programu mam dwie zmienne A i B typu byte czyli zlicza od 0 do 254 obydwie się zawsze się równają, te wartości zapisuje do pamięci eeprom procka i je odczytuje co chcę osiągnąć np. mam wartości 25 i klawiszami mogę przechodzić po tych wartościach tylko do 25, a naciskając kolejny raz mogę dojechać do wartości 254 tych zmiennych jak napisać warunek by nie przeskakiwały wartości większej od wartości zapisanej w pamięci ?

Statystyki: Napisane przez slawek3000 — 13 lip 2013, o 17:58