RS232 TERMINAL text z MEGY se mi v PC v vypíše ale ne naopak
Napsal: 07 srp 2009, 18:30
Prosím Vás o pomoc, z čipu v pohodě vysílám data, ale když na PC mám zadat - respektive stisknout klavesu, tak se nic neodesle, po zmacknuti klavesy se nic nezobrazi v terminalu...
kdyz to sinmuluju, tak to normalne bezi....jakmile spojim megu s PC a stisknu na pc klavesu, nic se mi v terminalu nevypise, ze by to mega prijala....
kdyz vyndam megu a spojim rxd a txd tak normalne zmacknu klavesu a vypise se mi to zpet v pc v terminalu, jakmile zapojim megu, uz to nejede....pouze funguje odesilani textu z cipu na terminal
$regfile = "m8def.dat"
$crystal = 1000000
$baud = 2400
Config Pinb.1 = Output
Enable Interrupts
Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0
Dim Firstnumber As Integer
Dim Secondnumber As Integer
Dim Sum As Integer
Do
Portb.1 = 1
Waitms 1000
Firstnumber = 0
Secondnumber = 0
Input "Enter first number : " , Firstnumber
Input "Enter second number: " , Secondnumber
Sum = Firstnumber + Secondnumber
Print "Součet: " ; Sum
Portb.1 = 0
Waitms 1000
Loop
End
kdyz to sinmuluju, tak to normalne bezi....jakmile spojim megu s PC a stisknu na pc klavesu, nic se mi v terminalu nevypise, ze by to mega prijala....
kdyz vyndam megu a spojim rxd a txd tak normalne zmacknu klavesu a vypise se mi to zpet v pc v terminalu, jakmile zapojim megu, uz to nejede....pouze funguje odesilani textu z cipu na terminal
$regfile = "m8def.dat"
$crystal = 1000000
$baud = 2400
Config Pinb.1 = Output
Enable Interrupts
Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0
Dim Firstnumber As Integer
Dim Secondnumber As Integer
Dim Sum As Integer
Do
Portb.1 = 1
Waitms 1000
Firstnumber = 0
Secondnumber = 0
Input "Enter first number : " , Firstnumber
Input "Enter second number: " , Secondnumber
Sum = Firstnumber + Secondnumber
Print "Součet: " ; Sum
Portb.1 = 0
Waitms 1000
Loop
End