Microsoft Small Basic

Program Listing: KTK632-0

List Program

GraphicsWindow.Title = "Flag of Canada"
GraphicsWindow.Width = 600
GraphicsWindow.Height = 300
GraphicsWindow.BrushColor = "#D52B1E"
GraphicsWindow.FontName = "Segoe UI Symbol"
GraphicsWindow.FillRectangle(0, 0, 150, 300)
GraphicsWindow.FillRectangle(450, 0, 150, 300)
GraphicsWindow.FontSize = 224
GraphicsWindow.DrawText(186, -10, "🍁")