picolisp: implement (adc-getsamples)