https://wiki.robotika.sk/robowiki/index.php?action=history&feed=atom&title=Ultrazvuk.nxc 2026-04-09T00:44:52Z Revision history for this page on the wiki MediaWiki 1.30.0 https://wiki.robotika.sk/robowiki/index.php?title=Ultrazvuk.nxc&diff=2772&oldid=prev 2008-03-26T09:21:08Z

<p></p> <p><b>New page</b></p><div>[[Krúžok Robotiky]]<br /> <br /> /* ultrazvuk.nxc<br /> <br /> Robot ma senzor ultrazvukovy ktory ked zachyti prekazku bliysie <br /> ako 30 cm tak robot cuvne o otoci sa na mieste<br /> <br /> <br /> <br /> Autor: Matej Kurilla<br /> <br /> */<br /> <br /> task ultrazvuk()<br /> {<br /> <br /> int vzdialenost= 30; //cm<br /> <br /> SetSensorLowspeed(IN_2);<br /> /* program urobí to, že keď sa priblíži k stene na menej ako 30 cm<br /> tak cúvne a otočí sa */<br /> while (true)<br /> {<br /> if (SensorUS(IN_2)&lt;vzdialenost)<br /> {<br /> OnRev(OUT_AC,50);<br /> Wait(800);<br /> OnFwd(OUT_C,50);<br /> Wait(1300);<br /> }<br /> }<br /> }<br /> <br /> task main()<br /> {<br /> <br /> start ultrazvuk;<br /> <br /> <br /> <br /> {<br /> <br /> while (true)<br /> {<br /> <br /> OnFwd(OUT_AC,50);<br /> }<br /> }<br /> }</div>

Palo