Arrancar el KPL, clicando dos veces sobre el icono del
escritorio .
Escribir nuestro comentario
inicial:
/*Programa: Cuadrado
Autores: Lidia y Pablo
Descripción: Este
programa dibuja un
cuadrado*/
Poner título al programa:
Borrar MyNewProgram y poner
Cuadrado en su lugar.
En el Método Principal,
Method Main(), escribimos:
Color(green)
y así definimos el color con el que vamos a dibujar el
cuadrado, después tecleamos:
PenWidth(5)
con lo que el ancho de la pluma será de 5 pixeles.
Por último, escribimos el
código:
DrawLine(100,100,100,200)
Drawline(100,200,200,200)
DrawLine(200,200,200,100)
DrawLine(200,100,100,100)
DrawLine( As
Decimal,
As
Decimal,
As
Decimal,
As
Decimal), siendo
las
coordenadas del punto
inicial del segmento y
las
coordenadas del punto final,
dibuja una línea en la
pantalla. Así por ejemplo,
DrawLine(100,100,100,200)
dibuja una línea entre los
puntos (100,100)
y (100,200).
Guardaremos el archivo con
el nombre Cuadrado,
seleccionando la carpeta
donde quiera ir almacenando
todas las actividades. Por
defecto la carpeta elegida
es My Programs Files que
está en Mis Documentos.
En el caso de existir algún error en el CÓDIGO FUENTE
de nuestro programa, KPL nos
informa con un aviso de
ERROR y el cursor se sitúa
sobre la línea y secuencia
errónea. Lo rectificaremos.
Al ejecutar el programa
(F5), obtendremos:
Puedes probar y cambiar las
coordenadas de los extremos
de los segmentos.
