logomanic

//kwadrat
oto kwadrat :a
powtórz 4
[
np :a
pw 90
]
już

//pr
oto pr :ilość
cs
niech "a 10
niech "b 10

powtórz :ilość
[
kwadrat :a
niech "a :a+:b
]
już

//trr
oto trr
powtórz [
pw 120
np 150]
już

//prs
oto prs :ilość
cs
niech "a 10
niech "b 20

powtórz :ilość
[
kwadrat :a
lw 135
pod
np 10*pkw 2
pw 135
opu
niech "a :a+:b
]
już