Unterprogramme

[Zardest]

danke aber ich blick da echt nich durch habe mir die seite angeschaut aber nop ich hab kp wie das gehen soll kanste mir den code nich machen dann hab ich was wo ich sehen kann aha da is mein eingang was ich sende und da schaltet der das so um das das programm weiter leuft.

[peterfido]

Demnach scheint mein letztes Beispiel wohl nicht zu laufen...

[Zardest]

in deinem habe ich nirgenswo gefunden wo ich die daten übertrage halt mit 1, die variable bestimmen und dann den wert irg wie ka

[Kampi]

Hier ist ein kleines Programm welches 1 Zeichen empfängt und in einem String speichert. Im Hauptprogramm wird dieses Zeichen dann ausgewertet:

$regfile = "m32def.dat"
$crystal = 16000000
$baud = 19200

Dim Eingabe As String * 1

On URXC OnRxD
Enable URXC
Enable Interrupts

Do

If Eingabe = "1" Then
   Print "Zahl 1"
   Eingabe = ""
End If

Loop
End

Onrxd:

  Eingabe = Chr(udr)

Return

[Zardest]

ich kann gerade nich mehr programmieren "could not detect chip,auto program failed"

[Zardest]

geht das mit zahlen genau so ? ja oder

[Kampi]

Ja.
Siehst du doch in der If-Abfrage welches Zeichen ich auswerte.

[Zardest]

ich habe gafragt ob es mit zahlen geht und du hast ja gesagt und sagst im nächsten satzt welches zeichen ich auswerte zeichen sind keine zahlen zeichen kann ich nicht in eine var laden und auswert und damit rechnen