home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / d / dir_nm20.zip / Dir_NM_2.0 / NM-Table.c < prev    next >
C/C++ Source or Header  |  1992-07-16  |  18KB  |  616 lines
  1. /*                         ===  NM-Table.c  ===
  2.  *
  3.  * void On_Row()
  4.  * void On_Atom()
  5.  * void On_Column()
  6.  * void Un_Line()
  7.  * void Draw_Map(X,Y)
  8.  * void Draw_Table_Frame(Column_Num,Row_Num)
  9.  * void List()
  10.  * void Update_Table(Mouse_x,Mouse_y)
  11.  * void Do_Insert(Mouse_x,Mouse_y)
  12.  * void Do_Copy(Mouse_x,Mouse_y)
  13.  * void Do_Re_Name(Mouse_x,Mouse_y,Button)
  14.  * void Do_Move(Mouse_x,Mouse_y)
  15.  * void Do_Delete(Mouse_x,Mouse_y)
  16.  * void Do_Value()
  17.  * void Do_Check_Tempo(Mouse_x,Mouse_y)
  18.  * void Do_Switch(Mouse_x,Mouse_y)
  19.  * void Do_Load(Mouse_x,Mouse_y)
  20.  * void Edit_Table(Mouse_x,Mouse_y)
  21.  * void Re_New_Pos(Mouse_x,Mouse_y)
  22.  * void Add_Word(Mouse_x,Mouse_y,Capital)
  23.  * void Edit_Word(Button,Mouse_x,Mouse_y)
  24.  *
  25.  */
  26.  
  27.  
  28. #include "NM.h" 
  29.  
  30. void On_Row()
  31. {
  32.   Row_On=1;Atom_On=0;Column_On=0;Row_Id=-10;Column_Id=-10;
  33. }
  34.  
  35. void On_Atom()
  36. {
  37.   Atom_On=1;Row_On=0;Column_On=0;Row_Id=-10;Column_Id=-10;
  38. }
  39.  
  40. void On_Column()
  41. { 
  42.   Column_On=1;Row_On=0;Atom_On=0;Row_Id=-10;Column_Id=-10;
  43. }
  44.  
  45. void Un_Line()
  46. {
  47.   if (Column_On==1) Show_Column_Line=1-Show_Column_Line;
  48.   else if (Row_On==1)Show_Row_Line=1-Show_Row_Line;
  49. }
  50.  
  51. void Draw_Map(X,Y)
  52.   int X,Y;
  53. {
  54.   int i,j;
  55.  
  56.   Rub(X-2,Y-1,233,93,"MediumBlue");XSetLineAttributes(display,gc,2,0,0,0);
  57.   SetColor("DeepSkyBlue");DrawRectangle(X,Y,229,91);SetColor("ivory");
  58.   XSetLineAttributes(display,gc,1,0,0,0);S_bf=(char *)malloc(10);*S_bf='\0';
  59.   for (i=1;i<12;i++) Line(X+19*i,Y+1,X+19*i,Y+90);
  60.   for (i=1;i<5;i++) Line(X+1,Y+18*i,X+228,Y+18*i);SetColor("khaki");
  61.   for (i=0;i<5;i++) 
  62.     for (j=0;j<12;j++)
  63.       { sprintf(S_bf,"%c",Map_Letter(j,i));OutTextXY(X+6+19*j,Y+14+18*i,S_bf); }
  64. }
  65.  
  66. void Draw_Table_Frame(Column_Num,Row_Num)
  67.   int Column_Num,Row_Num;
  68. {
  69.   int i,Pos_X,Y;
  70.  
  71.   Rub(0,94,1139,768,"MediumBlue");Use_Font("7x14");
  72.   XSetLineAttributes(display,gc,2,0,0,0);
  73.   Rub(Head_Len+4,97,Table_Width-Head_Len-2,23,"MidNightBlue");
  74.   if (Row_Num>36)
  75.     {
  76.       Rub(Head_Len+4,122+36*20,Table_Width-Head_Len-2,23,"MidNightBlue");
  77.       Rub(4,122,Head_Len,36*20,"MidNightBlue");
  78.     }
  79.   else
  80.     {
  81.       Rub(Head_Len+4,122+Row_Num*20,Table_Width-Head_Len-2,23,"MidNightBlue");
  82.       Rub(4,122,Head_Len,Row_Num*20,"MidNightBlue");
  83.     }
  84.   SetColor("cyan");
  85.   if (Row_Num>36) DrawRectangle(3,96,Table_Width,49+36*20);
  86.   else DrawRectangle(3,96,Table_Width,49+Row_Num*20);
  87.   SetColor("yellow");XSetLineAttributes(display,gc,1,0,0,0);Pos_X=Head_Len+3;
  88.   for (i=Column_Pointer;i<Column_Pointer+Column_Num-1;i++)
  89.     { 
  90.       if (Show_Column_Line==1)
  91.     {
  92.       if (Row_Num>36) Line(Pos_X,97,Pos_X,144+36*20);
  93.       else Line(Pos_X,97,Pos_X,144+Row_Num*20);
  94.     }
  95.       Pos_X+=Column_Range[i].Delta*7;
  96.     }
  97.   SetColor("yellow");
  98.   for (i=0;i<Row_Num+1;i++)
  99.     {
  100.       Y=120+i*20;if (Show_Row_Line==1 && i<=36) Line(4,Y,Table_Width+3,Y);
  101.       Row_Range[i].Position=Y;Row_Range[i].Delta=20;
  102.     }
  103. }
  104.  
  105. void List()
  106. {
  107.   int i,j,Pos_X,Max_Length;
  108.  
  109.   Column_Range[0].Position=0;Max_Length=strlen(Table_Name);Map_Dx=0;Map_Dy=0;
  110.   for (j=Row_Pointer;j<Table_Row_Num;j++) 
  111.     Max_Length=Max(Max_Length,strlen(Atom_array[j][0]));
  112.   Column_Range[0].Delta=Max_Length+3;Head_Len=7*Column_Range[0].Delta;
  113.   Table_Width=Head_Len;
  114.   if (Table_Row_Num-Row_Pointer>36) Table_Height=2*23+36*20-3;
  115.   else Table_Height=2*23+(Table_Row_Num-Row_Pointer)*20-3;
  116.   for (i=Column_Pointer;i<Table_Column_Num;i++)
  117.     {
  118.       Max_Length=strlen(Out_name[i-1])+1;
  119.       for (j=Row_Pointer;j<Table_Row_Num;j++)
  120.     Max_Length=Max(Max_Length,strlen(Atom_array[j][i]));
  121.       Column_Range[i].Position=Table_Width;Column_Range[i].Delta=Max_Length+2;
  122.       Table_Width+=7*Column_Range[i].Delta;
  123.     }
  124.   Draw_Table_Frame(Table_Column_Num-Column_Pointer+1,Table_Row_Num-Row_Pointer);
  125.   SetColor("white");Pos_X=12;SetColor("white");OutTextXY(Pos_X,114,Table_Name);
  126.   OutTextXY(Pos_X,138+(Table_Row_Num-Row_Pointer)*20,Table_Name);
  127.   SetColor("PaleGreen");
  128.   if (Table_Row_Num-Row_Pointer>36)              /*  Display Row Names  */
  129.     for (i=Row_Pointer;i<Row_Pointer+36;i++) 
  130.       OutTextXY(Pos_X,136+(i-Row_Pointer)*20,Atom_array[i][0]);
  131.   else for (i=Row_Pointer;i<Table_Row_Num;i++) 
  132.          OutTextXY(Pos_X,136+(i-Row_Pointer)*20,Atom_array[i][0]);
  133.   Pos_X=Head_Len+12;
  134.   for (i=Column_Pointer;i<Table_Column_Num;i++)
  135.     {
  136.       SetColor("gold");OutTextXY(Pos_X,114,Out_name[i-1]);
  137.       if (Table_Row_Num-Row_Pointer>36)
  138.     OutTextXY(Pos_X,138+36*20,Out_name[i-1]);
  139.       else OutTextXY(Pos_X,138+(Table_Row_Num-Row_Pointer)*20,Out_name[i-1]);
  140.       SetColor("ivory");
  141.  
  142.       if (Table_Row_Num-Row_Pointer>36)
  143.     for (j=Row_Pointer;j<Row_Pointer+36;j++)
  144.       OutTextXY(Pos_X,136+(j-Row_Pointer)*20,Atom_array[j][i]);
  145.       else for (j=Row_Pointer;j<Table_Row_Num;j++) 
  146.          OutTextXY(Pos_X,136+(j-Row_Pointer)*20,Atom_array[j][i]);
  147.       Pos_X+=Column_Range[i].Delta*7;
  148.     }
  149. }
  150.  
  151. void Update_Table(Mouse_x,Mouse_y)
  152.   int Mouse_x,Mouse_y;
  153. {
  154.   SetColor("MediumBlue");FillRectangle(0,95,1139,767);List();
  155.   if (In_Table(Mouse_x,Mouse_y)==1) Hi_light_Table(Mouse_x,Mouse_y);
  156. }
  157.  
  158. void Do_Insert(Mouse_x,Mouse_y)
  159.   int Mouse_x,Mouse_y;
  160. {
  161.   int i,j;
  162.  
  163.   if (Column_Id!=0 && Row_Id!=0 && Atom_On==0)
  164.     {
  165.       if (Row_On==1)
  166.     {
  167.       for (i=0;i<Table_Column_Num;i++)
  168.         {
  169.           Atom_array[Table_Row_Num][i]=(char *)malloc(50);
  170.           *Atom_array[Table_Row_Num][i]='\0';
  171.         }
  172.       for (i=Table_Row_Num;i>Row_Id;i--)
  173.         for (j=0;j<Table_Column_Num;j++)
  174.           strcpy(Atom_array[i][j],Atom_array[i-1][j]);
  175.       for (j=0;j<Table_Column_Num;j++) 
  176.         sprintf(Atom_array[Row_Id][j],"%s","?\n");
  177.       Table_Row_Num++;
  178.     }
  179.       else if (Column_On==1)
  180.          { 
  181.            In_name[Table_Column_Num-1]=(char *)malloc(50);
  182.            *In_name[Table_Column_Num-1]='\0';
  183.            Out_name[Table_Column_Num-1]=(char *)malloc(50);
  184.            *Out_name[Table_Column_Num-1]='\0';
  185.            for (i=0;i<Table_Row_Num;i++)
  186.          {
  187.            Atom_array[i][Table_Column_Num]=(char *)malloc(50);
  188.            *Atom_array[i][Table_Column_Num]='\0';
  189.          }
  190.            for (j=Table_Column_Num;j>Column_Id;j--)
  191.          {
  192.            strcpy(In_name[j-1],In_name[j-2]);
  193.            strcpy(Out_name[j-1],Out_name[j-2]);
  194.            for (i=0;i<Table_Row_Num;i++)
  195.              strcpy(Atom_array[i][j],Atom_array[i][j-1]);
  196.          }
  197.            sprintf(In_name[Column_Id-1],"%s","?\n");
  198.            sprintf(Out_name[Column_Id-1],"%s","?\n");
  199.            for (i=0;i<Table_Row_Num;i++)
  200.          sprintf(Atom_array[i][Column_Id],"%s","?\n");
  201.            Table_Column_Num++;
  202.          }
  203.       Column_Id=-10;Row_Id=-10;Update_Table(Mouse_x,Mouse_y);
  204.     }
  205. }
  206.  
  207. void Do_Copy(Mouse_x,Mouse_y)
  208.   int Mouse_x,Mouse_y;
  209. {
  210.   int i;
  211.  
  212.   if (Copy==0)
  213.     { 
  214.       Copy=-1;
  215.       if (Atom_On==1) { Row_Aim=Row_Id;Column_Aim=Column_Id; }
  216.       else if (Row_On==1) Row_Aim=Row_Id;
  217.            else if (Column_On==1) Column_Aim=Column_Id;
  218.     }
  219.   else
  220.     {
  221.       Copy=0;
  222.       if (Atom_On==1 && ((Row_Id>=0 && Row_Aim>=0) || (Row_Id<0 && Row_Aim<0)))
  223.     {
  224.       if (Row_Id<0)
  225.         {
  226.           if  (Column_Id>0)
  227.         {
  228.           if (Row_Id==-2) 
  229.             strcpy(In_name[Column_Id-1],In_name[Column_Aim-1]);
  230.           else if (Row_Id==-3)
  231.             strcpy(Out_name[Column_Id-1],Out_name[Column_Aim-1]);
  232.         }
  233.           else { Copy=0;Column_Id=-10;Row_Id=-10; }
  234.         }
  235.       else
  236.         strcpy(Atom_array[Row_Id][Column_Id],
  237.            Atom_array[Row_Aim][Column_Aim]);
  238.     }
  239.       else if (Column_On==1) 
  240.          {
  241.            for (i=0;i<Table_Row_Num;i++)
  242.          strcpy(Atom_array[i][Column_Id],Atom_array[i][Column_Aim]);
  243.            strcpy(In_name[Column_Id-1],In_name[Column_Aim-1]);
  244.            strcpy(Out_name[Column_Id-1],Out_name[Column_Aim-1]);
  245.          }
  246.            else if (Row_On==1) 
  247.               for (i=0;i<Table_Column_Num;i++)
  248.             strcpy(Atom_array[Row_Id][i],Atom_array[Row_Aim][i]);
  249.       Column_Id=-10;Row_Id=-10;Update_Table(Mouse_x,Mouse_y);
  250.     }
  251. }
  252.  
  253. void Do_Re_Name(Mouse_x,Mouse_y,Button)
  254.   int Mouse_x,Mouse_y,Button;
  255. {
  256.   char ch;
  257.   int Num;
  258.  
  259.   if (Atom_On==1)
  260.     {
  261.       if (Replace==0 && In_Table(Mouse_x,Mouse_y)==1)
  262.     {
  263.       Replace=-1;Row_Aim=Row_Id;Column_Aim=Column_Id;
  264.       if (Row_Aim<0)
  265.         {
  266.           if (Column_Aim==0)
  267.         {
  268.           *Table_Name='\0';
  269.           sprintf(Table_Name+strlen(Table_Name),"%c",'?');
  270.         }
  271.           else
  272.         {
  273.           if (*Old_name[Column_Aim-1]=='\0') 
  274.             strcpy(Old_name[Column_Aim-1],In_name[Column_Aim-1]);
  275.           *In_name[Column_Aim-1]='\0';
  276.           sprintf(In_name[Column_Aim-1]+
  277.               strlen(In_name[Column_Aim-1]),"%c",'?');
  278.           S_bf=(char *)malloc(10);*S_bf='\0';
  279.           sprintf(S_bf,"%-4i",content[Column_Aim-1]);
  280.           *Out_name[Column_Aim-1]='\0';
  281.           strcpy(Out_name[Column_Aim-1],In_name[Column_Aim-1]);
  282.           sprintf(Out_name[Column_Aim-1]+
  283.               strlen(Out_name[Column_Aim-1])," = %s",S_bf);
  284.         }
  285.         }
  286.       else sprintf(Atom_array[Row_Aim][Column_Aim]+6,"%c",'?');
  287.       Update_Table(Mouse_x,Mouse_y);
  288.     }
  289.       else if (Replace==-1 && In_Map(Mouse_x,Mouse_y)==1)
  290.          {
  291.            if (Button==Button1)
  292.          ch=Map_Letter((Mouse_x-Map_SX-1)/19,(Mouse_y-4)/18);
  293.            else ch=Map_Letter((Mouse_x-Map_SX-1)/19,(Mouse_y-4)/18)-32;
  294.            if (Row_Aim<0)
  295.          {
  296.            if (Column_Aim==0)
  297.              {
  298.                sprintf(Table_Name+strlen(Table_Name)-1,"%c",ch);
  299.                sprintf(Table_Name+strlen(Table_Name),"%c",'\n');
  300.              }
  301.            else
  302.              {
  303.                sprintf(In_name[Column_Aim-1]
  304.                    +strlen(In_name[Column_Aim-1])-1,"%c",ch);
  305.                sprintf(In_name[Column_Aim-1]
  306.                    +strlen(In_name[Column_Aim-1]),"%c",'\n');
  307.                S_bf=(char *)malloc(10);*S_bf='\0';
  308.                sprintf(S_bf,"%-4i",content[Column_Aim-1]);
  309.                *Out_name[Column_Aim-1]='\0';
  310.                strcpy(Out_name[Column_Aim-1],In_name[Column_Aim-1]);
  311.                sprintf(Out_name[Column_Aim-1]+
  312.                    strlen(Out_name[Column_Aim-1])-1," = %s\n",S_bf);
  313.              }
  314.          }
  315.            else 
  316.          {
  317.            sprintf(Atom_array[Row_Aim][Column_Aim]+
  318.                strlen(Atom_array[Row_Aim][Column_Aim])-1,"%c",ch);
  319.            Str_Append(Atom_array[Row_Aim][Column_Aim],'\n',1);
  320.  
  321.            Num=Column_Aim*1000+Row_Aim-1000;
  322.            if (Column_Aim<Max_kind)
  323.              {
  324.                names[Num]=(char *)malloc(50);*names[Num]='\0';
  325.                sprintf(names[Num]+strlen(names[Num]),
  326.                    Atom_array[Row_Aim][Column_Aim]);
  327.              }
  328.            else 
  329.              {
  330.                *cont[Row_Aim].Set_name='\0';
  331.                sprintf(cont[Row_Aim].Set_name+
  332.                    strlen(cont[Row_Aim].Set_name),
  333.                    Atom_array[Row_Aim][Column_Aim]);
  334.              }
  335.          }
  336.            Update_Table(Mouse_x,Mouse_y);
  337.          }
  338.     }
  339. }
  340.  
  341. void Do_Move(Mouse_x,Mouse_y)
  342.   int Mouse_x,Mouse_y;
  343. {
  344.   int From_kind,From_num,To_kind,To_num;
  345.  
  346.   if (Move==0) { Move=-1;Row_Aim=Row_Id;Column_Aim=Column_Id; }
  347.   else
  348.     {
  349.       Move=0;
  350.       if (((Column_Aim==1 && Column_Id==1)||(1<Column_Aim && 1<Column_Id ))
  351.       && 0<=Row_Id && 0<=Row_Aim && Row_Aim<content[Column_Aim-1])
  352.     {
  353.       From_kind=Column_Aim-1;To_kind=Column_Id-1;
  354.       From_num=Row_Aim;To_num=Row_Id;
  355.       Move_Melody(From_kind,From_num,To_kind,To_num);
  356.       Get_List();Column_Id=-10;Row_Id=-10;Update_Table(Mouse_x,Mouse_y);
  357.     }
  358.       Action=0;
  359.     }
  360. }
  361.  
  362. void Do_Delete(Mouse_x,Mouse_y)
  363.   int Mouse_x,Mouse_y;
  364. {
  365.   int i,k,n,from,to,Num,Lim;
  366.  
  367.   if (Atom_On) 
  368.     {
  369.       if (Delete==0) { Delete=-1;Row_Aim=Row_Id;Column_Aim=Column_Id; }
  370.       else
  371.     {
  372.       Delete=0;
  373.       if (Column_Aim==Column_Id && 0<Column_Id && 0<=Row_Id && 
  374.           0<=Row_Aim && Row_Aim<content[Column_Aim-1])
  375.         {
  376.           n=Column_Id-1;
  377.           if (Row_Aim<Row_Id)
  378.         { from=Row_Aim;to=Row_Id;if (to>content[n]-1) to=content[n]-1; }
  379.           else { from=Row_Id;to=Row_Aim; }
  380.           Del=from;k=to-from+1;
  381.           if (Column_Aim<Max_kind)
  382.         {
  383.           Get_Filename(n);if (now != n) { now=n;Load(); } 
  384.           Move_Word(now,from,-1,to);Save(k,tail);Del=-1;
  385.         }
  386.           else 
  387.         {
  388.           Lim=content[Max_kind-1]-Del-k;
  389.           for (i=0;i<Lim;i++)
  390.             {
  391.               S_bf=(char *)malloc(10);*S_bf='\0';
  392.               *cont[Del+i].Set_name='\0';sprintf(S_bf,"%5ld",Del+i+1);
  393.               strcpy(cont[Del+i].Set_name,S_bf);ch='.';
  394.               sprintf(cont[Del+i].Set_name+strlen(cont[Del+i].Set_name),
  395.                   "%c",ch);
  396.               sprintf(cont[Del+i].Set_name+6,"%s",
  397.                   Sub_Str(cont[Del+i+k].Set_name,6,44));
  398.               for (Num=0;Num<6;Num++)
  399.             {
  400.               cont[Del+i].tempo[Num]=cont[Del+i+k].tempo[Num];
  401.               cont[Del+i].instru[Num]=cont[Del+i+k].instru[Num];
  402.             }
  403.             }
  404.           content[Max_kind-1]-=k;Lim=content[Max_kind-1];
  405.           for (i=Lim;i<Lim+k;i++)
  406.             {
  407.               S_bf=(char *)malloc(10);*S_bf='\0';
  408.               *cont[i].Set_name='\0';sprintf(S_bf,"%5ld",i+1);
  409.               strcpy(cont[i].Set_name,S_bf);ch='.';
  410.               sprintf(cont[i].Set_name+strlen(cont[i].Set_name),"%c"
  411.                   ,ch);
  412.               sprintf(cont[i].Set_name+strlen(cont[i].Set_name),"%s\n",
  413.                   "???");
  414.               for (j=0;j<6;j++) 
  415.             { cont[i].tempo[j]=0;cont[i].instru[j]=0; }
  416.             }
  417.         }
  418.           Get_List();Column_Id=-10;Row_Id=-10;Update_Table(Mouse_x,Mouse_y);
  419.         }
  420.       Action=0;
  421.     }
  422.     }
  423. }
  424.  
  425. void Do_Value()
  426. {
  427.   int Melody_Id;
  428.  
  429.   Melody_Id=-1;
  430.   if (Column_Id>0)
  431.     {
  432.       next=Column_Id-1;
  433.       if (0<=Row_Id && Row_Id<content[Column_Id-1]) Melody_Id=Row_Id;
  434.     }
  435.   if (next==0) return;
  436.   if (Melody_Id!=-1) 
  437.     { if (next!=now) { now=next;Load(); } Adjust_Value(Melody_Id); }
  438. }
  439.  
  440. void Do_Check_Tempo(Mouse_x,Mouse_y)
  441.   int Mouse_x,Mouse_y;
  442. {
  443.   if (1<Column_Id && Column_Id<Max_kind-1) next=Column_Id-1;else return;
  444.   if (-1<Row_Id && Row_Id<content[next]) M_Id=Row_Id;else return;
  445.   
  446.   if (now != next) { now=next;Load(); }
  447.   Check_Tempo();Column_Id=-10;Row_Id=-10;Update_Table(Mouse_x,Mouse_y);
  448. }
  449.  
  450. void Do_Switch(Mouse_x,Mouse_y)
  451.   int Mouse_x,Mouse_y;
  452. {
  453.   if (Switch==0) 
  454.     { 
  455.       if (1<Column_Id && Column_Id<Max_kind) 
  456.     { Switch=-1;Column_Aim=Column_Id; } else Action=0;return;
  457.     }
  458.   else
  459.     {
  460.       Switch=0;
  461.       if (1<Column_Id && Column_Id<Max_kind) 
  462.     {
  463.       Switch_Melody(Column_Aim-1,Column_Id-1);
  464.       Buffer[0]=(char *)malloc(50);*Buffer[0]='\0';
  465.       strcpy(Buffer[0],In_name[Column_Aim-1]);
  466.       strcpy(In_name[Column_Aim-1],In_name[Column_Id-1]);
  467.       strcpy(In_name[Column_Id-1],Buffer[0]);
  468.       Buffer[0]=(char *)malloc(50);*Buffer[0]='\0';
  469.       strcpy(Buffer[0],Out_name[Column_Aim-1]);
  470.       strcpy(Out_name[Column_Aim-1],Out_name[Column_Id-1]);
  471.       strcpy(Out_name[Column_Id-1],Buffer[0]);
  472.       Save_Name();Save_Words();Column_Id=-10;Row_Id=-10;
  473.       Update_Table(Mouse_x,Mouse_y);
  474.       if ((now==Column_Aim-1 || now==Column_Id-1) && content[now]>0) Load();
  475.     }
  476.       Action=0;
  477.     }
  478. }
  479.  
  480. void Do_Load(Mouse_x,Mouse_y)
  481.   int Mouse_x,Mouse_y;
  482. {
  483.   char f_head[100],fn[100],Suffix[10];
  484.   struct stat statbuf;
  485.   int rv_stat,Len;
  486.   struct dirent *dirbuf;
  487.   DIR *dir;
  488.  
  489.   next=Column_Id-1;if (now!=next) { now=next;if (content[now]>0) Load(); }
  490.   strcpy(f_head,"Dir_Text");rv_stat = stat(f_head, &statbuf);
  491.   if (!S_ISDIR(statbuf.st_mode))
  492.     { printf("%s is not a directory\n",f_head);return; }
  493.  
  494.   if ((dir=opendir(f_head)) == NULL)
  495.     { printf("failed to open %s\n",f_head);return; }
  496.  
  497.   while ((dirbuf = readdir(dir)) != NULL)
  498.     {
  499.       Len=strlen(dirbuf->d_name);strcpy(fn,f_head);
  500.       strcpy(Suffix,Sub_Str(dirbuf->d_name,Len-5,5));
  501.       if (strcmp(".text",Suffix)==0)
  502.     {
  503.       sprintf(fn+strlen(fn),"/%s",dirbuf->d_name);Load_From_Back_Up(fn,0,0);
  504.     }
  505.      }
  506.   closedir(dir);Save(1,content[now]);
  507.   Column_Id=-10;Row_Id=-10;Update_Table(Mouse_x,Mouse_y);
  508. }
  509.  
  510. void Edit_Table(Mouse_x,Mouse_y)
  511.   int Mouse_x,Mouse_y;
  512. {
  513.   if (In_Table(Mouse_x,Mouse_y)==1)
  514.     {
  515.       switch (Action) 
  516.     {
  517.       case Re_Name_On:Do_Re_Name(Mouse_x,Mouse_y,Button1);break;
  518.       case Move_On:Do_Move(Mouse_x,Mouse_y);break;
  519.       case Delete_On:Do_Delete(Mouse_x,Mouse_y);break;
  520.           case Value_On:Do_Value();break;
  521.           case Check_Tmp_On:Do_Check_Tempo(Mouse_x,Mouse_y);break;
  522.           case Switch_On:Do_Switch(Mouse_x,Mouse_y);break;
  523.       case Load_Text_On:Do_Load(Mouse_x,Mouse_y);break;
  524.     }
  525.       if (Action!=Re_Name_On) Renew_Notice();
  526.     }
  527. }
  528.  
  529. void Re_New_Pos(Mouse_x,Mouse_y)
  530.   int Mouse_x,Mouse_y;
  531. {
  532.   int Len;
  533.  
  534.   High_Light_Char(Word_X,Word_Y);Len=strlen(Words[New_Word])+Text_Base;
  535.   Word_X=(Mouse_x-47)/7;Word_Y=(Mouse_y-148)/Dist;
  536.   if (page*300+Word_Y*150+Word_X>Len)
  537.     { Word_X=Len % 150;Word_Y=(Len/150) % 2; }
  538.   else if (page*300+Word_Y*150+Word_X<Text_Base) { Word_X=Text_Base;Word_Y=0; }
  539.        else if (Word_X<0) { Word_X=0;Word_Y=(Len/150) % 2; }
  540.             else if (Word_X>150) { Word_X=150;Word_Y=(Len/150) % 2; }
  541.   High_Light_Char(Word_X,Word_Y);Word_Pos=page*300+Word_Y*150+Word_X;
  542. }
  543.  
  544. void Add_Word(Mouse_x,Mouse_y,Capital)
  545.   int Mouse_x,Mouse_y,Capital;
  546. {
  547.   char ch,Str[2],*Word_Tail;
  548.   int A_Pos;
  549.  
  550.   if (Word_Pos<(page+1)*300)
  551.     {
  552.       if (Capital!=-2) High_Light_Char(Word_X,Word_Y);
  553.       switch (Capital)
  554.     {
  555.       case 2:ch=Map_Letter(Text_Column_Id,Text_Row_Id)-32;break;
  556.       case 1:ch=Map_Letter(Text_Column_Id,Text_Row_Id);break;
  557.       case 0:ch=' ';Re_New_Pos(Mouse_x,Mouse_y);break;
  558.       case -1:ch=' ';break;
  559.       case -2:ch=' ';Re_New_Pos(Mouse_x,Mouse_y);break;
  560.     }
  561.       if (Word_Pos==strlen(Words[New_Word])+Text_Base)
  562.     {
  563.       Rub(Word_X*7+47,Word_Y*Dist+148,7,13,"NavyBlue");SetColor("cyan");
  564.       sprintf(Str,"%c",ch);OutTextXY(Word_X*7+47,Word_Y*Dist+159,Str);
  565.       sprintf(Words[New_Word]+strlen(Words[New_Word]),"%c",ch);
  566.       if (Word_Pos<3000 && Word_Pos!=(page+1)*300-1) Word_Pos++;
  567.     }
  568.       else
  569.          {
  570.            A_Pos=Word_Pos-Text_Base;
  571.            Word_Tail=(char *)malloc(3000);*Word_Tail='\0';
  572.            if (Capital>-1)
  573.          {
  574.            sprintf(Word_Tail+strlen(Word_Tail),"%s",
  575.                Sub_Str(Words[New_Word],A_Pos,
  576.                    strlen(Words[New_Word])-A_Pos));
  577.            sprintf(Words[New_Word]+A_Pos,"%c",ch);
  578.            sprintf(Words[New_Word]+A_Pos+1,"%s",Word_Tail);
  579.            if (Word_Pos<3000 && Word_Pos!=(page+1)*300-1) Word_Pos++;
  580.          }
  581.            else
  582.          {
  583.            sprintf(Word_Tail+strlen(Word_Tail),"%s",
  584.                Sub_Str(Words[New_Word],A_Pos+1,
  585.                    strlen(Words[New_Word])-A_Pos));
  586.            sprintf(Words[New_Word]+A_Pos,"%s",Word_Tail);
  587.            if (Word_Pos>strlen(Words[New_Word])+Text_Base) Word_Pos--;
  588.          }
  589.            Show_Word(New_Word,page);
  590.          }
  591.       Word_X=Word_Pos%150;Word_Y=(Word_Pos/150)%2;
  592.       High_Light_Char(Word_X,Word_Y);
  593.     }
  594. }
  595.  
  596. void Edit_Word(Button,Mouse_x,Mouse_y)
  597.   int Button,Mouse_x,Mouse_y;
  598. {
  599.   Use_Font("7x14");if (Word_Num>=0) Word_Num=-Word_Num;
  600.  
  601.   switch (Button)
  602.     {
  603.       case Button1:if (In_Text(Mouse_x,Mouse_y)==1) Add_Word(Mouse_x,Mouse_y,1);
  604.                    else if ((Mouse_y-148)%Dist<10) Re_New_Pos(Mouse_x,Mouse_y);
  605.     break;
  606.       case Button2:if (In_Text(Mouse_x,Mouse_y)==1) Add_Word(Mouse_x,Mouse_y,2);
  607.                    else if ((Mouse_y-148)%Dist<10) Add_Word(Mouse_x,Mouse_y,0);
  608.     break;
  609.       case Button3:if (In_Text(Mouse_x,Mouse_y)==1) 
  610.                  Add_Word(Mouse_x,Mouse_y,-1);
  611.                    else if ((Mouse_y-148)%Dist<10) Add_Word(Mouse_x,Mouse_y,-2);
  612.     break;
  613.     }
  614. }
  615.  
  616.