/* Control Arduino Ethernet by: http://www.elprofegarcia.com/ controla el encendido o apagado de los Pin 2,,! ," y # del Arduino. Controla el giro de un ser$omotor conectado al pin % Ethernet &hield ad'uirida en: http://dinastiatecnologica.com/producto/shield( ethernet(para(arduino/ */ )include &P+.h )include Ethernet.h )include &er$o.h &er$o microser$oint pos byte mac01 34E, 3A4, 35E, 3E6, 36E, 3E4 7byte ip01 92, 9#;, , " 7configurar byte gateway01 92, 9#;, , 9 7byte subnet01 2"", 2"", 2"", 7Ethernet&er$er ser$er>;?ser$idor &tring read&tring-
//4ireccion 6isica 8AC // +P
$oid setup>? &erial.begin>#?- // +niciali@a el puerto serial while >&erial? // Espera a 'ue el puerto serial sea conectado, &olo necesario para el 2,BDPD?// &e configura como salidas los puertos del 2 al # pin8ode>,BDPD?pin8ode>!, BDPD? pin8ode>",BDPD? pin8ode>#,BDPD?microser$o.attach>%?- // &e configura como &er$o el Puerto % Ethernet.begin>mac, ip, gateway, subnet?- // +niciali@a la cone3ion Ethernet y el ser$idor ser$er.begin>?&erial.print>El &er$idor es: ?&erial.println>Ethernet.local+P>??&erial.println>Ethernet.loca l+P>??// +mprime la direccion +P
$oid loop>? // Crea una cone3ion Cliente EthernetClient client ser$er.a$ailable>?if >client? while >client.connected>?? if >client.a$ailable>?? char c client.read>?//read&tring.length>? 9? //Almacena los caracteres a un &tring read&tring G c7
// si el re'uerimiento FDDP fue finali@ado if >c HInH? &erial.println>read&tring?- //+mprime en el monitor serial client.println>FDDP/9.9 2 BJ?//en$ia una nue$a pagina en codigo FD8< client.println>Content(Dype: te3t/html? client.println>?client.println>FD8<? client.println>FEA4?client.println>D+D/FEA4? client.println>5B4K?client.println>hr /?client.println>F9Arduino Ethernet &hield/F9?client.println>br /?client.println>F2Control on/off 2(# &er$o %/F2?client.println>br /?client.println>a hrefI/Lbutton2onII Encender Pin2/a ?// construye en la pagina cada uno de los botones client.println> M M M ?client.println>a hrefI/Lbutton2offII Apagar Pin2/abr / ?client.println>br /?client.println>br /?client.println>a hrefI/LbuttononII Encender Pin/a ?client.println> M M M ?client.println>a hrefI/LbuttonoffII Apagar Pin/abr / ?client.println>br /?client.println>br /?client.println>a hrefI/Lbutton!onII Encender Pin!/a ?client.println> M M M ?client.println>a hrefI/Lbutton!offII Apagar Pin!/abr / ?client.println>br /?client.println>br /?client.println>a hrefI/Lbutton"onII Encender Pin"/a?client.println> M M M ?client.println>a hrefI/Lbutton"offII Apagar Pin"/abr /?client.println>br /?client.println>br /?client.println>a hrefI/Lbutton#onII Encender Pin#/a ?client.println> M M M ?client.println>a hrefI/Lbutton#offII Apagar Pin#/abr / ?client.println>br /?-
client.println>br /?client.println>a hrefI/LleftIINirar +@' Pin%/a?client.println> M M M ?client.println>a hrefI/LrightIINirar 4er Pin%/abr /?client.println>hr /?client.println>pby: elprofegarcia.com/p?client.println>br /?client.println>/5B4K?-
client.println>/FD8<?-
delay>9?//detiene el cliente ser$idor client.stop>?//control del arduino si un boton es presionado if >read&tring.inde3Bf>Lbutton2on? ? digitalOrite>2, F+NF?7 if >read&tring.inde3Bf>Lbutton2off? ? digitalOrite>2, read&tring.inde3Bf>Lbuttonon? ? digitalOrite>, F+NF?7 if >read&tring.inde3Bf>Lbuttonoff? ? digitalOrite>,
if >read&tring.inde3Bf>Lbutton!on? ? digitalOrite>!, F+NF?7 if >read&tring.inde3Bf>Lbutton!off? ? digitalOrite>!, read&tring.inde3Bf>Lbutton"on? ? digitalOrite>", F+NF?7 if >read&tring.inde3Bf>Lbutton"off? ? digitalOrite>",
if >read&tring.inde3Bf>Lbutton#on? ? digitalOrite>#, F+NF?7 if >read&tring.inde3Bf>Lbutton#off? ? digitalOrite>#,
if >read&tring.inde3Bf>Lleft? ? for>pos - pos 9;- pos G ? microser$o.write>pos?delay>9"?ser$o llege a la posicion 7 7 if >read&tring.inde3Bf>Lright? ? for>pos 9;- pos9- pos(? microser$o.write>pos?delay>9"?-
// Niro de a 9; grados
// Espera 9" ms para 'ue el
//Niro de 9; a grados
// Espera 9" ms para 'ue el
ser$o llege a la posicion 7 7 // Cadena de Caracteres para una nue$a lectura read&tring7 7 7 7 7