Ülemaailmne mikrokontrolleri link alla $ 20: 15 sammuga

2024 Autor: John Day | [email protected]. Viimati modifitseeritud: 2024-01-30 08:50

Juhtige oma kodust termostaati töölt. Lülitage lüliti abil kõikjal maailmas sprinkler sisse. See juhend annab ülevaate kahe või enama 4 dollari suuruse mikrokontrolleri linkimisest, kasutades Interneti selgroogu ja mõnda lihtsat VB. Net koodi. See põhineb varasemal juhendil, mis näitab, kuidas mikrokontroller arvutiga siduda ja kasutada potti servo https juhtimiseks: //www.instructables.com/id/Control-real-world-devices-with-your-PC/ programm ja sealt teine mikrokontroller kõikjal maailmas, inimese sekkumisega või ilma. Kuidas muidu peaksid Matrixi masinad kunagi võimust võtma, kui nad omavahel rääkida ei saa?

Samm: koguge osad kokku

Paljud osad on samad, mis PC Control Instructable'is https://www.instructables.com/id/Control-real-world-devices-with-your-PC/ ja soovitatakse see enne proovimist esmalt lõpule viia kahe mikrokontrolleri ühendamiseks. Kuigi servo juhtimiseks on potti võimalik kasutada, siis seekord otsime midagi lihtsamat - lülitit, mis lülitab sisse LED -i. Lüliti võib kergesti olla paagi taseme andur ja LED võib olla jõe lähedal asuv pump, kuid alustame kõigepealt mõne lihtsa tööga. Osad - kaks Picaxe 08M kiipi - saadaval paljudest allikatest, sealhulgas Rev Ed https://www.rev- ed.co.uk/picaxe/ (Ühendkuningriik), PH Anderson https://www.phanderson.com/ (USA) ja Microzed https://www.microzed.com.au/ (Austraalia). Need kiibid on alla 4 USA dollari. Kaks järgmistest: Protoboard, 9V aku ja akuklambrid, 10k takisti, 22k takisti, 33uF 16V kondensaator, 0,1uF kondensaator, 7805L väikese võimsusega 5V regulaator, juhtmed (tahke südamikuga telefon/andmeside, nt Cat5/6), LED, 1k takisti. 1: D9 pistikupesa ja kate ning 2 meetrit 3 (või 4) põhiandmetraati (allalaadimiseks) ja lülituslüliti. 2 arvutit, millel on 9 kontaktiga jadapordid (saab siluda ühes arvutis) ja Interneti -ühendus. Arvutitele, millel pole jadaporti, USB-jadaseadmele https://www.rev-ed.co.uk/docs/axe027.pdf ja väike stereopesa.

Samm: laadige alla ja installige mõni tarkvara

Vajame tasuta VB. Net -i ja picaxe -kontrolleritarkvara ning kui olete PC -kontrolleri Instructable teinud, on teil need juba olemas. VB. Net (Visual Basic Express) on saadaval aadressil https://msdn2.microsoft.com/en -us/express/aa718406.aspx Picaxe tarkvara on saadaval aadressilt https://www.rev-ed.co.uk/picaxe/. Allalaadimiseks peate registreeruma Microsoftis -kui see on probleem, kasutage võltsitud e -posti või midagi. Mulle tundus tegelikult kasulik anda oma tõeline e -kiri, kuna nad saadavad aeg -ajalt värskendusi. Ma mainin ka picaxe foorumit https://www.picaxeforum.co.uk/, kuna see on selline foorum, kus töötavad õpetajad ja õpetajad ning kus õpilased saavad tavaliselt mõne tunni jooksul küsimustele vastused. Foorum mõistab isegi kõige lihtsamaid küsimusi, kuna mõned õpilased on alles algkooli tasemel. Palun ärge kartke abi küsida!

Samm: looge allalaadimisahel

See allalaadimisahel kasutab pilk -kiipi, paari takistit, regulaatorit ja 9 V akut. Lisateavet leiate programmi abimenüüst avanevast dokumentatsioonist/spikrist. Vooluahela ehitamiseks kulub vaid mõni minut, kui kõik osad on käepärast. Kui kiip on programmeeritud, säilitab see oma programmi EEPROM -is isegi siis, kui toide on välja lülitatud. Kuna programmeerime kahte kiipi, tasub kiibid sildistada, et saaksite teada, mis on kumb. Saate alati tagasi minna ja kiipi ümber programmeerida, eemaldades lingi ja liigutades takistit.

Lisaksin veel, et pikapid töötavad 3 AA patareiga. 5 V reguleeritud toide on kasulik analoogsisendite käitamiseks, kuna võrdluspinged ei muutu, kuid lihtsate sisse- ja väljalülitusahelate puhul pole reguleeritud toiteallikat vaja. Sellistes olukordades võib 5V regulaatori välja jätta.

Samm: programmeerige kiibid

Nimetame ühe programmi Tx ja ühe Rx. Tx on juhtimiskiip ning sellel on lüliti ja LED. Rxil on ka led. Kui lüliti muudab, läheb signaal Tx -lt Rx -le, muudab LED -i ja muudab ka teist muutujat, mis seejärel läheb tagasi Tx -le. Nii et vajutage lülitit ja vähem kui minuti pärast muutub LED mõlemal ahelal, mis näitab, et teade jõudis kohale ja Rx toimib uue lüliti asendis. Lihtsamal tasemel on pikapil 14 ühebaidist registrit. Virtuaalse võrgu loomisel ühendame kõik need registrid kokku, nii et kui bait muutub ühes pildis, muutub see kõigis pikapides. On selge, et kui kaks pikslit üritavad sama baiti muuta, muutub see väga segaseks, kuid kui iga pilt muudab ainult ühte baiti, näevad kõik teised piksid seda muutust ja saavad selle järgi tegutseda. Lihtsaid sõnumeid saab edasi ja tagasi edastada, kui teatud baiti muudetakse ainult ühe piksliga. Pott võib registris väärtust muuta ja üks või mitu muud pikslit võivad seda muuta ja servot või muud liigutada ja kütteseadme sisse lülitada. Teine register võib ruumis oleva temperatuuri tagasi saata. Kopeerige ja kleepige programmid omakorda picaxe programmeerijaks ja laadige need picaxe programmeerija sinise allalaadimisnoole abil alla vastavatesse kiipidesse. Tx: peamine: serin 3, N2400, ("andmed"), b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13 'saada arvutist pakett, kui pin2 = 0 siis 'kontrollige lülitit ja seadistage registrit b0 sõltuvalt olekust b0 = 0 muu b0 = 1 endif, kui b1 = 0, siis' muud pikslikomplektid b1 sõltuvalt b0 madalast 1 'juhtisid ära muu kõrge 1' led endif serout 0, N2400, ("Andmed", b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13) 'saatke tagasi arvutisse goto mainand Rx: main: serin 3, N2400, ("Andmed"), b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13 'hankige arvutist pakett b1 = b0' muutke register b1 võrdseks registriga b0, kui b1 = 0, siis madal 1 'juhtis muidu kõrge 1' led endif serout 0, N2400, ("Andmed", b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13) 'saatke tagasi arvutisse goto main

Samm: ehitage Tx -ahel

Kui liigute tööahela ja programmeerimisahela vahel edasi -tagasi, muutke kindlasti ühendus jalaga 2 ja 22k takisti asukoht jalalt 2 teisele. Või võite luua spetsiaalse allalaadimisahela ja liigutada kiipe üle. Pange tähele, kas vooluahel töötab või laaditakse alla, kuna see võib olla üsna segane. Eelkõige pange tähele, et jooksuring ei tööta, kui jalg 2 jääb ujuma - see tuleb maandada. Jala 2 on allalaadimisnõel ja kui see jääb ujuma, võtab see põlevkivituledest hulkuva RF vastu ja kiip arvab, et teist programmi laaditakse alla.

Samuti väärib märkimist piksenomenklatuur, mis nimetab füüsilist tihvti jalaks ja virtuaalset tihvti tihvtiks. Seega on koodis oleva tihvti 2 väljund tegelikult väljund füüsilisel jalal 5. See võib tunduda kummaline, kuid see tähendab, et koodi saab teisaldada suurematesse pikslitesse nagu 28 ja 40 kontaktiga versioonid ja see töötab endiselt.

6. samm: ehitage Rx -ahel

See ahel on peaaegu sama kui saatja - sellel lihtsalt pole lülitit.

Samm 7: Kirjutage mõni VB. Net -kood

Ma oleksin võinud koodi koostada ja selle programmi kompileeritud.exe -na kättesaadavaks teha, kuid mõne VB. Neti õppimine on nii uskumatult kasulik, et tasub seda samm -sammult läbi vaadata. Kui kasutate seda kahes erinevas arvutis, saate programmi koostada.exe -failiks, mis loob väikese installiprogrammi, mida saab teise arvutisse installida. Või pange VB. Net mõlemale arvutile ja käivitage programmid VB -st. Oletame, et teate, kuidas avada uus VB.net -projekt alates https://www.instructables.com/id/S1MMU2XF82EU2GT sammudest 7 ja 8. /Tühjale vormile lisame tööriistaribalt järgmised komponendid ja asetame need vormile näidatud asukohtadesse. Siltide ja tekstikastide jaoks muutke teksti atribuut (üleval paremal all) vajalikuks. Ärge muretsege taimeri seadete pärast - me muudame neid koodis, kuid pange taimer kindlasti sisse. Te saate asju liigutada ja asukoha kohta pole reaalseid reegleid. Suur tekstikasti on RichTextBox ja kolm väiksemat on tavalised tekstikastid. Korra osas alustame vormi ülaosast ja liigume allapoole. Kui jätate midagi välja, ilmneb koodis viga, mis peaks andma mingisuguse vihje. Valige Textbox3 jaoks juhuslik failinimi - see on teie ainulaadse pikserühma nimi ftp -serveris ja ilmselt, kui me kõik kasutame sama nimi, siis lähevad andmed segamini! Vabandame selle tabeli kriipsude pärast-tühikute sisestamine kaotab tabeli vormingu. Tööriistakasti objekt ------- Tekst ----------- ------------------------------ MärkusedLabel1 ------------------ Picaxe CommunicationsLabel2 ------------------ FTP StatusLabel3 ------------------ StatusLabel4 ---------- -------- Picaxe RegistersLabel5 ------------------ Registreeri 0-13Label6 ------------------ Väärtus 0-255 Märgis 7 ------------------ FTP lingi failinimi Tekstikast1 ---------------- 0 -------- -------------------------------------- 0 on null, mitte OTextbox2 ----- ----------- 0Textbox3 ---------------- Minu failinimi --------------------- ---------- Muuda nii, et kokkupõrkeid poleks! Button1 ------------------ ModifyRichtextbox1 Picturebox1 Picturebox2 Taimer1

Samm: lisage mõni kood

