; 3x pásmová propust 1,2,3kHz s přesahem. Indikace 3x LED ; Použít tónový generátor low 1,2,4 high 0 ;rožni LED na C0 wait 3 ;pauza sec low 0 ;-------------------------------------- bas: count C.3,10,W1 IF w1=>6 AND w1=<16 THEN high 0 GOTO stred endif IF pinC.0=0 THEN stred FOR b10=1 TO 49 STEP 1 toggle 0 pause 5 NEXT stred: count C.3,10,W1 IF w1=>16 AND w1=<26 THEN high 1 GOTO vysky endif IF pinC.1=0 THEN vysky FOR b10=1 TO 49 STEP 1 toggle 1 pause 5 NEXT vysky: count C.3,10,W1 IF w1=>26 AND w1=<34 THEN high 2 GOTO BAS endif IF pinC.2=0 THEN BAS FOR b10=1 TO 49 STEP 1 toggle 2 pause 5 NEXT GOTO bas: end