I've written piles of "Direct PostScript" code for the NeWS window system -- http://en.wikipedia.org/wiki/NeWS ...

Pie menu widget: http://www.donhopkins.com/home/code/piemenu.ps.txt

PizzaTool graphical Pizza ordering gui: http://www.donhopkins.com/home/code/pizzatool.ps.txt Illustration: http://www.donhopkins.com/home/catalog/images/pizzatool.gif

VT100 terminal emulator: http://www.donhopkins.com/home/code/newterm.ps.txt

UniPress (Gosling) Emacs display driver: http://www.donhopkins.com/home/code/emacs.ps.txt

Metacircular PostScript interpreter: http://www.donhopkins.com/home/code/ps.ps.txt

PSIBER Space Deck (visual PostScript debugger and programming environment): http://www.donhopkins.com/home/code/litecyber.ps.txt More about that: http://www.donhopkins.com/drupal/node/97

A lunar lander game James Gosling wrote in 1988: http://www.donhopkins.com/home/code/lander.ps.txt

HeapSort by Owen Densmore: http://www.donhopkins.com/home/code/heapsort.ps.txt

QuickSort by Don Woods (an incredibly twisty maze of stack manipulation, by the Adventure dude): http://www.donhopkins.com/home/code/quicksort.ps.txt

BubbleSort by Bobo Leffler (he was afraid this might come back to haunt him): http://www.donhopkins.com/home/code/bubblesort.ps.txt