⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frqc.cpp

📁 组合频率干扰,用于通信等射频电路中干扰的计算
💻 CPP
字号:
//---------------------------------------------------------------------------

#include <vcl.h>
#include "math.h"
#pragma hdrstop

#include "frqc.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
#define Max 1000

TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    double freq_1,freq_2,BW;            //original frequencies and Bandwith
    double freq_diff,freq_if;
    freq_if=fabs(freq_1-freq_2);

    freq_1=StrToFloat(Edit1->Text);     //Reading Values
    freq_2=StrToFloat(Edit2->Text);
    BW=StrToFloat(Edit3->Text);
    BW=BW/2;                           //Half the Bandwidth
    for(int m=1;m<Max;m++)             //Computing Potencial Frequencies
    {
       for(int n=1;n<(Max+Max);n++)
       {
          freq_diff=m*freq_1-n*freq_2;
          if(fabs(freq_diff-freq_if)<=BW)
          //do something
             Label3->Caption=Label3->Caption+m+"    "+n+"    "+fabs(freq_diff)+'\n';
             
       }
     }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
    Label3->Caption="";
    Label3->Caption=Label3->Caption+"M"+"     "+"N"+"     "+"Frequency"+'\n';
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -