Enviar Bite Porta Serial DB25
Fala Pessoal, blz?
Seguinte, preciso de um comando que envie um bite para a porta LPT1.. Alguém tem ai??
Valew
Seguinte, preciso de um comando que envie um bite para a porta LPT1.. Alguém tem ai??
Valew
Marrecotk
Curtidas 0
Respostas
Kroki
21/01/2006
var
porta:word;
DADO:BYTE;
Begin
porta:=$378(LPT1)
ASM
MOV DX,PORTA
MOV AL,DADO
OUT DX,AL
END;
END;
porta:word;
DADO:BYTE;
Begin
porta:=$378(LPT1)
ASM
MOV DX,PORTA
MOV AL,DADO
OUT DX,AL
END;
END;
GOSTEI 0
Marrecotk
21/01/2006
e se eu kiser enviar um bit para o pino 3?? como faço? desculpe a falta de conhecimento.. :D
GOSTEI 0
Kroki
21/01/2006
var
porta:word;
DADO:BYTE;
Begin
DADO:=$4(Binario=00001000)
porta:=$378(LPT1)
ASM
MOV DX,PORTA
MOV AL,DADO
OUT DX,AL
END;
END;
porta:word;
DADO:BYTE;
Begin
DADO:=$4(Binario=00001000)
porta:=$378(LPT1)
ASM
MOV DX,PORTA
MOV AL,DADO
OUT DX,AL
END;
END;
GOSTEI 0
Marrecotk
21/01/2006
preciso fazer o sistema para controlar o seguinte:
ELe tem que ligar e desligar os leds..
Valew!
ELe tem que ligar e desligar os leds..
Valew!
GOSTEI 0
Kroki
21/01/2006
Cada Bit é um Led,$FF=11111111,todos acesos.
$00000000=Todos apagados,vc poe esses valores em ´DADO´ e envia.
Use a clculadora do Windows em modo científico e use modo Binario,aí vc vai ter uma noçao.
$00000000=Todos apagados,vc poe esses valores em ´DADO´ e envia.
Use a clculadora do Windows em modo científico e use modo Binario,aí vc vai ter uma noçao.
GOSTEI 0
Marrecotk
21/01/2006
Eu preciso abrir a porta lpt1 ou não precisa?
GOSTEI 0
Kroki
21/01/2006
Nao,em assembler nao existe essas coisas...
GOSTEI 0