/* 名前変更機構 */ system0("RENAME \"");system1(run);system1("\\");
system1(entry);system1("\" \"｜");
if(strcmp(getenv("REGION"),"＊")==0||strcmp(getenv("REGION"),"※")==0)system1(getenv("REGION")); else system1("／");
/* 曜日先頭機構 */ system1("#");system1(xatch);printf("＠変形曜日%s[%d]:\n", xatch, strlen(xatch));
/* 2020年問題解消 */ cstamp[1]=cstamp[2];cstamp[2]=cstamp[3];cstamp[0]=39;cstamp[3]=39;
system1(cstamp);system1(getenv("REGION"));
system1("⇒");system1(getenv("REGION"));
system1(wstamp+8);system1(getenv("REGION"));