chose/extra/list-abs/list-nth.pd

#N canvas 0 0 570 388 10;
#X obj 116 86 list;
#X msg 203 167 set \, adddollar \$1;
#X obj 116 259 outlet;
#X obj 116 57 inlet;
#X obj 171 88 f \$1;
#X obj 217 58 loadbang;
#X obj 171 57 inlet;
#X obj 171 111 moses;
#X obj 203 133 + 1;
#X msg 171 145 set;
#X msg 116 227;
#X connect 0 0 10 0;
#X connect 1 0 10 0;
#X connect 3 0 0 0;
#X connect 4 0 7 0;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 7 0 9 0;
#X connect 7 1 8 0;
#X connect 8 0 1 0;
#X connect 9 0 10 0;
#X connect 10 0 2 0;