10  HOME 
 20  PRINT  CHR$ (4);"BLOAD UNIPROX"
 30  CALL 32768
 40  PRINT  CHR$ (4);"BSAVE UNIROM,A$2000,L$1FFF"