Yelp3:
Lookup2 CounterA,[366,425,483,591,664,760,886,967,1070,1182,1330],Frequency
pause 10
lookup2 countera,[1330,1182,1070,967,886,760,664,591,483,425,366],Frequency

Freqout PORTB.0,16,Frequency
if PORTB.5=0 then
CounterA = CounterA + 1
if Countera < 22 then goto Yelp3
endif