variable loopy

BEGIN 12 1 loopy +! WHILE 10 loopy @ <> REPEAT
trace stack