Perl:Flags with Stars Tutorial

From Progzoo
Jump to navigation Jump to search

Drawing flags: reusing shapes.


We can move our polygon using the method offset(x,y). For example:


The flag of Vietnam has a yellow five pointed star on a red background. This star is a popular device on many flags, we define the star once and use it many times in later flags.


The given star has a radius of 100, it is centred on 0,0 which is the wrong place. We must translate to put it in the right place.

[Font] [Default] [Show] [Resize] [History] [Profile]


The flag of Panama requires two stars. We can draw the same star twice.


[Font] [Default] [Show] [Resize] [History] [Profile]

Bosnia and Herzegovina

The flag of Bosnia and Herzegovina includes 9 white stars. Each star is 38 right and 38 below the previous star.


[Font] [Default] [Show] [Resize] [History] [Profile]

Democratic Republic of Congo (formerly Zaire)

The large star has a radius of 100, the 6 smaller stars have a radius of 10.


[Font] [Default] [Show] [Resize] [History] [Profile]