Primo tentativo

Saluti a tutti
Ho provato a "smanettare" un po' con il linguaggio Logo e ho fatto un po' di tentativi per vedere anche come funzionano i colori
Questo è quello che ho realizzato
CLEARSCREEN ;pulisce la pagina
HOME
HEADING 0 ;posiziona a tartaruga
PENSTYLE “SOLID” ;definisce lo stile della penna
PENSIZE 2 ;definisce lo spessore del tratto
PASSO = 150 ;variabile per calcolare la lunghezza del lato, nel ciclo viene decrementata di 10
COL = 255 ;variabile per definire il primo valore del colore
REPEAT 16 [
PENCOLOR [COL, 0, 0]
FORWARD PASSO
RIGHT 90
FORWARD PASSO
RIGHT 90
PASSO = PASSO – 10
COL = COL - 30
]
HIDETURTLE ;nascondo la tartaruga
PENUP ;alzo la penna
POSITION [90, 50] ;nuova posizione
PENDOWN ;abbasso la penna
HEADING 0 ;oriento la tartaruga
SHOWTURTLE ;mostro la tartaruga

Interessante questa idea di variare il colore all'interno del REPEAT, ovvero, di variare l'intensità di rosso. A questo punto ci si potrebbe allargare provando a rendere la spirale veramente policroma...

CLEARSCREEN ;pulisce la pagina
HOME
HEADING 0 ;posiziona a tartaruga
PENSTYLE “SOLID” ;definisce lo stile della penna
PENSIZE 2 ;definisce lo spessore del tratto
PASSO = 150 ;variabile per calcolare la lunghezza del lato, nel ciclo viene decrementata di 10
COL = 255 ;variabile per definire il primo valore del colore
COLA = 0
COLB = 0
REPEAT 16 [
PENCOLOR [COL, COLA, COLB]
FORWARD PASSO
RIGHT 90
FORWARD PASSO
RIGHT 90
PASSO = PASSO – 10
COL = COL – 30
COLA = COLA + 30
COLB = COLB + 40
]
HIDETURTLE ;nascondo la tartaruga
PENUP ;alzo la penna
POSITION [90, 50] ;nuova posizione
PENDOWN ;abbasso la penna
HEADING 0 ;oriento la tartaruga
SHOWTURTLE ;mostro la tartaruga

Ho aggiunto due variabili per il colore
e incrementato tramite costante, questo l'effetto ....

Perfetto!