DCT矩陣轉換問題 - Delphi K.Top 討論區

發表時間：2006-07-28 01:26:12

IP:59.127.xxx.xxx 訂閱

這是DCT矩陣轉換的程式，但是執行有問題，輸入一矩陣，執行結果跟對照的數字不符合，跟網路上正確轉出來DCT的數字不一樣，希望會的人能幫我解決，謝謝...以下是我的程式碼: #include
#pragma hdrstop
#include <math.h><br />#define ROUND(x) (int) (x>0 ? x .5 : x-.5)
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
Label1->Caption = Edit1->Text;
Label2->Caption = Edit2->Text;
Label3->Caption = Edit3->Text;
Label4->Caption = Edit4->Text;
Label5->Caption = Edit5->Text;
Label6->Caption = Edit6->Text;
Label7->Caption = Edit7->Text;
Label8->Caption = Edit8->Text;

Label9->Caption = Edit9->Text;
Label10->Caption = Edit10->Text;
Label11->Caption = Edit11->Text;
Label12->Caption = Edit12->Text;
Label13->Caption = Edit13->Text;
Label14->Caption = Edit14->Text;
Label15->Caption = Edit15->Text;
Label16->Caption = Edit16->Text;

Label17->Caption = Edit17->Text;
Label18->Caption = Edit18->Text;
Label19->Caption = Edit19->Text;
Label20->Caption = Edit20->Text;
Label21->Caption = Edit21->Text;
Label22->Caption = Edit22->Text;
Label23->Caption = Edit23->Text;
Label24->Caption = Edit24->Text;

Label25->Caption = Edit25->Text;
Label26->Caption = Edit26->Text;
Label27->Caption = Edit27->Text;
Label28->Caption = Edit28->Text;
Label29->Caption = Edit29->Text;
Label30->Caption = Edit30->Text;
Label31->Caption = Edit31->Text;
Label32->Caption = Edit32->Text;

Label33->Caption = Edit33->Text;
Label34->Caption = Edit34->Text;
Label35->Caption = Edit35->Text;
Label36->Caption = Edit36->Text;
Label37->Caption = Edit37->Text;
Label38->Caption = Edit38->Text;
Label39->Caption = Edit39->Text;
Label40->Caption = Edit40->Text;

Label41->Caption = Edit41->Text;
Label42->Caption = Edit42->Text;
Label43->Caption = Edit43->Text;
Label44->Caption = Edit44->Text;
Label45->Caption = Edit45->Text;
Label46->Caption = Edit46->Text;
Label47->Caption = Edit47->Text;
Label48->Caption = Edit48->Text;

Label49->Caption = Edit49->Text;
Label50->Caption = Edit50->Text;
Label51->Caption = Edit51->Text;
Label52->Caption = Edit52->Text;
Label53->Caption = Edit53->Text;
Label54->Caption = Edit54->Text;
Label55->Caption = Edit55->Text;
Label56->Caption = Edit56->Text;

