Attackasito

32 herramientas online para tu ordenador! 1)PXHIR Edita tus fotos con esta herramienta online! 2)VirusTotal Tienes dudas sobre si algun archivo esta infectado? Entra a virustotal y podras analizar un archivo menor de 64mb en unos segundos con la base de datos de 50 antivirus! 3)Google Drive Almacena hasta 15gb gratis con Google Driver! Guarda tus archivos,musica,lo que quieras,aqui! 4)BitDefender Online Scan Analisa tu pc con la base de datos de BitDefender y elimina lo que encuentre! 5)Fotor Edita tus fotos con Fotor! Recorta,agrega efectos,textos,color,cambia el tono y decenas de opciones mas! 6)Can You Run It Descubre si cumples con los requisitos para instalar X programa en tu pc! 7)CatchVideo Solo pon la URL del video y preciosna CATHC 8)VidToMP3 Descarga unicamente el audio de los videos de youtube,intrudouce el enlance y listo! 9)WolfAmalpha Es un motor de busqueda,pero diferente a TODOS... Este,no te ofrece paginas web... Si no que busca y te da la respuesta... Sea una cuenta matematica o de lo que sea 10)Youtube No puede faltar,el gran youtube,mira videos desde esta pagina,encontraras de todo! Musica,humor,tutoriales,etc,etc... Ya la conocen todos... Pero bueno... 11)Dirae Es un diccionario inverso para los que hablamos castellano... Escribi una palabra,u oracion en DIRAE y te ofrecera la comprobacion ortografica y gramatical,mas la definicion... Si quieres escribir mejor,esta es tu pagina 12)Imgur Es la Web mas utilizada para subir imagenes y subirlas... Te permite poner las fotos que quieras a la vez... Se sube rapidamente y listo 13)TinyEye Es un sitio para hacer una busqueda inversas de imagenes... Introduces el URL o subes la imagen y el sitio busca en internet todas las fuentes que contengan la misma imagen... Asi conoceras quien roba tus imagenes o elcreador de las mismas 14)Bitly Esta pagina,te permite acortar las URLs para insertalas en sitios donde tienes un numero maximo de caracteres de escritura,como twitter 15)Kiosko Es una web que te permite conocer todoslos temas decualquier periodico del dia en tus manos... 16)Time And Date Esta pagina se basa en poner una fecha futura,como por ejemplo,un cumpleaños y te diracuantos dias,horas,minutos y segundos quedan hasta esa fecha 17)Down For Everyone Or Just Me Comprueba si una pagina esta realmente caida o simplemente tienes algun problema en tu pc o navegador que impide acceder a ella 18)Goear Conocido sitio web que te permite escuchar lacancion que quierasdeforma instantanea sin necesidad de descargarla 19)Mallinator es un sitio sencillo que te ofrece una direccion de correo electronico desechable... No necesitas registarte y puedes usar la bandeja de entrada que te de la gana,las cuales se crea,cuando un correo llega a ellas,inventas una direccion,la das y vas a Mallinator... Especial si estas cansado de esos sitios que te piden ingresar una direccion de corre electronico o registrarte,y luego te llenan de spam la bandeja de entrada 20)Guerras Tribales Es un juego online que juego hace mas de 6 años... Es muy bueno,te hace pensar,ya que es un juego de estrategias... Donde debes defender y atacar,ayudar a tus compañeros para ganar,meter defensa en milisegundos,enviar ataques metidos en 400mms,hacer back... Muy interesante y atrapante... Te divertis,conoces gente... Es uno de los mejores juegos online y el mas jugado,que esperas,pruebalo! 21)VozMe Esta excelente pagina te permite crear un texto en voz... Sea masculina o femenina 22)WeTransfer La mejor forma Online de enviar por correo electronico archivos de hasta 2GB 23)WayBackMachine Con esta pagina,podes ver como era una web antes... Sean los años que sean... (ESTOY HACIENDO UN POST CON COMO ERA TARINGA ANTES) 24)WayBackMachine Copia un mensaje y pone la fecha que quieres que se envie! Podras enviar mensajes a futuro! 25)ScreenR Graba lo que estas haciendo en tu ordenador con esta aplicacion Online! 26)SimilarSites Sirve para encontrar paginas web similares en cuanto a tematica a la que introduzcamos,es muy sencillo,pones el url de la pagina y encontrara paginas que sean parecidas a esas 27)OnlineOcr Alguna vez casi rompes todo por que tenias que transcribir un texto ya impreso? Pues amaras esta pagina! Te permite subir textos escaneados o fotografiados y su sistema lo detectara,y podes ponerlo en el idioma que quieras,tiene 32 opciones de idioma 28)Bounce Te permite hacer capturas a paginas web... Pones la url,y te capturara la pantalla... Ademas,puedes recortarla 29)IMDb Puedes valorar peliculas y encontrarlas! 30)Midomi Tararea canciones minimo por 10 segundos y te dira que cancion es la que buscas! Especial para cuando nos acordamos de una cancion y decimos,que cancion es esta! Dios!! 31)WooRank No conoces una pagnia? Descubre todo de un sitio web! 32)Online Alarm Clock Tienes algo importante que hacer? Esta alarma Online te despertara,solo pone la hora que quieras que suene y dale a Set Alarm! 33)Web 2.0 Calculadora Cientifica SI NO SE DIERON CUENTA,LOS LINKS ESTAN EN EL TITULO ¡FiN! Guia de Optimizacion de Netbook y PC 2014 Optimiza Mozilla Firefox para un mejor Rendimiento Quieres mejorar el rendimiento de Windows 7? Entra aca! Inicia Windows mas Rapido! Deja tu pc Libre de Malware Nueva Version beta de Panda Cloud Free Softonic Miente! Yo te lo demuestro!

Ayúdame uniéndote a una nueva comunidad de programadores! http://www.taringa.net/comunidades/programme/ El post no es de mi autoria,aunque si,son casi 800 diapositivas.. Agarre mi pendrive viejo y encontré los manuales donde yo hace años aprendí Python con esto,solo... Si yo aprendí a programar en Python con esto,si ustedes están interesados y leen,también lo harán... Si criticas,critica con ARGUMENTOS... Todas se aceptan para mejorar el post... Cualquier duda,a la comunidad nombrada arriba... Alli te ayudaremos! El post esta hecho gracias a que al publicar mi anterior post de programación,5-6 personas me dijeron que cuelgue un post sobre Python ya que es un buen post como para empezar Mis otros post de programacion "Te enseño todo sobre PHP"" "Crea tu propia pagina Web sin salir del post" "Te enseño todo sobre programacion" Mi primer Top Post :D

