[an error occurred while processing this directive]
|
void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
WORD
M,
N,
WriteTest[3];
BYTE
a,
m,
n;
if (false == CheckBox3->Checked)
{
WriteStr(ID_SG,"FA "+ComboBox1->Text);
Sleep(100);
}
else
{
a=Decoder[(ComboBox1->ItemIndex)+1];
asm
{
mov eax,0
mov edx,0
mov ebx,0
mov al,a
sal ax,4
sar al,4
mov bl,al
dec bx
bts dx,bx
mov M,dx
mov edx,0
mov bl,ah
dec bx
bts dx,bx
mov N,dx
}
WriteTest[0]=0x0004;
WriteTest[1]=M;
WriteTest[2]=N;
Memo1->Lines->Add(IntToStr(M));
Memo1->Lines->Add(IntToStr(N));
if (!FX2_EPP1->WriteToInterface(WriteTest,0x06,0x00))
{
Memo1->Lines->Add("ErrorWrite");
}
}
}
E-mail: info@telesys.ru