Label57->Caption = Edit57->Text;
Label58->Caption = Edit58->Text;
Label59->Caption = Edit59->Text;
Label60->Caption = Edit60->Text;
Label61->Caption = Edit61->Text;
Label62->Caption = Edit62->Text;
Label63->Caption = Edit63->Text;
Label64->Caption = Edit64->Text;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button3Click(TObject *Sender)
{
Edit1->Text = "";
Label1->Caption = "";
Edit2->Text = "";
Label2->Caption = "";
Edit3->Text = "";
Label3->Caption = "";
Edit4->Text = "";
Label4->Caption = "";
Edit5->Text = "";
Label5->Caption = "";
Edit6->Text = "";
Label6->Caption = "";
Edit7->Text = "";
Label7->Caption = "";
Edit8->Text = "";
Label8->Caption = "";

Edit9->Text = "";
Label9->Caption = "";
Edit10->Text = "";
Label10->Caption = "";
Edit11->Text = "";
Label11->Caption = "";
Edit12->Text = "";
Label12->Caption = "";
Edit13->Text = "";
Label13->Caption = "";
Edit14->Text = "";
Label14->Caption = "";
Edit15->Text = "";
Label15->Caption = "";
Edit16->Text = "";
Label16->Caption = "";

Edit17->Text = "";
Label17->Caption = "";
Edit18->Text = "";
Label18->Caption = "";
Edit19->Text = "";
Label19->Caption = "";
Edit20->Text = "";
Label20->Caption = "";
Edit21->Text = "";
Label21->Caption = "";
Edit22->Text = "";
Label22->Caption = "";
Edit23->Text = "";
Label23->Caption = "";
Edit24->Text = "";
Label24->Caption = "";

Edit25->Text = "";
Label25->Caption = "";
Edit26->Text = "";
Label26->Caption = "";
Edit27->Text = "";
Label27->Caption = "";
Edit28->Text = "";
Label28->Caption = "";
Edit29->Text = "";
Label29->Caption = "";
Edit30->Text = "";
Label30->Caption = "";
Edit31->Text = "";
Label31->Caption = "";
Edit32->Text = "";
Label32->Caption = "";

Edit33->Text = "";
Label33->Caption = "";
Edit34->Text = "";
Label34->Caption = "";
Edit35->Text = "";
Label35->Caption = "";
Edit36->Text = "";
Label36->Caption = "";
Edit37->Text = "";
Label37->Caption = "";
Edit38->Text = "";
Label38->Caption = "";
Edit39->Text = "";
Label39->Caption = "";
Edit40->Text = "";
Label40->Caption = "";

Edit41->Text = "";
Label41->Caption = "";
Edit42->Text = "";
Label42->Caption = "";
Edit43->Text = "";
Label43->Caption = "";
Edit44->Text = "";
Label44->Caption = "";
Edit45->Text = "";
Label45->Caption = "";
Edit46->Text = "";
Label46->Caption = "";
Edit47->Text = "";
Label47->Caption = "";
Edit48->Text = "";
Label48->Caption = "";

Edit49->Text = "";
Label49->Caption = "";
Edit50->Text = "";
Label50->Caption = "";
Edit51->Text = "";
Label51->Caption = "";
Edit52->Text = "";
Label52->Caption = "";
Edit53->Text = "";
Label53->Caption = "";
Edit54->Text = "";
Label54->Caption = "";
Edit55->Text = "";
Label55->Caption = "";
Edit56->Text = "";
Label56->Caption = "";

Edit57->Text = "";
Label57->Caption = "";
Edit58->Text = "";
Label58->Caption = "";
Edit59->Text = "";
Label59->Caption = "";
Edit60->Text = "";
Label60->Caption = "";
Edit61->Text = "";
Label61->Caption = "";
Edit62->Text = "";
Label62->Caption = "";
Edit63->Text = "";
Label63->Caption = "";
Edit64->Text = "";
Label64->Caption = "";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
int x,y,i,j;
float PI=3.14159;
x=y=i=j=0;
Label1->Caption = ((Edit1->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.5)*(0.25);
y ;j ;
Label2->Caption = ((Edit2->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label3->Caption = ((Edit3->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label4->Caption = ((Edit4->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label5->Caption = ((Edit5->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label6->Caption = ((Edit6->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label7->Caption = ((Edit7->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label8->Caption = ((Edit8->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
if(y==8){
y=0;j=0;
}
x ;i ;
Label9->Caption = ((Edit9->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label10->Caption = ((Edit10->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label11->Caption = ((Edit11->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label12->Caption = ((Edit12->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label13->Caption = ((Edit13->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label14->Caption = ((Edit14->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label15->Caption = ((Edit15->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label16->Caption = ((Edit16->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
if(y==8){
y=0;j=0;
}
x ;i ;
Label17->Caption = ((Edit17->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label18->Caption = ((Edit18->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label19->Caption = ((Edit19->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label20->Caption = ((Edit20->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label21->Caption = ((Edit21->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label22->Caption = ((Edit22->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label23->Caption = ((Edit23->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label24->Caption = ((Edit24->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
if(y==8){
y=0;j=0;
}
x ;i ;
Label25->Caption = ((Edit25->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label26->Caption = ((Edit26->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label27->Caption = ((Edit27->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label28->Caption = ((Edit28->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label29->Caption = ((Edit29->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label30->Caption = ((Edit30->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label31->Caption = ((Edit31->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label32->Caption = ((Edit32->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
if(y==8){
y=0;j=0;
}
x ;i ;
Label33->Caption = ((Edit33->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label34->Caption = ((Edit34->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label35->Caption = ((Edit35->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label36->Caption = ((Edit36->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label37->Caption = ((Edit37->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label38->Caption = ((Edit38->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label39->Caption = ((Edit39->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label40->Caption = ((Edit40->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
if(y==8){
y=0;j=0;
}
x ;i ;
Label41->Caption = ((Edit41->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label42->Caption = ((Edit42->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label43->Caption = ((Edit43->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label44->Caption = ((Edit44->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label45->Caption = ((Edit45->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label46->Caption = ((Edit46->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label47->Caption = ((Edit47->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label48->Caption = ((Edit48->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
if(y==8){
y=0;j=0;
}
x ;i ;
Label49->Caption = ((Edit49->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label50->Caption = ((Edit50->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label51->Caption = ((Edit51->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label52->Caption = ((Edit52->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label53->Caption = ((Edit53->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label54->Caption = ((Edit54->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label55->Caption = ((Edit55->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label56->Caption = ((Edit56->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
if(y==8){
y=0;j=0;
}
x ;i ;
Label57->Caption = ((Edit57->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
y ;j ;
Label58->Caption = ((Edit58->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label59->Caption = ((Edit59->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label60->Caption = ((Edit60->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label61->Caption = ((Edit61->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label62->Caption = ((Edit62->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label63->Caption = ((Edit63->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
y ;j ;
Label64->Caption = ((Edit64->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);

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

void __fastcall TForm1::Button5Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------

以下是第二個MyDCT

#include
#pragma hdrstop
#include <math.h><br />#define ROUND(x) (int) (x>0 ? x .5 : x-.5)
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

Label9->Caption = ((Edit9->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
Label10->Caption = ((Edit10->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label11->Caption = ((Edit11->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label12->Caption = ((Edit12->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label13->Caption = ((Edit13->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label14->Caption = ((Edit14->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label15->Caption = ((Edit15->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label16->Caption = ((Edit16->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);

Label17->Caption = ((Edit17->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
Label18->Caption = ((Edit18->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label19->Caption = ((Edit19->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label20->Caption = ((Edit20->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label21->Caption = ((Edit21->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label22->Caption = ((Edit22->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label23->Caption = ((Edit23->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label24->Caption = ((Edit24->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);

Label25->Caption = ((Edit25->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
Label26->Caption = ((Edit26->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label27->Caption = ((Edit27->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label28->Caption = ((Edit28->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label29->Caption = ((Edit29->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label30->Caption = ((Edit30->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label31->Caption = ((Edit31->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label32->Caption = ((Edit32->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);

Label33->Caption = ((Edit33->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
Label34->Caption = ((Edit34->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label35->Caption = ((Edit35->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label36->Caption = ((Edit36->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label37->Caption = ((Edit37->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label38->Caption = ((Edit38->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label39->Caption = ((Edit39->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label40->Caption = ((Edit40->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);

Label41->Caption = ((Edit41->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
Label42->Caption = ((Edit42->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label43->Caption = ((Edit43->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label44->Caption = ((Edit44->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label45->Caption = ((Edit45->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label46->Caption = ((Edit46->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label47->Caption = ((Edit47->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label48->Caption = ((Edit48->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);

Label49->Caption = ((Edit49->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
Label50->Caption = ((Edit50->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label51->Caption = ((Edit51->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label52->Caption = ((Edit52->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label53->Caption = ((Edit53->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label54->Caption = ((Edit54->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label55->Caption = ((Edit55->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label56->Caption = ((Edit56->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);

Label57->Caption = ((Edit57->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(0.70711)*(0.25);
Label58->Caption = ((Edit58->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label59->Caption = ((Edit59->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label60->Caption = ((Edit60->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label61->Caption = ((Edit61->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label62->Caption = ((Edit62->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label63->Caption = ((Edit63->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
Label64->Caption = ((Edit64->Text)-128)*cos(((2.0*x 1.0)*i*PI)/16.0)*cos(((2.0*y 1.0)*j*PI)/16.0)*(1.0)*(0.25);
}

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

void __fastcall TForm1::Button5Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------