Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
 
Delphi 12 Athens
 
#24

AW: Mit Delphi einen Mikrokontroller steuern

  Alt 3. Jul 2012, 22:10
Variablen direkt Auslesen natürlich nicht,
aber man könnte es auch über eine Befehl ala "gib mit den Wert von Speicherzelle 123" erledigen und natürlich auch "setze an Adresse...".

Noch mit Delphi 4, über den seriellen Port (damals hatten meine Rechner noch Einen), ging es problemlos, also über ein kleines Datenprotokoll, so ala
- Befehl "1" = mache dieses
- Befehl "2" = mache jenes
- Befehl "3 123" = Setze Variable x auf 123
- Befehl "4" = gib mir Wert von Variable x
- Befehl "5" = aktiviere Ausgang/Port 1

Delphi-Quellcode:
AssignFile(F, 'COM1');
Rewrite(F);
WriteLn(F, '1');
WriteLn(F, '3', 123);
WriteLn(F, '4');
ReadLn(F, Wert);
...
und in der C-Control dann quasi ein
Delphi-Quellcode:
DEFINE x BYTE
DEFINE y WORD
#Loop
  GET x
  IF x = 1 THEN GOTO aa
  IF x = 2 THEN GOTO bb
  IF x = 3 THEN GOTO cc
  IF x = 4 THEN GOTO dd
GOTO Loop

#dd
GET y
irgendwas = y
GOTO Loop

#ee
PUT irgendwas
GOTO Loop

#ff
LCD_Locate(1, 1)
LCD_WriteText("Hallo Welt")
GOTO Loop
Ich hoffe mal die Syntax stimmt halbwegs, aber es gibt auch genügend Beispiele auf der CD (damals noch Disketten).


Wobei ich es heute wohl eher über eine TComPort-Komponente und Binär erledigen würde.


[add]
Falls CCBasic genutzt wird
http://groups.uni-paderborn.de/physi...mc_ccbasic.pdf
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu ( 3. Jul 2012 um 22:19 Uhr)
  Mit Zitat antworten Zitat