Un esempio di programma Logo per disegnare un goniometro di 90°

Con il seguente programma in linguaggio logo, si disegna un quadrante di 90 gradi con scala come illustrato nella figura:

l'immagine che risulta (formato jpg)

Il parametro raggio decide le dimensioni complessive del quadrante. Modificando opportunamente i valori delle variabili tacca, tacca5 e tacca10, che qui sono impostati rispettivamente a 30, 20 e 10 pixel, si modifica a piacere la lunghezza delle tacche principali e secondarie. Modificando i valori di setpensize si ottiene lo spessore desiderato.

to goniometro :raggio

setpensize [2 2]

make "tacca 10
make "tacca5 20
make "tacca10 30

pd rt 180 arc 90 :raggio lt 90 fd :raggio bk :raggio

repeat 9 [pu fd :raggio - :tacca10 pd fd :tacca10 pu bk :raggio repeat 10 [lt 1 pu fd :raggio - :tacca pd fd :tacca pu bk :raggio ] ]

pd fd :raggio bk :raggio rt 90 lt 5

repeat 9 [pu fd :raggio - :tacca5 pd fd :tacca5 pu bk :raggio lt 10]

end

Il sito del programma MSWLogo

home

altezza del Sole