The only significant program I know of written in Forth is the 80s game Starflight. You fly around the galaxy, exploring planets (each procedurally generated) and eventually solving a mystery. And ... I can't think of any other program.