13 lines
284 B
Modula-2
13 lines
284 B
Modula-2
#permission=255
|
|
// setup some default values
|
|
SET,lang ${@0}
|
|
SET,msg ${@def}
|
|
|
|
DEFAULT,#DEFAULTLANG ?{GETSCPVALUE,race,{${@myrace}} defaultlang}
|
|
DEFAULT,lang ${#DEFAULTLANG}
|
|
|
|
LOGDEBUG * Saying '${msg}' in lang ${lang}
|
|
|
|
SENDCHATMESSAGE,0,${lang},{${msg}}
|
|
UNSET lang
|
|
UNSET msg |