potrzebuje na dziś szybko procedury na Kalejdoskop i latawiec tylko z parametrami!!!!!!!!!!!!!!!!!!!!!!!! w LOGO
latawiec:oto kwadrat powtórz 4 [np 200 pw 90] pw 45 np 200 * 1,41 ws 200 * 1,41 lw 45 pw 90 np 200 lw 135 np 200 * 1,41 / 2 pw 45 np 100 ws 50 powt�rz 4 [np 50 pw 90] pw 45 pod np 5 zamaluj ws 5 lw 45 opu ws 50 lw 90 np 100 ws 50 lw 90 powt�rz 4 [np 50 pw 90] pw 45 pod np 5 zamaluj ws 5 lw 45 opu pw 90 np 50 lw 90 np 100 lw 90 np 200 ju? oto kwadrat2 powt�rz 4 [np 100 pw 90] pw 45 np 100 * 1,41 ws 100 * 1,41 lw 45 pw 90 np 100 lw 135 np 50 * 1,41 pw 45 np 50 ws 25 powt�rz 4 [np 25 pw 90] pw 45 pod np 5 zamaluj ws 5 lw 45 opu ws 25 lw 90 np 50 ws 25 lw 90 powt�rz 4 [np 25 pw 90] pw 45 pod np 5 zamaluj ws 5 lw 45 opu pw 90 np 25 lw 90 np 50 lw 90 np 100 ju? oto kwadrat3 powt�rz 4 [np 50 pw 90] pw 45 np 50 * 1,41 ws 50 * 1,41 lw 45 pw 90 np 50 lw 135 np 25 * 1,41 pw 45 np 25 ws 25 / 2 powt�rz 4 [np 25 / 2 pw 90] pw 45 pod np 5 zamaluj ws 5 lw 45 opu ws 25 / 2 lw 90 np 25 ws 25 / 2 lw 90 powt�rz 4 [np 25 / 2 pw 90] pw 45 pod np 5 zamaluj ws 5 lw 45 opu pw 90 np 25 / 2 lw 90 np 25 lw 90 np 50 ju? oto latawiec kwadrat pw 90 np 100 pw 180 kwadrat2 pw 90 np 50 pw 180 kwadrat3 ju?
Kalejdoskop
oto kwadrat :a powt�rz 4 [np :a lw 90] lw 45 pod np 10 ukm losowa 15 zamaluj ws 10 opu pw 45 ju? oto tr�jk?t :a powt�rz 3 [np :a * 2 * 1.73 / 3 pw 120] pw 15 pod np 10 ukm losowa 15 zamaluj ws 10 opu lw 15 ju? oto linia :a np :a * 3.3 ws :a * 3.3 lw 60 tr�jk?t :a pw 60 np :a * 2 * 1.73 / 3 kwadrat :a np :a lw 60 tr�jk?t :a pw 60 np :a * 2 * 1.73 / 3 ju? oto kwadrat2 :a powt�rz 4 [linia :a pw 90] ju? oto kwadrat3 :n :a opu je?li :n = 0 [stop][] je?li :a = 1 [stop][] kwadrat2 :a pod pw 45 np :a / 1,61 * 1.41 lw 45 opu kwadrat3 :n - 1 :a / 1,61 ju?
bardzo dobra strona polecam http://logokomeniusz.edziu.net/index.php?dzial=procedury
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
latawiec:oto kwadrat
powtórz 4 [np 200 pw 90]
pw 45
np 200 * 1,41
ws 200 * 1,41
lw 45
pw 90
np 200
lw 135
np 200 * 1,41 / 2
pw 45
np 100
ws 50
powt�rz 4 [np 50 pw 90]
pw 45
pod
np 5
zamaluj
ws 5
lw 45
opu
ws 50
lw 90
np 100
ws 50
lw 90
powt�rz 4 [np 50 pw 90]
pw 45
pod
np 5
zamaluj
ws 5
lw 45
opu
pw 90
np 50
lw 90
np 100
lw 90
np 200
ju?
oto kwadrat2
powt�rz 4 [np 100 pw 90]
pw 45
np 100 * 1,41
ws 100 * 1,41
lw 45
pw 90
np 100
lw 135
np 50 * 1,41
pw 45
np 50
ws 25
powt�rz 4 [np 25 pw 90]
pw 45
pod
np 5
zamaluj
ws 5
lw 45
opu
ws 25
lw 90
np 50
ws 25
lw 90
powt�rz 4 [np 25 pw 90]
pw 45
pod
np 5
zamaluj
ws 5
lw 45
opu
pw 90
np 25
lw 90
np 50
lw 90
np 100
ju?
oto kwadrat3
powt�rz 4 [np 50 pw 90]
pw 45
np 50 * 1,41
ws 50 * 1,41
lw 45
pw 90
np 50
lw 135
np 25 * 1,41
pw 45
np 25
ws 25 / 2
powt�rz 4 [np 25 / 2 pw 90]
pw 45
pod
np 5
zamaluj
ws 5
lw 45
opu
ws 25 / 2
lw 90
np 25
ws 25 / 2
lw 90
powt�rz 4 [np 25 / 2 pw 90]
pw 45
pod
np 5
zamaluj
ws 5
lw 45
opu
pw 90
np 25 / 2
lw 90
np 25
lw 90
np 50
ju?
oto latawiec
kwadrat
pw 90
np 100
pw 180
kwadrat2
pw 90
np 50
pw 180
kwadrat3
ju?
Kalejdoskop
oto kwadrat :a
powt�rz 4 [np :a lw 90] lw 45 pod np 10 ukm losowa 15 zamaluj ws 10 opu pw 45
ju?
oto tr�jk?t :a
powt�rz 3 [np :a * 2 * 1.73 / 3 pw 120] pw 15 pod np 10 ukm losowa 15 zamaluj ws 10 opu lw 15
ju?
oto linia :a
np :a * 3.3 ws :a * 3.3
lw 60
tr�jk?t :a pw 60 np :a * 2 * 1.73 / 3 kwadrat :a np :a lw 60 tr�jk?t :a pw 60 np :a * 2 * 1.73 / 3
ju?
oto kwadrat2 :a
powt�rz 4 [linia :a pw 90]
ju?
oto kwadrat3 :n :a
opu
je?li :n = 0 [stop][]
je?li :a = 1 [stop][]
kwadrat2 :a pod pw 45 np :a / 1,61 * 1.41 lw 45 opu kwadrat3 :n - 1 :a / 1,61
ju?
bardzo dobra strona polecam http://logokomeniusz.edziu.net/index.php?dzial=procedury