1ON ERROR GOTO 11
   10OSCLI("DC "+STR$(H%))
   11ON ERROR OFF
   20OSCLI("SAVE raw"+STR$(H%)+" "+STR$~(G%)+" "+STR$~((!Q%) AND &FFFF))
   30CHAIN"GENDUMP4"