„Boe Bot“plaukia labirintu: 4 žingsniai

2024 Autorius: John Day | [email protected]. Paskutinį kartą keistas: 2024-01-30 10:44

Ši instrukcija padės jums sukurti „Boe bot“buferius ir suteiks jums kodą, kuriuo bus galima naršyti „boe bot“per labirintą.

1 žingsnis: buferių medžiagos

Čia yra medžiagų, kurių jums reikės buferiams gaminti, sąrašas:

-Kartonas

-Juosta

-Laidai

-Aliuminio folija

-Rezistoriai

-Velcro

2 žingsnis: buferių kūrimas naudojant medžiagas

Pirmiausia norėsite padaryti kartoną, kad padarytumėte atvartus ir suklijuotumėte kartono gabalus, kad susidarytumėte krūvą. Dabar užklijuokite aliuminio gabalus ant atvartų, pagamintų iš kartono. Bus keturi aliuminio folijos gabalai, kurie bus užklijuoti lipnia juosta kiekvienoje pusėje. Dabar pritvirtinkite atvartus prie kartono kamino, naudodami klijus. Tada pritvirtinkite plokščią kartono krūvos galinę pusę prie „boe bot“priekio, naudodami Velcro. Galiausiai pritvirtinkite teigiamus ir neigiamus laidus prie aliuminio folijos ant atvartų. Sveikiname, dabar baigėte gaminti buferius.

3 žingsnis: grandinė

Grandinė yra labai paprasta ir lengvai pagaminama. Pažvelkite į paveikslėlį ir sukurkite grandinę savo „Boe bot“.

4 žingsnis: Kodas

Čia yra „boe bot“kodas.

„{$ STAMP BS2}

„{$ PBASIC 2.5}

„Įvesties/išvesties smeigtukai

„Mankaranas Kaleris

„Mr. Birch“roboto labirinto programa “Programa, skirta naršyti„ Boebot “per bet kurį labirintą

'---------- kintamieji ---------

LMotor PIN 14 RM Motor 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 baitų laikina parduotuvė

„RunStatus DATA $ 00“kintamasis saugomas ROM

'READ RunStatus, temp' Skaitykite kintamąjį iš ROM

'temp = ~ temp' apverskite vertę nuo 0 iki 1 arba nuo 1 iki 0 'WRITE RunStatus, temp' Įrašykite kintamąjį atgal į ROM 'IF (temp> 0) THEN END' Patikrinkite, ar vertė yra 1 ', jei taip PABAIGA programa

teisingas VAR žodis

greitas VAR Word '---------- veiksmai --------------- AR 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

KILPAS

'------------- nuorodos ------------

Kairys posūkis:

Į dešinę = nuo 1 iki 120 PULSOUT LMotor, LRF PULSOUT RMotor, RFF NEXT RETURN

„RightTurn“:

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

„ForwardFast“:

Greitai = nuo 1 iki 300 PULSOUT LMotor, LFF PULSOUT RMotor, RFF NEXT RETURN