stack
1
{–pop– –pop– ct_str1 –exch– 0 –exch– –put– ct_str1 –show–
{_ct_na _ct_i –get–} –stopped– {–pop– –pop–} {_ct_x _ct_y
–moveto– 0 –rmoveto–} –ifelse– /_ct_i _ct_i 1 –add– –def–
–currentpoint– /_ct_y –exch– –def– /_ct_x –exch– –def–}

Stack:
/d
{–pop– –pop– ct_str1 –exch– 0 –exch– –put– ct_str1 –show–
{_ct_na _ct_i –get–} –stopped– {–pop– –pop–} {_ct_x _ct_y
–moveto– 0 –rmoveto–} –ifelse– /_ct_i _ct_i 1 –add– –def–
–currentpoint– /_ct_y –exch– –def– /_ct_x –exch– –def–}

%%[ Flushing: rest of job (to end-of-file) will be ignored ]%%
%%[ Warning: PostScript error. No PDF file produced. ] %%
Distill Time: 00 Hour(s) : 00 Minute(s) : 00.921 Second(s)
**** End of Job ****