Hallo,
ich bin im Moment dabei, den Code für das Auslesen von Midisignalen mit dem MEGA 16 zu schreiben. Ganz zu Anfang muss ich sagen, dass das mein Einstieg in Mikrokontroller und mein erstes Programm ist, also nich in Lachen ausbrechen bei n00b-Fragen
Ich habe folgenden Code (Ähnlich dem in der Hilfe, in die ich selbstverständlich geschaut habe):
Code:
'###################################################
'Midi.bas.BAS
'für
'LED-Keyboard
'#######################################################
$regfile = "m16def.dat"
$framesize = 40
$swstack = 10
$hwstack = 32
$crystal = 16000000
$baud = 31250
$sim 'Nicht vergessen zu entfernen!!!
Config Serialin = Buffered , Size = 100
Dim A As String * 10
Enable Interrupts
Do
If Ischarwaiting() = 1 Then
Input A
Print A
End If
Wait 1
Loop
Beim simulieren führt er die Schleife aus, bis ich eine Taste drücke. Dann wartet er bei "Input A", bis ich noch eine Taste drücke. Dann springt er aber ganz nach oben in die erste Zeile und macht nichts mehr. Warum führt er nicht die Schleife aus bzw. warum springt er raus????
MFG
David
Lesezeichen