PSET "hat" graphic from old ad in BYTE

[dcromley]

Years ago there were ads in computer magazines, I think including BYTE, that had a neat little graphic BASIC program creating a "hat", one pixel at a time.  I don't know if it advertised hardware or software or Geico, but I entered it and ran it and was impressed. 

This code is my recreation of it, but it's not as good as the original.  I think the colors are right, but the texture is wrong and the backside shows through.  The original somehow PSET the near stuff over the far stuff.  When it ran on a BASIC interpreter on a 2MHz computer, is was a pleasure to watch it for the many seconds it took to run.  With the QB64 compiler on a xGHz computer it is TOO FAST.  I put in a _DELAY .03 to allow the thrill to last 12-seconds or so.

I would like to get the original code.  If somebody else was impressed with it like I was and has the magazine issue or has the code on a 8" floppy, I would appreciate it.  I've browsed a few issues from https://archive.org/download/BYTE-MAGAZINE-COMPLETE but haven't come across it.

(Are images restricted to 1x1?  Is there a way to get the images side by side?)