WINLOGO 2

para rectangulorelleno
PonCL 1
Repite 2 [av 150 gd 90 av 50 gd 90]
GD 10
Av 10
Rellena
Re 10
GI 10
Fin
para circuloverde
PonCL 3
círculo
GD 90
Av 10
Rellena
Re 10
GI 90
Fin
para circuloambar
PonCL 45
círculo
GD 90
Av 10
Rellena
Re 10
GI 90
Fin
para circulorojo
PonCL 10
círculo
GD 90
Av 10
Rellena
Re 10
GI 90
Fin
para semáforo
rectangulorelleno
PonCL 1
Av 30
GD 90
Av 10
GI 90
circuloverde
SL
Av 50
BL
circuloambar
SL
Av 50
BL
circulorojo
Fin