Skip to content

ENUMMACRO系

関数名 引数 戻り値
ENUMMACROBEGINSWITH string int
ENUMMACROENDSWITH string int
ENUMMACROWITH string int

API

int ENUMMACROBEGINSWITH keyword
int ENUMMACROENDSWITH keyword
int ENUMMACROWITH keyword

定義されたマクロ名でkeywordを含んでいるマクロの総数を返す
また、keywordを含むマクロ名をRESULTSの配列に代入する

  • ENUMMACROBEGINSWITHは，keywordで始まるマクロ名を返します。
  • ENUMMACROENDSWITHは，keywordで終わるマクロ名を返します。
  • ENUMMACROWITHは，keywordを含んだマクロ名を返します。

ヒント

命令、式中関数両方対応しています。

例

DEFINE.ERH
#DIMS CONST Foo1 = "1"
#DEFINE Foo2 "Test"
#DEFINE Foo3
#DEFINE MyFoo 1 + 1
#DEFINE YourFoo 1 + 1
#DEFINE AFooInTheMiddle
MAIN.ERB
@SYSTEM_TITLE

    PRINTFORML "Foo"で始まるマクロ名の数:{ENUMMACROBEGINSWITH("Foo")}
    ENUMMACROENDSWITH "Foo"
    PRINTFORML "Foo"で終わるマクロ名の数:{RESULT}
    CALL PrintFoo
    ENUMMACROWITH "Foo"
    PRINTFORML "Foo"を含んだマクロ名の数:{RESULT}
    CALL PrintFoo

    ONEINPUT

@PrintFoo
    #DIM i
    FOR i, 0, RESULT
        SIF i>0
            PRINT , 
        PRINTS RESULTS:i
    NEXT
    PRINTL
結果
"Foo"で始まるマクロ名の数:2
"Foo"で終わるマクロ名の数:2
MyFoo, YourFoo
"Foo"を含んだマクロ名の数:5
Foo2, Foo3, MyFoo, YourFoo, AFooInTheMiddle