Config PortB=252
Config PortD=64

Do
	a=Getadc(0)
	a=a/103
	a=Lookup(a,LED)
	PortD=a
	a=a*2
	a=a*2
	PortB=a
Loop
End

LED:
Data 63%,6%,91%,79%,102%,109%,125%,39%,127%,111%