ATMega2561 kommuniziert nicht mit PC

OP #3190088
Lesenswert?

Hallo zusammen,

ich habe einen ATMega2561 
http://www.alvidi.de/shop/product_info.php?info=p5_AVR-Entwicklungsmodul-mit-ATMEGA2561.html 
und möchte per serielle Schnittstelle mit dem PC kommunizieren. Weder 
mein C++ -Programm noch Putty funktionieren. Eine Fehlermeldung kommt 
nicht. Wenn ich mit dem Terminal emulator von Bascom arbeiten will, 
kommt die Meldung "Could not open COM1". Habe COM1 bis COM4 durch 
probiert. Kein COM geht;-(. Geht das überhaupt mit diesem Controller? 
Bei meinem ATMega2560 
http://www.shop.robotikhardware.de/shop/catalog/product_info.php?cPath=64&products_id=162 
funktioniert es.

Mein Bascom-Programm:
1
$regfile = "m2561def.dat"
2
$hwstack = 82
3
$framesize = 68
4
$swstack = 68
5

6
$crystal = 16000000           'Quarzfrequenz
7
$baud = 19200
8

9
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
10
''''''''''''''''''''''''''''''' Ausgänge '''''''''''''''''''''''''''''''''''''''
11
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
12

13
Config Portf.0 = Output
14
Led0 Alias Portf.0
15
Config Portf.1 = Output
16
Led1 Alias Portf.1
17
'Config Portf.2 = Output
18
'Led2 Alias Portf.2
19
'Config Portf.3 = Output
20
'Led3 Alias Portf.3
21

22

23
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
24
''''''''''''''''''''''''''''''' Echo Off '''''''''''''''''''''''''''''''''''''''
25
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
26
Echo Off
27

28
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
29
''''''''''''''''''''''''''''''' Variablen ''''''''''''''''''''''''''''''''''''''
30
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
31

32
Dim Eingabe As String * 25
33
Dim Ausgabe As String * 25
34

35
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
36
''''''''''''''''''''''''''''''' Serielle Schnittstellen'''''''''''''''''''''''''
37
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
38
Config Com1 = 19200 , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0
39
Open "com1:" For Binary As #1 'RS232
40

41
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
42
''''''''''''''''''''''''''''''' Definition Unterprogramme ''''''''''''''''''''''
43
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
44
Declare Sub Daten_vom_pc_empfangen()
45
Declare Sub Daten_zum_pc_senden()
46

47

48
Do
49
' Hauptschleife
50
  Call Daten_vom_pc_empfangen()
51
  Call Daten_zum_pc_senden()
52

53
Loop
54

55

56
End
57

58

59
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
60

61
Sub Daten_vom_pc_empfangen()
62

63
  Waitms 15
64
  Toggle Led0
65

66
  Input #1 , Eingabe
67

68

69
 End Sub
70

71

72
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
73

74
Sub Daten_zum_pc_senden()
75

76
  Waitms 15
77
  Toggle Led1
78

79
  Ausgabe = Eingabe + Chr(13)
80

81
  Print #1 , Eingabe
82

83

84
End Sub

Hat jemand eine Idee?

Vielen Dank im Voraus.

Grüße

datatom

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren