roboforum.ru

while(flagLpt) {

        out_Lpt &=~Xs;                                                         
        asm    mov dx, adr_Lpt                                                 
        _AX=out_Lpt;
        asm    out dx, al
       
        out_Lpt |=Xs;
        Out_lpt();

        }



void __fastcall TForm1::Out_lpt()
{

out_Lpt2&=~1;
asm    mov dx, 0x37A       // ñèãíàë ñèíõðîíèçàöèè = 1
_AX=out_Lpt2;
asm    out dx, al

for(int i2=0;i2<40;i2++){Application->ProcessMessages();}

asm    mov dx, adr_Lpt     // äàííûå
_AX=out_Lpt;
asm    out dx, al

out_Lpt2|=1;
asm    mov dx, 0x37A       // ñèãíàë ñèíõðîíèçàöèè = 0
_AX=out_Lpt2;
asm    out dx, al

//-----------------------------------------------

if( U_vent<U_power){
out_Lpt2&=~2;
asm    mov dx, 0x37A       // âåíòèëÿòîð âêë
_AX=out_Lpt2;
asm    out dx, al
}
if(U_vent>=U_power){
out_Lpt2|=2;
asm    mov dx, 0x37A       // âåíòèëÿòîð âûêë
_AX=out_Lpt2;
asm    out dx, al
}

if(U_vent++==255)U_vent =0;

}