rebol[]while[a: input][print either #"h"= pick a 1[remove a][a]]