foreach map[-lshift 1 ?-1]parse rcs 999[(pr ?[to]-(1+?))]bye