Skip to content
irxground edited this page Sep 28, 2012 · 12 revisions

ルーチン

メインルーチン

Main
  ' ...
End Main

サブルーチン

ルール

  • 通常の引数は <<で修飾。省略可能
  • 戻り値引数は >>で修飾。
  • 入出力を行う引数は <>で修飾。
  • 引数のデフォルト値は Param(Value)で指定する。
  • ラベル引数は : を利用する。
  • 可変長引数は Name...で指定する。入力引数のみ

サンプル

引数:0, 戻り値:0

Sub Foo
End Sub

引数:3, 戻り値:0

Sub Bar << Arg1 Arg2 Arg3
End Sub

あるいは

Sub Bar Arg1 Arg2 Arg3
End Sub

引数:2, 戻り値:2

Sub Swap InL InR >> OutR OutL
    Set InL >> OutL
    Set InR >> OutR
End Sub

引数:0, 戻り値:1

Sub Read >> Out1
End Sub

引数:1, 参照渡し:1, 戻り値:0

Sub Add Val <> Var
    Set Val + Var >> Var
End Sub

引数がデフォルト値を持つ場合: 引数: (0, 1), 参照渡し:1

Sub Inc Val(1) <> Ref
    Set Val + Ref >> Ref
End Sub
Main
    Set 1 >> a
    Inc 2 <> a
    Inc <> a
    Say a    ' result is 4
End Main

関数

Func Max(a b)
    If a > b Then
        Max = a
    Else
        Max = b
    End If
End Func

Main
    Say Max(3 5) ' out put is 5
End Main

レコード(構造体)

Record People
    Name
    Age
End Record

Main
    Init People "Alice" 18 >> alice
    Say "My name is " alice.Name "." NewLine
End Main