Te invito a la comunidad "PROGRAMME" - Click en el Gif - El post les ayudara a aprender a programar con el lenguaje Small Basic,un lenguaje sencillo que te abrirá las puertas al VBy de este al VB.Net Si criticas,critica con argumentos y respetuosamente... Todas son aceptadas... Si tienes dudas,a la comunidad,lee el protocolo y publica tu tema,te espera un staff ansioso de ayudar Si te gusta la programación,sígueme,publico casi siempre post sobre programación/informática... Aquí están mis otros post de sobre programación Small Basic no es simplemente dibujar lineas,el juego de la tortuga,etc... Se pueden crear muchísimas cosas,por ejemplo,esta calculadora que hice hace unos días con Small Basic... Yo le llamo "L CALCULADORA TARINGUERA" [color=#000000][color=#000000]p = 0  GraphicsWindow.canresize = 0  GraphicsWindow.Width = 265  GraphicsWindow.Height = 235  GraphicsWindow.Title = "Calculadora Taringuera"  GraphicsWindow.BackgroundColor = GraphicsWindow.GetColorFromRGB(1610, 260, 240)  GraphicsWindow.FontBold = "False"  GraphicsWindow.BrushColor = "black"  m = Shapes.AddText("M")  Shapes.Move(m, 22, 62)  Shapes.HideShape(m)  t = Controls.AddTextBox(10, 10)  Controls.Setsize(t, 248, 32)  Controls.SetTextBoxText(t, "")  GraphicsWindow.BrushColor = "black"  keyMC = Controls.AddButton("MC", 10, 95)  Controls.SetSize(keyMC, 35, 25)  keyMR = Controls.AddButton("MR", 10, 128)  Controls.SetSize(keyMR, 35, 25)  keyMS = Controls.AddButton("MS", 10, 161)  Controls.SetSize(keyMS, 35, 25)  keyMP = Controls.AddButton("M+", 10, 194)  Controls.SetSize(keyMP, 35, 25)  keyC = Controls.AddButton("C", 202, 58)  Controls.SetSize(keyC, 55, 25, )  keyCE = Controls.AddButton("CE", 139, 58)  Controls.SetSize(keyCE, 55, 25)  keyBackspase = Controls.AddButton("Backspase", 58, 58)  Controls.SetSize(keyBackspase, 70, 25)  keydelenie = Controls.AddButton("/", 181, 95)  Controls.SetSize(keydelenie, 35, 25)  keyumnogenie = Controls.AddButton("*", 181, 128)  Controls.SetSize(keyumnogenie, 35, 25)  keyminus = Controls.AddButton("-", 181, 161)  Controls.SetSize(keyminus, 35, 25)  keyplus = Controls.AddButton("+", 181, 194)  Controls.SetSize(keyplus, 35, 25)  keyravno = Controls.AddButton("=", 222, 194)  Controls.SetSize(keyravno, 35, 25)  GraphicsWindow.BrushColor = "black"  key7 = Controls.AddButton("7", 58, 95)  Controls.SetSize(key7, 35, 25)  key8 = Controls.AddButton("8", 99, 95)  Controls.SetSize(key8, 35, 25)  key9 = Controls.AddButton("9", 140, 95)  Controls.SetSize(key9, 35, 25)  key4 = Controls.AddButton("4", 58, 128)  Controls.SetSize(key4, 35, 25)  key5 = Controls.AddButton("5", 99, 128)  Controls.SetSize(key5, 35, 25)  key6 = Controls.AddButton("6", 140, 128)  Controls.SetSize(key6, 35, 25)  key1 = Controls.AddButton("1", 58, 161)  Controls.SetSize(key1, 35, 25)  key2 = Controls.AddButton("2", 99, 161)  Controls.SetSize(key2, 35, 25)  key3 = Controls.AddButton("3", 140, 161)  Controls.SetSize(key3, 35, 25)  key0 = Controls.AddButton("0", 58, 194)  Controls.SetSize(key0, 35, 25)  keyplusminus = Controls.AddButton("+/-", 99, 194)  Controls.SetSize(keyplusminus, 35, 25)  keytochka = Controls.AddButton(".", 140, 194)  Controls.SetSize(keytochka, 35, 25)  keysqrt = Controls.AddButton("sgrt", 222, 95)  Controls.SetSize(keysqrt, 35, 25)  keyprocent = Controls.AddButton("%", 222, 128)  Controls.SetSize(keyprocent, 35, 25)  keynax = Controls.AddButton("1/x", 222, 161)  Controls.SetSize(keynax, 35, 25)  Controls.ButtonClicked = click  Sub click    Sound.playclick()    If Controls.LastClickedButton = key0 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "0"))    ElseIf Controls.LastClickedButton = key1 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "1"))    ElseIf Controls.LastClickedButton = key2 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "2"))    ElseIf Controls.LastClickedButton = key3 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "3"))    ElseIf Controls.LastClickedButton = key4 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "4"))    ElseIf Controls.LastClickedButton = key5 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "5"))    ElseIf Controls.LastClickedButton = key6 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "6"))    ElseIf Controls.LastClickedButton = key7 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "7"))    ElseIf Controls.LastClickedButton = key8 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "8"))    ElseIf Controls.LastClickedButton = key9 Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "9"))    ElseIf Controls.LastClickedButton = keytochka Then      Controls.SetTextBoxText(t, Text.Append(Controls.GetTextBoxText(t), "."))    ElseIf Controls.LastClickedButton = keyplusminus Then      If p = 0 Then        Controls.SetTextBoxText(t, Text.Append("-", Controls.GetTextBoxText(t)))        p = 1      Else        Controls.SetTextBoxText(t, Math.Abs(Controls.GetTextBoxText(t)))        p = 0      EndIf    ElseIf Controls.LastClickedButton = keyplus Then      a = Controls.GetTextBoxText(t)      Controls.SetTextBoxText(t, "")      знак = "+"    ElseIf Controls.LastClickedButton = keyminus Then      a = Controls.GetTextBoxText(t)      Controls.SetTextBoxText(t, "")      знак = "-"    ElseIf Controls.LastClickedButton = keyumnogenie Then      a = Controls.GetTextBoxText(t)      Controls.SetTextBoxText(t, "")      знак = "*"    ElseIf Controls.LastClickedButton = keydelenie Then      a = Controls.GetTextBoxText(t)      Controls.SetTextBoxText(t, "")      знак = "/"    ElseIf Controls.LastClickedButton = keysqrt Then      Controls.SetTextBoxText(t, Math.SquareRoot(Controls.GetTextBoxText(t)))    ElseIf Controls.LastClickedButton = keynax Then      Controls.SetTextBoxText(t, 1/Controls.GetTextBoxText(t))    ElseIf Controls.LastClickedButton = keyC Then      a = ""      b = ""      Controls.SetTextBoxText(t, "")    ElseIf Controls.LastClickedButton = keyCE Then      Controls.SetTextBoxText(t, "")    ElseIf Controls.LastClickedButton = keyBackspase Then      Controls.SetTextBoxText(t, Text.GetSubText(Controls.GetTextBoxText(t), 1, Text.GetLength(Controls.GetTextBoxText(t))-1))    ElseIf Controls.LastClickedButton = keyMP Or Controls.LastClickedButton = keyMS Then      c = Controls.GetTextBoxText(t)      Shapes.ShowShape(m)    ElseIf Controls.LastClickedButton = keyMC Then      c = ""      Shapes.HideShape(m)    ElseIf Controls.LastClickedButton = keyMR Then      Controls.SetTextBoxText(t, c)    ElseIf Controls.LastClickedButton = keyprocent Then      Controls.SetTextBoxText(t, (a * Controls.GetTextBoxText(t))/100)    ElseIf Controls.LastClickedButton = keyravno Then      b = Controls.GetTextBoxText(t)      If знак = "+" Then        Controls.SetTextBoxText(t, a + b)      ElseIf знак = "-" Then        Controls.SetTextBoxText(t, a - b)      ElseIf знак = "*" Then        Controls.SetTextBoxText(t, a * b)      ElseIf знак = "/" Then        If b = 0 Then          Controls.SetTextBoxText(t, "Divide by zero is impossible!")        Else          Controls.SetTextBoxText(t, a / b)        EndIf      EndIf    EndIf  EndSub  [/color][/color][/color] Para que vean que esta funciona Aqui os dejo una lista con programas creados a partir de este lenguaje... Para que puedan verlos,editarlo y aprender de estos Basketball y la ciencia [color=#000000][color=#000000][color=#000000]title = "Basketball 0.3" GraphicsWindow.Title = title width = 950 height = 600 GraphicsWindow.Width = width GraphicsWindow.Height = height FLOORY = 550  ' floor y ENDX = 105    ' end x  size = 24 DrawRoom() Ball_Add() Goal_Add() Man_Add() AddControls() x = 0 y = FLOORY - size Ball_Move() angle = 0 ' [degree] delta = 8 nGoal = 0 While "True"   If x <= 0 Then     x = 0     For i = 1 To 80       x = x + delta       Ball_Move()       angle = angle + delta / ((size / 2) * (Math.Pi / 180))       Ball_Rotate()       Program.Delay(i * 2)     EndFor   EndIf   Man_Hold()   WaitButton()   DrawRoom()   Man_Throw() EndWhile Sub AddControls   GraphicsWindow.BrushColor = "Black"   oVelocity = Controls.AddTextBox(700, 100)   Controls.SetTextBoxText(oVelocity, 15)   oAngle = Controls.AddTextBox(700, 150)   Controls.SetTextBoxText(oAngle, 45)   oThrow = Controls.AddButton("Throw", 700, 200)   Controls.HideControl(oThrow)   ' unit for textbox   oUnit = Shapes.AddText("[km/h]")   Shapes.Move(oUnit, 870, 104)   oUnit = Shapes.AddText("[degree]")   Shapes.Move(oUnit, 870, 154) EndSub Sub DrawRoom   ' wall   GraphicsWindow.BrushColor = "DarkGray"   GraphicsWindow.FillRectangle(0, 0, width, FLOORY)   ' floor   GraphicsWindow.BrushColor = "Sienna"   GraphicsWindow.FillRectangle(0, FLOORY, width, height - FLOORY)   GraphicsWindow.PenColor = "#773D22" ' Sienna L: 40->30   GraphicsWindow.DrawRectangle(0, FLOORY, width, height - FLOORY)   ' end line   GraphicsWindow.PenColor = "White"   GraphicsWindow.DrawRectangle(ENDX - 5, FLOORY, 5, 0)   ' free throw line   GraphicsWindow.PenColor = "White"   GraphicsWindow.DrawRectangle(ENDX + 120 + 455, FLOORY, 5, 0)   ' free throw circle   GraphicsWindow.PenColor = "White"   GraphicsWindow.DrawRectangle(ENDX + 580 + 180, FLOORY, 5, 0)   ' 3 point line   GraphicsWindow.PenColor = "White"   GraphicsWindow.DrawRectangle(ENDX + 120 + 670, FLOORY, 5, 0) EndSub Sub WaitButton   Controls.ShowControl(oThrow)   notClicked = "True"   Controls.ButtonClicked = OnButtonClicked   While notClicked     Program.Delay(200)   EndWhile   Controls.HideControl(oThrow) EndSub Sub OnButtonClicked   notClicked = "False" EndSub Sub Ball_Add   ' Ball | Add ball   ' param size - ball size   ' return oBall   ball["num"] = ball["num"] + 1   oBall = "Ball" + ball["num"]   ball[oBall + ".size"] = size   ball[oBall + ".angle"] = 0   rad = angle / 180 * Math.Pi  ' radian   GraphicsWindow.BrushColor = "OrangeRed"   GraphicsWindow.PenColor = "SaddleBrown"   GraphicsWindow.PenWidth = 2   ball[oBall + ".oBall"] = Shapes.AddEllipse(size, size)   GraphicsWindow.PenWidth = 2   oLineU = Shapes.AddEllipse(size * 0.6, size * 0.4)   ball[oBall + ".oLineU"] = oLineU   oLineC = Shapes.AddEllipse(size * 0.6, size * 0.4)   ball[oBall + ".oLineC"] = oLineC   GraphicsWindow.PenColor = "SaddleBrown"   oLineH = Shapes.AddLine(0, 0, size - 2, 0)   ball[oBall + ".oLineH"] = oLineH   oLineV = Shapes.AddLine(0, 0, 0, size - 2)   ball[oBall + ".oLineV"] = oLineV   GraphicsWindow.PenColor = "White"   GraphicsWindow.BrushColor = "White"   oHighlight = Shapes.AddEllipse(size * 0.7 , size * 0.7)   Shapes.SetOpacity(oHighlight, 30)   ball[oBall + ".oHighlight"] = oHighlight   Ball_Move() EndSub Sub Ball_Move   ' Ball | Move ball   ' param oBall   ' param x, y - position to move   ball[oBall + ".x"] = x   ball[oBall + ".y"] = y   angle = ball[oBall + ".angle"]   rad = angle / 180 * Math.Pi  ' radian   size = ball[oBall + ".size"]   Shapes.Move(ball[oBall + ".oBall"], x, y)   xU = x + size * (0.5 + 0.3 * Math.Sin(rad) - 0.3)   yU = y + size * (0.5 - 0.3 * Math.Cos(rad) - 0.2)   Shapes.Move(ball[oBall + ".oLineU"], xU, yU)   xC = x + size * (0.5 - 0.3 * Math.Sin(rad) - 0.3)   yC = y + size * (0.5 + 0.3 * Math.Cos(rad) - 0.2)   Shapes.Move(ball[oBall + ".oLineC"], xC, yC)   Shapes.Move(ball[oBall + ".oLineH"], x + 1, y + size * 0.5)   Shapes.Move(ball[oBall + ".oLineV"], x + size * 0.5, y)   Shapes.Move(ball[oBall + ".oHighlight"], x + 1, y + 1) EndSub Sub Ball_Rotate   ' Ball | Rotate ball   ' param oBall   ' param angle - rotate angle   angle = Math.Remainder(angle, 360)   If angle < 0 Then     angle = 360 - angle   EndIf   ball[oBall + ".angle"] = angle   rad = angle / 180 * Math.Pi  ' radian   x = ball[oBall + ".x"]   y = ball[oBall + ".y"]   xU = x + size * (0.5 + 0.3 * Math.Sin(rad) - 0.3)   yU = y + size * (0.5 - 0.3 * Math.Cos(rad) - 0.2)   Shapes.Move(ball[oBall + ".oLineU"], xU, yU)   Shapes.Rotate(ball[oBall + ".oLineU"], angle)   xC = x + size * (0.5 - 0.3 * Math.Sin(rad) - 0.3)   yC = y + size * (0.5 + 0.3 * Math.Cos(rad) - 0.2)   Shapes.Move(ball[oBall + ".oLineC"], xC, yC)   Shapes.Rotate(ball[oBall + ".oLineC"], angle)   Shapes.Rotate(ball[oBall + ".oLineH"], angle)   Shapes.Rotate(ball[oBall + ".oLineV"], angle) EndSub Sub Goal_Add   ' Goal | Add goal   ' pole   GraphicsWindow.PenColor = "#333333"   GraphicsWindow.BrushColor = "Black"   oPole = Shapes.AddRectangle(ENDX + 120 - 24 - 15, 10)   Shapes.Move(oPole, 0, FLOORY - 305 - 107 + 15 + 10)   oPole = Shapes.AddRectangle(ENDX + 120 - 24 - 15, 10)   Shapes.Move(oPole, 0, FLOORY - 305 + 15 - 20)   ' flange   GraphicsWindow.PenColor = "DarkRed"   oFlange = Shapes.AddLine(0, 0, 15, 0)   r = 24   x1 = x + ENDX + 120 - r - 15   y1 = FLOORY - 305   Shapes.Move(oFlange, x1, y1)   posFlange = "x1=" + x1 + ";x2=" + (x1 + 15) + ";y=" + y1 + ";"   ' ring   GraphicsWindow.PenColor = "Red"   oRing = Shapes.AddLine(0, 0, r * 2, 0)   x1 = x + ENDX + 120 - r   Shapes.Move(oRing, x1, y1)   posRing = "x1=" + x1 + ";x2=" + (x1 + r * 2) + ";y=" + y1 + ";"   posGoal = "x=" + (x1 + r) + ";y=" + y1 + ";"   ' board   GraphicsWindow.PenColor = "Gray"   GraphicsWindow.BrushColor = "White"   oBoard = Shapes.AddRectangle(6, 107)   x1 = x + ENDX + 120 - r - 15 - 6   y1 = FLOORY - 305 - 107 + 15   Shapes.Move(oBoard, x1, y1)   posBoard = "x=" + (x1 + 6) + ";y1=" + y1 + ";y2=" + (y1 + 107) + ";"   ' net   xNet[0] = "0=0;1=5;2=19;3=41;4=69;5=100;6=131;7=159;8=181;9=195;10=200;"   xNet[1] = "0=30;1=33;2=43;3=59;4=78;5=100;6=122;7=141;8=157;9=167;10=170;"   xNet[2] = "0=40;1=52;2=60;3=71;4=85;5=100;6=115;7=129;8=140;9=148;10=160;"   xNet[3] = "0=50;1=52;2=60;3=71;4=85;5=100;6=115;7=129;8=140;9=148;10=150;"   x0 = x + ENDX + 120 - r   y0 = FLOORY - 305   y1 = 0   y2 = 15   GraphicsWindow.PenColor = "White"   For j = 0 To 2     For i = 0 To 4       If Math.Remainder(j, 2) = 0 Then         x1 = xNet[j][i * 2] * r / 100         x2 = xNet[j + 1][i * 2 + 1] * r / 100         oNet = Shapes.AddLine(0, 0, x2 - x1, y2 - y1)         Shapes.Move(oNet, x0 + x1, y0 + y1)         x1 = xNet[j + 1][i * 2 + 1] * r / 100         x2 = xNet[j][i * 2 + 2] * r / 100         oNet = Shapes.AddLine(0, y2 - y1, x2 - x1, 0)         Shapes.Move(oNet, x0 + x1, y0 + y1)       Else         x1 = xNet[j + 1][i * 2] * r / 100         x2 = xNet[j][i * 2 + 1] * r / 100         oNet = Shapes.AddLine(0, y2 - y1, x2 - x1, 0)         Shapes.Move(oNet, x0 + x1, y0 + y1)         x1 = xNet[j][i * 2 + 1] * r / 100         x2 = xNet[j + 1][i * 2 + 2] * r / 100         oNet = Shapes.AddLine(0, 0, x2 - x1, y2 - y1)         Shapes.Move(oNet, x0 + x1, y0 + y1)       EndIf     EndFor     y1 = y1 + 15     y2 = y2 + 15   EndFor   GraphicsWindow.FontSize = 50   GraphicsWindow.BrushColor = "Red"   oBanner = Shapes.AddText("Goal")   Shapes.Move(oBanner, width / 2 - 25 * 2, height / 2 - 50 / 2)   Shapes.SetOpacity(oBanner, 0)   GraphicsWindow.FontSize = 14 EndSub Sub Goal_BoundOnBoard   ' param x, y - ball position   ' param lastx, lasty - ball last position   ' return bound - "True" if bound (collision detected)   bound = "False"   cy = y + size / 2   If posBoard["y1"] < cy And cy < posBoard["y2"] And x < posBoard["x"] And posBoard["x"] < x + size Then     bound = "True"     x = posBoard["x"]     't = 0     y0 = y     x0 = x     lastvx = vx     vx = -vx * Math.SquareRoot(1.3 / 1.8)     da = vy * dt * 100 * 360 / Math.Pi / size   EndIf EndSub Sub Goal_BoundOnFlange   ' param x, y - ball position   ' param lastx, lasty - ball last position   ' return bound - "True" if bound (collision detected)   bound = "False"   cx = x + size / 2   If posFlange["x1"] < cx And cx < posFlange["x2"] And y < posFlange["y"] And posFlange["y"] < y + size Then     bound = "True"     y = posFlange["y"] - size     't = 0     y0 = y     x0 = x     vy = -vy * Math.SquareRoot(1.3 / 1.8)     da = -vx * dt * 100 * 360 / Math.Pi / size   EndIf EndSub Sub Goal_BoundOnRing   ' param x, y - ball position   ' param lastx, lasty - ball last position   ' return bound - "True" if bound (collision detected)   bound = "False"   cx = x + size / 2   cy = y + size / 2   bx = posRing["x1"]   ' bound point x   by = posRing["y"]   ' bound point y   distance = Math.SquareRoot(Math.Power(cx - bx, 2) + Math.Power(cy - by, 2))   If distance <= size / 2 Then     Goal_CalcReflection()   EndIf   bx = posRing["x2"]   ' bound point x   distance = Math.SquareRoot(Math.Power(cx - bx, 2) + Math.Power(cy - by, 2))   If distance <= size / 2 Then     Goal_CalcReflection()   EndIf EndSub Sub Goal_CalcReflection   bound = "True"   lastcx = lastx + size / 2   lastcy = lasty + size / 2   lastdist = Math.SquareRoot(Math.Power(lastcx - bx, 2) + Math.Power(lastcy - by, 2))   k = (size / 2 - distance) / (lastdist - distance)   cx = (1 - k) * cx + k * lastcx   cy = (1 - k) * cy + k * lastcy   x = cx - size / 2   y = cy - size / 2   't = 0   y0 = y   x0 = x   vx = -vx * Math.SquareRoot(1.3 / 1.8)   vy = -vy * Math.SquareRoot(1.3 / 1.8)   da = -vx * dt * 100 * 360 / Math.Pi / size EndSub Sub Goal_Check   ' param x, y - ball position   ' param lastx, lasty - ball last position   ' return bound - "True" if bound (collision detected)   cx = x + size / 2   cy = y + size / 2   gx = posGoal["x"]   ' center x of goal   gy = posGoal["y"]   ' center y of goal   distance = Math.SquareRoot(Math.Power(cx - gx, 2) + Math.Power(cy - gy, 2))   If goal = "False" And distance < size / 2 And gy < cy Then     Goal_Show()     nGoal = nGoal + 1     goal = "True"   EndIf EndSub Sub Goal_Show   Sound.PlayBellRing()   For i = 0 To 100     Shapes.SetOpacity(oBanner, i)     Program.Delay(10)   EndFor   For i = 100 To 0 Step -1     Shapes.SetOpacity(oBanner, i)     Program.Delay(10)   EndFor EndSub Sub Joint_Add   ' param id   ' param xj[id] - x beam root   ' param yj[id] - y beam root   ' param lj[id] - length beam   ' param aj[id] - angle beam   ' return xj[id+1] - x beam front   ' return yj[id+1] - y beam front   oLeg[id] = Shapes.AddLine(0, 0, lj[id], 0)   Joint_Move() EndSub Sub Joint_Move   ' param id   ' param xj[id] - x beam root   ' param yj[id] - y beam root   ' param aj[id] - angle beam   ' return xj[id+1] - x beam front   ' return yj[id+1] - y beam front   Stack.PushValue("local", x)   Stack.PushValue("local", y)   x = xj[id] + (lj[id] / 2) * Math.Cos(aj[id] * Math.Pi / 180) - (lj[id] / 2)   y = yj[id] + (lj[id] / 2) * Math.Sin(aj[id] * Math.Pi / 180)   Shapes.Move(oLeg[id], x, y)   Shapes.Rotate(oLeg[id], aj[id])   xj[id + 1] = xj[id] + lj[id] * Math.Cos(aj[id] * Math.Pi / 180)   yj[id + 1] = yj[id] + lj[id] * Math.Sin(aj[id] * Math.Pi / 180)   y = Stack.PopValue("local")   x = Stack.PopValue("local") EndSub Sub Man_Add   ' Man | Add man   ' return oMan   xMan = ENDX + 580 + 12 + 28   yMan = FLOORY - 48 * 2   man["num"] = man["num"] + 1   oMan = "Man" + man["num"]   man[oMan + ".x"] = xMan   man[oMan + ".y"] = yMan   GraphicsWindow.BrushColor = "Black"   GraphicsWindow.PenColor = "Black"   oHead = Shapes.AddEllipse(24, 24)   man[oMan + ".oHead"] = oHead   Shapes.Move(oHead, xMan - 12, yMan - 84)   oBody = Shapes.AddLine(0, 0, 0, 48)   man[oMan + ".oBody"] = oBody   Shapes.Move(oBody, xMan, yMan - 48)   GraphicsWindow.PenColor = "Black"   id = 10 ' for arm   xj[id] = xMan   yj[id] = yMan - 48   al = "1=60;2=90;3=-45;4=-15;"   ll = "1=36;2=36;3=9;4=12;"   Man_AddLimb()   id = 20 ' for leg   xj[id] = xMan   yj[id] = yMan   al = "1=100;2=-20;3=100;4=0;"   ll = "1=48;2=48;3=21;4=7;"   Man_AddLimb() EndSub Sub Man_AddLimb   ' param id - limb id   ' param al[] - angle of joints   ' param ll[] - length of linterjoint   Stack.PushValue("local", id)   For i = 1 To 4     lj[id] = ll[i]      ' length     Joint_Add()     id = id + 1   EndFor   id = Stack.PopValue("local")   Man_MoveLimb() EndSub Sub Man_Catch   ' Man | Catch ball   ' param oBall   ' param oMan   ' param x, y - top left positon of ball EndSub Sub Man_Hold   ' Man | Hold ball   ' param oBall   ' param oMan   x = man[oMan + ".x"] - 48   y = man[oMan + ".y"] - 48   Ball_Move()   id = 10 ' for arm   al = "1=85;2=120;3=90;4=-20;"   Man_MoveLimb() EndSub Sub Man_MoveLimb   ' param id - id limb   ' param al[] - angle of joints   Stack.PushValue("local", id)   aj[id] = al[1]                ' angle   Joint_Move()   id = id + 1   For i = 2 To 4     aj[id] = aj[id - 1] + al[i] ' angle     Joint_Move()     id = id + 1   EndFor   id = Stack.PopValue("local") EndSub Sub Man_Throw   ' Man | Throw ball   ' param oBall   ' param oMan   size = ball[oBall + ".size"]   x = man[oMan + ".x"] - 48   y = FLOORY - 144 - size   Ball_Move()   id = 10 ' for arm   al = "1=120;2=120;3=110;4=-40;"   Man_MoveLimb()   Program.Delay(500)   x = man[oMan + ".x"] - 48   y = FLOORY - 192 - 12   Ball_Move()   id = 10 ' for arm   al = "1=180;2=80;3=100;4=-40;"   Man_MoveLimb()   Program.Delay(1000)   id = 10 ' for arm   al[3] = -45   Man_MoveLimb()   g = 9.80665 ' acceleration of gravity [m/s^2]   y0 = y   x0 = x   v0_ = Controls.GetTextBoxText(oVelocity)  ' [km/h]   v0 = v0_ * 1000 / 3600                    ' [m/s]   angle = Controls.GetTextBoxText(oAngle)   ' [degree]   v0x = v0 * Math.Cos(angle * Math.Pi / 180)   v0y = v0 * Math.Sin(angle * Math.Pi / 180)   a = ball[oBall + ".angle"]   da = 10   ' [degree]   dt = 0.01 ' [s]   vy = v0y   vx = v0x   goal = "False"   For t = 0.1 To 30.0 Step dt     ' [s]     a = a + da     angle = a     Ball_Rotate()     vy = vy - g * dt / 2          ' velocity [m/s]     lasty = y     lastx = x     y = y - (vy * dt) * 100       ' vertical position [cm]     x = x - (vx * dt) * 100       ' horizontal position [cm]     If x < -24 Or 950 < x Then       y = FLOORY - size       Goto exit_throw     EndIf     If FLOORY - size < y Then       ' bounds on the floor       y = FLOORY - size       't = 0       y0 = y       x0 = x       vy = -vy * Math.SquareRoot(1.3 / 1.8)       If vy < 0.1 Then         Goto exit_throw       EndIf       da = -vx * dt * 100 * 360 / Math.Pi / size     EndIf     Goal_BoundOnRing()     If bound Then       Goto move_ball     EndIf     Goal_BoundOnBoard()     If bound Then       Goto move_ball     EndIf     Goal_BoundOnFlange()     If bound Then       Goto move_ball     EndIf     Goal_Check() move_ball:     Ball_Move()     If Math.Remainder(t * 100, 10) = 0 Then       GraphicsWindow.BrushColor = "Gray"       GraphicsWindow.FillEllipse(x, y, size, size)     EndIf     Program.Delay(10)   EndFor exit_throw:   id = 10 ' for arm   al = "1=60;2=90;3=-45;4=-15;"   Man_MoveLimb() EndSub [/color][/color] Encesta! [color=#000000][color=#000000] GUI() GraphicsWindow.MouseDown=Onmousedown GraphicsWindow.MouseMove=Onmousemove GraphicsWindow.Mouseup=Onmouseup While "true"   If move="true" Then     Shoot()            ' ball is throwed     Goalcheck()        ' if ball goals in or not      Goalin()           ' ball goes down throgh goal net    EndIf   Program.Delay(20) endwhile sub Goalin   If goal="true" Then     Vx=0     newx=RX+(RW-BD)/2                 ' ball falling position      Vy=Vy/3                           ' ball falling speed     Gravity=Gravity*0.8     If (PY+BD/2)<Shapes.GetTop(BBall) and Shapes.GetTop(BBall)<(PY+BD) Then       For i=1 To 11         Shapes.Rotate(line[i],10)      ' goal net swings        EndFor       Program.Delay(50)     EndIf     '     If (PY+BD)<Shapes.GetTop(BBall) then       staynet()                        ' Net return initial state       Gravity=7     EndIf   endif EndSub Sub staynet   For i=1 To 11     Shapes.Rotate(line[i],0)           ' goal net stay    EndFor EndSub Sub goalcheck   If goal="false" and RX<newx And newx<RX+RW-BD and  math.Abs(newY-PY)<BD/2 Then     Shapes.SetText(smsg," Goal !!!!! ")     Shapes.Animate(smsg,1000,150,1500)     goal="true"     MM=MM+1                            ' count up goals     resultshow()   EndIf endsub Sub resultshow   result=" Click , move(slide) and release ball within blue circle. " +Text.GetCharacter(10)+ " Throwing = "+NN +" times Goal= "+MM+" times"   Shapes.SetText(sresult,result) EndSub Sub Shoot   dn=dn+1   Shapes.ShowShape(gball[dn])           ' trace ball   Shapes.Move(gball[dn],newx,newy)   t3=clock.ElapsedMilliseconds   newx=newx-vx*PM   newy=newy-vy +(t3-t2)*(t3-t2)*Gravity/2/1000000   Shapes.Move(BBall,newx,newy)   GraphicsWindow.Title="Now Ball X= "+math.Floor(newx)+ " Y= "+math.Floor(newy)+" Vx = "+math.Floor(Vx) + " Vy = "+math.Floor(Vy)   If (RX-PW<newx and newx<RX+4)   And (PY-PH/2-BD/2<newY And newY<PY) Then ' if ball taches the panel      PM=-1   EndIf   If GH-BD-20<newy Then     move="false"     newx=0     newy=0     Shapes.Animate(BBall,x0,y0,4000)   ' ball backs initial position      Program.Delay(4000)     Shapes.Move(smsg,-100,-50)         ' hide goal message     GraphicsWindow.Title="Now Ball is "+X0+ " : "+Y0     For i=1 To dn       Shapes.HideShape(gball[i])     EndFor     dn=0   EndIf EndSub Sub onmousedown   gx= GraphicsWindow.MouseX   gy= GraphicsWindow.MouseY   If math.Abs(gx-x0)<50 And math.Abs(gy-y0)<50 Then     NN=NN+1     PM=1     catch="true"     goal="false"     Gravity=9.8     t1=clock.ElapsedMilliseconds        ' ball caught time      resultshow()                        ' result     staynet()                           ' Net return initial state   EndIf endsub Sub onmousemove   If catch="true" Then     gx1= GraphicsWindow.MouseX     gy1= GraphicsWindow.MouseY     Shapes.Move(BBall,gx1,gy1)     r=Math.SquareRoot((gx1-x0)*(gx1-x0)+ (gy1-y0)*(gy1-y0))  ' distance from initial position      If r>410 Then       onmouseup()                       ' forced throwing      endif   EndIf endsub Sub onmouseup   If catch="true" Then     gx2= GraphicsWindow.MouseX     gy2= GraphicsWindow.MouseY     t2=clock.ElapsedMilliseconds        ' Ball release time      catch="false"     Vx=(gx-gx2)/(t2-t1)*10              ' Ball speed X     Vy=(gy-gy2)/(t2-t1)*10              ' Ball speed Y     newx=shapes.GetLeft(BBall)     newy=shapes.Gettop(BBall)     Move="true"   EndIf endsub Sub GUI   GraphicsWindow.Show()   GraphicsWindow.Hide()   GraphicsWindow.Top=20   GraphicsWindow.Left=20   '---------------- initial value ----------------------   GW=1200   GH=650   GraphicsWindow.BackgroundColor="Darkgreen"   GraphicsWindow.Width=GW   GraphicsWindow.Height=GH   GraphicsWindow.BrushColor="Lightcyan"   GraphicsWindow.PenColor="Navy"   GraphicsWindow.PenWidth=3   circle= Shapes.AddEllipse(800,800)   ' throwing circle   Shapes.Move(circle,GW-400,GH-400)   '---------------- basketball ----------------------   BD=50   GraphicsWindow.BrushColor="lightgray"   GraphicsWindow.penColor="gray"   For i=1 To 300     gball[i]=Shapes.AddEllipse(BD,BD)  ' trace ball     Shapes.Move(gball[i],1200,900)     Shapes.HideShape(gball[i])   endfor   GraphicsWindow.BrushColor="Brown"   GraphicsWindow.PenColor="Coral"   X0=GW-BD   Y0=GH-BD   BBall= Shapes.AddEllipse(BD,BD)   Shapes.Move(BBall,X0,Y0)   '---------------- Message ----------------------   GraphicsWindow.BrushColor="Yellow"   GraphicsWindow.FontSize=25   GraphicsWindow.FontItalic="True"   smsg=shapes.AddText(" ")   Shapes.Move(smsg,-100,-50)   result=" Click , move(slide) and release ball within blue circle. " +Text.GetCharacter(10)+ " Throwing = "+NN +" times Goal= "+MM+" times"   sresult=shapes.AddText(result)   Shapes.Move(sresult,200,10)   '---------------- Goal Net ----------------------   GraphicsWindow.BrushColor="Yellow"   PW=20                                  ' Panel Width    PH=200                                 ' Panel Height    PY=200                                 ' Panel position Y    RX=90                                  ' Ring position X    RW=110                                 ' Ring width    panel=shapes.AddRectangle(PW,PH)   GraphicsWindow.BrushColor="Darkgreen"   Ring=shapes.AddRectangle(RW,10)   GraphicsWindow.PenColor="lightcyan"   For i=1 To 11     line[i]=Shapes.AddLine(0+10*i,0,30+5*i,100)    ' Net   EndFor   setgoal()   GraphicsWindow.Show()   '--------------------------------------   catch="false"   NN=0   MM=0 EndSub Sub setgoal   Shapes.Move(panel,RX-PW,PY-PH/2)   Shapes.Move(ring,RX,PY)   For i=1 To 11     Shapes.Move(line[i],RX,PY)   EndFor endsub [/color][/color] Destruye los cuadrados! Un lindo reloj

Te invito a la comunidad "PROGRAMME" - Click en el Gif - El post les ayudara a aprender C++/PHP/C#/RUBY/PYTHON/ANDROID Si criticas,critica con argumentos y respetuosamente... Todas son aceptadas... Si tienes dudas,a la comunidad,lee el protocolo y publica tu tema,te espera un staff ansioso de ayudar Solo muestro una parte de los vídeos... Ya lo hice con todos,y se pone muy pesado el post... Y no lo podrán ver si no... Por eso,si les interesa un curso,búsquenlo y siguen... Les dejo algunos para que vallan viendolo,ver si os gusta,etc... Si te gusta la programación,sígueme,publico casi siempre post sobre programación/informática... Aquí están mis otros post de sobre programación Quieres programar y te es difícil? Es te es tu post! "3x1 - Te aseguro que aprendes a programar en Python!" "Te enseño todo sobre PHP"" "Crea tu propia pagina Web sin salir del post" "Te enseño todo sobre programacion" Mi primer Top Post :D 606 videos creados por un grupo de programadores mexicanos. Incluye tutoriales sobre C++, java, python, ruby y vb.net. También podrás asistir a charlas virtuales sobre temas vinculados al desarrollo de software. Más de 60 videos con talleres introductorios sobre programación java, python, php, programación web y Cloud Hosting. Aprende a manejar java, Adobe Ilustrator, Visual C y a desarrollar aplicaciones móviles para Android a través de estos sencillos y entretenidos tutoriales para todos los niveles. Especial para quienes quieren aprender a desarrollar videojueos. Incluye programación de videojuegos con Java y Pygames. Muy recomendable para diseñadores gráficos y web. Dispone de cursos de php y Html5 para principiantes y avanzados. Este canal está especialmente pensado para aquellos cuyo temor radica en la creencia de que aprender programación esté fuera de su alcance. En los tutoriales sobre python, C++ y java, se emplea un lenguaje sencillo y accesible 36 vídeos cortitos donde te enseñan unos programadores de México a programar en Python! Estos videos son de CODEJOBS,pueden suscribirse a su canal hasta que lanze las demas partes... 40 vídeos donde te enseñaran a programar en el lenguaje Java! 36 videos donde aprenderás a programar el lenguaje Ruby! Aqui aprenderás a programar en C#... Actualmente lo estoy viendo y esta muy bueno... A pedido de muchos,aqui les dejo como programar para crear aplicaciones/programas en Android 26 vídeos donde te explican como programar en C++ Quieres aprender VB.NET? No te podes perder estos videos...

Te invito a la comunidad "PROGRAMME" - Click en el Gif - El post le da la opcino de seguir un curso para aprender sobre programación! Seguramente,deban tener que saber Ingles! En algunos,otros son en Español Si criticas,critica con argumentos y respetuosamente... Todas son aceptadas... Si tienes dudas,a la comunidad,lee el protocolo y publica tu tema,te espera un staff ansioso de ayudar Si te gusta la programación,sígueme,publico casi siempre post sobre programación/informática... Aquí están mis otros post de sobre programación Programación para todo el mundo (en inglés) es un curso de la plataforma Coursera impartido por la Universidad de Michigan y que parece ideal para todo aquel que nunca haya programado y le apetezca aprender. Utiliza Python como lenguaje, con una sintaxis simple pero que obliga a mantener un buen estilo de código. El curso comienza el próximo 2 de junio y tiene una duración de diez semanas. Introducción a Python Es un curso similar al anterior, también impartido en Coursera por la Universidad RICE, que introduce Python al alumno mediante el desarrollo de pequeños videojuegos interactivos de tipo Pong. Recomiendan hacer algunas lecciones en Codecademy sobre Python antes de comenzarlo. El curso comenzará durante el mes de septiembre y durará entre nueve y diez semanas. Introducción a la programación informática Se imparte en edX por el Instituto Indio de Tecnología de Bombay y promete enseñar, en seis semanas, lo básico de la programación, utilizando C/C++ como lenguajes, así como una noción básica sobre ingeniería del software. El curso comienza el 29 de julio y cuenta con una segunda parte, que comenzaría el 23 de septiembre. Introducción a Java Es un curso pensado para aquellos que quieran aprender y comprender los conceptos relacionados con la programación orientada a objetos a partir de elementos tangibles en el mundo real. Impartido en edX por la HKUST, Universidad de Ciencia y Tecnología de Hong Kong, comienza en junio y tiene una duración estimada de diez semanas. Construye tu primera aplicación mocil Es un curso impartido por la Universidad de Reading que promete a sus alumnos aprender a programar, también, construyendo juegos que podrán ejecutar en sus ordenadores o dispositivos portátiles Android. Comenzará el 20 de octubre y tendrá una duración de siete semanas. Algoritmos Parte I Es un curso ideal para todos aquellos que quieran tener nociones algo más formales sobre la programación, y particularmente sobre ciertos algoritmos que son muy utilizados (recorrido de grafos, ordenación, etcétera). Impartido por la Universidad de Princeton a través de Coursera, tiene una duración de seis semanas y comienza el 13 de junio. Requiere un cierto conocimiento sobre Java. El curso, además, tiene una segunda parte, que comenzaría el 31 de octubre de 2014 y tendría una duración aproximada de siete semanas. Estructura de datos Es un curso de la plataforma OCW del MIT que ofrece a sus alumnos una visión amplia aunque en detalle de distintas estructuras de datos, así como sobre algoritmos para manejarlas eficientemente. Pensado para hacerse en once semanas, podremos tomarlo cuando queramos. Human Computer Interaction (en inglés, aunque con algunas sesiones en español opcional) es un curso de la plataforma Coursera impartido por la Universidad de San Diego. Os lo menciono porque la verdad es que los que programamos muchas veces dejamos de lado aspectos tan importantes como la usabilidad o la accesibilidad. Merece la pena dedicarle unas horas a tener, al menos, unas nociones sobre este tema. El curso comienza el próximo 30 de junio y tiene una duración estimada de nueve semanas. Programación para Medios Digitales y Aplicaciones Móviles Es un curso de programación pero orientado, sobre todo, a creadores que quieren aprender sobre un medio extra para materializar sus obras, como son las aplicaciones. Requiere un cierto conocimiento sobre Java, pero aquellos que no hayan programado recibirán material extra. Impartido por la Universidad de Londres, el curso comienza en una fecha indeterminada de junio, y tiene Aprendizaje automático Cada vez es más habitual ver que nuestro ordenador aprende de nosotros, por ejemplo en el ámbito de los asistentes virtuales. La Universidad Carlos III de Madrid ofrece un curso gratuito sobre Aprendizaje Automático que nos permitirá aprender algunos métodos utilizados por los programas para aprender de los usuarios. Programación Concurrente Es un curso que nos permitirá aprender sobre programación concurrente, aplicada al procesador Cell incluido en la PlayStation 3. Alojado en la plataforma OCW, cuenta con lecciones de vídeo (en inglés, eso sí, aunque ofrecen subtítulos). Podemos hacerlo cuando queramos. Computación Biológica Es el nombre de un curso impartido por la Universidad Carlos III de Madrid, que arrojará luz sobre términos que a priori suenan un poco marcianos como "algoritmos genéticos" o "computación bioinspirada". Al ser un curso OCW, podemos obtener todo el material de manera gratuita y seguir el curso como queramos, aunque sin ningún tipo de certificación. Curso de programación en Objective-C Este curso presenta los fundamentos del desarrollo en el lenguaje Objective-C. Con el fin de crear un software cada vez más potentes y sofisticados, los programadores tienen que profundizar en la estructura y la arquitectura de Objective-C . A lo largo de este curso, usted aprenderá los conceptos fundamentales de programación en Objective-C y el software que se utiliza para desarrollar código para el Mac OS X y iOS plataformas iPhone/iPad Curso de programacion aplicaciones Android Curso de programación aplicaciones Android. La Universidad Politécnica de Valencia a través de los videos de poliMedia está impulsando el e-learning como una herramienta útil y necesaria para la formación permanente, apostando por el desarrollo de sistemas de aprendizaje, flexibles, interactivos y colaborativos. Debido a la gran acogida del curso “Android: Programación de aplicaciones para móviles” en modo presencial, ahora han decidido crear un nuevo curso gratuito y online para aprender a programar aplicaciones para Android. Curso de PHP y MYYSQL Gracias al gran avance que ha tenido internet se ha multiplicado drásticamente el uso de páginas web, actualmente muchas operaciones comerciales también se realizan a través de internet. Es por esto que es muy importante que tu sitio web cuente con soluciones de última tecnología con aplicaciones eficaces. Con el ambiente prevaleciente en el mercado competitivo, es aconsejable desarrollar sitios web atractivos que funcionen rápido y aseguren su eficiencia. Si investigas un poco podrás ver que hay numerosas formas de crear un sitio web incluyendo HTML estático, sitios web flash y programación PHP. Curso de java Curso de Java gratis. Curso Completo de Java desde cero formado por 40 videotutoriales y casi 34 horas de formación online en el lenguaje de programación con más perspectivas de crecimiento futuro.El curso se centra prácticamente en el trabajo con NetBeans, separando el curso en 5 bloques principales:

Te invito a la comunidad "PROGRAMME" - Click en el Gif - El post les explicara que todo sobre el diseño multimedia Si criticas,critica con argumentos y respetuosamente... Todas son aceptadas... Si te gusta la programación,sígueme,publico casi siempre post sobre programación/informática... Aquí están mis otros post de sobre programación Aprender a programar? Para que esta Youtube! Quieres programar y te es difícil? Es te es tu post! "3x1 - Te aseguro que aprendes a programar en Python!" "Te enseño todo sobre PHP"" "Crea tu propia pagina Web sin salir del post" "Te enseño todo sobre programacion" Mi primer Top Post :D El Diseño Multimedia está compuesto por la combinación de diversas ramas, que engloban texto, fotografías, videos, sonido, animación, manipulada y volcada en un soporte digital. Algunas de estas ramas pueden ser: Diseño Gráfico, Diseño Editorial, Diseño Web, y diseño de vídeos.La cualidad multimedia no está necesariamente ceñida a la informática, pues se puede tomar como medio multimedia la mezcla de un libro junto a un casete, cuya combinación se utiliza para crear textos con música ambiente. Una definición más específica del concepto de Multimedia es la capacidad que poseen los ordenadores de mostrar en un monitor o medio visual, textos y gráficos, así como de producir sonido. Su comienzo, hasta unos 40 años, las computadoras no poseían demasiado atractivo: de características enormes, llenas de dispositivos metálicos y cables que no ofrecían buena comunicación con el usuario. Fue con el paso del tiempo que su evolución les ha hecho cambiar de aspecto, tanto por dentro como por fuera. Los ordenadores redujeron su tamaño y se les han añadido determinados elementos que proporcionan un mejor intercambio de información con los usuarios. Gradualmente se ha conseguido un aspecto y funcionamiento más agradables. Las nuevas tecnologías han respaldado un aumento de la potencia de ejecución no sólo en el cálculo, sino en áreas como el proceso de diversos tipos de datos, la comunicación y transferencia de información entre computadores remotos, el trazado de gráficos, el razonamiento inteligente.

Te invito a la comunidad "PROGRAMME" - Click en el Gif - El post les mostrara juegos creados con HTML5 y JavaScript... 2 lenguajes de programación con los cuales se pueden crear juegos para nuestras Web... No pongo el código fuente de estos envíenme mp Si quieres que agregue un juego,recuerda que debe ser creado con JavaScript o HTML5... Y te nombro en el post... Si criticas,critica con argumentos y respetuosamente... Todas son aceptadas... Si te gusta la programación,sígueme,publico casi siempre post sobre programación/informática... Aquí están mis otros post de sobre programación Aprender a programar? Para que esta Youtube! Quieres programar y te es difícil? Es te es tu post! "3x1 - Te aseguro que aprendes a programar en Python!" "Te enseño todo sobre PHP"" "Crea tu propia pagina Web sin salir del post" "Te enseño todo sobre programacion" Mi primer Top Post :D Bunny Hunt Un juego de caza clásico con una interfaz fácil de jugar. Asegúrese de verificar la fuente de la página web para ver cómo se construye simplemente con el poder de XHTML, CSS y JavaScript. Travians Un juego de caracteres (como Sims) donde eres un aldeano. Es un juego multijugador y Ajaxed totalmente. Puede mover a tu personaje, comunicarse con otros usuarios y más. Digg Attack Este es sin duda un juego de la Web 2.0. Se trata de un shooter en JavaScript / Canvas 2D utilizando datos en tiempo real a través de la API de Digg para desovar enemigos. Todas las imágenes se representan con lienzo en tiempo real. Invaders from Mars Un juego clásico y ejecución bastante sorprendente. Solitario Un juego de solitario-como juegos de cartas como el Freecell, Yukon y más. Classic Solitaire juego en JavaScript. Toda la fuente puede ser visto y no hay dinámica del lado del servidor. Es totalmente un juego de JS, muy bien codificado. Juego de cartas Un juego de solitario-como juegos de cartas como el Freecell, Yukon y más. Imagen de fondo y cubierta se pueden seleccionar además el juego. Hay efectos de JavaScript muy suaves utilizados. PacMan El juego es puro JavaScript y XHTML. Hay un buen uso de sprites CSS Bomberman Te acuerdas del bomberman de el Segas? Este es uno renovado creado con JavaScript... Si quieres jugar de a 2 entra aqui DragaMinas Solo el clasico Buscaminas creado con JavaScript Protorpg Un motor de juego de rol escrito en Javascript que tiene elementos para ser recogidos, monstruos y mucho más. VoxImperium Un juego multijugador de estrategia Ajaxed basado en la conquista, la diplomacia y el control territorial. Real World Racer Coches de carreras en Google Maps en cualquier destino que desee. DHTML Lemmings Este es probablemente uno de los juegos más famosos de todos los tiempos. Es sólo similar a la original. Acorazado Aplicación hermosa de este juego clásico. Ship se colocan con gotas Drag’n, hay una actividad Ajax en el fondo y se puede jugar multijugador también. DHTML Arkanoid Arkanoid original casi totalmente adaptada a JS. Usted se sorprenderá al ver los efectos de la barra, las primas y más. Brickslayer El famoso juego pero en JavaScript y XHTML (como el arkanoid más arriba, pero más simple). Sudoku A medida que el juego está totalmente relacionado con las matemáticas, hay equatitons graves en el fondo. Puede insertar los números haciendo clic en los campos vacíos y la activación de la entrada. SuperMarioBros Super Mario en 14kb de JavaScript. MarioKart Una experimental Mario Kart-como juego que utiliza el elemento Canvas. Le permite definir la calidad, el modo de interpretación para probar el rendimiento. Video Poker Un verdadero juego de póquer de vídeo con todas las posibilidades.Simplemente increíble. BeSlimied Una versión de JavaScript del popular Bejeweled.Los objetos pueden ser arrastrados / caído y tiene buenas animaciones. Tetris 3D Increible tetris en 3D creado con HTML5. Shooter Juego de disparo en primera persona donde te encuentras en un laberinto... Creado con HTML5 Asteroids Evita los asteroides destruyendolos! Juego creado con HTML5 Berts Breakdown Increíble juego de aventura creado con JavaScript y HTML5 Chain Reaction Crea una reacción en cadena! Entre mas reacciones se hagan,mayor tu puntaje,claramente,creado con HTML5 Pacman No podía faltar el clásico juego de Pacman para la versión HTML5. Slide puzzle Un juego de rompecabezas realizado con Javascript y HTML5. Sinuous Me encanta este juego! Es un vicio... Esquiva las pelotas rojas y dura el mayor tiempo posible! Creado con HTML5 y JavaScript Agent8Ball Juego de billar realizado con HTML5 y jQuery. Galatic Plunder Otro juego de aventura desarrollado con puro código Javascript, HTML5 y elementos de audio.

Los animales son increíbles en muchos sentidos. A veces nos quedamos atrapados en su belleza y a menudo nos olvidamos de que son capaces de cuidar, proteger, amar, y a veces hacer lo impensable. Estos 12 animales hicieron exactamente eso. Sus instintos naturales les hicieron salvar vidas de las formas más increíbles. En particular a mi me gusta la última historia. 1. Kabang salvó a la niña de su dueño y a su sobrina empujándolas fuera del camino por donde venía un coche a toda velocidad. Kabang sufrió lesiones graves pero gracias a varias donaciones le pudieron practicar cirugía reparadora. Ahora es un perro feliz y saludable. 2. Este perro de 12 años que se llama Babu no paraba de pedirle a su dueña Tami (de 85 años) que lo llevara a pasear. Al salir a la calle el perro insistió en que fueran en la dirección contraria a la habitual y subieran una colina. Minutos más tarde, Tami se dio la vuelta para ver desde las alturas como el devastador tsunami de 2011 arrasaba su ciudad y su casa. 3. En un acto increíble, Toby saltó una y otra vez sobre el pecho de Debbie Parkhurst que se estaba ahogando porque se había tragado el corazón de una manzana. Ella cuenta que después de conseguir escupir la manzana su perro le empezó a lamer la cara. 4. Suena increíble pero las llamas son unos de los mejores animales para hacer terapia. En esta foto, una paciente con problemas mentales abraza la llama Pisco. 5. Este Pitbull se llama Lefty y le salvó la vida a su dueño cuando 4 ladrones armados irrumpieron en su casa. Por lo que se ve el perro se interpuso entre una bala y su dueño para acabar herido de gravedad. Le tuvieron que amputar una pierna pero ahora ya vuelve a estar feliz. 6. Robert Biggs estaba de excursión en California cuando un puma le atacó y le mordió en el brazo. Fue entonces cuando unos osos acudieron en su ayuda y lucharon contra el puma para salvarle la vida. 7. Killian siempre siempre había sido un perro muy leal pero cuando vino una nueva niñera a casa empezó a actuar de formas muy extrañas. Para ver lo que pasaba, los padres decidieron poner cámaras ocultas y descubrieron que la niñera abusaba de su bebé de 7 meses. 8. Yang Yun estaba en una competición para ver quien podía contener la respiración durante más tiempo. Y cuando ella ya estaba al límite y quiso volver a la superficie, sus piernas no le respondieron. Fue entonces cuando una ballena beluga agarró su pierna y se la llevó a la superficie en un increíble acto de bondad. 9. Esta es increíble. Jo Ann Altsman estaba teniendo un ataque al corazón y estaba sola en casa con su cerdito Lulu. Entonces el cerdito salió fuera de la casa y se quedó tumbado en medio de la carretera con la intención de hacer parar a los coches. Si no paraban, el cerdito volvía a la casa para ver como estaba su dueña. Al final, una moto paró y Lulu llevó a la persona hacia la casa para que llamara una ambulancia. El plan del cerdito salió bien y salvó la vida de Jo Ann 10. Wendy Humphrey tenía un tumor maligno que hubiera hecho metástasis si no se hubiera tratado. Y la forma con que su gatito la avisó te dejará boquiabierto. Su gatito de 10 meses no paraba de saltarle sobre el pecho y actuaba de forma extrañamente sospechosa hasta que un día Wendy decidió ir al médico. Y ahí le descubrieron el tumor con antelación suficiente para salvarle la vida. 11. Nadie debe olvidar a los perros que colaboran con distintas terapias psiquiátricas. Son criaturas verdaderamente especiales y han ayudado a miles de seres humanos. En la foto puedes ver a dos perros que ayudan a dos niños que estuvieron en la matanza de la escuela de Newton en que un joven disparó y mató a varios de sus compañeros. 12. En 2012, una joven fue secuestrada y golpeada por 7 hombres que querían obligarla a contraer matrimonio. Como ella no quiso la dejaron en el bosque para que se muriera. Una semana más tarde, las autoridades la encontraron rodeada por tres leones. Y cuando los seres humanos se acercaron, los leones se alejaron, sabiendo que la niña estaba en buenas manos. Si después de ver esto no sientes mucho cariño por los animales es que tienes el corazón como una piedra! Estos son ejemplos de lo que miles y miles de animales hacen cada día por las personas.

Cierro los comentarios... Hay cada pelotudo que comenta para hacerse el gracioso y no sabe lo que es tener esta enfermedad... Por los demás,disculpen,si me quieren decir algo,pueden decírmelo por mensaje privado ¿Que es? La discinesia ciliar primaria (DCP) o síndrome de Kartagener es un trastorno congénito que afecta a la estructura de cilios y flagelos. Este defecto provoca alteraciones en su barrido (ausencia, anormalidad o descoordinación de los cilios en conjunto). En el 50% de los casos se asocia a un situs inversus (distribución de los órganos del cuerpo en imagen espejo). Es una enfermedad genética, autosómica recesiva, de baja frecuencia en general, con una prevalencia de aproximadamente 1 de cada 16.000 nacidos vivos. Sin rodeos,y hablándoles en Español,no tengo los "pelitos" en los pulmones que "barren" la "basura" ,entonces se me genera moco... Pero,parece una pavada no? Moco no mas... Pero es a lo que esto conlleva... Sintomas Son los mismos síntomas de la fibrosis quistica,uno mas,uno menos... Primero pensaron que tenia esta enfermedad,pero me hicieron el estudio del sudor... En pleno enero,me metieron medias,zapatillas,pantalón grueso,remera larga,campera,buzo,bufanda y gorrito... Y me metieron a un pelotero... Para descubrir si tenia esta enfermedad,debían hacerme este estudio,pero por suerte,no fue esta enfermedad y fueron descartando... Si no,ya estaría muerto El tratamiento Mientras antes es confirmado el diagnóstico, el pronóstico para los pacientes es mejor, así el paciente empieza un tratamiento de por vida, que comienza con la inmunización contra enfermedades respiratorias y un plan periódico de control de infecciones, para evitar el uso de antibióticos por el mayor tiempo posible. A la vez, se debe realizar kinesioterapia (fisioterapia respiratoria) diaria que puede ser efectiva para el drenaje de las vías respiratorias. Usualmente se recomienda el uso de una máscara con presión positiva espiratoria. Les cuento mi tratamiento... Todos los putos días y lo digo,ya que estoy cansado de ir... Tengo que ir al kinesiologo para que me haga masajes en la espalda "MASAJES"... Para que lo entiendan,me "pega" en la espalda de una manera especial,para que el moco se despegue del pulmón y salga mas fácil... Voy desde que tengo 2 años... Es mi segunda mama... De chico,pase por muchos remedios... Siempre ir al hospital de niños a Buenos Aires... Hasta que el doctor me recomendó a otro,mas cerca de mi pueblo,uno de Lobos,el doctor Binay... Tomo Amoxidal 500 o el duo... Cuando tomo el duo,me agarra diarrea Me hago todos los días,3 veces al día,lo que yo llamo Paff... Es el ventolin... Que tiene corticoide y hace mal al corazón... En pequeñas docis no pasa nada,pero tomarlo toda la vida... Y sabiendo que mi familia son de tener problemas cardíacos... Y algo fundamental para mi enfermedad,el deporte... Para aumentar la capacidad respiratoria,que es menor a los demás,pero que ahora,la tengo muy bien,mejor que algunos que no tienen mi enfermedad... Mucho salir a correr,jugar al paddle,fútbol (los medicos no me lo recomendaban)y lo fundamental,la natación ¿Por que de 16.000 personas,me toco a mi? Bueno,esta enfermedad,la tengo ya que nací con la boca abierta y me trague el líquido amniótico . Esto hizo que me agarrara neumonia apenas nací... Y estuve 12 días en incubadora... Pero si vamos atrás... Por que me paso esto? Mi hermano,cuando nació,se le atoro la cabeza en la con** de mi mama,así que le tuvieron que hacer cesárea... Si,era un bebe diamond de 4,700kg... Por esta razón me hicieron cesárea a mi también y me trague el liquido,no es culpa de el,para nada,pero es gracioso... Pero si la enfermedad es hereditaria,por que se me provoco por esto? Hasta ahora,se cree que es por esto... Ya que no saben la enfermedad de que generación viene ¿A que conllevo esto? A partir de esta enfermedad,se me genera moco,esto hace que si este lo tengo amarillo,se me puede infectar,se me bajan las defensas y me puede agarrar fiebre... Yo no puedo fumar,seria suicidarme,y si me agarra neumonía otra vez,no la cuento... Esto hizo que en invierno/otoño,no podía salir de mi casa mucho,a las noches,a traspirar,a correr,a jugar,a divertirme,a ser un chico... Eso lo sufrí mucho,era horrible... Era ir a la escuela,volver,ir al kinesiologo,hacer las tareas,hacerme los remedios,que ademas,en un tiempo me hacia nebulización pero me hacia peor... Irme a dormir y repetir... Un día mas aburrido que el otro... Hubo un tiempo que a veces,me despertaba a las 5 de la mañana con un dolor de pecho terrible,sin poder respirar... Y yo me desesperaba,y era peor! No es asma lo que tengo,NADA QUE VER al ASMA y desde esas 3,4 veces diarias que me paso,nunca mas tuve eso... Es una sensación horrible... Por el moco,que se me va al oído,tengo %23 menos de audición en el derecho... Y cuando vas a sonarte la nariz,vas tranquilo,sin ningún dolor,y cuando te sonas,aaaaa!!! Parece que se me revienta el oído,como una puntada en el medio del oído terrible,que es el mismo moco,pocas veces es muy fuerte,pero cuando es muy fuerte,es horrible! Lo peor,es que si te sonas la nariz,te duele,y si no te la sonas,se te queda el moco... Y en el medio de la frente,a veces,siento un dolor terrible de cabeza,sinosiiti (sinusite)... Mi enfermedad,comúnmente,lleva a estar internado 3 veces por semana,lo cual yo estuve una sola vez... Seré especial,pero hasta mi doctor se sorprende... Salir y en los boliches,tener que cuidarse,alejarse de los que fuman todo el tiempo... Es... Es... Es!! Y me olvidaba... También puede ser que sea estéril,es muy común teniendo esta enfermedad,ya me tendré que hacer un estudio de esto ¿Tiene cura? No existe cura alguna actualmente... La única opción,es el trasplante... Pero lo tenían que hacer de chico,ahora tengo los 2 pulmones infectados,pero si se complica algún día,es la única que queda... Es una enfermedad,que tendré hasta el día que me muera,y hasta el día que me muera,me tengo que hacer el tratamiento el cual va cambiando según mi edad Discriminación Comúnmente,a los que tienen mi problema,de chico,lo discriminan... Ya que en si,tiene moco,escupe mocos,y parece algo desagradable... Por suerte,mis amigos,nunca lo hicieron,es mas,me apoyaron y apoyan... Es algo que por suerte,no tuve que sufrir,pero otros sufren,y debe ser muy feo... Que se te caguen de risa todos por tener esta enfermedad,y mas de chico,que duele mas Sacando algo bueno... Al estar mucho en casa,me interesaron las computadoras,armarlas,desarmarlas,formatearlas,hasta que descubrí la programación y hasta el día de hoy estudio eso...

¿Ya pasaron mis épocas doradas? ¿Alguna vez voy a poder terminar con la tortura de la facultad? Me parece que este rollito no estaba acá... ¿Estoy empezando a parecerme a mi mamá? ¿De verdad el alcohol hace taaaan mal? ¿Mi media naranja existe o murió? ¿¿DÓNDE ESTÁS?? ¿Después de los 20 puedo perder mi virginidad o tengo que morirme resignado? ¿Por qué en mi Facebook veo cada vez más gente embarazada? ¿Soy la única persona que se pasa los fines de semana viendo series y comiendo? ¿Soy yo o a todo el mundo le esta yendo mejor que a mi? ¿Qué pasa si me cambio por quinta vez de carrera? ¿Tan difícil es tener un buen sueldo? ¿Porque nadie me paga por dormir? ¿Estoy perdiendo tiempo? ¿Alguna vez me voy a independizar? ¿Cómo puede ser que en diez años tenga 30?