Nupu programm

Oli küsimusi, et valgusanduri programmi ja puuteanduri (nupu) programmi ei saanud tööle. Tegin ise programmi läbi ja see töötab. Kuna mul kodus valgusandurit ei ole siis seda kontrollida ei saa aga juhendan, mida tuleks muuta. Programm on siis selline:

//Nupukas
task main()
{
SetSensorTouch(S1); //pistame lyliti auku 1
bool Puuteandur; //ytleb, et lyliti saab olla õige või vale
while(TRUE)  //paneb tegevuse korduma
   {
   Puuteandur = Sensor(S1); //käsib ajul lülitit kontrollida
   ClearLine(LCD_LINE2); //Teeb ekraani puhtaks
   if (Puuteandur)  //kontrollib muutujat nimega Puuteandur
   TextOut(0,LCD_LINE2,"Nupp all"); //kui on õige tee seda
   else   //kui on vale
   TextOut(0,LCD_LINE2,"Nupp yleval");  //tee seda
   Wait(MS_100);   //oota, et ekraani lugeda jõuaks
   }
}

Lisan siia video:

Teeme eelmise programmi ringi valguse mõõtmiseks.

1 rida Valgusanduri puhul paneme programmile uue nime
4 rida SetSensorLight(S1);//Ühendame silma aukku 1, kui tahame 2 siis sulgudesse S2
5 rida byte ValguseAndur; //anname valguse suurusele nime ja ütleme, et see on positiivne arv
8 rida ValguseAndur=Sensor(S1);//Vaatab palju valgust on anduril augus S1, (sama S mis real 4)
9 rida NumOut(10,LCD_LINE2,ValguseAndur);//Peaks trükkima valguse näidu. 0 on pime ja 100 on valge
if ja teksti käske ei ole vaja aga ootama peaks panema.

Head katsetamist!