/*¨ª"()¡!¿??+¨×`´Ç;:%·'=.,ç´`÷¨-1\|}][{,.=<>¨+ */

clase v derivada_de Form
publicos
el objeto lapiz es un Pen(Color.Blue, 3)
los objetos x, y son cantidades
mensajes
v{
 copie ":]" en v.Text
 v.Manejador(v.Paint, Rivera)
 v.Manejador(v.KeyDown, Tecla)
 }

Rivera(deme EnCualOcurrio, deme Paquete es un PaintEventArgs)
 {
 Paquete.Graphics.DrawLine(doy lapiz, doy 80, doy 30, doy x, doy y)
 Paquete.Graphics.DrawRectangle(doy lapiz, doy x, doy y, doy 80, doy 30)
 }

Tecla(deme EnCualOcurrio, deme Paquete es un KeyEventArgs)
 {
 es Paquete.KeyCode = Keys.Right ?
	si: copie x + 1 en x
	no  es Paquete.KeyCode = Keys.Left ?
		si: copie x - 1 en x
		no  es Paquete.KeyCode = Keys.Up ?
			si: copie y - 1 en y
			no  es Paquete.KeyCode = Keys.Down ?
				si: copie y + 1 en y
v.Refresh
 }