Planet
navi homePPSaboutscreenshotsdownloaddevelopmentforum

source: orxonox.OLD/trunk/src/world_entities/script_trigger.cc @ 9816

Last change on this file since 9816 was 9656, checked in by bensch, 18 years ago

orxonox/trunk: merged the proxy bache back with no conflicts

File size: 8.6 KB
Line 
1/*
2   orxonox - the future of 3D-vertical-scrollers
3
4   Copyright (C) 2004 orx
5
6   This program is free software; you can redistribute it and/or modify
7   it under the terms of the GNU General Public License as published by
8   the Free Software Foundation; either version 2, or (at your option)
9   any later version.
10
11### File Specific:
12   main-programmer: Silvan Nellen
13   co-programmer: ...
14*/
15
16
17#include "script_trigger.h"
18#include "class_list.h"
19#include "script.h"
20
21#include "state.h"
22
23
24CREATE_SCRIPTABLE_CLASS(ScriptTrigger, CL_SCRIPT_TRIGGER,
25            // Coordinates
26             addMethod("setAbsCoor", ExecutorLua3<PNode,float,float,float>(&PNode::setAbsCoor))
27             ->addMethod("getAbsCoorX", ExecutorLua0ret<PNode, float>(&PNode::getAbsCoorX))
28             ->addMethod("getAbsCoorY", ExecutorLua0ret<PNode, float>(&PNode::getAbsCoorY))
29             ->addMethod("getAbsCoorZ", ExecutorLua0ret<PNode, float>(&PNode::getAbsCoorZ))
30            //Properties
31             ->addMethod("setName", ExecutorLua1<BaseObject, const std::string&>(&BaseObject::setName))
32             ->addMethod("setTarget", ExecutorLua1<ScriptTrigger, const std::string&>(&ScriptTrigger::setTarget))
33             ->addMethod("setTriggerParent", ExecutorLua1<ScriptTrigger, const std::string&>(&ScriptTrigger::setTriggerParent))
34             ->addMethod("setTriggerRemains", ExecutorLua1<ScriptTrigger, bool>(&ScriptTrigger::setTriggerRemains))
35             ->addMethod("setActiveOnCreation", ExecutorLua1<ScriptTrigger, bool>(&ScriptTrigger::setActiveOnCreation))
36             ->addMethod("setInvert", ExecutorLua1<ScriptTrigger, bool>(&ScriptTrigger::setInvert))
37             ->addMethod("setRadius", ExecutorLua1<ScriptTrigger, float>(&ScriptTrigger::setRadius))
38             ->addMethod("setScript", ExecutorLua1<ScriptTrigger, const std::string&>(&ScriptTrigger::setScript))
39             ->addMethod("setFunction", ExecutorLua1<ScriptTrigger, const std::string&>(&ScriptTrigger::setFunction))
40             ->addMethod("setDebugDraw", ExecutorLua1<ScriptTrigger, bool>(&ScriptTrigger::setDebugDraw))
41             ->addMethod("setAddToScript", ExecutorLua1<ScriptTrigger, bool>(&ScriptTrigger::setAddToScript))
42             );
43
44
45/**
46 * Constructs a new ScriptTrigger.
47 * @param root the xml element to load the parameters from.
48 *
49 */
50ScriptTrigger::ScriptTrigger(const TiXmlElement* root)
51{ 
52  this->setClassID(CL_SCRIPT_TRIGGER, "ScriptTrigger");
53  this->toList(OM_COMMON);
54
55  radius = 10;
56  returnCount = 1;
57  scriptFinished = false;
58  doDebugDraw = false;
59  invert = false;
60  scriptCalled = false;
61  scriptIsOk = false;
62  triggerRemains = true;
63  addToScript = false;
64  this->activeOnCreation = false;
65
66  if(root != NULL)
67  {
68
69    loadParams(root);
70
71    if(addToScript && scriptIsOk)
72    {
73      script->addObject( "ScriptTrigger", this->getName());
74    }
75
76  }
77
78}
79
80/**
81 * Deletes the ScriptTrigger.
82 *
83 */
84ScriptTrigger::~ScriptTrigger()
85{
86
87}
88
89/**
90 * Reads the values from the tml element and sets them.
91 * @param root the xml element to load the parameters from.
92 *
93 */
94void ScriptTrigger::loadParams(const TiXmlElement* root)
95{
96
97  WorldEntity ::loadParams(root);
98
99  LoadParam(root, "file", this, ScriptTrigger, setScript)
100      .describe("the fileName of the script, that should be triggered by this script trigger")
101      .defaultValues("");
102  LoadParam(root, "function", this, ScriptTrigger, setFunction)
103      .describe("the function of the script, that should be triggered by this script trigger")
104      .defaultValues("");
105  LoadParam(root, "abs-coor", this, ScriptTrigger, setAbsCoor)
106      .describe("where this script trigger should be located")
107      .defaultValues("");
108  LoadParam(root, "radius", this, ScriptTrigger, setRadius)
109      .describe("the fileName of the script, that should be triggered by this script trigger")
110      .defaultValues(0);
111  LoadParam(root, "delay", this, ScriptTrigger, setDelay)
112      .describe("the delay after which the funtion sould be triggered")
113      .defaultValues(0);
114  LoadParam(root, "worldentity", this, ScriptTrigger, setTarget)
115      .describe("The name of the target as it is in the *.oxw file")
116      .defaultValues("");
117  LoadParam(root, "triggerparent", this, ScriptTrigger, setTriggerParent)
118      .describe("The name of the parent as it is in the *.oxw file")
119      .defaultValues("");
120  LoadParam(root, "invert", this, ScriptTrigger, setInvert)
121      .describe("")
122      .defaultValues(false);
123  LoadParam(root, "triggerRemains", this, ScriptTrigger, setTriggerRemains)
124      .describe("")
125      .defaultValues(true);
126  LoadParam(root, "debugdraw", this, ScriptTrigger, setDebugDraw)
127      .describe("")
128      .defaultValues(false);
129  LoadParam(root, "addtoscript", this, ScriptTrigger, setAddToScript)
130      .describe("True if this scripttrigger should be aviable in the script")
131      .defaultValues(false);
132}
133
134
135/**
136 * Sets the target(a world entity) of the ScriptTrigger. If the distance between the target and this trigger is smaller than the radius, the script gets triggered.
137 * @param target The worldentity that the script supervises.
138 */
139void ScriptTrigger::setTarget(const std::string& target)
140{
141  BaseObject* targetEntity = ClassList::getObject(target, CL_WORLD_ENTITY);
142
143  if (targetEntity != NULL)
144  {
145    this->setTarget(dynamic_cast<WorldEntity*>(targetEntity));
146  }
147  else
148  {
149    PRINTF(2)("Target %s for %s::%s does not Exist\n", target.c_str(), this->getClassCName(), this->getCName());
150  }
151}
152
153/**
154 * Sets the parent of the trigger.
155 * @param parent The parrent.
156 */
157void ScriptTrigger::setTriggerParent(const std::string& parent)
158{
159  BaseObject* parentEntity = ClassList::getObject(parent, CL_WORLD_ENTITY);
160
161  if (parentEntity != NULL)
162  {
163    this->setParent(dynamic_cast<WorldEntity*>(parentEntity));
164    this->setParentMode(PNODE_MOVEMENT);
165  }
166  else
167  {
168    PRINTF(2)("Parent %s for %s::%s does not Exist\n", parent.c_str(), this->getClassCName(), this->getCName());
169  }
170}
171
172void ScriptTrigger::tick(float timestep)
173{
174  if(scriptFinished) return;
175
176  if(activeOnCreation)
177   {
178     executeAction(timestep);
179     return;
180   }
181
182  if(triggerRemains && scriptCalled)
183  {
184    executeAction(timestep);
185    return;
186  }
187
188  if( !invert && this->distance(target) < radius)
189  {
190    executeAction(timestep);
191    scriptCalled = true;
192    return;
193
194  }
195  else if( invert && this->distance(target) > radius)
196  {
197    executeAction(timestep);
198    scriptCalled = true;
199    return;
200  }
201 //else
202   //printf("SCRIPTTRIGGER: target out of range\n");
203
204}
205
206
207void ScriptTrigger::executeAction(float timestep)
208{
209
210  if(scriptIsOk)
211  {
212       //testScriptingFramework();
213    if(!(script->selectFunction(this->functionName,returnCount)) )
214      PRINT(1)("Error ScriptTrigger: Selection of %s in %s failed.\n",functionName.c_str(), script->getFileName().c_str());
215
216    script->pushParam( timestep, this->functionName);
217
218    if( !(script->executeFunction()) )
219      PRINT(1)("Error ScriptTrigger: Execution of %s in %s failed.\n",functionName.c_str(), script->getFileName().c_str());
220
221    scriptFinished = script->getReturnedBool();
222  }
223
224
225}
226
227
228void ScriptTrigger::setScript(const std::string& file)
229{
230  ScriptManager* scriptManager = State::getScriptManager();
231  if (scriptManager != NULL)
232  {
233
234    script = scriptManager->getScriptByFile(file);
235    if(script != NULL)
236    {
237      scriptIsOk = true;
238    }
239  }
240}
241
242/*
243 void ScriptTrigger::testScriptingFramework()
244{
245   std::string file("lunartest2.lua");
246   //get script
247   Script* script = State::getScriptManager()->getScriptByFile(file);
248   printf("-------------------------- top of the stack:%i\n",lua_gettop(script->getLuaState()));
249
250      //execute a function
251   printf("----------- main -----------\n");
252   std::string main("main");
253   if( script->selectFunction(main,3))
254     printf("function %s selected\n",main.c_str());
255
256   script->pushParam(3.14159,main);
257   printf("-------------------------- top of the stack:%i\n",lua_gettop(script->getLuaState()));
258   script->executeFunction();
259
260   int ret = script->getReturnedInt();
261   printf("main returned %i\n",ret);
262
263   if(script->getReturnedBool())
264     printf("main returned true\n");
265   else
266     printf("main returned false\n");
267
268   float retf = script->getReturnedFloat();
269   printf("main returned %f\n",retf);
270
271
272   printf("-------------------------- top of the stack:%i\n",lua_gettop(script->getLuaState()));
273      //execute a 2nd function
274   printf("----------- test -----------\n");
275   std::string test("test");
276   if( script->selectFunction(test,0))
277     printf("function %s selected\n",test.c_str());
278
279   script->executeFunction();
280
281
282      //if(argc>1) lua_dofile(script.getLuaState(), argv[1]);
283   printf("-------------------------- top of the stack:%i\n",lua_gettop(script->getLuaState()));
284
285}*/
Note: See TracBrowser for help on using the repository browser.