proszę o zrobienie projektu w logo komeniuszu.proszę aby nie kopiować z neta takich jakie tam sa
Projekt domu (procedura):
oto Domek :a opu ustalkolormalowania [255 255 167] powtórz 5 [np :a pw 90] pod pw 45 np 5 zamaluj np -5 pw -45 opu pw -45 np :a / 2 * sqrt ( 2 ) pw 90 np :a / 2 * sqrt ( 2 ) np - :a / 2 ustalkolormalowania [239 16 58] pod pw 45 np 5 zamaluj np -5 pw -45 opu pw -135 np :a / 5 pw 90 np :a / 6 pw 90 np :a / 2.75 np - ( :a / 2.75 ) ustalkolormalowania [195 125 0] pod pw 45 np 5 zamaluj np -5 pw -45 opu pw -90 np - ( :a / 6 ) pw -90 np - ( :a / 5 ) pw 135 np :a / 2 pw 45 np :a pw 90 np :a / 5 pw 90 np :a / 2 pw -90 np :a / 5 pw -90 np :a / 2 ustalkolormalowania [187 107 0] pod pw 45 np -5 zamaluj np 5 pw -45 opu pw 90 np :a / 5 pw 90 ustalkolormalowania [0 224 255] pod np :a / 5 opu powtórz 4 [np :a / 4 pw -90] pod pw -45 np 5 zamaluj np -5 pw 45 opu pod np :a / 5 * 2 opu powtórz 4 [np :a / 4 pw -90] pod pw -45 np 5 zamaluj np -5 pw 45 opu pod pw 90 pod np :a / 5 opu powtórz 4 [np :a / 4 pw -90] pod pw -45 np 5 zamaluj np -5 pw 45 opujuż
Albo zegar:
oto zegar :m :s przyp "sek :s przyp "min :m powtórz 3600 [sekundnik minutnik]już
oto tarcza ugp 3 sż pod np 200 opu np 10 pod np 10 pw 90 opu powtórz 360 [np 4 pw 1] pod pw 90 np 220 pw 180już
oto sekundnik ugp 1 skieruj 0 pw :sek * 6 sż opu np 200 pw 180 czekaj 100 ugp 3 ścier np 200 przyp "sek :sek + 1 jeśli :sek >= 60 [przyp "sek 0]już
oto minutnik ugp 2 skieruj 0 pw :min * 6 sż opu np 180 pw 180 np 180 jeśli :sek <= 0 [przyp "min :min + 1] jeśli :min >= 60 [przyp "min 0]już
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
Projekt domu (procedura):
oto Domek :a
opu
ustalkolormalowania [255 255 167]
powtórz 5 [np :a pw 90]
pod pw 45 np 5 zamaluj np -5 pw -45 opu
pw -45
np :a / 2 * sqrt ( 2 )
pw 90
np :a / 2 * sqrt ( 2 )
np - :a / 2
ustalkolormalowania [239 16 58]
pod pw 45 np 5 zamaluj np -5 pw -45 opu
pw -135
np :a / 5
pw 90
np :a / 6
pw 90
np :a / 2.75
np - ( :a / 2.75 )
ustalkolormalowania [195 125 0]
pod pw 45 np 5 zamaluj np -5 pw -45 opu
pw -90
np - ( :a / 6 )
pw -90
np - ( :a / 5 )
pw 135
np :a / 2
pw 45
np :a
pw 90
np :a / 5
pw 90
np :a / 2
pw -90
np :a / 5
pw -90
np :a / 2
ustalkolormalowania [187 107 0]
pod pw 45 np -5 zamaluj np 5 pw -45 opu
pw 90
np :a / 5
pw 90
ustalkolormalowania [0 224 255]
pod np :a / 5 opu powtórz 4 [np :a / 4 pw -90]
pod pw -45 np 5 zamaluj np -5 pw 45 opu
pod np :a / 5 * 2 opu powtórz 4 [np :a / 4 pw -90]
pod pw -45 np 5 zamaluj np -5 pw 45 opu
pod pw 90 pod np :a / 5 opu powtórz 4 [np :a / 4 pw -90]
pod pw -45 np 5 zamaluj np -5 pw 45 opu
już
Albo zegar:
oto zegar :m :s
przyp "sek :s
przyp "min :m
powtórz 3600 [sekundnik minutnik]
już
oto tarcza
ugp 3 sż pod np 200 opu np 10 pod np 10 pw 90 opu powtórz 360 [np 4 pw 1] pod pw 90 np 220 pw 180
już
oto sekundnik
ugp 1
skieruj 0 pw :sek * 6
sż opu np 200 pw 180
czekaj 100
ugp 3
ścier np 200
przyp "sek :sek + 1
jeśli :sek >= 60 [przyp "sek 0]
już
oto minutnik
ugp 2
skieruj 0
pw :min * 6
sż opu np 180 pw 180
np 180
jeśli :sek <= 0 [przyp "min :min + 1]
jeśli :min >= 60 [przyp "min 0]
już