met pushbutton door programma 'skippen'...

Ik heb een schakelingetje gebouwd, waarmee ik met een stappenschakelaar 4 verschillende LEDjes kan laten knipperen. Is heel simpel:

stand 1 = LED 1 laten knipperen
...
...
stand 4 = LED 4 laten knipperen

Code is als volgt:


while 1 = 1

  while sw1_1 = 0
    cls
    print at 1, 3, "Programma  1"
    print at 2, 2, "knipperen LED1"
    high led1
    delayms tijdaan
    low led1
    delayms tijduit
  wend 

  ...
  ...
  ...

  while SW1_4 = 0
    cls
    print at 1, 3, "Programma 4"
    print at 2, 2, "knipperen LED4"
    high led4
    delayms tijdaan
    low led4
    delayms tijduit
  wend
        

wend

end

Nu wil ik alleen die stappenschakelaar vervangen voor een enkelpolige pushbutton, waarmee ik met elke keer op de knop te drukken naar het volgende programma 'skip'...

Code zal vast en zeker nog wel korter kunnen, maar daar wil ik me later pas mee bezig houden. Eerst maar zien dat het op deze manier werkt en dat ik de code begrijp ha ha :-)
Ben ook bezig met de mini-cursus PIC BASIC maar daar kom ik eigenlijk nog niet verder mee voor het bovenstaande idee.

Hoe kan ik dit het beste programmeren in Pic Basic?

kun je niet een variabelen aanmaken. Deze variabelen moet je dan kunnen veranderen als de de toets indrukt. Als je deze toets dan indrukt moet deze bijv. met 1 verhoogd worden als de variabele 4 word moet ie natuurlijk ff naar 0 springen.

en dan doe je gewoon als variabele 0 is dan led1 knipperen variabele 1 led 2 enz.

Ik ga het niet helemaal uitpluizen maar denk in deze richting:


CLS
PRINT AT 1, 6, "Programma"
PRINT AT 2, 2, "knipperen LED"

WHILE 1 = 1

  Elke druk van de pushbutton verhoogt 'Variabele'.
  Als 'Variabele' groter wordt dan 4, dan 'Variabele' is 1.

  PRINT AT 1, 15, @Variabele
  PRINT AT 2, 15, @Variabele

  SELECT CASE Variabele
    CASE 1
      Knipper hier LED 1
    .
    .
    CASE 4
      Knipper hier LED 4

  END SELECT
WEND

Het kan overigens nog eenvoudiger, maar dan wordt het weer moeilijker te begrijpen.
(Cursor posities heb ik geschat)

Zal weer een weekendje lekker puzzelen worden :-P

Ik denk wel dat ik een beetje begrijp welke richting ik op moet. Zal ook hoofdstuk 6 eens op m'n gemak doornemen. Staat geloof ik meer uitgelegd over SELECT CASE etc.