Mit Taster von einem Loop zum nächsten springen

[peterfido]

Nimm keine Loops, nimm Subs.

PseudoCode:

do
    If taster then incr Modus
   If Modus > AnzahlModi then Modus=1
    select case modus
      case 1
                 Gosub Lichteffekt1
      case 2
                 Gosub Lichteffekt2

   end select

loop
end

Lichteffekt1:
...
return

Licheffekt2:
...
return