[ Foro de BASIC ]

parámetros

hola necesito ayuda con parámetros:
Escribí un program que use la nueva versión de DibujarLinea3 (no tenés que crearla, sólo usarla) y dibuje un cuadrado multicolor como este:

GBB/1.0 size 4 4 cell 0 1 Azul 1 cell 0 2 Azul 1 cell 0 3 Azul 1 cell 1 3 Negro 1 cell 2 3 Negro 1 cell 3 3 Negro 1 cell 3 2 Rojo 1 cell 3 1 Rojo 1 cell 3 0 Rojo 1 cell 2 0 Verde 1 cell 1 0 Verde 1 cell 0 0 Verde 1 head 0 0

piden eso, y yo hice esto:
procedure DibujarLinea3(color, direccion) {
 Poner(color)
 Mover(direccion)
 Poner(color)
 Mover(direccion)
 Poner(color)
}
program DibujarLinea3(Verde, Este) {
 Poner(Verde)
 Mover(Este)
 
 }
program DibujarLinea3(Rojo, Norte) {
 Poner(Rojo)
 Mover(Norte)

 }
program DibujarLinea3(Negro, Oeste) {
 Poner(Negro)
 Mover(Oeste)
 
 }
program DibujarLinea3(Azul, Sur) {
 Poner(Azul)
 Mover(Sur)
 }

Y obviamente me da error, la cosa es que no se como corregir o que esta mal, aagradeceria cualquier ayuda.

¿Seguro que eso es lenguaje Basic?