winlogo

PRIMITIVAS DE WINLOGO
AV 10, AVANÇA
RE 10, RECULA
GD 90, GIRA.DRETA 90
GIRA.ESQUERRA 90
ORIENTA’T 270
GOMA
NO.LLAPIS
LLAPIS
FES.COLOR num ; 1negro,....,15claro,16blanco
OMPLE
NETEJA “GRÀFICS; “TEXT; “TREBALL, etc
RETOLA “palabra // RETOLA [TEXTO]
RETOLA :variable1  escribe el contenido de la variable1
ES “palabra [texto] :variable ; ESCRIU
CARÀCTER.LLEGIT; Lee un carácter delteclado.
PARAULA.LLEGIDA; lee una palabra del teclado// LLISTA.LLEGIDA
TECLEIG; devuelve CERT/ FALS según si se pulsa una tecla
+ - * / > < = // NO A=B (equivalente a AB)
POTENCIA 2 7  2 elevado a 7// QUOCIENT N1 N2 // RESIDU N1 N2// PART.ENTERA N1 // BINARI
ATZAR 100  Nº al azar entre 0 y 100
REPETEIX 4[AV 50 GD 90]
MENTRE condición [órdenes]
ESPERA N  N son centésimas
POSA.A “FRUITA“PERA ; POSA.A “FRUITA [PERA POMA RAÏM]
POSA.A “N 5 ; POSA.A “N ATZAR 50 ; POSA.A “N :N+1
“variable1 Nombre de la variable1
:variable1 Contenido de la variable1
FES.LOCAL  define una variable como local
SI condición [órdenes1 si cert][órdenes2 si fals]
VERA.ALGUNA condición1 condición2 ;  OR lógico // (VERA.ALGUNA cond1 cond2 cond3)
VERES.TOTES cond1 cond2  AND lógico // (VERES.TOTES cond1cond2 cond3)
PROCEDIMENT longitud_circunferencia :radio
POSA.A “L :radio*2*3.1416
GD 90 RETOLA :L
FI
ACABA ; detiene un procediment // RETORNA obj1 //
ADÉU
ESC  detiene la ejecución de un procediment
RECUPERA “archivo  si no está en la carpeta de WLOGO , escribir ruta completa
GUARDA “archivo [proc1 proc2 proc3 ….]
GUARDA “archivo [Lproc]  guarda todos los procediments de la ventana deedición
Al recuperar un archivo desde el menú principal se cargan los “procediments” que tenga pero no se validan,
hay que hacerlo pulsando INTRO después de cada FI . Si se recupera un archivo con la orden RECUPERA,
no se cargan los “procediments” pero están activos .

ESCRIU.PORT // LLEGEIX.PORT
RECUPERA “control  activa las ordenes para controlar el puerto
Activa.sortida :nDesactiva.sortida :n
Dreta.motor :n
Esquerra.motor :n
Atura.motor :n
ENTRADA? :N
TEST.ENTRADES

EJERCICIOS DE WINLOGO
0.- Probar las ordenes inmediatas.
1.- Dibujar un cuadrado. cuadrado

2.- Dibujar un pentágono (angulo 72º) . pentagono
ang = 360º / :nlados
3.- Dibujar un circulo (polígono de 36 lados y angulo 10º). circulo
4.- Dibujar una fila de cuadros blancos y negros. Fila, cuadro,cuadron, colocac

5.- Dibujar un ajedrez. Ajedrez, fila, filan, cuadro, cuadron, colocac, colocaf

6.- Procediment con parámetros. Dibujar un cuadrado de lado variable. Cuadro :lado
7.- Dibujar un polígono de N lados. Poligono :Nlados
8.- Dibujar un polígono de N lados y de lado variable. Poligono :Nlados :lado
9.- Dibujar usando variables que se incrementan. Círculos, espiral, ojo, círculosna)
b)
c)
d)

10.- Recursividad y condicional . estrella

11.- Dibujar un nombre.

12.- Programa que dibuja gráficos con las letras A, S, W, Z .
13.- JUEGO “adivina un Nº al azar“y cuenta los intentos.
14.- JUEGO “La carta más alta gana”.
15.- MENÚ para elegir dibujar un cuadrado o un círculo.

EJERCICIOS DE REFUERZO.
1.- Halla la media de las notas de tecnología.
2.- Escribe los Nprimeros números naturales. Los N pares, N impares, N primos.
3.- De una serie de 10 Nºs introducidos por teclado, dar los que son pares.
4.- Hacer una quiniela al azar.
5.- Hacer ecuaciones de 2º grado introduciendo coeficientes A, B, C.
6.- Dibujar circo romano.

7.- JUEGO de los camellos . Varias tortugas se mueven según velocidad al azar.
8.- Sopa de letras.
9.- LINGO . Meter 100palabras y elegir una al azar. Probar palabras y el programa dice las letras que
están en la elegida y si es correcta la posición que ocupa.

Per a que et funcioni el port LPT1 s’ha de fer el següent:
Cal instal·lar uns drivers que t'adjunto i problema resolt!.(Els he descarregat de: www.beyondlogic.org)
A la carpeta: windows/system32/drivers has de copiar el fitxer:
- porttalk.sys
a la...