ATNEL tech-forum

Re: ZMIANA FUNKCJI KLAWISZY ZE WZGLĘDU NA POZYCJE

2014-10-15T09:36:45+01:00

Niveasoft napisał(a):

...chyba, że przyśniło Ci się żeby dany przycisk znaczył coś zależnie od tego na której pozycji Menu jesteś. Bez aliasów jest to bardzo mało czytelne rozwiązanie. Polecam więc stosowanie tych nazw Stałych zamiast kolejnych cyferek.

Właśnie o to mi chodzi przycisk ma mieć zależną akcję w zależności w której pozycji menu jestem dlatego akcje w pętli case są podstawione zmiennymi .
Zobaczę ten rozwiązanie co podałeś i napisze co mi wyszło dzięki.

Statystyki: Napisane przez driver0207 — 15 paź 2014, o 09:36

Re: ZMIANA FUNKCJI KLAWISZY ZE WZGLĘDU NA POZYCJE

2014-10-14T23:53:47+01:00

Hmm rozumiem ciebie kolego że preferujesz jeżyk c niestety nie jestem jeszcze dobry w tym języku dlatego piszęw bascomie jak byś mógł to przenieść na ten język bym był bardzo wdzięczny.

Statystyki: Napisane przez driver0207 — 14 paź 2014, o 23:53

Re: ZMIANA FUNKCJI KLAWISZY ZE WZGLĘDU NA POZYCJE

2014-10-14T22:56:12+01:00

Myślę, że zrobisz to dzięki enum (typ wyliczeniowy) i instrukcji SWITCH. Tak na szybko mój pomysł:

[syntax=c]enum klaw(klawisz_0, klawisz_1, klawisz_2, klawisz 3);

//klawisz_0 jest bezczynny - wyjaśnienie dalej

switch(klaw)
{
case klawisz_1;
{
klaw=klawisz_0; //celowe przypisanie aby nic sie nie wykonało

if(klaw==klawisz_1)
{
licznik++;
}

else if (klawisz==klawisz_2)
{
inne instrukcje;
}

else if (klawisz==klawisz_3)
{
jeszcze inne instrukcje;
}

break;
}

case klawisz_2;
{
klaw=klawisz_0;

if(klaw==klawisz_1)
{
licznik++;
}

else if (klawisz==klawisz_2)
{
inne instrukcje;
}

else if (klawisz==klawisz_3)
{
jeszcze inne instrukcje;
}

break;
}

case klawisz_3;
{
ITD.[/syntax]

Statystyki: Napisane przez Lex_ — 14 paź 2014, o 22:56

Re: ZMIANA FUNKCJI KLAWISZY ZE WZGLĘDU NA POZYCJE

2014-10-14T21:52:27+01:00

Wyobraźmy sobie że mamy kilka pozycji menu i pod każdą pozycją jest najpierw przekazywana funkcja klawisza do zmiennej następnie wywoływana funkcja klawisz . Pod każdą pozycją menu będą inne funkcje tych klawiszy np incr licznik lub call czy inne.
Chcę poprostu by podprogram klawisze służył za uniwersalną bibliotekę tych klawiszy. Bascom niestety gdy zrobiłem tak jak w załączonym kodzie wywala mi błędy .

Statystyki: Napisane przez driver0207 — 14 paź 2014, o 21:52

ZMIANA FUNKCJI KLAWISZY ZE WZGLĘDU NA POZYCJE

2014-10-14T21:08:44+01:00

[syntax=basic4gl]$crystal = 8000000
Config Lcdpin = Pin , E = Portd.0 , Rs = Portd.1 , Db4 = Portd.2 , Db5 = Portd.3 , Db6 = Portd.4 , Db7 = Portd.5
Config Lcd = 16 * 2
Config Portb = &B00000000
Portb = &B00001110
Dim F_klawisza1 As String * 20
Dim F_klawisza2 As String * 20
Dim F_klawisza3 As String * 20

Declare Sub Klawisze
Dim Licznik As Byte

1:
Do
F_klawisza1 = Licznik = 0
F_klawisza2 = Incr Licznik
F_klawisza3 = Decr Licznik

Loop

Sub Klawisze
If Pinb <> &B00001110 Then
Waitms 120
Select Case Pinb

Case &B00001100:
F_klawisza1
Case &B00001010:
F_klawisza2
Case &B00000110:
F_klawisza3

End Select
End If
End Sub[/syntax]

TAK JAK W TYTULE I W KODZIE
Chciał bym zmieniać funkcje klawisza podstawiając je pod zmienne,
buduje menu i chciałem sobie skrócić trochę kod .
Proszę o jakieś podpowiedzi.

Statystyki: Napisane przez driver0207 — 14 paź 2014, o 21:08