Enerģijas taupīšana 3000: 7 soļi

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

Adrien Green, Huy Tran, Jody Walker

Raspberry Pi datora un Matlab izmantošana ir vienkāršs un efektīvs veids, kā palīdzēt māju īpašniekiem samazināt enerģijas patēriņu. Enerģijas taupīšanas 3000 labākā daļa ir tā, ka to ir ļoti vienkārši uzstādīt un lietot. Energy Saver 3000 galvenais mērķis ir ļaut māju īpašniekiem izsekot rēķinam par enerģiju, lai redzētu, cik daudz viņi tērē, un ļaut māju īpašniekiem attālināti izslēgt apgaismojumu mājās, nospiežot pogu.

1. darbība. Izmantotās detaļas

1: Raspberry Pi dators

2: maizes dēlis

3: Jumper vadi

4: Nospiediet pogu

5: Mini LED gaismas

6: 330 omi, 10 Kohm un 300 omu rezistors

7: Ethernet kabelis

8: Gaismas fotoelements

2. darbība. Paziņojums par problēmu

Mūsu projekts bija izstrādāt mājas enerģijas taupītāju, izmantojot Raspberry Pi datoru un MATLAB. Mūsu mērķis bija izveidot sistēmu, kas lietotājiem ļautu izsekot rēķinam par enerģiju, lai redzētu, vai viņi var samazināt enerģijas patēriņu. Mēs arī vēlējāmies, lai lietotāji varētu izslēgt gaismas, kamēr viņi bija prom, nospiežot pogu. Lai to izdarītu, mēs savienojām fotoelementu, lai saprastu, kad ir ieslēgtas gaismas. Ja gaismas ir ieslēgtas, programma MATLAB aprēķinās, cik ilgi tās ir ieslēgtas un cik daudz enerģijas un naudas ir iztērēts kopš to ieslēgšanas.

3. darbība: iestatīšana

Pievienojiet maizes dēli, kā parādīts attēlā.

4. solis: MATLAB kods fotoelementa kontrolei

funkcija control_light () rpi = raspi ();

writeDigitalPin (rpi, 12, 1)

laiks = 0

summa = 0

Laiks = 0

Izmaksas = 0

spuldze = 100/1000;% kilovatu

jo i = 1: 2

tic

kamēr taisnība

x = lasītDigitalPin (rpi, 13)

ja x == 1

writeDigitalPin (rpi, 19, 1)

elseif x == 0

writeDigitalPin (rpi, 19, 0)

toc;

laiks = laiks + toc

kwh = toc * spuldze

dolāri = 0,101

izmaksas = kwh * dolāri

summa = summa + izmaksas

X = linspace (laiks, laiks, 10)

Y = linspace (Cost, sumcost, 10)

Laiks = laiks

Izmaksas = summa

disp (['Gaisma ir ieslēgta', num2str (toc), 'hours. Cost = $', num2str (maksa)])

sižeta (X, Y, “b”) nosaukums (“Izmaksas laika gaitā”)

xlabel ('Laiks (stundas)')

ylabel ('Izmaksas (USD dolāri)')

uzgaidi

pārtraukums

beigas

beigas

pauze (5)

tic

kamēr taisnība

x = lasītDigitalPin (rpi, 13)

ja x == 1

writeDigitalPin (rpi, 19, 1)

elseif x == 0

writeDigitalPin (rpi, 19, 0)

toc;

laiks = laiks + toc

kwh = toc * spuldze

dolāri = 0,101

izmaksas = kwh * dolāri

summa = izmaksas + izmaksas

X = linspace (laiks, laiks, 10)

Y = linspace (Cost, sumcost, 10)

Laiks = laiks

Izmaksas = summa

disp (['Gaisma ir ieslēgta', num2str (toc), 'hours. Cost = $', num2str (maksa)])

gabals (X, Y, 'g')

title ('Izmaksas laika gaitā')

xlabel ('Laiks (stundas)')

ylabel ('Izmaksas (USD dolāri)')

uzgaidi

pārtraukums

beigas

beigas

pauze (5)

beigas

5. darbība. MATLAB kods gaismas izslēgšanai

funkcija button_controlv1 ()

rpi = raspi ();

condi = 1;

kamēr true % izveido bezgalīgu cilpu, lai kods darbotos

poga = lasītDigitalPin (rpi, 6); % Nolasa pogas nospiešanas vērtību 6. tapā

ja poga == 0

condi = condi + 1

beigas

ja mod (condi, 2) == 0

writeDigitalPin (rpi, 17, 0)

h = msgbox ('Jūs izslēdzāt gaismu.:)') gaidiet (h);

pārtraukums

beigas

ja mod (condi, 2) == 1

writeDigitalPin (rpi, 17, 1)

beigas

beigas

6. darbība. MATLAB kods gaismas ieslēgšanai

funkcija button_controlv2 ()

rpi = raspi ();

condi = 2;

kamēr true % izveido bezgalīgu cilpu, lai kods darbotos

poga = lasītDigitalPin (rpi, 6); % Nolasa pogas nospiešanas vērtību 6. tapā

ja poga == 0

condi = condi + 1

beigas

ja mod (condi, 2) == 0

writeDigitalPin (rpi, 17, 0)

beigas

ja mod (condi, 2) == 1

writeDigitalPin (rpi, 17, 1)

h = msgbox ('Jūs ieslēdzāt gaismu.:(')

gaidīt (h);

pauze (10)

pārtraukums

beigas

beigas

7. darbība. MATLAB kods GUI

funkcija EnergySaver3000 ()

imgurl = 'https://clipart-library.com/images/pc585dj9i.jpg';

imgfile = 'Spuldze.jpg'; urlwrite (imgurl, imgfile);

imgdata = imread (imgfile);

h = msgbox ('Laipni lūdzam Energy Saver 3000!', '', 'custom', imgdata);

gaidīt (h);

skaidrs h;

kamēr taisnība

iprogram = menu ('Kuru programmu vēlaties palaist?', 'Rēķinu kalkulators', 'Gaismas vadība');

ja iprogram == 1

control_light () h = msgbox ('Gatavs !!!')

aizvērt visus

elseif

iprogramma == 2

beigas

skaidrs h;

ichoice = izvēlne ('Light Control', 'Turn On', 'Turn Off', 'Nevermind');

ja ichoice == 1

button_controlv2 ()

h = msgbox ('Gatavs !!!')

elseif ichoice == 2

button_controlv1 ()

h = msgbox ('Gatavs !!!')

cits jauda == 3

h = msgbox ('Tu neko nedarīji:(') gaidīt (h);

h = msgbox ('Gatavs !!!')

beigas

gaidīt (h);

beigas

beigas