Vormivaate ja koodivaate vahel liikuva nupu asukoha kohta vaadake teise juhendi 12. sammu. Lülitage koodivaatele ja kleepige järgmine kood. Kõik värvid peaksid uuesti ilmuma nagu ekraanipildil. Kui rida pole sõnapakkimisprobleemi tõttu korralikult kopeeritud, kustutage tühikuid, kuni veateade kaob. Olen püüdnud enamikku ridu kommenteerida, nii et koodil on vähemalt mingi mõte. Kustutage avaliku klassi bitt, nii et tekst on enne selle kleepimist tühi - sellel koodil on juba avalik klass. Kui objekti, näiteks tekstikasti, pole vormile pandud või sellel on vale nimi, kuvatakse see tekstikoodis ja selle all on sinine joon. Importsüsteem. IOImports Strings = Microsoft. VisualBasic " sellised asjad nagu vasak (ja parem (stringide jaoksPublic Class Form1 Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Integer) 'unerežiimi avalduste jaoks Dim WithEvents serialPort As New IO. Ports. SerialPort' jadaport deklareerivad Dim PicaxeRegisters (0 kuni 13) As Byte 'registreerib b0 kuni b13 Dim ModifyFlag As Boolean Private Sub Form1_Load (ByVal saatja kui objekt, ByVal e As System. EventArgs) Käsitleb mind. Load' vajab kogu seda prügi -.net paneb selle automaatselt sisse, kui minna vorm1events üle/laadida Timer1. Enabled = True 'sisestage see kood vaikimisi väärtuseks vale, kui see on loodud Timer1. Interval = 20000' iga 20 sekundi järel PictureBox1. BackColor = Color. Gray 'alustage kommentaarikastidega hall PictureBox2. BackColor = Color. Gray ModifyFlag = False' kui väärtust käsitsi muuta, siis s kip download RichTextBox1. Multiline = True ', nii et see võib kuvada rohkem kui ühe rea Call DisplayPicaxeRegisters ()' kuvab 14 registrit Call ReadFTPFilename () 'loeb kettalt failinime (salvestatakse iga 20 sekundi järel) End Sub Sub SerialTxRx () Dim DataPacket (0 kuni 17) Baitidena kogu andmepakett "Andmed" +14 baiti Dim i Täisarvuna "i on alati kasulik tsüklite jms jaoks. I = 0 kuni 3 DataPacket (i) = Asc (Mid (" Data ", i + 1), 1)) 'lisage paketile sõna "Andmed" Järgmine Sest i = 0 kuni 13 DataPacket (i + 4) = PicaxeRegisters (i)' lisage paketti kõik baidid Järgmine Kui serialPort. IsOpen Siis serialPort. Close () 'igaks juhuks, kui see on juba avatud, lõpeta, kui proovid koos serialPortiga. väikesed picaxes. Parity = IO. Ports. Parity. None 'no parity. DataBits = 8' 8 bit. StopBits = IO. Ports. StopBits. One 'one stop bit. ReadTimeout = 1000' millisecon ds nii aegub 1 sekundiga, kui vastust ei tule. Ava () 'ava jadaport. DisciscInBuffer ()' puhasta sisendpuhver. Kirjutage (DataPacket, 0, 18) 'saatke andmepakettide massiiv Call Sleep (300)' 100 millisekundit Minimaalne, et oodata andmete tagasitulekut, ja rohkem, kui andmevoog on pikem. Loe (DataPacket, 0, 18) "loe andmepakettide massiivist tagasi. Sulge ()" (i - 4) = DataPacket (i) 'teisaldage uus andmepakett registrimassiivi Järgmine PictureBox1. BackColor = Värv. GreenKollane' töötab Saak ex Erandina PictureBox1. BackColor = Värv. Punane 'ei tööta Lõpp Proovige Lõpp Alam alam FTP (ByVal failinimi stringina) Dim localFile As String 'koht andmete salvestamiseks Dim remoteFile As String' failinimi on tõstutundlik, see on tõesti oluline Const host As String = "ftp://ftp.0catch.com" 'märkus 0 on null mitte märk O Const kasutajanimi As String = "picaxe.0catch.com" Const parool As String = "picaxetester" Dim URI kui string localFile = Failinimi 'pole võib -olla vajalik, kuid asukoha määratlemisel saab nt c: / kataloogi hõlpsasti sel viisil lisada. Net. FtpWebRequest = CType (System. Net. FtpWebRequest. Create (URI), System. Net. FtpWebRequest) ftp. Credentials = New System. Net. NetworkCredential (kasutajanimi, parool) 'logi sisse ftp. KeepAlive = False' Ühenduse katkestamine pärast ftp. UseBinary = True 'kasutage binaarseid kommute ftp. Timeout = 9000' timeout 9 sekundi pärast - väga kasulik, kuna ftp mõnikord sureb (ja kella sagedus 20 sekundit) võib olla vajalik aeglasem sissehelistamisühenduste jaoks ftp. Meetod = System. Net. WebRequestMethods. Ftp. UploadFile 'hakkab faili saatma Dim fs New FileStream (localFile, FileMode. Open)' avatud kohalik fail Dim filecontents (fs. Length) As Byte 'loetakse mällu fs. Read (filecontents, 0, fs. Length) fs. Close () 'sulgege fail Dim requestStream As Stream = ftp. GetRequestStream ()' start ftp link requestSt ream. Write (filecontents, 0, filecontents. Length) 'saatke see requestStream. Close ()' sulgege link PictureBox2. BackColor = Color. GreenYellow 'muutke kast roheliseks, et öelda, et töötas hästi Label2. Text = "FTP Connected"' tekst, mis ütleb, et see on ühendatud Catch 'ei saa ühendada PictureBox2. BackColor = Color. Red' kasti punaseks, kuna ühendust pole 'laadib kaugfaili alla kohalikule failile Dim localFile As String' andmete salvestamise koht Dim remoteFile As String 'failinimi on tõstutundlik, see on tõesti oluline Const host As String = "ftp://ftp.0catch.com" Const kasutajanimi As String = "picaxe.0catch.com "Const parool As String =" picaxetester "Dim URI kui string" localFile = "C: \" + Failinimi 'salvestab juurkataloogi, kuid saab seda localFile = Failinime muuta, nii et vajadusel saab lisada ka c: / tegelik asukoht remoteFile = "/" + failinimi 'lisatud kaug -ftp asukohta URI = host + remoteFile' moodustavad täielik aadress Proovige Dim ftp As System. Net. FtpWebRequest = CType (System. Net. FtpWebRequest. Create (URI), System. Net. FtpWebRequest) ftp. Credentials = New System. Net. NetworkCredential (kasutajanimi, parool) 'logi sisse ftp. KeepAlive = False 'katkestatakse pärast ftp lõpetamist. UseBinary = True' binaarrežiim ftp. Timeout = 9000 'timeout pärast 9 sekundit ftp. Method = System. Net. WebRequestMethods. Ftp. DownloadFile' lae alla fail ', mis loetakse osadeks ei tea, kui suur on fail Kasutades vastust kui System. Net. FtpWebResponse = CType (ftp. GetResponse, System. Net. FtpWebResponse) vastuse Stream kasutamine IO. Stream = response. GetResponseStream Kasutades fs As New IO. FileStream (localFile, IO. FileMode. Create) Hämarduspuhver (2047) Byte Dim loetakse täisarvuna = 0 Do read = responseStream. Read (buffer, 0, buffer. Length) 'ftp fs. Kirjuta (puhver, 0, loe)' ja kirjutage faili Loop Kuni lugemiseni = 0 ', kuni enam tükki ei reageeriStream. Close ()' sulgege ftp -fail fs. Flush () 'flush clear fs. Close ()' ja sulgege th e fail Lõpeta vastuse kasutamineStream. Close () 'sulgege see isegi siis, kui seal pole midagi Lõpeta vastuse kasutamine. Sulge () PictureBox2. BackColor = Värv. GreenKollane' roheline kast, nagu see töötas Label2. Text = "FTP Connected" "ja tekst, mis ütleb töötas Lõpp saaki kasutades "pani siia veakoodid PictureBox2. BackColor = Värv. Punane" punane kast, kuna see ei töötanud Nagu System. Object, ByVal e kui System. EventArgs) Käsitleb taimerit 1. Tick If ModifyFlag = False Then 'kui kasutaja muutis baiti, siis ärge laadige alla Label3. Text = "Downloading" System. Windows. Forms. Application. DoEvents () 'nii kuvatakse uus silditekst Call FTPDownload (TextBox3. Text)' download remote file Label3. Text = "Downloaded" System. Windows. Forms. Application. DoEvents () Call ReadRemoteFileToRegisters () 'salvesta failinumbrid registrimassiivi Label3. Text = "Räägime piksliga" System. Windows. Forms. Application. DoEvents () Else ModifyFlag = False 'lähtesta lipp Lõpeta, kui kõne SerialTxRx () 'saadab pikslisse ja loeb selle tagasi Label3. Text = "Üleslaadimine" System. Windows. Forms. Application. DoEvents () Helista FTPUpload (TextBox3. Text) 'saatke tagasi ftp -saidile nimega Label3. Text = "Puhkamine" Call SaveFTPFilename ()' nii loeb sisse taaskäivitamisel End Sub Sub DisplayPicaxeRegisters () Dim i As Integer Dim registrinumber stringina RichTextBox1. Multiline = True ', nii et tekstikasti RichTextBox1. Clear ()' saab kuvada rohkem kui ühe rea registrinumber = kärpida (Str (i)) 'kärpida ära tühikud Kui i <10 Siis registrinumber = "0" + registrinumber' lisage 0 -le alla 10 lõppu lõppu Kui RichTextBox1. AppendText (registrinumber + "=" + Str (PicaxeRegisters (i))) + Chr (13)) Järgmine 'chr (13) on vaguni tagastamine, nii et uus rida Lõpeta alam privaatne alamnupp 1_Click (ByVal saatja) As System. Object, ByVal e As System. EventArgs) Käepideme nupp 1. Klõpsake Dim i As Integer 'kontrollige kõigepealt vahemikust i = Val (TextBox1. Text) Kui i <0 või i> 13 Siis TextBox1. Text = 0 End If i = Val (TextBox2. Text) Kui i <0 Või i> 255, siis TextBox2. Text = 0 End If PicaxeRegisters (Val (TextBox1. Text)) = Val (TextBox2. Text) 'change the value Call DisplayPicaxeRegisters ()' and värskendage ekraani ModifyFlag = True "ja järgmine ftp link jätke allalaadimine vahele Lõpp alam alam SaveRegistersToLocalFile ()" salvestage registrimassiiv kohalikus tekstifailis Dim i As Integer FileOpen (1, TextBox3. Text, OpenMode. Output) "avage tekstifail nimega tekstikastis i = 0 kuni 13 PrintLine (1, Str (PicaxeRegisters (i))) 'salvesta 14 väärtust Järgmine FileClose (1)' sulge fail Lõpp Alam alam ReadRemoteFileToRegisters () ' Dim i täisarvuna Dim LineOfText stringina Proovige FileOpen (1, TextBox3. Text, OpenMode. Input) "loe kaugfaili nime i = 0 kuni 13 LineOfText = LineInput (1)" loetakse 14 -l real es PicaxeRegisters (i) = Val (LineOfText) 'teisenda tekst väärtusteks Järgmine FileClose (1) Püüa ex Erandina FileClose (1)' faili ei eksisteeri, nii et ära tee midagi Lõpeta Proovi Lõpp AlamlugemineFTPFilename () 'nii nimi kaug -ftp -fail on sama järgmine kord, kui seda programmi käivitatakse nimi FileClose (1) Catch ex Erandina FileClose (1) Lõpeta Proovi End Sub Sub SaveFTPFilename () FileOpen (1, "FTPFilename.txt", OpenMode. Output) "salvesta kaug -ftp -faili nimi PrintLine (1, TextBox3. Text) FileClose (1) Lõpeta alamklass

