[FlatX007]

Код:

$Key1 = "-Key1"
$Key2 = "-Key2"

Switch _CheckingKey(@Compiled, $CmdLineRaw)

    Case 0
        MsgBox(0, "", "Нет ключей")
    Case 1
        _1()

    Case 2
        _2()

EndSwitch

Func _1()
    MsgBox(0, "", "Func _1()")
EndFunc   ;==>_1

Func _2()
    MsgBox(0, "", "Func _2()")
EndFunc   ;==>_2

Func _CheckingKey($Compiled = 0, $Cmd_LineRaw = 0)

    Switch $Cmd_LineRaw

        Case $Key1
            If $Compiled = 1 Then Return 1

        Case $Key2
            If $Compiled = 1 Then Return 2

            Return 0

    EndSwitch
EndFunc   ;==>_CheckingKey