make "a 0 foreach reverse parse rcs 1e4[seta a+? pr a]bye