8000 9 1 string cvs currentfile token print pop 2 array astore cvx 2 copy repeat 1 string dup 0 10 put print repeat