Red Cross Flag by James

to redcross
setpencolor 4
repeat 4 [ lt 90 fd 100 rt 90 fd 50 rt 90 fd 100 ]
pu
fd 25
setfloodcolor 4
fill
pd
pu
ht
setpencolor 0
setxy -112.5 -112.5
pd
fd 275
rt 90
fd 275
rt 90
fd 275
rt 90
fd 275
end
Red Cross Flag by James

Valid XHTML 1.0!