|
Lõik
Protseduuri päis
sisaldab neli parameetrit:
X1 ja Y1 - lõigu alguspunkti koordinaadid
X2 ja Y2 - lõigu lõpupunkti koordinaadid
Protseduuri keha
mine x: X1 y: Y1
pliiats alla
liigu 1 sekundiga x: X2 y: Y2
pliiats üles
Korraldus liigu 1 sekundiga x: X2 y: Y2
teostab lõigu joonistamise sujuvaprotsessi. Kui seda asendada korraldusega
mine x: X2 y: Y2, siis lõik ilmub koheselt.
Toodud näites on antud koordinaatide väärtused:
X1=-100, Y1=-100, X2=100, Y2=100
Luua ristkülik, kasutades protseduuri Lõik
|
|
|
Ristkülik
(ilmub koheselt)
Protseduuri päis
sisaldab neli parameetrit:
X0 ja Y0 - joonistamise alguspunkti koordinaadid
laius - ristküliku laius
kõrgus - ristküliku kõrgus
Protseduuri keha
mine x: X0 y: Y0
pliiats alla
korda 2 korda
liigu laius punkti
pööra vastupäeva 90 kraadi
liigu kõrgus punkti
pööra vastupäeva 90 kraadi
korduse lõpp
pliiats üles
Toodud näites on antud argumentide väärtused:
X0=-100, Y0=-100, laius=200, kõrgus=150
|
|
|
Ristkülik
(ilmub sujuvalt)
Protseduuri päis - sama, mis eelmises protseduuris.
Protseduuri keha
mine x: X0 y: Y0
pliiats alla
liigu 0.1 sekundiga x: X0+laius y: Y0
liigu 0.1 sekundiga x: X0+laius y: Y0+kõrgus
liigu 0.1 sekundiga x: X0 y: Y0+kõrgus
liigu 0.1 sekundiga x: X0 y: Y0
pliiats üles
Antud argumendid:
X0=-100, Y0=-100, laius=200, kõrgus=150
|
|
|
Korrapärane kolmnurk
Protseduuri päis
sisaldab kolm parameetrit:
X0 ja Y0 - joonistamise alguspunkti koordinaadid
pikkus - kolmnurga külje pikkus
Protseduuri keha
mine x: X0 y: Y0
pliiats alla
korda 3 korda
liigu pikkus punkti
pööra vastupäeva 120 kraadi
korduse lõpp
pliiats üles
Toodud näittes on antud argumentide väärtused:
X0=-80, Y0=-50, pikkus=150
|
|
|
Korrapärane hulknurk
Protseduuri päis
sisaldab neli parameetrit:
X0 ja Y0 - joonistamise alguspunkti koordinaadid
pikkus - hulknurga külje pikkus
n - hulknurga külgede arv
Protseduuri keha
mine x: X0 y: Y0
pliiats alla
korda n korda
liigu pikkus punkti
pööra päripäeva 360/n kraadi
korduse lõpp
pliiats üles
Toodud näites on antud argumentide väärtused:
X0=-50, Y0=100, pikkus=70, n=7
|
|
|
Ringjoon
Protseduuri päis
sisaldab kolm parameetrit:
X0 ja Y0 - joonistamise alguspunkti koordinaadid
a - hulknurga kõõlu pikkus
Protseduuri keha
mine x: X0 y: Y0
pliiats alla
korda 36 korda
liigu a punkti
pööra päripäeva 10 kraadi
korduse lõpp
pliiats üles
Toodud näites on antud argumentide väärtused:
X0=0, Y0=70, a=15
|
|
|
Kiired
Protseduuri päis
sisaldab neli parameetrit:
X0 ja Y0 - joonistamise alguspunkti koordinaadid
pikkus - kiire pikkus
n - kiirte arv
Protseduuri keha
mine x: X0 y: Y0
pliiats alla
korda n+1 korda
liigu pikkus punkti
pliiats üles
mine x: X0 y: Y0
pööra päripäeva 360/n kraadi
pliiats alla
liigu pikkus punkti
korduse lõpp
pliiats üles
Toodud näites on antud argumentide väärtused:
X0=0, Y0=0, a=50, n=11
|
|
|
|
|
|
|
|