Garaažimonitor 3k: 8 sammu

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

Kas peate teadma, kas garaažiuks on avatud? Kas soovite teada, kas tõmbasite piisavalt kaugele, et uks sulguks ilma jalgrattaga löömata? Seda kõike on vaja teada veebipöördusega … Esitan garaaži monitori 3000.

Kui auto jõuab õigesse kohta, muutub LED rohelisest punaseks. See on pooleli olev töö, see on lihtsalt versioon 1.0. Ma arvan, et see teeb mõned muudatused, et seda veelgi paremaks muuta.

Samm: osad

Traat

1 Elavhõbeda lüliti 1 220 oomi takisti 1 10 k oomi takisti 2 x 1 k oomi takisti 1 Punane LED 1 roheline LED 1 Parallaxi internetikomplekt (ROOSA parallaksilt www.parallax.com) 1 BS2 mikrokontroller (parallaksilt www.parallax.com) 1 PIR -liikumisdetektor (parallaksilt www.parallax.com) 1 ds1620 temperatuurikiip. 1 5v toiteplokk 1 papist plakatitoru Mul ei olnud garaažis võrgutilku, mille pidin ilmselgelt ära parandama, seega ostsin 20 dollari eest ebayst linksys WET11.

2. samm: leivalaud välja

Seega on mul ilmselgelt vaja teha ka ühendusskeem … Kuid te ei saa eksida, kui järgite kõigi parallaksi osadega kaasasolevate PDF -failide näiteid. Lüliti juhtmestik pärineb PDF -ist Mis on mikrokontroller PIR -i juhtmestik pärineb PIR -dokumentatsiooni PDF -st. DS1620 juhtmestik pärineb PDF -i rakendussensoritest. PINK -i juhtmestik _{roosast PDF -ist} P0 - pirP1 jaoks - elavhõbeda lüliti P5 - 1620P6 - 1620P7- 1620p12 - PINKP13 - PINKP14 - roheline LED P15 - punane LED

Samm: nüüd, kui see töötab teie leivaplaadil …

Peaksite ilmselt programmeerima bs2, siin on kood. Enamik sellest koodist põhineb tihedalt parallaksisaidil saadaoleva PDF -i näidetel. Maksate BS2 eest rohkem, kuid dokumentatsioon on suurepärane. '{$ STAMP BS2}' {$ PBASIC 2.5} '' ----- (I/O definitsioonid) ------------------------- ------------------------ PIR PIN 0 'I/O tihvt PIR-anduri jaoks LEDONE PIN 15' I/O tihvt rohelisele LED-le O tihvt punase LED-i jaoks '----- (muutujad) ------------------------------------ ------------------- loendur VAR bait 'Trip Counterx VAR Word' määratleb üldotstarbelise muutuja märgi VAR x. BIT15 'x bit C märgi bit VAR Word' määratleb muutuja, mida hoida kraadi Celsiuse kraadiF VAR Sõna "Fahrenheiti kraadide hoidmiseks" ----- (initsialiseerimine) -------------------------------- ------------------ DEBUG CLS 'Clear DEBUG ScreenSEROUT 12, 396, ("! NB0W07:", "Warming Up", CLS)' Öelge PINKILE, mis toimubFOR counter = 10 kuni 0 HIGH LEDONE 'Vilgutage LEDid LOW LEDTWO' Oodake 20 sekundit PIR-i soojendamiseks DEBUG HOME, "Soojenemine:", DEC2 loendur SEROUT 12, 396, ("! NB0W07: Soojenemine:", CLS) PAUS 1000 LOW LEDONE HIGH LEDTWO PAUSE 1000 'ekraaniloendur iga sekundi järelNEXTLOW LEDONELOW LEDTWOcounter = 0' Clear Counter VariableDEBUG HOME, "Ootel "SEROUT 12, 396, ("! NB0W07: Ootel … ", CLS) HIGH LEDTWOHIGH 5 'valige DS1620SHIFTOUT 7, 6, LSBFIRST, (238)" "start convertions" käsk LOW 5' täitke käsk '----- (Programmi kood) ---------------------------------------------- ------ Peamine: KAS "Liikumisandur IF PIR = 1 THEN" Liikumine tuvastatud? counter = counter + 1 'Update Trip Counter HIGH LEDONE' LOW LEDTWO 'Light Red LED DEBUG HOME, "TRIPPED…", DEC3 counter SEROUT 12, 396, ("! NB0W07:", "Tripped…", CLS) DO: LOOP KUNI PIR = 0 'Oodake, kuni PIR tühjendab DEBUG HOME, "CLEARED…", DEC3 loendur SEROUT 12, 396, ("! NB0W07:", "Kustutatud …", CLS) LOW LEDONE HIGH LEDTWO' Lülitage punane LED ENDIF välja ' Temperatuur HIGH 5 'valige DS1620 SHIFTOUT 7, 6, LSBFIRST, (170)' saatke käsk "hangi andmed" SHIFTIN 7, 6, LSBPRE, (x / 9) 'hankige andmed, sealhulgas märk LOW 5' lõpetage käsk x. BYTE1 = -x. BIT8 'laiendage märki 16 bitini degC = x*5' teisendage 'C*10 (eraldusvõime 0,5' C) degF = degC+2732*9/50-459 'teisendage F DEBUG? degF, CR, CR 'Näita silumisel SEROUT 12, 396, ("! NB0W06:", DEC degF, CLS)' Garaažiukse detektor. IF IN1 = 0 THEN SEROUT 12, 396, ("! NB0W08:", "Open", CLS) MUU SEROUT 12, 396, ("! NB0W08:", "Closed", CLS) ENDIF PAUSE 1000 LOOP

Samm: laadige fail üles roosale

Kasutasin seda oma veebilehe jaoks. Roosale saate üles laadida FTP Garage Monitor 3000 kaudu. OnLoad = "if (self! = Top) top.location = self.location"> A: hover {text-decoration: underline; värv:#336633; }

Garaaži monitor

Garaažis on temperatuur: Autoparkimise võimalus: Garaažiuks on: [https:// roosa värskendus]

Samm: sulgege PIR -i vaateväli

Nii et PIR -il on hullult lai vaateväli, sulgesin selle 5 -tollise plakatitoru abil, sain selle idee parallaksifoorumite postitusest, nad kasutasid laiemat toru, kuid see oli ikka väga libe Idee.

Kinnitasin PIR -i toru külge, pannes toru korki augu ja kuumliimides. Ma ühendasin selle paki telefonikaabli abil leivalauaga, mul oli seda palju. Leidsin vanalt protsessori ventilaatorilt kolmeharulise pistiku, mida kasutasin PIR -i pistikuna.

6. samm: kinnitage seinale

Kinnitasin selle seina külge, kus mu auto peab ukse puhastamiseks peatuma. Kasutasin tõmblukuga lipsu ja klambripüstolit.

Samm: Freddie Mercury

Ma kinnitasin garaažiukse põhjaga elavhõbedalüliti, kasutades uuesti telefonijuhet, sest mul oli seda nii palju…

8. samm: pange see kõik kokku

Kinnitasin selle kõik sintratüki külge, et see puhtana püsiks. Mul on vaja lõigata lühem Etherneti kaabel, kuid mul pole kodus krimpsutit.

Järgmised sammud… Kas see peab tõesti kogu aeg sisse lülitatud olema? Võib -olla peaksin selle sisse lülitama, kui garaažiuks avaneb ja tuli süttib. Nii saaksin lasta tal värskendada viimase olekuga andmebaasi tabelit? Ma arvan, et selle pidev töötamine on lihtsalt elektri raiskamine … Võib -olla peaksin selle projekti kasti panema!