Scribd
Cargar
4 vistas3 páginas

Procedimientos de Dibujo y Coloración

El documento presenta una serie de procedimientos para dibujar y colocar colores en un entorno gráfico. Incluye funciones para dibujar formas, poner celdas de colores y realizar patrones específicos. También se menciona un procedimiento para retirar un color específico si está presente.

Cargado por

Gang
Derechos de autor
© All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como TXT, PDF, TXT o lee en línea desde Scribd
4 vistas3 páginas

Procedimientos de Dibujo y Coloración

El documento presenta una serie de procedimientos para dibujar y colocar colores en un entorno gráfico. Incluye funciones para dibujar formas, poner celdas de colores y realizar patrones específicos. También se menciona un procedimiento para retirar un color específico si está presente.

Cargado por

Gang
Derechos de autor
© All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como TXT, PDF, TXT o lee en línea desde Scribd

procedure

program
return
if
function

procedure DibujarDosPuntas() {
Poner(Negro)
Mover(Norte)
Poner(Negro)
Mover(Sur)
Mover(Este)
Poner(Negro)
Mover (Norte)
Mover (Norte)
Mover (Norte)
Mover (Este)
Poner (Negro)
Mover (Sur)
Poner (Negro)
Mover (Este)
Poner (Negro)

}
program {
DibujarDosPuntas()

procedure PonerCeldaColoridas() {
Poner (Rojo)
Poner (Azul)
Poner (Negro)
Poner (Verde)

}
program {
PonerCeldaColoridas()
Mover (Norte)
PonerCeldaColoridas()
Mover (Norte)
PonerCeldaColoridas()
Mover (Norte)
PonerCeldaColoridas()
Mover (Este)
PonerCeldaColoridas()
Mover (Sur)
PonerCeldaColoridas()
Mover (Sur)
PonerCeldaColoridas()
Mover (Sur)
PonerCeldaColoridas()
Mover (Este)
PonerCeldaColoridas()
Mover (Norte)
PonerCeldaColoridas()
Mover (Norte)
PonerCeldaColoridas()
Mover (Norte)
PonerCeldaColoridas()
Mover (Este)
PonerCeldaColoridas()
Mover (Sur)
PonerCeldaColoridas()
Mover (Sur)
PonerCeldaColoridas()
Mover (Sur)
PonerCeldaColoridas()
IrAlBorde(Oeste)

procedure DiagonalPesada4Azul(){

repeat(4){
repeat(21){
Poner (Azul)

}
Mover (Norte)
Mover (Este)

procedure DiaDeLaMemoria(){
repeat(24){
Poner(Azul)
}
Mover (Este)
repeat(3){
Poner (Verde)

}
Mover (Este)
repeat(1976){
Poner (Negro)
}
}

procedure Ponerla(){
PonerN(1,Verde)
PonerN(5,Negro)
PonerN(9,Rojo)
}
procedure GuardaDe5(){
repeat(4){
Ponerla()
Mover (Este)
}
Ponerla()
}

procedure SacarAzulConMiedo() {
if (hayBolitas(Azul)) {
Sacar(Azul)

También podría gustarte