Το Boe Bot πλοηγείται σε ένα λαβύρινθο: 4 βήματα

2024 Συγγραφέας: John Day | [email protected]. Τελευταία τροποποίηση: 2024-01-30 08:31

Αυτό το εκπαιδευτικό θα σας βοηθήσει να δημιουργήσετε προφυλακτήρες για το boe bot και θα σας δώσει τον κώδικα που θα περιηγηθεί στο boe bot μέσω του λαβυρίνθου.

Βήμα 1: Υλικά για τους προφυλακτήρες

Ακολουθεί μια λίστα υλικών που θα χρειαστείτε για να φτιάξετε τους προφυλακτήρες:

-Χαρτόνι

-Ταινία-κασέτα

-Σύρματα

-Αλουμινόχαρτο

-Αντιστάσεις

-Velcro

Βήμα 2: Χτίζοντας τους προφυλακτήρες χρησιμοποιώντας τα υλικά

Αυτό που θα θέλατε να κάνετε πρώτα είναι να χρησιμοποιήσετε το χαρτόνι για να φτιάξετε πτερύγια και να κολλήσετε κομμάτια χαρτονιού μαζί για να φτιάξετε μια στοίβα. Τώρα, κολλήστε κομμάτια αλουμινίου στα πτερύγια από χαρτόνι. Θα υπάρχουν τέσσερα κομμάτια φύλλου αλουμινίου που θα κολληθούν μέσα στα πτερύγια σε κάθε πλευρά. Τώρα συνδέστε τα πτερύγια στη στοίβα από χαρτόνι χρησιμοποιώντας κόλλα. Στη συνέχεια, συνδέστε την επίπεδη πίσω πλευρά της στοίβας από χαρτόνι στο μπροστινό μέρος του boe bot χρησιμοποιώντας Velcro. Τέλος, συνδέστε τα θετικά και αρνητικά σύρματα στο αλουμινόχαρτο στα πτερύγια. Συγχαρητήρια, ολοκληρώσατε τώρα την κατασκευή των προφυλακτήρων.

Βήμα 3: Το κύκλωμα

Το κύκλωμα είναι πολύ απλό και εύκολο να γίνει. Ρίξτε μια ματιά στην εικόνα και δημιουργήστε το κύκλωμα στο Boe bot σας.

Βήμα 4: Ο κώδικας

Εδώ είναι ο κώδικας για το boe bot.

'{$ STAMP BS2}

'{$ PBASIC 2.5}

'Καρφίτσες εισόδου/εξόδου

«Mankaran Kaler

Πρόγραμμα 'Mr. Birch' Maze robot 'πρόγραμμα για πλοήγηση στο boebot μέσω οποιουδήποτε λαβύρινθου

'---------- μεταβλητές ---------

LMotor PIN 14 RMotor PIN 15

loopX VAR Word

LFF CON 850

RFF CON 650 Lstop CON 750 Rstop CON 750 LRF CON 650 RRF CON 850

temp VAR Byte 'προσωρινό κατάστημα

Μεταβλητή RunStatus DATA $ 00 'αποθηκευμένη στη ROM

'ΔΙΑΒΑΣΤΕ RunStatus, temp' Διαβάστε τη μεταβλητή από ROM

'temp = ~ temp' αντιστρέψτε την τιμή 0 σε 1 ή 1 σε 0 'ΓΡΑΠΤΕ RunStatus, temp' Γράψτε τη μεταβλητή πίσω στη ROM 'ΑΝ (temp> 0) ΤΟ ΤΕΛΟΣ' Ελέγξτε αν η τιμή είναι 1 'αν ναι ΤΕΛΟΣ του προγράμματος

δεξιά λέξη VAR

γρήγορη VAR Word '---------- ενέργειες --------------- ΓΙΝΕΤΕ GOSUB ForwardFast DEBUG; IN10 IF IN10 = 0 THEN HIGH 0 GOSUB LeftTurn ΑΛΛΟ ΧΑΜΗΛΟ 0 ENDIF

DEBUG; IN11

IF IN11 = 0 THEN HIGH 1 GOSUB RightTurn ELSE LOW 1 ENDIF DEBUG CLS

ΒΡΟΧΟΣ

'-------------κατευθύνσεις------------

Αριστερή στροφή:

ΓΙΑ δεξιά = 1 ΕΩΣ 120 PULSOUT LMotor, LRF PULSOUT RMotor, RFF NEXT RETURN

Δεξιά στροφή:

FOR loopX = 1 TO 120 PULSOUT LMotor, LFF PULSOUT RMotor, RRF NEXT RETURN

ForwardFast:

ΓΙΑ ΓΡΗΓΟΡΑ = 1 ΕΩΣ 300 PULSOUT LMotor, LFF PULSOUT RMotor, RFF NEXT RETURN