My initial attempt at trying to order pizza from within Vim(github.com)

  % Fork a process to sprinkle a topping on the pizza in the background.
  %
  /StartSprinkle { % topping => -
    { % fork:
      gsave
       /PaintSetup self send
       /ClipCrust self send
       { % send to topping:
         clear /paint self send
       } exch send
       Sprinklers currentprocess undef
      grestore
    } fork
    Sprinklers exch dup put pop
  } def

  % Kill all the processes sprinkling toppings.
  %
  /StopSprinklers { % - => -
    [Sprinklers {pop} forall] {killprocess} forall
    Sprinklers cleanoutdict
  } def

  % Start spinning the pizza, to cook it.
  %
  /StartSpin { % - => -
    /StopSpin self send
    /SpinProcess { % fork:
      clear
      /PaintSetup self send
      /ClipCrust self send
      initmatrix
      { % loop:
        SpinPause { pause } repeat
        /Spin self send
      } loop
      SpinProcess currentprocess eq { % if:
        /SpinProcess unpromote
      } if
    } fork promote
  } def

  % Stop spinning the pizza, before eating it.
  %
  /StopSpin { % - => -
    SpinProcess null ne { % if:
      SpinProcess killprocess
      /SpinProcess unpromote
    } if
  } def

  % Spin the pizza around a bit.
  %
  /Spin { % - => -
    gsave
      /size self send         % w h
      2 div exch 2 div exch   % w/2 h/2
      2 copy translate
      SpinAngle random add rotate
      neg exch neg exch translate  %
      self imagecanvas
     grestore
  } def