Требуется преобразование программы c Borland C++ Builder для ОС Linix

Я всегда пишу нормальные исходники.:angel:
Вот часть кода. Сам создал. Осталось 8% сделать, и она будет готова.

#include <vcl.h>
#pragma hdrstop
#include "added.h"
#include "Unit1.h"
#include <math.h>
#include "About.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
TForm *Form2;
TForm *Form3;
TForm *OKBottomDlg;
TForm *OKBottomDlg1;
TForm *PasswordDlg;
int delWidth, delHeight, delX, delY = 2000;
int provodnik = 0;
TCursor curs;
int line = 0;
int xpoint, ypoint, absx, absy;
int component = 0;
int kol_knop_raz, kol_knop_zam, obsh_knop, kol_rele_kl, kol_rele_vr = 0;
int obsh_dvig, kol_motor_post, kol_asinh_kz, kol_asinh_faz, kol_rez = 0;
int kol_ind, kol_trpit, kol_odpit, kl, rl = 0;
int releis = 0;
int Count, shag, newschema = 0;
int kolich_vr, kolich_dv, nomer_kont = 0;
int nomer_line = 0;
int not_line, not_line2, xline1, yline1, find_line = 0;
int pit, begin_amper, end_amper = 0;
String Load;

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
FNametemp = "shema.tmp";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N6Click(TObject *Sender)
{
ListBox1->Visible = true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ListBox1Click(TObject *Sender)
{
ListBox1->Visible = false;
}

//---------------------------------------------------------------------------
void __fastcall TForm1::N3Click(TObject *Sender)
{
ListBox1->Visible = false;
provodnik = 0;
line = 0;
component = 0;
kol_knop_raz, kol_knop_zam, obsh_knop, kol_rele_kl, kol_rele_vr = 0;
obsh_dvig, kol_motor_post, kol_asinh_kz, kol_asinh_faz, kol_rez = 0;
kol_ind, kol_trpit, kol_odpit, kl, rl = 0;
releis = 0;
Count, shag = 0;
Memo1->Clear();
DeleteFile(FNametemp);
newschema = 1;
Invalidate();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::N2Click(TObject *Sender)
{
AboutBox->ShowModal();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
Animate1->Active = true;

shag = 0;
Count = Memo2->Lines->Count;

while (shag<=Count)
{
Load = Memo2->Lines->Strings[shag];

if (Load=="od_faz") {
  pit = 1;
  begin_amper = StrToInt(Memo2->Lines->Strings[shag+3]);
  end_amper = StrToInt(Memo2->Lines->Strings[shag+7]);
  if (Memo2->Lines->Strings[shag+6]=="dis" | Memo2->Lines->Strings[shag+10]=="dis") {Application->MessageBoxA("Контакты источника питания цепи управления подключены к проводникам.", "Ошибка", MB_OK); Animate1->Active=false;}
}

shag++;
}

if (pit==0) {Application->MessageBoxA("Источник питания цепи управления отсутствует.", "Ошибка",MB_OK); Animate1->Active=false;}

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
Animate1->Active = false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ToolButton1MouseMove(TObject *Sender,
      TShiftState Shift, int X, int Y)
{
ToolButton1->ShowHint = true;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::N4Click(TObject *Sender)
{
if (OpenDialog1->Execute())
{FName = OpenDialog1->FileName;
  Memo1->Lines->LoadFromFile(FName);

  FName1 = FName;
  FName2 = FName;
  FName1 = FName1 + ".s2";
  Memo2->Lines->LoadFromFile(FName1);
  FName2 = FName2 + ".s3";
  Memo3->Lines->LoadFromFile(FName2);

}

Count = Memo1->Lines->Count;

kol_rele_kl = 0;
kol_rele_vr = 0;

while (shag<=Count)
{
Load = Memo1->Lines->Strings[shag];

if (Load=="rele_kl") {//а это комментарий!}

Вотъ такъ. :angel::tongue2: