Vispasaules mikrokontrolleru saite zem 20 USD: 15 soļi

2024 Autors: John Day | [email protected]. Pēdējoreiz modificēts: 2024-01-30 10:58

Kontrolējiet savu mājas termostatu no darba. Ieslēdziet sprinkleru no jebkuras vietas pasaulē, nospiežot slēdzi. Šajā pamācībā ir parādīts, kā saistīt divus vai vairākus 4 ASV dolāru mikrokontrollerus, izmantojot interneta mugurkaulu un dažus vienkāršus VB. Net kodus. Tas ir balstīts uz agrāku pamācību, kas parāda, kā saistīt mikrokontrolleru ar datoru un izmantot katlu, lai kontrolētu servo https://www.instructables.com/id/Control-real-world-devices-with-your-PC/ Šoreiz mums ir mikrokontrolleris, kas runā ar VB. Net programmu, pēc tam ar ftp vietni, atpakaļ uz citu VB. Net programmu un no turienes otrs mikrokontrolleris jebkur pasaulē, ar cilvēka iejaukšanos vai bez tās. Kā citādi Matricas mašīnām kādreiz vajadzētu pārņemt varu, ja tās nevar savā starpā sarunāties?

1. darbība: apkopojiet detaļas

Daudzas daļas ir tādas pašas kā PC Control Instructable vietnē https://www.instructables.com/id/Control-real-world-devices-with-your-PC/, un ir ieteicams to vispirms pabeigt, pirms mēģināt lai savienotu divus mikrokontrollerus. Lai gan ir pilnīgi iespējams izmantot katlu, lai kontrolētu servo, šoreiz mēs meklēsim kaut ko vienkāršāku - slēdzi, kas ieslēdz LED. Slēdzis viegli varētu būt tvertnes līmeņa sensors, un gaismas diode varētu būt sūknis pie upes, taču vispirms strādāsim ar kaut ko vienkāršu. Daļas - divas Picaxe 08M mikroshēmas - pieejamas no daudziem avotiem, tostarp Rev Ed https://www.rev- ed.co.uk/picaxe/ (Lielbritānija), PH Anderson https://www.phanderson.com/ (ASV) un Microzed https://www.microzed.com.au/ (Austrālija). Šo mikroshēmu cena ir mazāka par 4 ASV dolāriem. Divi no: Protoboard, 9V akumulators un akumulatora skavas, 10k rezistors, 22k rezistors, 33uF 16V kondensators, 0,1uF kondensators, 7805L mazjaudas 5V regulators, vadi (telefona/datu vads, piemēram, Cat5/6), LED, 1k rezistors. 1 no: D9 ligzda un vāks un 2 metri 3 (vai 4) pamata datu vada (lejupielādei) un pārslēgšanas slēdzis. 2 datori ar 9 kontaktu seriālajiem portiem (var atkļūdot vienā datorā) un interneta pieslēgums. Datoriem bez seriālā porta-USB uz seriālo ierīci https://www.rev-ed.co.uk/docs/axe027.pdf un neliela stereo ligzda.

2. darbība: lejupielādējiet un instalējiet kādu programmatūru

Mums būs nepieciešama bezmaksas VB. Net un picaxe kontrollera programmatūra, un, ja esat veicis Instructable datora kontrolieri, jums tas jau būs. VB. Net (Visual Basic Express) ir pieejams vietnē https://msdn2.microsoft.com/en -us/express/aa718406.aspx Picaxe programmatūra ir pieejama vietnē https://www.rev-ed.co.uk/picaxe/ Lai lejupielādētu, jums būs jāreģistrējas Microsoft. Ja tā ir problēma, izmantojiet viltotu e -pastu vai kaut ko. Man patiešām šķita noderīgi sniegt savu īsto e -pastu, jo tie sūta neregulārus atjauninājumus. Es arī minēšu picaxe forumu https://www.picaxeforum.co.uk/, jo tas ir tāds forums, kurā strādā skolotāji un pedagogi. kur skolēni parasti var saņemt atbildes uz jautājumiem dažu stundu laikā. Forums ļoti saprot pat visvienkāršākos jautājumus, jo daži skolēni joprojām ir sākumskolas līmenī. Lūdzu, nebaidieties lūgt palīdzību!

3. darbība: izveidojiet lejupielādes ķēdi

Šajā lejupielādes shēmā tiek izmantota piksa mikroshēma, pāris rezistori, regulators un 9 V akumulators. Plašāka informācija ir pieejama piksa dokumentācijā/palīdzībā, kas parādās programmas palīdzības izvēlnē. Ķēdes izveidei vajadzētu aizņemt tikai dažas minūtes, tiklīdz visas detaļas ir pa rokai. Kad mikroshēma ir ieprogrammēta, tā saglabā savu programmu EEPROM pat tad, ja barošana ir izslēgta. Tā kā mēs programmējam divas mikroshēmas, varētu būt vērts marķēt mikroshēmas, lai jūs zināt, kura ir kura. Jūs vienmēr varat atgriezties un pārprogrammēt mikroshēmu, noņemot saiti un pārvietojot rezistoru.

Varu arī piebilst, ka pikseļi darbojas laimīgi, izmantojot 3 AA baterijas. 5 V regulēta barošana ir noderīga analogo ieeju darbināšanai, jo atskaites spriegums nemainās, bet vienkāršām ieslēgšanas/izslēgšanas shēmām regulēta barošana nav nepieciešama. Šajās situācijās 5V reg.

4. solis: ieprogrammējiet mikroshēmas

Mēs nosauksim vienu programmu par Tx un vienu Rx. Tx ir kontrolējošā mikroshēma, un tam ir slēdzis un LED. Rx ir arī LED. Kad slēdzis mainās, signāls pāriet no Tx uz Rx, mainās LED un arī mainās otrs mainīgais, kas pēc tam atgriežas Tx. Tāpēc pavirziet slēdzi un mazāk nekā minūtes laikā gaismas diodes mainās abās ķēdēs, norādot, ka ziņojums ir nokļuvis un Rx iedarbojas uz jauno slēdža pozīciju. Vienkāršākajā līmenī pikakam ir 14 viena baita reģistri. Kad tiek izveidots virtuālais tīkls, mēs sasaistām visus šos reģistrus kopā, tādēļ, ja baits mainās vienā pikseļā, tas mainās visos pikakšos. Skaidrs, ka, ja divi pikraksi mēģina mainīt vienu un to pašu baitu, tas kļūs ļoti mulsinoši, bet, ja katrs pikaps mainīs tikai vienu baitu, visas pārējās pikseles varēs redzēt šīs izmaiņas un rīkoties. Vienkāršus ziņojumus var pārsūtīt uz priekšu un atpakaļ, ja noteiktu baitu maina tikai viena piksele. Katls var mainīt vērtību reģistrā, un viens vai vairāki citi pikseļi var uztvert šīs izmaiņas un pārvietot servo vai citu un ieslēgt sildītāju. Otrs reģistrs varētu nosūtīt atpakaļ temperatūru telpā. Pēc tam kopējiet un ielīmējiet programmas picaxe programmētājā un lejupielādējiet tās katrā attiecīgajā mikroshēmā, izmantojot zilo lejupielādes bultiņu no picaxe programmētāja. Tx: main: serin 3, N2400, ("Dati"), b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13 'saņemt paketi no datora, ja pin2 = 0, tad 'pārbaudiet slēdzi un iestatiet reģistru b0 atkarībā no statusa b0 = 0 cits b0 = 1 endif, ja b1 = 0, tad' citi picaxe komplekti b1 atkarībā no b0 zema 1 'noveda pie cita augsta 1' vadīja endif serout 0, N2400, ("Dati", b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13) 'sūtīt atpakaļ uz datoru goto mainand Rx: main: serin 3, N2400, ("Dati"), b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13 'saņemt paketi no datora b1 = b0' mainīt reģistru b1 uz vienādu reģistru b0, ja b1 = 0, tad zems 1 'noveda pie cita augsta 1' vadīja endif serout 0, N2400, ("Dati", b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12, b13) 'sūtīt atpakaļ uz datoru goto main

5. solis: izveidojiet Tx ķēdi

Ja jūs grozāties uz priekšu un atpakaļ starp darba ķēdi un programmēšanas shēmu, noteikti mainiet savienojumu ar 2. kāju un 22 k rezistora atrašanās vietu no 2. kājas uz 4. kāju. Vai arī varat izveidot īpašu lejupielādes ķēdi un pārvietot mikroshēmas pāri. Vienkārši ievērojiet, vai ķēde darbojas vai tiek lejupielādēta, jo tā var kļūt diezgan mulsinoša. Īpaši ņemiet vērā, ka skriešanas ķēde nedarbosies, ja 2. kāja tiks atstāta peldoša - tai jābūt iezemētai. Kāja 2 ir lejupielādes tapa, un, ja tā paliek peldoša, tā no flouro gaismām uztver klaiņojošu RF un mikroshēma uzskata, ka tiek lejupielādēta cita programma.

Ir arī vērts pieminēt pikseļu nomenklatūru, kas fizisko tapu sauc par kāju, bet virtuālo - par tapu. Tādējādi koda 2. tapas izvade faktiski ir izeja uz fizisko kāju 5. Tas varētu šķist dīvaini, taču tas nozīmē, ka kodu var pārnest uz lielākiem pikakšiem, piemēram, 28 un 40 kontaktu versijām, un tas joprojām darbojas.

6. darbība: izveidojiet Rx shēmu

Šī shēma ir gandrīz tāda pati kā raidītājam - tai vienkārši nav slēdža.

7. solis: uzrakstiet kādu VB. Net kodu

Es būtu varējis apkopot kodu un padarīt šo programmu pieejamu kā apkopotu.exe, taču apgūt kādu VB. Net ir tik neticami noderīgi, ka ir vērts to iziet soli pa solim. Ja jūs to izmantojat divos dažādos datoros, varat izveidot programmu.exe, kas izveido nelielu iestatīšanas programmu, kuru var instalēt otrajā datorā. Vai arī varat ievietot VB. Net abos datoros un palaist programmas no VB. Net pieņemsim, ka jūs zināt, kā atvērt jaunu VB.net projektu no vietnes https://www.instructables.com/id/S1MMU2XF82EU2GT 7. un 8. darbības. /Tukšajā veidlapā no rīkjoslas pievienosim šādus komponentus un ievietosim tos veidlapā norādītajās vietās. Iezīmēm un tekstlodziņiem mainiet teksta rekvizītu (virs apakšējā labajā stūrī) uz vajadzīgo. Neuztraucieties par taimera iestatījumiem - mēs tos mainīsim kodā, taču noteikti ievietojiet taimeri. Jūs varat pārvietot lietas, un nav reālu noteikumu par atrašanās vietu. Lielais tekstlodziņš ir RichTextBox, bet trīs mazākās ir parastās teksta kastes. Kārtības ziņā mēs sākam veidlapas augšdaļā un virzāmies uz leju. Ja kaut ko atstājat, kodā radīsies kļūda, kurai vajadzētu dot kaut kādu norādi. Lūdzu, izvēlieties nejaušu faila nosaukumu Textbox3 - tas ir jūsu unikālās picaxes grupas nosaukums ftp serverī un, protams, ja mēs visi izmantojam ar tādu pašu nosaukumu, tad dati tiks sajaukti! Atvainojiet par svītrām šajā tabulā-ievietojot atstarpes, tiek zaudēts tabulas formatējums. Rīkkastes objekts ------- Teksts ----------- ------------------------------ PiezīmesLabel1 ------------------ Pikakse CommunicationsLabel2 ------------------ FTP statussLabel3 ------------------ StatusLabel4 ---------- -------- Picaxe RegistersLabel5 ------------------ Reģistrēties 0-13Label6 ------------------ Vērtība 0-255. Iezīme 7 ------------------ FTP saites faila nosaukums Teksts1 ---------------- 0 -------- -------------------------------------- 0 ir nulle, nevis OTextbox2 ----- ----------- 0Textbox3 ---------------- Mans faila nosaukums --------------------- ---------- Mainiet, lai nebūtu sadursmju! Poga1 ------------------ ModificētRichtextbox1 Picturebox1 Picturebox2 Taimeris1

8. solis: pievienojiet kādu kodu

Skatiet citas instrukcijas 12. darbību, lai atrastu pogu, kas pārvietojas starp veidlapas skatu un koda skatu. Pārslēdzieties uz koda skatu un ielīmējiet šādu kodu. Visām krāsām vajadzētu atkal parādīties, kā parādīts ekrānuzņēmumā. Ja rindiņa nav pareizi nokopēta vārdu iesaiņošanas problēmas dēļ, izdzēsiet atstarpes, līdz kļūdas ziņojums pazūd. Esmu mēģinājis komentēt lielāko daļu rindiņu, lai kodam būtu vismaz kāda jēga. Pirms šī ielīmēšanas izdzēsiet publiskās klases bitu, lai teksts būtu tukšs - šim kodam jau ir publiska klase. Ja veidlapā nav ievietots tāds objekts kā tekstlodziņš vai tam ir nepareizs nosaukums, tad tas parādīsies teksta kodā ar zilā līniju zem tā. Imports System. IOImports Strings = Microsoft. VisualBasic ', tāpēc var izmantot lietas, piemēram, pa kreisi (un pa labi (virknēm Kā baits reģistrē b0 līdz b13 Dim ModifyFlag kā Būla privātā apakšformā1_Load (ByVal sūtītājs kā objekts, ByVal un kā System. EventArgs) Rīkojas ar mani. Slodzei ir vajadzīgas visas šīs atkritumu lietas. Timer1. Enabled = True 'ievadiet šo kodu kā noklusējumu uz nepatiesu, kad tas tika izveidots. Taimeris1. Interval = 20000' ik pēc 20 sekundēm PictureBox1. BackColor = Color. Gray 'sāciet ar komentāru lodziņiem pelēks PictureBox2. BackColor = Color. Gray ModifyFlag = False' ja manuāli maināt vērtību, tad s kip download RichTextBox1. Multiline = True ', tāpēc var parādīt vairāk nekā vienu rindu Call DisplayPicaxeRegisters ()' parāda 14 reģistrus Call ReadFTPFilename () 'nolasa faila nosaukumu no diska (tiek saglabāts ik pēc 20 sekundēm) End Sub Sub SerialTxRx () Dim DataPacket (0 līdz 17) Kā baits visa datu pakete "Dati" +14 baiti Dim i Kā vesels skaitlis 'i vienmēr ir noderīga cilpām utt. Attiecībā uz i = 0 līdz 3 DataPacket (i) = Asc (Mid ("Data", i + 1), 1)) 'pievienojiet paketē vārdu "Dati" Tālāk Attiecībā uz i = 0 līdz 13 DataPacket (i + 4) = PicaxeRegisters (i)' pievienojiet paketē visus baitus Nākamais Ja serialPort. IsOpen Tad serialPort. Close () 'tikai gadījumā, ja tas jau ir atvērts Beigt Ja mēģināt ar serialPort. PortName = "COM1"' Lielākajai daļai jauno datoru noklusējuma vērtība ir com1, bet jebkuram datoram pirms 1999. gada ar seriālo peli, iespējams, noklusējuma vērtība būs com2. BaudRate = 2400 '2400 ir maksimālais ātrums mazi picaxes. Parity = IO. Ports. Parity. None 'nav paritātes. DataBits = 8' 8 biti. StopBits = IO. Ports. StopBits. One 'vienas pieturas bits. ReadTimeout = 1000' milisekons ds laiks tiek pārtraukts 1 sekundē, ja netiek saņemta atbilde. Atveriet () 'atveriet seriālo portu. vismaz jāgaida, kamēr dati atgriezīsies, un vēl vairāk, ja datu plūsma ir garāka. (i - 4) = DataPacket (i) 'pārvietojiet jauno datu paketi reģistra masīvā Next PictureBox1. BackColor = Color. GreenYellow' strādā Catch ex Kā izņēmums PictureBox1. BackColor = Color. Red 'nedarbojas Beigt Mēģināt Beigt apakšapakš FTP (ByVal faila nosaukums kā virkne) Dim localFile As String 'vieta datu glabāšanai Dim remoteFile As String' faila nosaukums ir reģistrjutīgs, tas ir patiešām svarīgi Const host As String = "ftp://ftp.0catch.com" 'piezīme 0 ir nulle nav rakstzīme O Const lietotājvārds As String = "picaxe.0catch.com" Const parole As String = "picaxetester" Dim URI kā String localFile = Faila nosaukums 'varbūt nav vajadzīgs, bet, ja definē atrašanās vietu, piemēram, c: / mydirectory var viegli pievienot šādā veidā remoteFile = "/" + Filename' fails ftp serverī nepieciešams "/" pievienots priekšā URI = host + remoteFile Izmēģiniet Dim ftp kā sistēmu. Net. FtpWebRequest = CType (System. Net. FtpWebRequest. Create (URI), System. Net. FtpWebRequest) ftp. Credentials = New System. Net. NetworkCredential (lietotājvārds, parole) "piesakieties ftp. KeepAlive = False" atvienošana, kad tas ir izdarīts ftp. UseBinary = True 'izmantojiet bināros komentārus ftp. Timeout = 9000' taimauts pēc 9 sekundēm - ļoti noderīgi, jo ftp dažreiz nomirst (un pulksteņa frekvence ir 20 sekundes), iespējams, ir jābūt lēnākam iezvanes savienojumiem ftp. Metode = System. Net. WebRequestMethods. Ftp. UploadFile "sāk sūtīt failu Dim fs kā jaunu FileStream (localFile, FileMode. Open)" atvērt vietējo failu Dim failu saturu (fs. Length) As Byte "lasīt atmiņā fs. Read (filecontents, 0, fs. Length) fs. Close () 'aizveriet failu Dim requestStream As Stream = ftp. GetRequestStream ()' start ftp link requestSt ream. Write (filecontents, 0, filecontents. Length) 'nosūtiet to requestStream. Close ()' aizveriet saiti PictureBox2. BackColor = Color. GreenYellow 'mainiet lodziņu uz zaļu, lai teiktu, ka strādā labi Label2. Text = "FTP Connected" " teksts, kurā teikts, ka tas ir savienots Catch 'nevar savienot PictureBox2. BackColor = Color. Red' lodziņu sarkanā krāsā, jo nav savienojuma 'lejupielādē tālvadības failu uz lokālo failu Dim vietējā faila kā virkne' vieta datu glabāšanai Dim tālvadības fails kā virkne 'faila nosaukums ir reģistrjutīgs, tas ir patiešām svarīgi Const host As String = "ftp://ftp.0catch.com" Const lietotājvārds As String = "picaxe.0catch.com "Const parole As String =" picaxetester "Dim URI kā virkne" localFile = "C: \" + Faila nosaukums "saknes direktorijā, bet var mainīt šo localFile = Filename ', lai varētu pievienot c: / ja nepieciešams definēt faktiskā atrašanās vieta remoteFile = "/" + Faila nosaukums 'pievienots attālajai ftp atrašanās vietai URI = resursdators + remoteFile' veido pilna adrese Izmēģiniet Dim ftp kā System. Net. FtpWebRequest = CType (System. Net. FtpWebRequest. Create (URI), System. Net. FtpWebRequest) ftp. Credentials = New System. Net. NetworkCredential (lietotājvārds, parole) 'pieteikšanās ftp. KeepAlive = False 'tiks atvienots pēc ftp pabeigšanas. UseBinary = True' binārais režīms ftp. Timeout = 9000 'taimauts pēc 9 sekundēm ftp. Method = System. Net. WebRequestMethods. Ftp. DownloadFile' lejupielādēt failu ', kas lasāms gabalos kā nezinu, cik liels ir fails. IO. FileMode. Create) Dim buferis (2047) Kā baits Dim lasāms kā vesels skaitlis = 0 Do read = responseStream. Read (buffer, 0, buffer. Length) 'gabals no ftp fs. Rakstiet (buferis, 0, lasiet)' un rakstīt failā cilpa līdz lasīšanai = 0 ', līdz vairs netiek saņemta neviena atbildeStream. Close ()' aizver ftp failu fs. Flush () 'flush clear fs. Close ()' un aizver th e fails Beidz izmantot atbildiStream. Close () 'aizveriet to, pat ja nekas tur nebija Beigt atbildi. Aizveriet () PictureBox2. BackColor = Color. GreenYellow' zaļā kaste, jo tā darbojās Label2. Text = "FTP Connected" "un teksts, kas to saka strādāja Beigt, izmantojot nozveju ', ievietojiet šeit kļūdu kodus PictureBox2. BackColor = Color. Red' sarkanā rūtiņa, jo tā nedarbojās Kā System. Object, ByVal e kā System. EventArgs) apstrādā taimeri 'tik jauns etiķetes teksts parāda Zvanīt FTPDownload (TextBox3. Text)' lejupielādēt attālo failu Label3. Text = "Lejupielādēts" System. Windows. Forms. Application. DoEvents () Zvanīt ReadRemoteFileToRegisters () 'saglabā failu numurus reģistra masīvā Label3. Text = "Runā ar picaxe" System. Windows. Forms. Application. DoEvents () Else ModifyFlag = False 'atiestatīt karogu Beigt, ja zvans SerialTxRx () 'sūtīt uz pikseļu un nolasīt to atpakaļ Label3. Text = "Uploading" System. Windows. Forms. Application. DoEvents () Zvanīt FTPUpload (TextBox3. Text) 'sūtīt atpakaļ uz ftp vietni, kas nosaukta par manu vārdu Label3. Text = "Atpūta" Call SaveFTPFilename ()' tā skan in restartējot End Sub Sub DisplayPicaxeRegisters () Dim i As Integer Dim reģistra numurs kā virkne RichTextBox1. Multiline = True ', tāpēc tekstlodziņā RichTextBox1. Clear ()' var parādīt vairāk nekā vienu rindu I = 0 līdz 13 reģistra numurs = apgriezt (Str (i)) 'apgriezt priekšējās atstarpes Ja i <10 Tad reģistrācijas numurs = "0" + reģistra numurs' pievieno skaitļiem zem 10 Beigas Ja RichTextBox1. AppendText (reģistra numurs + "=" + Str (PicaxeRegisters (i))) + Chr (13)) Nākamais 'chr (13) ir vagonu atgriešana, tāpēc jauna rinda Beigt Sub Private Private Button1_Click (ByVal sūtītājs) Kā System. Object, ByVal e kā System. EventArgs) Roktura poga i = Val (TextBox2. Text) Ja i <0 vai i> 255, tad TextBox2. Text = 0 End If PicaxeRegisters (Val (TextBox1. Text)) = Val (TextBox2. Text) 'mainiet vērtību Call DisplayPicaxeRegisters ()' un atsvaidzināt displeju ModifyFlag = True”un nākamā ftp saite izlaist lejupielādi End Sub Sub SaveRegistersToLocalFile ()” saglabāt reģistra masīvu vietējā teksta failā Dim i As Integer FileOpen (1, TextBox3. Text, OpenMode. Output)”atver teksta failu ar nosaukumu tekstlodziņā i = 0 līdz 13 PrintLine (1, Str (PicaxeRegisters (i))) "saglabāt 14 vērtības Next FileClose (1)" aizveriet failu End Sub Sub ReadRemoteFileToRegisters () "nolasa vietējo teksta failu reģistra masīvā Dim i kā vesels skaitlis Dim LineOfText kā virkne Izmēģiniet FileOpen (1, TextBox3. Text, OpenMode. Input) "nolasiet attālā faila nosaukumu. I = 0 līdz 13 LineOfText = LineInput (1)" lasāms 14 rindā es PicaxeRegisters (i) = Val (LineOfText) 'konvertēt tekstu par vērtībām Nākamais FileClose (1) Catch ex As Exception FileClose (1)' fails nepastāv, tāpēc nedariet neko Beigas Mēģiniet Beigt Sub Sub ReadFTPFilename () ', tāpēc nosaukums attālais ftp fails ir tāds pats nākamreiz, kad šī programma tiks palaista nosaukums FileClose (1) Catch ex kā izņēmums FileClose (1) Beigt Mēģināt Beigt Sub Sub SaveFTPFilename () FileOpen (1, "FTPFilename.txt", OpenMode. Output) "saglabājiet attālā ftp faila nosaukumu PrintLine (1, TextBox3. Text) FileClose (1) Beigt apakškategoriju

9. darbība. Palaidiet programmu abos datoros

Sāciet programmas darbību, ekrāna augšējā vidū noklikšķinot uz zaļā trīsstūra - pogas Sākt atkļūdošanu. 20 sekundes nekas nenotiks, un tad programma mēģinās izveidot savienojumu ar ftp serveri un mēģinās izveidot savienojumu ar pikseļu. Attēlu kastes kļūs sarkanas vai zaļas. FTP atrašanās vieta ir bezmaksas vietne, un ikviens to var izmantot, taču jums ir jāizmanto cits ftp darba faila nosaukums (mans ir DoctorAcula1), pretējā gadījumā mēs visi varētu iegūt viens otra datus, ja izmantosim vienu un to pašu faila nosaukumu! Ja vēlaties, jūs galu galā varat iegūt savu ftp vietni - vienkārši mainiet ftp atrašanās vietu, lietotājvārdu un paroli divās vietās kodā no manas 0Catch vietnes. Lielākā daļa vietņu atļauj ftp. Vairāki datori var piekļūt vienam un tam pašam ftp failam - ftp failu serveris kārto to secību. Reizēm notiek datu sadursmes vai karājas, un šķiet, ka tās notiek ik pēc 20 failu nolasījumiem. Ja tas notiek, kodā ir taimauts, tāpēc tas neatgriež datus, nevis bojātus datus. Izmantojot platjoslas savienojumu ar augšupielādes ātrumu 128 kb, tas nozīmē, ka faila augšupielāde aizņem apmēram 3 sekundes, bet dažreiz līdz 8 sekundēm, no kurām lielākā daļa tiek aizņemta rokasspiedienā, nevis datu pārsūtīšanā. Tas nosaka taimera1 laiku vismaz 20 sekundes, ņemot vērā lejupielādi, augšupielādi un tērzēšanu ar attēlu. Izmantojot ļoti ātru platjoslas savienojumu, iespējams, varēsit saīsināt cikla laiku. VB programmā reģistru var mainīt manuāli. Ja jūs to darāt, nākamais taimera cikls izlaiž lejupielādi no ftp vietnes un nosūta jaunos datus uz pikseļu, pēc tam tos nolasa un augšupielādē. Tādējādi jaunie dati atrod ceļu uz visiem ar šo grupu saistītajiem pikakiem. Tas ir noderīgi atkļūdošanai un/vai datora programmatūras savienošanai ar mikrokontrollera aparatūras cilpu. Vietnes var piekļūt arī aparatūras cilpai, izmantojot PERL skriptu vai līdzīgu, lai ftp vietnē ierakstītu jaunu failu. Šis ekrānuzņēmums tika uzņemts, izmantojot Tx mikroshēmu, slēdzis bija ieslēgts un reģistrs b0 = līdz 1 tika nosūtīts uz Rx mikroshēmu tad arī bija mainījis reģistru b1 uz 1. Vadība tādējādi tika izgaismota uz abiem dēļiem. Šī ir triviāla lietojumprogramma, taču gaismas diodes vietā ir viegli ieslēgt 3,6 kW sūkni. Vēl dažas idejas ir pieejamas vietnē https://drvernacula.topcities.com/. Izmantojot radio saites un internetu, mašīnas var nokļūt daudzos pasaules malos. Picaxe forumā ir dažas idejas par šīs idejas īstenošanu un datora un ftp vietnes aizstāšanu ar īpašām tīmekļa servera mikroshēmām, kuras tiek pievienotas tieši maršrutētājam. Acīmredzot tas samazinātu saites enerģijas patēriņu. Ja jūs interesē turpmākas diskusijas, lūdzu, ievietojiet Intstructable komentāros un/vai pikseļu forumā. Dr James MoxhamAdelaide, Dienvidaustrālija

10. darbība: koda ekrānuzņēmumi

Pēc pieprasījuma šeit ir vb.net koda ekrānuzņēmumu sērija ar visu formatējumu. Šis kods faktiski tika nokopēts no šīs pamācības, un formatējums atkal parādījās automātiski. Būtu labāk kopēt un ielīmēt tekstu, nekā mēģināt lasīt šos attēlus, taču tie būs noderīgi, ja atrodaties interneta kafejnīcā un nevarat instalēt vb.net.

11. darbība: ekrānuzņēmums2

Ekrānuzņēmums 2

12. darbība. Ekrānuzņēmums 3

Ekrānuzņēmums 3

13. darbība. Ekrānuzņēmums 4

Ekrānuzņēmums 4

14. darbība. Ekrānuzņēmums 5

Ekrānuzņēmums 5

15. darbība: ekrānuzņēmums 6

Ekrānuzņēmums 6