'BASIC converted from flowchart:
'Untitled Flowchart:2
'Converted on 13/04/2008 at 16:00:13
main:
let b0=3
label_12D: readadc 0,b1
let w3=b0*b1
debug w3
gosub left_to_right
readadc 0,b1
let w3=b0*b1
gosub right_to_left
goto label_12D
left_to_right:
let pins = 2 '...