provide ascii-palette "ascii.pfo" pfo " `.~:;I=i+oO08#M" constant ascii-palette # read from a linux vcs device ascii/mono/80/25 variable! vcs-type : read-ascii-vcs vcs-type @ read-raw-packet ;