init文と関数呼出し

init文によるスタティック変数の初期化と関数呼出しのサンプルです。

def aaa(n)
  init _a=0
  _a=_a+n
  return _a

main
  Display.Mode(0)
  Canvas.Init
  for i=1 to 10
    Canvas.WriteLn(aaa(2))
  Key.Wait

init _a=0 の行は始めて実行されるときは、スタティック変数_aが未定義なので、0に初期化します。
2度目以降の実行では_aが定義済みなので、何も行いません。