Brauche bitte dringend ein Demo Programm

[Razzorhead]

ähh... sprache is egal right? ;P

procedure TForm1.Timer1Timer(Sender: TObject);
var
sred:string;
sgreen:string;
sblue:string;
begin
if change then
begin
  inc(count);
  if red.Position < 10 then sred := '00'+IntToStr(red.position);
  if (red.Position > 9) and (red.Position < 99) then sred := '0'+IntToStr(red.position);
  if red.Position > 99 then sred := IntToStr(red.position);

  if green.Position < 10 then sgreen := '00'+IntToStr(green.position);
  if (green.Position > 9) and (green.Position < 99) then sgreen := '0'+IntToStr(green.position);
  if green.Position > 99 then sgreen := IntToStr(green.position);

  if blue.Position < 10 then sblue := '00'+IntToStr(blue.position);
  if (blue.Position > 9) and (blue.Position < 99) then sblue := '0'+IntToStr(blue.position);
  if blue.Position > 99 then sblue := IntToStr(blue.position);
  port.WriteStr(sred+sgreen+sblue+#13#10);
  change := false;
end;

[pacman]

dann poste ich auch mal einen für den NIBObee^^

#include <nibobee/iodefs.h>
#include <nibobee/motpwm.h>
#include <nibobee/delay.h>
#include <nibobee/sens.h>
enum {
MODE_STOP,
MODE_DRIVE,
MODE_BACK,
MODE_STEER_R,
MODE_STEER_L,
MODE_AVOID_R,
MODE_AVOID_L
};
int16_t speed_l;
int16_t speed_r;
uint16_t counter_ms;
uint8_t perform_check(uint8_t mode);
uint8_t do_stop();
uint8_t do_drive();
uint8_t do_back();
uint8_t do_steer_r();
uint8_t do_steer_l();
uint8_t do_avoid_r();
uint8_t do_avoid_l();
int main() {
motpwm_init();
sens_init();
uint8_t mode;
while(1==1) {
enable_interrupts();
delay(1);
mode = perform_check(mode);
switch (mode) {
case MODE_STOP: mode = do_stop(); break;
case MODE_DRIVE: mode = do_drive(); break;
case MODE_BACK: mode = do_back(); break;
case MODE_STEER_R: mode = do_steer_r(); break;
case MODE_STEER_L: mode = do_steer_l(); break;
case MODE_AVOID_R: mode = do_avoid_r(); break;
case MODE_AVOID_L: mode = do_avoid_l(); break;
}
switch (mode) {
case MODE_STOP: speed_l = 0; speed_r = 0;
break;
case MODE_DRIVE: speed_l = 500; speed_r = 500;
break;
case MODE_BACK: speed_l = -500; speed_r = -500;
break;
case MODE_STEER_R: speed_l = 600; speed_r = 400;
break;
case MODE_STEER_L: speed_l = 400; speed_r = 600;
break;
case MODE_AVOID_R: speed_l = -400; speed_r = -600;
break;
case MODE_AVOID_L: speed_l = -600; speed_r = -400;
break;
}
motpwm_setLeft(speed_l);
motpwm_setRight(speed_r);
}
return 0;
}
uint8_t perform_check(uint8_t mode) {
if (sens_getLeft() && sens_getRight()) {
if ((sens_getLeft()==-1) && (sens_getRight()==-1)) {
mode = MODE_BACK;
} else {
mode = MODE_STOP;
}
}
return mode;
}
uint8_t do_stop() {
if ((sens_getLeft()==0) && (sens_getRight()==0)) {
return MODE_DRIVE;
}
return MODE_STOP;
}
uint8_t do_back() {
if (sens_getLeft()==0) {
return MODE_AVOID_L;
}
if (sens_getRight()==0) {
return MODE_AVOID_R;
}
return MODE_BACK;
}
uint8_t do_drive() {
if (sens_getRight()==1) {
return MODE_STEER_L;
}
if (sens_getLeft()==1) {
return MODE_STEER_R;
}
if (sens_getRight()==-1) {
return MODE_AVOID_L;
}
if (sens_getLeft()==-1) {
return MODE_AVOID_R;
}
return MODE_DRIVE;
}
uint8_t do_steer_r() {
if (sens_getLeft()==0) {
return MODE_DRIVE;
}
return MODE_STEER_R;
}
uint8_t do_steer_l() {
if (sens_getRight()==0) {
return MODE_DRIVE;
}
return MODE_STEER_L;
}
uint8_t do_avoid_r() {
if (counter_ms==0) {
counter_ms=1000;
} else {
counter_ms--;
}
if (counter_ms) {
return MODE_AVOID_R;
} else {
return MODE_DRIVE;
}
}
uint8_t do_avoid_l() {
if (counter_ms==0) {
counter_ms=1000;
} else {
counter_ms--;
}
if (counter_ms) {
return MODE_AVOID_L;
} else {
return MODE_DRIVE;
}
}

[hagbart06]

Wenn ich das jetzt richtig gesehen habe, ist das K8055 keine wirkliche SPS, sondern eher eine Platine mit nem µC drauf. Kann man auch über USB anschließen. Wenn du die Platine mit einem Rechner steuern willst, brauchst du wohl eine Software für den µC und eine für den PC. Ansonsten halt nur die für den µC. Aber anscheinend sollte der ganze Thread wohl nur ein Scherz sein.

[TobiKa]

So etwas dreistes gabs hier wirklich noch nicht... man man man.

[Hubert.G]

Ich habe eher so den Eindruck das er keine Ahnung davon hat was er sich da gekauft hat. Vielleicht wurde er auch nur gut Beraten.

[TobiKa]

Ja, das sieht man schon an seinem anderen Thread, bei dem ihm auch nicht geholfen werden konnte weil es einfach nicht das richtige für sein Vorhaben ist!

[Sebas]

ich würd ihm ja empfehln das viech zurückzuschicken und sich ein arduino board zu kaufen
dann wär er an einen nachmittag fertig

[Friedleif]

Über google findet sich auch die Velleman Seite dazu: http://www.velleman.eu/distributor/p...g=en&id=351346
Da gibts sogar ne Software fürs eiPhone.

LabView Beispiele finden sich über Google z.B. auch, auf der CD sollen wohl auch Beispiele sein.

[Richard]

So etwas dreistes gabs hier wirklich noch nicht... man man man.

Ja, der junge mann ist echt cccoooooool. Wahrscheinlich ist er noch nicht entwöhnt und Mama wischt noch den Popo ab.

Gruß Richard