末尾に「改行」を1つ、入れる場合は、最後の行から2行上の
------------------------------------------------------------------
    sprintf(str,"（%s）", p1);
------------------------------------------------------------------
を
------------------------------------------------------------------
    sprintf(str,"（%s）\n", p1);
------------------------------------------------------------------
に、変更されるとよいです。

------------------------------------------------------------------
main()
{
    char *mark = "■"; // ここへ冒頭へ入力したい文字を指定してください。
    char *p1, *p2, str[5000], fname[300];
    
    if(Block() == 0 || Block() == 3)
    {
      Message("範囲が選択されていません。");
      return;
    }
    SetClipText(mark);
    GetSelText(str, 5000);
    AddClipText(str);
    Select(0);
    GetFileName(fname);
    p1 = Strrchr(fname, '\\'); // フォルダ名の位置
    p2 = Strchr(fname, '.');   // 拡張子の位置
    if(p1 != NULL)
      p1++;
    else
      p1 = fname;
    if(p2 != NULL)
      *p2 = '\0';
    sprintf(str,"（%s）", p1);
    AddClipText(str);
}
------------------------------------------------------------------

------------------------------------------------------------------
    char *sdir = "f:\\tex";
    FILE *out, *in;
    int size;
    char addfname[300], buf[3000];
    
    GetFileName(fname);
    p = strrchr(fname, '\\');
    strcpy(addfname, sdir);
    strcat(addfname, p);
    if((in = fopen(fname, "r")) == NULL)
    {
      return 0;
    }
    if((out = fopen(addfname, "w")) == NULL) // 書き込むファイルを開く
    {
      Message("データを保存しますので、メモリカードを挿入してください。");
      if((out = fopen(addfname, "w")) == NULL) // 書き込むファイルを開く
      {
        fclose(in)
        return 0;
      }
    }
    while(1)
    {
      size = fread(buf, 1, 3000, in); // ファイルの読み込み
      fwrite(buf, size, 1, out); // ファイルへ書き込み
      if(size < 3000)
        break;
    }
    fclose(in);
    fclose(out);
------------------------------------------------------------------

------------------------------------------------------------------
main()
{
    Top();
    for(;;)
    {
      if(KbHit() == 0x1b) // [ESC]が押されたら中断
        break;
      if(Linestat() < 0) // EO
        break;
      if(Code() == '(')
      {
        Del();
        PutChr(0x8169); // （ = 0x8169
      }
      else if(Code() == ')')
      {
        Del();
        PutChr(0x816a); // ） = 0x816a
      }
      else
        Right();
    }
}
------------------------------------------------------------------

------------------------------------------------------------------
    char *sdir = "f:\\tex";
    FILE *out, *in;
    int size;
    char addfname[300], buf[3000];
    
    GetFileName(fname);
    p = strrchr(fname, '\\');
    strcpy(addfname, sdir);
    strcat(addfname, p);
    if((in = fopen(fname, "r")) == NULL)
    {
      return 0;
    }
    if((out = fopen(addfname, "w")) == NULL) // 書き込むファイルを開く
    {
      fclose(in)
      return 0;
    }
    while(1)
    {
      size = fread(buf, 1, 3000, in); // ファイルの読み込み
      fwrite(buf, size, 1, out); // ファイルへ書き込み
      if(size < 3000)
        break;
    }
    fclose(in);
    fclose(out);
------------------------------------------------------------------

------------------------------------------------------------------
    char *sdir = "f:\\mmeditor";
    FILE *out, *in;
    int size;
    char addfname[300], buf[3000];

    GetFileName(fname);
    p = strrchr(fname, '\\');
    strcpy(addfname, sdir);
    strcat(addfname, p);
    if((in = fopen(fname, "r")) == NULL)
      return 0;
    if((out = fopen(addfname, "w")) == NULL) // 書き込むファイルを開く
    {
      fclose(in);
      return 0;
    }
    while(1)
    {
      size = fread(buf, 1, 3000, in); // ファイルの読み込み
      fwrite(buf, size, 1, out); // ファイルへ書き込み
      if(size < 3000)
        break;
    }
    fclose(in);
    fclose(out);
------------------------------------------------------------------

------------------------------------------------------------------
main()
{
    Preview();
}
------------------------------------------------------------------

------------------------------------------------------------------
// 空行を削除するマクロです
main()
{
    Top();
    while(Tcode() != 0) // [EOF]まで
    {
      if(KbHit() == 0x1b) // [ESC]が押された場合は終了
        break;
      while(Tcode() == 1)
        Del(); // 空行を削除
      REdge(); // 論理行末へ
      Right();
    }
    OnseiOut("終了");
}
------------------------------------------------------------------

------------------------------------------------------------------
// 論理行の20行ごとに空行を入れるマクロです
#define LINE 20
main()
{
    int cnt = 0;
    Top();
    while(Tcode() != 0) // [EOF]まで
    {
      if(KbHit() == 0x1b) // [ESC]が押された場合は終了
        break;
      REdge(); // 論理行末へ
      cnt++;
      if(cnt == LINE)
      {
        Ret();
        cnt = 0;
      }
      Right();
    }
}
------------------------------------------------------------------
// 空行を削除するマクロです
main()
{
    Top();
    while(Tcode() != 0) // [EOF]まで
    {
      if(KbHit() == 0x1b) // [ESC]が押された場合は終了
        break;
      while(Tcode() == 1)
        Del(); // 空行を削除
      REdge(); // 論理行末へ
      Right();
    }
}
------------------------------------------------------------------