From 34a008a49d31e0efc3cc2235aab898946c863cdf Mon Sep 17 00:00:00 2001 From: PaweX Date: Wed, 13 Feb 2013 02:32:41 +0100 Subject: Additional parameter for function aim(x, y). --- src/script/script.cpp | 27 +++++++++++++++++++++++---- 1 file changed, 23 insertions(+), 4 deletions(-) (limited to 'src/script') diff --git a/src/script/script.cpp b/src/script/script.cpp index 50ce830..ab8a1c1 100644 --- a/src/script/script.cpp +++ b/src/script/script.cpp @@ -2186,12 +2186,29 @@ bool CScript::rFire(CBotVar* var, CBotVar* result, int& exception, void* user) return Process(script, result, exception); } +// Compilation of the instruction "aim(x, y)". + +CBotTypResult cAim(CBotVar* &var, void* user) +{ + if ( var == 0 ) return CBotTypResult(CBotErrLowParam); + if ( var->GivType() > CBotTypDouble ) return CBotTypResult(CBotErrBadNum); + var = var->GivNext(); + + if ( var == 0 ) return CBotTypResult(CBotTypFloat); + if ( var->GivType() > CBotTypDouble ) return CBotTypResult(CBotErrBadNum); + var = var->GivNext(); + + if ( var != 0 ) return CBotTypResult(CBotErrOverParam); + + return CBotTypResult(CBotTypFloat); +} + // Instruction "aim(dir)". bool CScript::rAim(CBotVar* var, CBotVar* result, int& exception, void* user) { CScript* script = (static_cast(user))->GetRunScript(); - float value; + float x, y; Error err; exception = 0; @@ -2199,8 +2216,10 @@ bool CScript::rAim(CBotVar* var, CBotVar* result, int& exception, void* user) if ( script->m_primaryTask == 0 ) // no task in progress? { script->m_primaryTask = new CTaskManager(script->m_iMan, script->m_object); - value = var->GetValFloat(); - err = script->m_primaryTask->StartTaskGunGoal(value*Math::PI/180.0f, 0.0f); + x = var->GivValFloat(); + var = var->GivNext(); + var == 0 ? y=0.0f : y=var->GivValFloat(); + err = script->m_primaryTask->StartTaskGunGoal(x*Math::PI/180.0f, y*Math::PI/180.0f); if ( err != ERR_OK ) { delete script->m_primaryTask; @@ -2731,7 +2750,7 @@ void CScript::InitFonctions() CBotProgram::AddFunction("recycle", rRecycle, CScript::cNull); CBotProgram::AddFunction("shield", rShield, CScript::cShield); CBotProgram::AddFunction("fire", rFire, CScript::cFire); - CBotProgram::AddFunction("aim", rAim, CScript::cOneFloat); + CBotProgram::AddFunction("aim", rAim, CScript::cAim); CBotProgram::AddFunction("motor", rMotor, CScript::cMotor); CBotProgram::AddFunction("jet", rJet, CScript::cOneFloat); CBotProgram::AddFunction("topo", rTopo, CScript::cTopo); -- cgit v1.2.3-1-g7c22 From c26c063c5f3c0f45fd4ef3e717979768e7834780 Mon Sep 17 00:00:00 2001 From: PaweX Date: Wed, 13 Feb 2013 02:36:20 +0100 Subject: Additional parameter for function aim(x, y). --- src/script/cbottoken.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/script') diff --git a/src/script/cbottoken.cpp b/src/script/cbottoken.cpp index 0bb368c..06d36e1 100644 --- a/src/script/cbottoken.cpp +++ b/src/script/cbottoken.cpp @@ -476,7 +476,7 @@ const char* GetHelpText(const char *token) if ( strcmp(token, "shield" ) == 0 ) return "shield ( oper, radius );"; if ( strcmp(token, "fire" ) == 0 ) return "fire ( time );"; if ( strcmp(token, "antfire" ) == 0 ) return "antfire ( );"; - if ( strcmp(token, "aim" ) == 0 ) return "aim ( angle );"; + if ( strcmp(token, "aim" ) == 0 ) return "aim ( angle, angle );"; if ( strcmp(token, "motor" ) == 0 ) return "motor ( left, right );"; if ( strcmp(token, "jet" ) == 0 ) return "jet ( power );"; if ( strcmp(token, "topo" ) == 0 ) return "topo ( position );"; -- cgit v1.2.3-1-g7c22 From f25aed44d28f97d900bb9f4857cfcf282b80737c Mon Sep 17 00:00:00 2001 From: PaweX Date: Wed, 13 Feb 2013 13:48:56 +0100 Subject: aim(x,y) - "Giv" to "Get" --- src/script/script.cpp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/script') diff --git a/src/script/script.cpp b/src/script/script.cpp index ab8a1c1..252f2cb 100644 --- a/src/script/script.cpp +++ b/src/script/script.cpp @@ -2216,9 +2216,9 @@ bool CScript::rAim(CBotVar* var, CBotVar* result, int& exception, void* user) if ( script->m_primaryTask == 0 ) // no task in progress? { script->m_primaryTask = new CTaskManager(script->m_iMan, script->m_object); - x = var->GivValFloat(); - var = var->GivNext(); - var == 0 ? y=0.0f : y=var->GivValFloat(); + x = var->GetValFloat(); + var = var->GetNext(); + var == 0 ? y=0.0f : y=var->GetValFloat(); err = script->m_primaryTask->StartTaskGunGoal(x*Math::PI/180.0f, y*Math::PI/180.0f); if ( err != ERR_OK ) { -- cgit v1.2.3-1-g7c22 From bcd06bd0e863648bf2850ef9257374085c735c97 Mon Sep 17 00:00:00 2001 From: PaweX Date: Wed, 13 Feb 2013 13:56:50 +0100 Subject: Function aim(x, y) - "Giv" to "Get" --- src/script/script.cpp | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'src/script') diff --git a/src/script/script.cpp b/src/script/script.cpp index 252f2cb..c73a88f 100644 --- a/src/script/script.cpp +++ b/src/script/script.cpp @@ -2191,12 +2191,12 @@ bool CScript::rFire(CBotVar* var, CBotVar* result, int& exception, void* user) CBotTypResult cAim(CBotVar* &var, void* user) { if ( var == 0 ) return CBotTypResult(CBotErrLowParam); - if ( var->GivType() > CBotTypDouble ) return CBotTypResult(CBotErrBadNum); - var = var->GivNext(); + if ( var->GetType() > CBotTypDouble ) return CBotTypResult(CBotErrBadNum); + var = var->GetNext(); if ( var == 0 ) return CBotTypResult(CBotTypFloat); - if ( var->GivType() > CBotTypDouble ) return CBotTypResult(CBotErrBadNum); - var = var->GivNext(); + if ( var->GetType() > CBotTypDouble ) return CBotTypResult(CBotErrBadNum); + var = var->GetNext(); if ( var != 0 ) return CBotTypResult(CBotErrOverParam); -- cgit v1.2.3-1-g7c22 From 4128383ee1a0d171a9f2bcfa66f30661b64b178e Mon Sep 17 00:00:00 2001 From: PaweX Date: Wed, 13 Feb 2013 14:04:24 +0100 Subject: Update src/script/script.cpp --- src/script/script.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/script') diff --git a/src/script/script.cpp b/src/script/script.cpp index c73a88f..fc34af0 100644 --- a/src/script/script.cpp +++ b/src/script/script.cpp @@ -2188,7 +2188,7 @@ bool CScript::rFire(CBotVar* var, CBotVar* result, int& exception, void* user) // Compilation of the instruction "aim(x, y)". -CBotTypResult cAim(CBotVar* &var, void* user) +CBotTypResult CScript::cAim(CBotVar* &var, void* user) { if ( var == 0 ) return CBotTypResult(CBotErrLowParam); if ( var->GetType() > CBotTypDouble ) return CBotTypResult(CBotErrBadNum); -- cgit v1.2.3-1-g7c22 From 86b302eb1728efecbecd8c8de6005758fdbce78d Mon Sep 17 00:00:00 2001 From: PaweX Date: Wed, 13 Feb 2013 16:20:35 +0100 Subject: Added cAim(CBotVar* &var, void* user) --- src/script/script.h | 1 + 1 file changed, 1 insertion(+) (limited to 'src/script') diff --git a/src/script/script.h b/src/script/script.h index dbd66a2..674a67e 100644 --- a/src/script/script.h +++ b/src/script/script.h @@ -117,6 +117,7 @@ private: static CBotTypResult cTestInfo(CBotVar* &var, void* user); static CBotTypResult cShield(CBotVar* &var, void* user); static CBotTypResult cFire(CBotVar* &var, void* user); + static CBotTypResult cAim(CBotVar* &var, void* user); static CBotTypResult cMotor(CBotVar* &var, void* user); static CBotTypResult cTopo(CBotVar* &var, void* user); static CBotTypResult cMessage(CBotVar* &var, void* user); -- cgit v1.2.3-1-g7c22