Página 1 de 1

BASCOM AVR

MensagemEnviado: 19 Jul 2007 17:33
por tcpipchip
Alguem pode compilar para mim e mandar o "BIN" gerado?
tcpipchip@hotmail.com
Obrigado
TCPIPCHIP
=============================

Const True = 1
Const False = 0

$regfile = "m64def.dat"
$crystal = 7372800

'**************************************************************************************
'* SERIAL PORTS CONFIGURATION
'**************************************************************************************
$baud = 38400
Config Serialin = Buffered , Size = 68
Open "Com1:" As Binary As #2
Waitms 100

Print #2 , "***************************" ' Print header on the Diagnostic/Log stream.

Do
Print #2 , "* TESTE COMUNICACAO SERIAL"
Print #2 , "***************************"
Print #2 , ""
Print #2 , "POWER UP"
Loop


End

MensagemEnviado: 19 Jul 2007 20:24
por tcpipchip
Resolvi.
Grato!