Inhaltsverzeichnis:
2025 Autor: John Day | [email protected]. Zuletzt bearbeitet: 2025-01-13 06:56
Dieses anweisbare hilft Ihnen beim Erstellen von Stoßfängern für den Boe-Bot und liefert Ihnen den Code, der den Boe-Bot durch das Labyrinth navigiert.
Schritt 1: Materialien für die Stoßfänger
Hier ist eine Liste der Materialien, die Sie benötigen, um die Stoßfänger herzustellen:
-Karton
-Band
-Drähte
-Aluminiumfolie
-Widerstände
-Klettverschluss
Schritt 2: Aufbau der Stoßfänger mit den Materialien
Was Sie zuerst tun möchten, ist, die Kartonklappen zu verwenden und Kartonstücke zu einem Stapel zusammenzukleben. Kleben Sie nun Aluminiumstücke auf die Klappen aus Pappe. Es gibt vier Stücke Aluminiumfolie, die auf jeder Seite in die Klappen geklebt werden. Befestigen Sie nun die Klappen mit Klebstoff am Kartonstapel. Als nächstes befestigen Sie die flache Rückseite des Kartonstapels mit Klettverschluss an der Vorderseite des Boe Bot. Befestigen Sie schließlich die positiven und negativen Drähte an der Aluminiumfolie an den Klappen. Herzlichen Glückwunsch, Sie sind jetzt mit der Herstellung der Stoßfänger fertig.
Schritt 3: Die Schaltung
Die Schaltung ist sehr einfach und leicht zu machen. Schauen Sie sich das Bild an und erstellen Sie die Schaltung auf Ihrem Boe-Bot.
Schritt 4: Der Code
Hier ist der Code für den Boe-Bot.
' {$STEMPEL BS2}
' {$PBASIC 2.5}
'I/O-Pins
'Mankaran Kaler
'Mr. Birch 'Labyrinth-Roboterprogramm 'Programm, um den Boebot durch jedes Labyrinth zu navigieren
'---------Variablen---------
LMotor PIN 14 RMotor PIN 15
loopX VAR-Wort
LFF CON 850
RFF CON 650 Lstop CON 750 Rstop CON 750 LRF CON 650 RRF CON 850
temp VAR Byte 'Zwischenspeicher
RunStatus DATA $00 'Variable im ROM gespeichert
'READ RunStatus, temp 'Variable aus ROM lesen
'temp = ~temp 'den Wert 0 auf 1 oder 1 auf 0 invertieren 'WRITE RunStatus, temp 'Schreibe die Variable zurück ins ROM 'IF (temp>0) THEN END 'Prüfe ob der Wert 1 ist 'wenn ja ENDE das Programm
richtiges VAR-Wort
fast VAR Word '----------Aktionen-------------- DO GOSUB ForwardFast DEBUG? IN10 IF IN10=0 THEN HIGH 0 GOSUB LeftTurn ELSE LOW 0 ENDIF
DEBUG ? IN11
IF IN11=0 THEN HIGH 1 GOSUB RightTurn ELSE LOW 1 ENDIF DEBUG CLS
SCHLEIFE
'-------------Richtungen------------
Links abbiegen:
FOR rechts = 1 BIS 120 PULSOUT LMotor, LRF PULSOUT RMotor, RFF NEXT RETURN
Rechtskurve:
FOR loopX = 1 TO 120 PULSOUT LMotor, LFF PULSOUT RMotor, RRF NEXT RETURN
VorwärtsSchnell:
FOR fast = 1 TO 300 PULSOUT LMotor, LFF PULSOUT RMotor, RFF NEXT RETURN