Povezava po vsem svetu za mikrokrmilnik za korake pod 20 USD: 15 korakov

2024 Avtor: John Day | [email protected]. Nazadnje spremenjeno: 2024-01-30 12:08

Domači termostat nadzirajte med delom. S pritiskom na stikalo vklopite brizgalno z vsega sveta. Ta Instructable prikazuje, kako povezati dva ali več mikrokrmilnikov v vrednosti 4 USD z uporabo hrbtenice interneta in nekaj preproste kode VB. Net. To temelji na prejšnjem Instructable, ki prikazuje, kako povezati mikrokrmilnik z računalnikom in uporabiti lonec za nadzor servo https://www.instructables.com/id/Control-real-world-devices-with-your-PC/ Tokrat imamo mikrokontroler, ki se pogovarja s programom VB. Net in nato s spletnim mestom ftp, nazaj na drugo VB. Net program in od tod drugi mikrokrmilnik kjer koli na svetu, s človekovim posredovanjem ali brez njega. Kako drugače naj bi stroji v Matrixu sploh prevzeli, če se ne morejo med seboj pogovarjati?

1. korak: Zberite dele

Številni deli so enaki kot v navodilih za nadzor računalnika https://www.instructables.com/id/Control-real-world-devices-with-your-PC/, zato je priporočljivo, da to najprej dokončate, preden poskusite za povezavo dveh mikrokrmilnikov. Čeprav je povsem mogoče uporabiti lonec za krmiljenje servomotorja, se bomo tokrat lotili nečesa preprostejšega - stikala, ki vklopi LED. Stikalo bi lahko bilo preprosto senzor nivoja rezervoarja, LED pa bi lahko bila črpalka v bližini reke, vendar najprej naredimo nekaj preprostega. Deli - dva čipa Picaxe 08M - na voljo iz številnih virov, vključno z Rev Edom https://www.rev- ed.co.uk/picaxe/ (UK), PH Anderson https://www.phanderson.com/ (ZDA) in Microzed https://www.microzed.com.au/ (Avstralija). Ti čipi so pod 4 USD. Dve od: Protoboard, 9V baterija in sponke za baterije, 10k upor, 22k upor, 33uF 16V kondenzator, 0,1uF kondenzator, 7805L nizkoenergetski regulator 5V, žice (enožilni telefonski/podatkovni kabel, npr. Cat5/6), LED, 1k upor. 1 od: ženska vtičnica in pokrov D9 ter 2 metra 3 (ali 4) podatkovne žice (za prenos) in preklopno stikalo. 2 računalnika z 9 -polnimi serijskimi vrati (mogoče jih je odpraviti v enem računalniku) in internetno povezavo. Za računalnike brez serijskih vrat priključite USB na serijsko napravo https://www.rev-ed.co.uk/docs/axe027.pdf in majhno stereo vtičnico.

2. korak: Prenesite in namestite nekaj programske opreme

Potrebovali bomo brezplačno programsko opremo VB. Net in krmilnik picaxe, in če ste naredili računalniški krmilnik Instructable, ga boste že imeli. VB. Net (Visual Basic Express) je na voljo na https://msdn2.microsoft.com/en -us/express/aa718406.aspx Programska oprema picaxe je na voljo na spletnem mestu https://www.rev-ed.co.uk/picaxe/ Za prenos se boste morali registrirati pri Microsoftu -če je to težava, uporabite ponarejeno e -pošto ali kaj podobnega. Pravzaprav se mi je zdelo koristno dati svoj pravi e -poštni naslov, ko pošiljajo občasne posodobitve. Omenil bom tudi forum picaxe https://www.picaxeforum.co.uk/, saj gre za forum, ki ga sestavljajo učitelji in vzgojitelji. kjer lahko učenci običajno v nekaj urah dobijo odgovore na vprašanja. Forum zelo razume tudi najpreprostejša vprašanja, saj so nekateri učenci še vedno na ravni osnovne šole. Prosim, ne bojte se prositi za pomoč!

3. korak: Zgradite vezje za prenos

To vezje za prenos uporablja čip picaxe, nekaj uporov, regulator in 9V baterijo. Več informacij je na voljo v dokumentaciji/pomoči za picaxe, ki je v meniju za pomoč programa. Ko bodo vsi deli pri roki, bo trajalo le nekaj minut. Ko je čip programiran, ohrani program v EEPROM -u, tudi če je napajanje izklopljeno. Ker programiramo dva čipa, bi bilo morda vredno označiti čipe, da veste, kateri je kateri. Vedno se lahko vrnete in znova programirate čip, tako da odstranite povezavo in premaknete upor.

Lahko dodam tudi, da pikaksi z veseljem delujejo na 3 baterije AA. 5V regulirano napajanje je uporabno za delovanje analognih vhodov, saj se referenčne napetosti ne spreminjajo, vendar za preprosta vezja za vklop/izklop regulirano napajanje ni potrebno. V teh situacijah lahko izpustite 5V reg.

4. korak: Programirajte žetone

En program bomo poimenovali Tx in en Rx. Tx je krmilni čip in ima stikalo in led. Rx ima tudi led. Ko se stikalo spremeni, signal preide iz Tx v Rx, spremeni LED in spremeni tudi drugo spremenljivko, ki se nato vrne v Tx. Zato pritisnite stikalo in v manj kot minuti se LED prižge na obeh vezjih, kar kaže, da je sporočilo prispelo in da Rx deluje na novem položaju stikala. Na najpreprostejši ravni ima picaxe 14 enobajtnih registrov. Ko je ustvarjeno navidezno omrežje, povežemo vse te registre skupaj, tako da če se bajt spremeni v enem pikasu, se spremeni v vseh pikasih. Jasno je, da če dva pikaksa poskušata spremeniti isti bajt, bo to zelo zmedeno, če pa vsak picaxe spremeni samo en bajt, lahko vsi drugi piksi vidijo to spremembo in lahko nanjo delujejo. Enostavna sporočila se lahko posredujejo naprej in nazaj, če določen bajt spremeni le en picaxe. Lonec lahko spremeni vrednost v registru in eden ali več drugih pikasov lahko zazna to spremembo in premakne servo ali karkoli in vklopi grelec. Drugi register bi lahko vrnil temperaturo v prostoru. Kopirajte in prilepite programe v programer picaxe in jih z modro puščico za prenos iz programatorja picaxe naložite na vsak ustrezen čip. Tx: main: serin 3, N2400, ("Podatki"), b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13 'dobite paket iz računalnika, če je pin2 = 0 nato 'preizkusite stikalo in nastavite register b0 glede na stanje b0 = 0 else b0 = 1 endif če je b1 = 0 potem' drugi picaxe nastavi b1 glede na b0 nizek 1 'odklopljen še visoko 1' vodi na endif serout 0, N2400, ("Podatki", b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13) 'pošlji nazaj v računalnik pojdi na glavno in Rx: main: serin 3, N2400, ("Podatki"), b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13 'dobite paket iz računalnika b1 = b0' spremenite register b1 v enak register b0, če je b1 = 0, potem nizko 1 'vodi off drugače 1' vodi na endif serout 0, N2400, ("Podatki", b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13) 'pošlji nazaj v računalnik goto main

5. korak: Zgradite vezje Tx

Če premikate naprej in nazaj med delovnim vezjem in programskim vezjem, ne pozabite spremeniti povezave v 2. stopnjo in lokacijo 22k uporov z noge 2. v nogo 4. Ali pa lahko zgradite namensko vezje za prenos in premaknete žetone. čez. Upoštevajte, ali se vezje izvaja ali nalaga, saj je lahko precej zmedeno. Upoštevajte zlasti, da tekaški tokokrog ne bo deloval, če noga 2 ostane plavajoča - treba jo je ozemljiti. Leg 2 je pin za prenos in če je lebden, pobere odtujen RF od flouro luči in čip misli, da se nalaga drug program.

Omeniti velja tudi nomenklaturo picaxe, ki fizični pin imenuje noga, virtualnega pa pin. Tako je izhod na pin 2 v kodi pravzaprav izhod na fizični nogi 5. To se morda zdi čudno, vendar pomeni, da je kodo mogoče prenesti na večje pikakse, kot sta različica 28 in 40, in še vedno deluje.

6. korak: Zgradite vezje Rx

To vezje je skoraj enako oddajniku - preprosto nima stikala.

7. korak: Napišite nekaj kode VB. Net

Lahko bi sestavil kodo in dal ta program na voljo kot sestavljen.exe, vendar je učenje nekaj VB. Net tako neverjetno uporabno, da je vredno iti skozi to korak za korakom. Če to izvajate na dveh različnih računalnikih, lahko program zgradite v.exe, ki ustvari majhen namestitveni program, ki ga lahko namestite na drugi računalnik. Lahko pa VB. Net postavite na oba računalnika in zaženete programe znotraj VB. Net -a Recimo, da veste, kako odpreti nov projekt VB.net od 7. in 8. koraka https://www.instructables.com/id/S1MMU2XF82EU2GT /Na prazen obrazec dodajmo naslednje komponente iz orodne vrstice in jih postavimo na obrazec na lokacijah, kot je prikazano. Za oznake in polja z besedilom spremenite lastnost besedila (v spodnjem desnem kotu) na tisto, kar potrebujete. Ne skrbite za nastavitve časovnika - spremenili jih bomo v kodi, vendar ne pozabite vstaviti časovnika. Lahko premikate stvari in ni pravih pravil glede lokacije. Veliko polje z besedilom je RichTextBox, manjše tri pa navadna polja z besedilom. Kar zadeva vrstni red, začenjamo na vrhu obrazca in se premikamo navzdol. Če kaj izpustite, bo prišlo do napake v kodi, ki bi morala dati nekakšen namig. Prosimo, izberite naključno ime datoteke za Textbox3 - to je ime vaše edinstvene skupine pikasov na strežniku ftp in očitno, če vsi uporabljamo isto ime, potem se bodo podatki zmešali! ------------------------------ NotesLabel1 ------------------ Picaxe CommunicationsLabel2 ------------------ Status FTPLabel3 ------------------ StatusLabel4 ---------- -------- Registri PicaxeLabel5 ------------------ Register 0-13Label6 ------------------ Vrednost 0-255Label7 ------------------ Ime datoteke povezave FTPTextbox1 ---------------- 0 -------- -------------------------------------- 0 je nič, ne OTextbox2 ----- ----------- 0Textbox3 ---------------- Ime moje datoteke --------------------- ---------- Spremeni, da ne pride do spopadov! Gumb1 ------------------ ModifyRichtextbox1 Picturebox1 Picturebox2 Timer1

8. korak: Dodajte nekaj kode

Za lokacijo gumba, ki se premika med pogledom obrazca in pogledom kode, glejte 12. korak drugega navodila. Preklopite na pogled kode in prilepite naslednjo kodo. Vse barve bi se morale znova prikazati kot na posnetku zaslona. Če vrstica ni bila pravilno kopirana zaradi težave z prelomom besed, izbrišite presledke, dokler sporočilo o napaki ne izgine. Večino vrstic sem poskušal komentirati, tako da je koda vsaj smiselna. Izbrišite bit javnega razreda, tako da bo besedilo prazno, preden ga prilepite - ta koda že ima javni razred. Če predmet, kot je polje z besedilom, ni bil vstavljen v obrazec ali ima napačno ime, se bo pojavil v kodi besedila s podrobno modro črto pod njim. stvari, kot sta leva (in desna (za nizovePublish Class Form1 Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Integer) "za stavke spanja Dim WithEvents serialPort kot nova IO. Ports. SerialPort" serijska vrata razglasijo Dim PicaxeRegisters (0 do 13) Kot Byte 'registrira b0 do b13 Dim ModifyFlag kot Boolean Private Sub Form1_Load (pošiljatelj ByVal kot objekt, ByVal e kot System. EventArgs) obravnava Me. Load' potrebujejo vse te smeti -.net jih samodejno vnese, ko gredo form1events zgoraj/naloži Timer1. Enabled = True 'vnesite to kodo kot privzete vrednosti false, ko ustvarite Timer1. Interval = 20000' vsakih 20 sekund PictureBox1. BackColor = Color. Grey 'začnite s komunikacijskimi polji sivo PictureBox2. BackColor = Color. Grey ModifyFlag = False' če vrednost spremenite ročno, potem s kip prenese RichTextBox1. Multiline = True 'zato lahko prikaže več vrstic Call DisplayPicaxeRegisters ()' prikaže 14 registrov Call ReadFTPFilename () 'prebere ime datoteke z diska (shranjeno vsakih 20 sekund) End Sub Sub SerialTxRx () Dim DataPacket (0 do 17) Kot bajt 'celoten podatkovni paket "Podatki" +14 bajtov Dim i Kot celo število' i je vedno uporabno za zanke itd. Za i = 0 do 3 DataPacket (i) = Asc (sredina ("Podatki", i + 1, 1)) 'dodaj besedo "Podatki" v paket Naprej Za i = 0 Do 13 DataPacket (i + 4) = PicaxeRegisters (i)' dodaj vse bajte v paket Naprej Če serialPort. IsOpen Nato serialPort. Close () 'za vsak slučaj že odprto Konec Če poskusite s serialPort. PortName = "COM1"' Večina novih računalnikov privzeto uporablja com1, vendar bo vsak računalnik pred letom 1999 s serijsko miško verjetno privzeto nastavljen na com2. BaudRate = 2400 '2400 je največja hitrost za majhni pikaksi. ds tako poteče v 1 sekundi, če ni odziva. Open () 'odpri serijska vrata. DiscardInBuffer ()' počisti vhodni medpomnilnik. Write (DataPacket, 0, 18) 'pošlji niz podatkovnega paketa Call Sleep (300)' 100 milisekund minimalno čakanje na vrnitev podatkov in še več, če je tok podatkov daljši. (i - 4) = DataPacket (i) 'premaknite nov podatkovni paket v matriko registrov Naslednji PictureBox1. BackColor = Color. GreenYellow' delujoč Ujemite ex As Exception PictureBox1. BackColor = Color. Red 'ne deluje Konec Poskusi End Sub Sub FTPUpload (Ime datoteke ByVal kot niz) Dim localFile As String 'mesto za shranjevanje podatkov Dim remoteFile As String' ime datoteke razlikuje med velikimi in malimi črkami, to je zelo pomembno Const host As String = "ftp://ftp.0catch.com" 'upoštevajte, da je 0 nič ni znak O Uporabniško ime Const As String = "picaxe.0catch.com" Const password As String = "picaxetester" Dim URI As String localFile = Ime datoteke 'morda ni potrebno, če pa določite lokacijo, npr. C: / mydirectory lahko preprosto dodate na ta način remoteFile = "/" + ime datoteke' datoteka na strežniku ftp potrebuje "/" dodano spredaj URI = host + remoteFile Poskusi zatemniti ftp kot sistem. Net. FtpWebRequest = CType (System. Net. FtpWebRequest. Create (URI), System. Net. FtpWebRequest) ftp. Credentials = Nov System. Net. NetworkCredential (uporabniško ime, geslo) 'prijavite se ftp. KeepAli prekinitev povezave, ko je enkrat storjeno ftp. UseBinary = True 'uporabite binarne komunikacije ftp. Timeout = 9000' časovna omejitev po 9 sekundah - zelo uporabno, saj lahko ftp včasih umre 'timeout (in urna frekvenca 20 sekund) bo morda za klicne povezave ftp počasnejša. Method = System. Net. WebRequestMethods. Ftp. UploadFile 'začni pošiljati datoteko Dim fs As New FileStream (localFile, FileMode. Open)' odpri lokalno datoteko Dim filecontents (fs. Length) As Byte 'preberi v pomnilnik fs. Read (vsebina datoteke, 0, fs. Length) fs. Close () 'zaprite datoteko Dim requestStream As Stream = ftp. GetRequestStream ()' start ftp link requestSt REAM besedilo, ki pove, da je povezano. Ujemite polje 'ni mogoče povezati PictureBox2. BackColor = Color. Red', rdeče kot brez povezave. Label2. Text = "Napaka FTP nalaganja ni uspela" "besedilo povezuje, da ni uspelo. Preizkusi End Sub Sub FTPDownload (ime datoteke ByVal kot niz) 'prenese daljinsko datoteko v lokalno datoteko Dim localFile As String' mesto za shranjevanje podatkov Dim remoteFile As String 'ime datoteke razlikuje med velikimi in malimi črkami, to je res pomembno Const host As String = "ftp://ftp.0catch.com" Const username As String = "picaxe.0catch.com "Geslo Const As String =" picaxetester "Dim URI As String 'localFile =" C: / " + Ime datoteke' shrani v korenski imenik, lahko pa spremeni to localFile = Ime datoteke ', zato lahko doda c: \, če je treba določiti dejanska lokacija remoteFile = "/" + Ime datoteke "dodano oddaljeni lokaciji ftp URI = gostitelj + oddaljena datoteka" sestavi polni naslov Poskusi Dim ftp kot System. Net. FtpWebRequest = CType (System. Net. FtpWebRequest. Create (URI), System. Net. FtpWebRequest) ftp. Credentials = Nov System. Net. NetworkCredential (uporabniško ime, geslo) 'log. KeepAlive = False "bo prekinjen po končanem ftp -ju. UseBinary = True" binarni način ftp. Timeout = 9000 'časovna omejitev po 9 sekundah ftp. Method = System. Net. WebRequestMethods. Ftp. DownloadFile "prenesite datoteko", prebrano v kosih ne vem, kako velika je datoteka z odzivom kot System. Net. FtpWebResponse = CType (ftp. GetResponse, System. Net. FtpWebResponse) z uporabo responseStream kot IO. Stream = response. GetResponseStream z uporabo fs kot nov IO. FileStream (localF, IO. FileMode. Create) Zatemnitev vmesnega pomnilnika (2047) Kot zatemnitev bajtov kot celo število = 0 Preberi = responseStream. Read (medpomnilnik, 0, buffer. Length) 'kos iz ftp fs. Write (medpomnilnik, 0, branje)' in pisanje v datoteko Zanka Do branja = 0 'dokler ne bo več kosov responseStream. Close ()' zaprite datoteko ftp fs. Flush () 'flush clear fs. Close ()' in zaprite th e Datoteka Konec Z uporabo responseStream. Close () 'zaprite, tudi če ni bilo nič Končaj z uporabo response. Close () PictureBox2. BackColor = Color. GreenYellow' zeleno polje, kot je delovalo Label2. Text = "FTP Connected" "in besedilo, ki to pove je delovalo Konec z uporabo Catch 'tukaj vnesite kode napak PictureBox2. BackColor = Color. Red' rdeče polje, ker ni delovalo Label2. Text = "FTP Download Fail" "in sporočilo, da izgovorite to End Poskusi Sub Sub Private Sub Timer1_Tick (ByVal pošiljatelj Kot System. Object, ByVal e As System. EventArgs) upravlja s časovnikom 1. Označite Če je ModifyFlag = False Potem ', če je uporabnik spremenil bajt, ne prenašajte Label3. Text = "Prenos" System. Windows. Forms. Application. DoEvents () 'tako se prikaže novo besedilo oznake Call FTPDownload (TextBox3. Text)' download remote file Label3. Text = "Preneseno" System. Windows. Forms. Application. DoEvents () Call ReadRemoteFileToRegisters () 'shrani številke datotek v matriko registra Label3. Text = "Talking to picaxe" System. Windows. Forms. Application. DoEvents () Else ModifyFlag = False 'ponastavi zastavo Konec Če Pokliči SerialTxRx () 'pošljite na picaxe in preberite nazaj Label3. Text = "Poslano in prejeto iz picaxe" System. Windows. Forms. Application. DoEvents () Pokliči DisplayPicaxeRegisters () Pokliči SaveRegistersToLocalFile ()' shrani številke v datoteko Label3. Text = "Nalaganje" System. Windows. Forms. Application. DoEvents () Pokliči FTPUpload (TextBox3. Text) 'pošlji nazaj na spletno mesto ftp z imenom moje ime Label3. Text = "Počivaj" Pokliči SaveFTPFilename ()' tako se glasi pri ponovnem zagonu End Sub Sub DisplayPicaxeRegisters () Dim i As Integer Dim registernumber As String RichTextBox1. Multiline = True 'zato lahko prikaže več vrstic v besedilnem polju RichTextBox1. Clear ()' počistite polje z besedilom Za i = 0 do 13 registernumber = Trim (Str (i)) 'obreži začetne presledke Če je i <10 Potem registernumber = "0" + registernumber' dodaj 0 številkam pod 10 End If RichTextBox1. AppendText (registernumber + "=" + Str (PicaxeRegisters (i)) + Chr (13)) Naprej 'chr (13) je vrnitev nosilca, tako da nova vrstica End Sub Private Sub Button1_Click (ByVal pošiljatelj Kot System. Object, ByVal e As System. EventArgs) ročaj Gumb 1. Kliknite Dim i As Integer 'najprej se odjavite iz obsega i = Val (TextBox1. Text) Če je i <0 Ali i> 13, potem TextBox1. Text = 0 End If i = Val (TextBox2. Text) Če je i <0 Ali i> 255 Potem TextBox2. Text = 0 End Če PicaxeRegisters (Val (TextBox1. Text)) = Val (TextBox2. Text) "spremenite vrednost Call DisplayPicaxeRegisters ()" in osvežite zaslon ModifyFlag = True 'in naslednja povezava ftp preskočite nalaganje End Sub Sub SaveRegistersToLocalFile ()' shranite matriko registra v lokalno besedilno datoteko Dim i As Integer FileOpen (1, TextBox3. Text, OpenMode. Output) 'odprite besedilno datoteko z imenom v besedilnem polju Za i = 0 do 13 PrintLine (1, Str (PicaxeRegisters (i))) 'shrani 14 vrednosti Next FileClose (1)' zaprite datoteko End Sub Sub ReadRemoteFileToRegisters () 'preberite lokalno besedilno datoteko v matriko registra Dim i As Integer Dim LineOfText As String Poskusite FileOpen (1, TextBox3. Text, OpenMode. Input) 'preberite ime oddaljene datoteke Za i = 0 do 13 LineOfText = LineInput (1)' preberite v 14 linu es PicaxeRegisters (i) = Val (LineOfText) 'pretvori besedilo v vrednosti Next FileClose (1) Catch ex As Exception FileClose (1)' datoteka ne obstaja, zato ne naredi nič Končaj Poskusi Sub Sub ReadFTPFilename () 'tako ime Oddaljena datoteka ftp je ob naslednjem zagonu programa ista ime FileClose (1) Catch ex As Exception FileClose (1) End Poskusi End Sub Sub SaveFTPFilename () FileOpen (1, "FTPFilename.txt", OpenMode. Output) 'shrani oddaljeno ime datoteke ftp PrintLine (1, TextBox3. Text) FileClose (1) Končaj razred podzakon

9. korak: Zaženite program na obeh računalnikih

Začnite izvajati program s klikom na zeleni trikotnik na vrhu zaslona - gumb »Začni odpravljanje napak«. 20 sekund se ne bo nič zgodilo, nato pa se bo program poskušal povezati s strežnikom ftp in se poskusiti povezati s picaxejem. Okvirji za slike bodo postali rdeči ali zeleni. Lokacija ftp je brezplačna spletna stran in to lahko uporablja vsak, vendar morate uporabiti drugo delovno ime datoteke ftp (moje je DoctorAcula1), sicer bi lahko vsi dobili podatke drug drugega, če uporabljamo isto ime datoteke! Če želite, lahko sčasoma dobite svoje ftp spletno mesto - samo spremenite lokacijo ftp, uporabniško ime in geslo na dveh mestih v kodi z mojega spletnega mesta 0Catch. Večina spletnih mest dovoljuje ftp. Do iste datoteke ftp lahko dostopa več računalnikov - datotečni strežnik ftp razvrsti v kakšnem vrstnem redu se to zgodi. Občasno pride do spopadov ali prekinitev podatkov in zdi se, da se to zgodi na vsakih 20 prebranih datotek. Če se to zgodi, je v kodi časovna omejitev, zato ne vrne podatkov, temveč le poškodovane podatke. Uporaba širokopasovne povezave s hitrostjo nalaganja 128 KB pomeni, da nalaganje datoteke traja približno 3 sekunde, včasih pa tudi do 8 sekund, od katerih je večina zavzeta. pri rokovanju in ne pri prenosu podatkov. S tem nastavite časovnik 1 za najmanj 20 sekund, pri čemer upoštevate prenos, nalaganje in klepet s pikasom. Z zelo hitrim širokopasovnim dostopom lahko skrajšate čas cikla. V programu VB lahko ročno spremenite register. Če to storite, naslednji časovni cikel preskoči nalaganje s spletnega mesta ftp in nove podatke pošlje na picaxe ter jih nato prebere nazaj in naloži. Novi podatki tako najdejo pot do vseh pikasov, povezanih s to skupino. To je v pomoč pri odpravljanju napak in/ali pri povezovanju računalniške programske opreme v zanko strojne opreme mikrokrmilnika. Spletna mesta lahko dostopajo tudi do strojne zanke s skriptom PERL ali podobnim, da napišejo novo datoteko na spletno mesto ftp. Ta posnetek zaslona je bil posnet z uporabo čipa Tx, stikalo je bilo vklopljeno in register b0 = na 1 je bil poslan na čip Rx, ki nato spremenil tudi register b1 v 1. Led je bil tako prižgan na obeh deskah. To je trivialna aplikacija, vendar je enostavno namesto LED prižgati črpalko 3,6 Kw. Še nekaj idej je na https://drvernacula.topcities.com/, vključno s povezovanjem pikasov prek radijskih povezav na sončno energijo. Z radijskimi povezavami in internetom lahko "Stroji" sežejo v številne kotičke sveta. Na forumu picaxe je nekaj idej o tem, da bi to idejo nadaljevali in zamenjali spletno mesto za osebni računalnik in ftp z namenskimi čipi spletnega strežnika, ki se priključijo naravnost v usmerjevalnik. Očitno bi to zmanjšalo porabo energije povezave. Če vas zanimajo nadaljnje razprave, pišite na komentarjih, ki jih ni mogoče uničiti, in/ali na forumu picaxe. Dr James Moxham, Adelaide, Južna Avstralija

10. korak: Posnetki zaslona Code

Na zahtevo je tu nekaj posnetkov zaslona kode vb.net z vsem oblikovanjem. Ta koda je bila dejansko kopirana nazaj iz tega navodila in oblikovanje se je znova samodejno pojavilo. Bolje bi bilo kopirati in prilepiti besedilo, kot pa poskusiti prebrati te slike, vendar bodo te uporabne, če ste v internetni kavarni in ne morete namestiti vb.net.

11. korak: Posnetek zaslona 2

Posnetek zaslona 2

12. korak: Posnetek zaslona 3

Posnetek zaslona 3

13. korak: Posnetek zaslona 4

Posnetek zaslona 4

14. korak: Posnetek zaslona 5

Posnetek zaslona 5

15. korak: Posnetek zaslona 6

Posnetek zaslona 6