Samm: käivitage programm mõlemas arvutis

Alustage programmi käivitamist, klõpsates ekraani ülaosas rohelist kolmnurka - nuppu „Alusta silumist”. 20 sekundi jooksul ei juhtu midagi ja siis proovib programm luua ühenduse ftp -serveriga ning üritab luua ühenduse pikapiga. Pildikastid muutuvad punaseks või roheliseks. Ftp asukoht on tasuta veebisait ja igaüks saab seda kasutada, kuid peate kasutama erinevat ftp -tööfaili nime (minu nimi on DoctorAcula1), vastasel juhul võime sama failinime kasutamisel kõik üksteise andmed saada! Kui soovite, saate lõpuks oma ftp -saidi - lihtsalt muutke ftp asukohta, kasutajanime ja parooli kahes kohas minu 0Catchi veebisaidi koodis. Enamik veebisaite lubab ftp -d. Samale ftp -failile pääseb juurde mitu arvutit - ftp -failiserver sorteerib, mis järjekorras need juhtuvad. Aeg -ajalt esineb andmete kokkupõrkeid või hangub ja tundub, et neid juhtub iga 20 faili lugemise ajal. Koodil on ajalõpp, kui see juhtub, nii et see ei tagasta andmeid, vaid rikutud andmeid. 128kbs üleslaadimiskiirusega lairibaühenduse kasutamine tähendab, et faili üleslaadimine võtab aega umbes 3 sekundit, kuid mõnikord kuni 8 sekundit, millest suurem osa on kasutusel pigem käepigistuses kui andmeedastuses. See määrab taimer1 minimaalseks umbes 20 sekundiks, võttes arvesse pildi allalaadimist, üleslaadimist ja vestlust. Väga kiire lairibaühenduse korral saate võib -olla lühendada tsükliaega. VB -programmis saate registrit käsitsi muuta. Kui te seda teete, jätab järgmine taimeritsükkel ftp -saidilt allalaadimise vahele ja saadab uued andmed pilti ning loeb need tagasi ja laadib need üles. Uued andmed leiavad seega tee kõigi selle grupiga seotud piltide juurde. See on abiks silumisel ja/või arvutitarkvara ühendamisel mikrokontrolleri riistvaraahelaga. Veebisaitidel on juurdepääs ka riistvararingile, kasutades PERL -skripti või muud sarnast, et kirjutada uus fail ftp -saidile. See ekraanipilt tehti Tx -kiibiga, lüliti oli sisse lülitatud ja register b0 = kuni 1 saadeti Rx -kiibile, mis oli siis ka registri b1 muutnud 1 -ks. Led oli seega mõlemal laual süüdatud. See on tühine rakendus, kuid LED -i asemel on lihtne sisse lülitada 3,6 kW pump. Veel mõned ideed on aadressil https://drvernacula.topcities.com/, sealhulgas pikslite linkimine päikeseenergial töötavate raadiolinkide kaudu. Raadioside ja Interneti kaudu on võimalik, et masinad jõuavad paljudesse maakera nurkadesse. Picaxe foorumis on mõned ideed selle idee edasiarendamiseks ning arvuti ja ftp saidi asendamiseks spetsiaalsete veebiserveri kiipidega, mis ühendatakse otse ruuteriga. Ilmselgelt vähendaks see lingi energiatarvet. Kui olete huvitatud edasistest aruteludest, postitage see Intstructable kommentaaridesse ja/või picaxe foorumisse. Dr James MoxhamAdelaide, Lõuna -Austraalia

10. samm: koodi ekraanipildid

Soovi korral on siin rida ekraanipilte vb.net koodist koos kõigi vormindustega. See kood kopeeriti tegelikult sellest juhendist tagasi ja vormindus ilmus automaatselt uuesti. Parem oleks tekst kopeerida ja kleepida kui proovida neid pilte lugeda, kuid need on kasulikud, kui olete Interneti -kohvikus ega saa installida vb.net -i.

11. samm: ekraanipilt2

Ekraanipilt 2

12. samm: ekraanipilt 3

Ekraanipilt 3

13. samm: ekraanipilt 4

Ekraanipilt 4

14. samm: ekraanipilt 5

Ekraanipilt 5

15. samm: ekraanipilt 6

Ekraanipilt 6