オリンピックのマーク
require('color')
gra = f_Graphics()
f_SetTitle("Luaスクリプト:DrawArc")
blue = gdi:Pen(Color.Blue, 2)
black = gdi:Pen(Color.Black, 2)
red = gdi:Pen(Color.Red, 2)
yellow = gdi:Pen(Color.Yellow, 2)
green = gdi:Pen(Color.Green, 2)
gra:TranslateTransform(10, 20)
gra:DrawArc(blue, 0, 0, 50, 50, 0, 360)
gra:TranslateTransform(55, 0)
gra:DrawArc(black, 0, 0, 50, 50, 0, 360)
gra:TranslateTransform(55, 0)
gra:DrawArc(red, 0, 0, 50, 50, 0, 360)
gra:TranslateTransform(-82, 30)
gra:DrawArc(yellow, 0, 0, 50, 50, 0, 360)
gra:TranslateTransform(55, 0)
gra:DrawArc(green, 0, 0, 50, 50, 0, 360)
gra:ResetTransform()
x = "五輪マーク"