Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

[BASCOM] Proste Menu na LCD

michm4 19 Kwi 2012 21:06 3675 6
  • #1 19 Kwi 2012 21:06
    michm4
    Poziom 12  

    Witam
    Chcę zrobić proste menu ale mam problem
    Napisałem taki program ale on nie działa i nie wiem co jest źle

    Kod: basic4gl
    Zaloguj się, aby zobaczyć kod


    [BASCOM] Proste Menu na LCD [BASCOM] Proste Menu na LCD

    Chcę zrobić tak, że jak nacisnę przycisk P1 to wtedy ta strzałka > przejdzie na inne menu.

    np. Jest tak jak na zdjęciu 1 to jak nacisnę przycisk to ma być tak jak na zdjęciu 2 a jak następny raz nacisnę to tak jak na zdjęciu 1 :)

    0 6
  • #2 19 Kwi 2012 21:44
    starob
    Poziom 25  

    W pierwszym if zmieniasz na Pozycja =2 a za chwilę w drugim sprawdzasz If Pozycja = 2 i wracasz do Pozycja =1.
    Nie znam Bascom ale odpowiedniejszym w tym przypadku sprawdzeniem będzie instrukcja Select Case

    0
  • #3 19 Kwi 2012 22:47
    Kuniarz
    Moderator Projektowanie

    Sprawdzasz P1 czy jest wciśnięty, po czym procedura leci dalej, nie czekając na puszczenie przycisku, do tego w jednym warunku zmieniasz "pozycja" na 2, za chwile sprawdzasz, czy jest 2 i zmieniasz na 1... źle i nie konsekwentnie.
    zmień:

    Code:

    If P1 = 0 Then
    '****  tutaj dodaj czekanie na puszczenie przycisku - np pętle z której wyjdziesz jak P1 będzie równe 1, czyli przycisk puszczony. *****
       If Pozycja = 1 Then
          Locate 1 , 1
          Lcd " "
          Locate 2 , 1
          Lcd ">"
          Pozycja = 2
    '**** skocz do początku petli  ****
       End If

       If Pozycja = 2 Then
          Locate 2 , 1
          Lcd " "
          Locate 1 , 1
          Lcd ">"
          Pozycja = 1
    '**** skocz do początku petli  ****
       End If
    End If

    0
  • #4 20 Kwi 2012 15:43
    michm4
    Poziom 12  

    to co trzeba zrobić żeby działało ?

    0
  • #6 20 Kwi 2012 15:50
    michm4
    Poziom 12  

    ależ ty zabawny

    0