Почему exe-шник медленно работает?

#pragma once
#include "stdafx.h"
#include <stdio.h>
#include <stdlib.h>
#include "Form1.h"
#include "find.h"
 
int strindex(char source[40][100], char searchfor[]);
int dec(char stroka[],int dlina);
int step(int chislo, int st);
FILE *ff;
char pattern[]="F240"; 
char line[40][100];
int melborp[5000];
int ekatsim[5000];
int h,soso;
int max;
int poisk(char naz[],int ww, int tt)
{
h=0;
int bad_int,c,k,y;
int found;
int sss[40];
int j=0;int ok=0;
int i=0;int str;
y=0;
ff=fopen(naz,"r+");
max=0;
slova[ww][4]='\0';
while ((c=fgetc(ff))!= EOF)
{
    if (c=='-' || (c>=48 && c<=57) || (c>=65 && c<=90) || (c>=97 && c<=122)) {ok=1;}
    if (c!='-' && c!='\n' &&((c<48 || (c>57 && c<65) || (c>90 && c<97) || c>122)))
    {if (ok==1){line[y][j]='\0'; y++;ok=0;} j=0;}
    if ((c=='\n') || (c==EOF))
    {ok=0;
        y=0;
        found=strindex(line,slova[ww]);
        if (found>0) 
        {   ekatsim[h]=0;
        k=1;
        while (line[found+3+tt][k]!='\0')
        {
                switch (line[found+3+tt][k]){
                    case 'A': str=10;break;
                    case 'B': str=11;break;
                    case 'C': str=12;break;
                    case 'D': str=13;break;
                    case 'E': str=14;break;
                    case 'F': str=15;break;
                default: str=(line[found+3+tt][k]-'0');break;}
                ekatsim[h] = ekatsim[h]*16+ str;k++;//высчитываем и запоминаем значения
            }
            if (ekatsim[h]>max) {max=ekatsim[h];}
            melborp[h] = 0;
            for (k=1;line[found-1][k]!='\0';k++)
            {
                melborp[h]=melborp[h]*10+(line[found-1][k]-'0');//запоминаем посимвольно время))
            }
            h++;
        }
        i++; j=0;
    }
    else
    {
    line[y][j++] = (char)c;
    }
}
fclose(ff);
return melborp[0];
}
 
int strindex (char s[40][100], char t[])
{
int i,j,k,v45;
int y=0;int ok=0;
v45=-1;
i=0;k=0;
for (i = 0; s[y][i]!= '\n'; i++) 
{
    if ((s[y][i]>=48 && s[y][i]<=57) || (s[y][i]>=65 && s[y][i]<=90) || (s[y][i]>=97 && s[y][i]<=122)) {ok=1;}
    if ((s[y][i]<48 || (s[y][i]>57 && s[y][i]<65) || (s[y][i]>90 && s[y][i]<97) || s[y][i]>122)&& ok==1)
    {
        y++;i=0;ok=0;
    }
 
    if (s[y][i]==t[0]) 
    {
        while (s[y][i]==t[k]) {k++;i++;if (t[k]=='\0') {return y;}}
    }
}
return v45;
}
int step(int chislo, int st)
{int rezz=1;int i=st;
    while (i!=0)
    {
        rezz=rezz*chislo;i--;
    }
    return rezz;
}