Jeśli chcesz wziąć udział w dyskusjach na forum - zaloguj się. Jeżeli nie masz loginu - poproś o członkostwo.

• Zapomniane hasło?
• Poproś o członkostwo

1. • 1:
      
     CommentAuthorbandolier
   • CommentTime31 Mar 2018

    
   Piszę w Turbo Basicu quiz w którym będzie się wybierało odpowiedzi pod klawiszami 1,2 i 3
   Stosuje komendę GET i odnośniki w procedurach.
   Chciałem "uodpornić" program na wciśnięcie dowolnego innego przycisku po przez zastosowanie takiej procedury
   
   5 PROC KLAWISZ
   10 GET KEY
   15 IF KEY=49 THEN PRINT ""
   20 IF KEY<>49 OR 50 OR 51 THEN GOTO 10
   25 ENDPROC
   
   
   Niestety to blokuje mi powrót do głównego programu
   Ma ktoś jakiś pomysł? Pozdrawiam
2. • 2:
      
     CommentAuthorlarek
   • CommentTime31 Mar 2018 zmieniony

    
   Jeśli procedura ma czekać na wciśnięcie 1, 2 lub 3 i żadnego innego to:
   
   100 PROC KLAWISZ: REPEAT: GET KEY: UNTIL KEY=49 OR KEY=50 OR KEY=51: ENDPROC
   
   po powrocie z procedury mamy w KEY kod klawisza (49=1, 50=2, 51=3)
   
   
   
   PS.
   Wydaje mi się, że Twoja procedura też będzie działać, jeśli tylko poprawisz warunki w linii 20
   
   20 IF KEY<>49 AND KEY<>50 AND KEY<>51 THEN 10
3. • 3:
      
     CommentAuthorbandolier
   • CommentTime31 Mar 2018

    
   Pomyślałem Larek będzie wiedział. Ale że mi odpisze o drugiej w nocy to nie. Dzięki;)
4. • 4:
      
     CommentAuthorlarek
   • CommentTime31 Mar 2018

    
   :)
5. • 5:
      
     CommentAuthorbandolier
   • CommentTime31 Mar 2018

    
   Zastąpiłem OR na AND i działa. Jeszcze raz dzięki Larku.