alternating case lines by pooq

d:dispterms;r:?read\-line;thru 14 do(d(supcase(r())),d(sdowncase(r())));

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page