Changeset 10046 for code/branches/ScriptableController/src/orxonox/controllers/ControllerDirector.cc

Timestamp:

May 7, 2014, 2:03:18 PM (11 years ago)

Author:

smerkli

Message:

Fixed some more things. What works now:

• Setting an ID for the scriptcontroller to be used from C++ in lua
• Running a script from the controllerdirector triggered by an event
• Getting an instance of a ScriptController object pointer from lua, and also calling a function of this object with parameters.

Next steps will be implementing different IDs per controller
object and actually swapping out controllers.

File:

• code/branches/ScriptableController/src/orxonox/controllers/ControllerDirector.cc (modified) (4 diffs)

code/branches/ScriptableController/src/orxonox/controllers/ControllerDirector.cc

@@ -1 +1 @@
 /*
-First try of a ControllerDirector. Target: An event occurs in the levelTry.oxw file, which is "heard" by an object of the type of this class. It then SHOULD (because it is not working) execute the party function.
+ * First try of a ControllerDirector. Target: An event occurs in the levelTry.oxw
+ * file, which is "heard" by an object of the type of this class. It then SHOULD
+ * (because it is not working) execute the party function.
  */
 
@@ -20 +22 @@
     ControllerDirector::ControllerDirector(Context* context) : ArtificialController(context)
     {
-        //Working
+        // Register the object with the framework
         RegisterObject(ControllerDirector);
+
+        // output a message to ensure we know the constructor was run
         orxout()<<"hello universe constructor"<< endl;
 
-           this->player_=NULL;
-           this->entity_=NULL;
-           this->pTrigger_=NULL;
+        // Initialize member variables
+        this->player_ = NULL;
+        this->entity_ = NULL;
+        this->pTrigger_ = NULL;
     }
-
 
     void ControllerDirector::XMLPort(Element& xmlelement, XMLPort::Mode mode)
@@ -34 +38 @@
         SUPER(ControllerDirector, XMLPort, xmlelement, mode);
 
-        
-        orxout()<<"ControllerDriector::XMLPort An instance of ControllerDirector has been created."<< endl;
+        orxout()<< "ControllerDirector::XMLPort " 
+          << "An instance of ControllerDirector has been created." << endl;
     }
 
     void ControllerDirector::XMLEventPort(Element& xmlelement, XMLPort::Mode mode)
     {
+        // Call the xmleventport functions of the classes we derive from
         SUPER(ControllerDirector, XMLEventPort, xmlelement, mode);
 
-        XMLPortEventSink(ControllerDirector, BaseObject, "takeControl", takeControl, xmlelement, mode);
-
+        // Add an event sink for a "takeControl" event, which leads to the
+        // function takeControl() being called.
+        XMLPortEventSink(ControllerDirector, BaseObject, "takeControl", 
+          takeControl, xmlelement, mode);
     }
 
@@ -49 +56 @@
 
 
-    void ControllerDirector::takeControl(Controller * controller, BaseObject * trigger) {
+    void ControllerDirector::takeControl(Controller * controller, BaseObject * trigger) 
+    {
+       /* Output a message confirming that the function was called */
+       orxout()<<"test takecontrol."<< endl;
 
+       /* First, we set up a new controller to attach to the unit that
+        * triggered our event. 
+        */
+       static int ctrlid = 0;
        // preparationTo(trigger);
        // setNewController(controller);
-        LuaState * test = new LuaState();
-        orxout()<<"test takecontrol."<< endl;
-        test->doFile("testscript.lua");
-        
+       
+       /* Set up a luastate to use for running the scripts */
+       LuaState * ls = new LuaState();
+       
+       /* Assemble a string to define a controller id variable in lua space */
+       std::stringstream tmp;
+       tmp << "newctrlid = " << ctrlid;
+       std::string todo = tmp.str();
+
+       /* Run the string using the luastate created earlier */
+       ls->doString(todo);
+
+       /* Now run the script on this controller. This will still have the above
+        * variable "newctrlid" defined, which means it can make use of it.
+        */
+       ls->doFile("testscript.lua");
+
+       /* Increase the controller ID so we have a different one for
+        * the next time it is triggered */
+       ctrlid += 1;
     }