'setfreq m8

loop:
'let pins=%00000000
input 4
low 0
low 1
low 2
'goto vtest2

readadc 4,b4
'debug b4

'goto loop

if b4<35 then v1
if b4<41 then v2
if b4<58 then v3
if b4<78 then v4
if b4<93 then v5
if b4<113 then v6
if b4<131 then v7
if b4<151 then v8
if b4<167 then bl1
if b4<188 then bl2
if b4<206 then bl3
if b4<223 then bl4
if b4<242 then bl5
if b4<260 then bl6

goto loop

   'subs


vtest2:
high 2       'red
pause 180
high 2       'orange red-green
pwm 0,32,50
high 2       'yellow red-green
pwm 0,85,50
high 0      'green
pause 180
low 2
high 0       'blue-green
pwm 1,60,50
low 0
high 1       'blue
pause 180
'high 1
'high 2       'white
'pwm 0,180,50
'low 0
'low 1
high 2       'violet red-blue
pwm 1,65,50
goto loop


bl1:
high 2       'red
pause 60
low 2
pause 220
goto loop

bl2:
high 2       'orange 
pwm 0,32,60
low 2
low 0
pause 220
goto loop

bl3:
high 2       'yellow red-green
pwm 0,85,60
low 2
low 0
pause 220
goto loop

bl4:
high 0      'green
pause 60
low 0
pause 220
goto loop

bl5:
high 1       'blue
pause 60
low 1
pause 220
goto loop

bl6:
high 1
high 2       'white
pwm 0,120,40
low 1
low 2
low 0
pause 220
goto loop




v4:
high 0      'green
pause 240
goto loop

v1:
high 2       'red
pause 240
goto loop

v6:
high 1       'blue
pause 240
goto loop

v7:
high 2       'violet red-blue
pwm 1,65,200
goto loop

v2:
high 2       'orange red-green
pwm 0,32,200
goto loop

v3:
high 2       'yellow red-green
pwm 0,85,200
goto loop

v8:
high 1
high 2       'white
pwm 0,120,200
pause 5
goto loop

v5:
high 0       'blue-green
pwm 1,60,200
goto loop