カラーテキスト表示

main
  Display.Mode(3)
  Canvas.Init
  for c=0 to 15
    Canvas.Color=c
    Canvas.BKColor=15-c
    Canvas.WriteLn("Broom")
  Key.Wait

文字とその背景の色を変えながらメッセージを表示します。