sub AtomicEvent PluginKeyPressed 'this procedure is called each time user press a key if GetKeyCode=G_ACTIONKEYCODE_UP then MonteLeSon End If if GetKeyCode=G_ACTIONKEYCODE_DOWN then BaisseLeSon End If end AtomicEvent
sub AtomicEvent PluginLoadConfig G_ACTIONKEYCODE_UP=CInt(ReadFileConfig(GetConfigProperty("PLUGINDIR")+GetPluginConfigFileName(),"ACTIONKEYCODE_UP"))G_ACTIONKEYCODE_DOWN=CInt(ReadFileConfig(GetConfigProperty("PLUGINDIR")+GetPluginConfigFileName(),"ACTIONKEYCODE_DOWN")) end AtomicEvent
sub AtomicDef GlobalVariablesInt G_ACTIONKEYCODE_UP;Int G_ACTIONKEYCODE_DOWN;end AtomicDef