fp = OpenHiddenFile(name, "w");
fp = OpenHiddenFile(name, TXT_W);
PUBLIC FILE *LYNewTxtFile ARGS1(char *, name){    FILE *fp;#ifdef VMS    fp = fopen (name, "w", "shr=get");    chmod(name, HIDE_CHMOD);#else    SetDefaultMode(O_TEXT);    fp = OpenHiddenFile(name, "w");    SetDefaultMode(O_BINARY);#endif    return fp;}