mirror of
https://github.com/VCMP-SqMod/SqMod.git
synced 2024-11-09 01:07:16 +01:00
543 lines
16 KiB
C++
543 lines
16 KiB
C++
// ------------------------------------------------------------------------------------------------
|
|
#include "Base/Circle.hpp"
|
|
#include "Base/Shared.hpp"
|
|
#include "Library/Random.hpp"
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
#include <limits>
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
namespace SqMod {
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
const Circle Circle::NIL = Circle();
|
|
const Circle Circle::MIN = Circle(0.0);
|
|
const Circle Circle::MAX = Circle(std::numeric_limits< Circle::Value >::max());
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
SQChar Circle::Delim = ',';
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
SQInteger Circle::Typename(HSQUIRRELVM vm)
|
|
{
|
|
static SQChar name[] = _SC("Circle");
|
|
sq_pushstring(vm, name, sizeof(name));
|
|
return 1;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle::Circle()
|
|
: pos(0.0, 0.0), rad(0.0)
|
|
{
|
|
/* ... */
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle::Circle(Value rv)
|
|
: pos(0.0, 0.0), rad(rv)
|
|
{
|
|
/* ... */
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle::Circle(const Vector2 & pv, Value rv)
|
|
: pos(pv), rad(rv)
|
|
{
|
|
/* ... */
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle::Circle(Value xv, Value yv, Value rv)
|
|
: pos(xv, yv), rad(rv)
|
|
{
|
|
/* ... */
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle & Circle::operator = (Value r)
|
|
{
|
|
rad = r;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator = (const Vector2 & p)
|
|
{
|
|
pos = p;
|
|
return *this;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle & Circle::operator += (const Circle & c)
|
|
{
|
|
pos += c.pos;
|
|
rad += c.rad;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator -= (const Circle & c)
|
|
{
|
|
pos -= c.pos;
|
|
rad -= c.rad;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator *= (const Circle & c)
|
|
{
|
|
pos *= c.pos;
|
|
rad *= c.rad;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator /= (const Circle & c)
|
|
{
|
|
pos /= c.pos;
|
|
rad /= c.rad;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator %= (const Circle & c)
|
|
{
|
|
pos %= c.pos;
|
|
rad = fmod(rad, c.rad);
|
|
|
|
return *this;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle & Circle::operator += (Value r)
|
|
{
|
|
rad += r;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator -= (Value r)
|
|
{
|
|
rad -= r;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator *= (Value r)
|
|
{
|
|
rad *= r;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator /= (Value r)
|
|
{
|
|
rad /= r;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator %= (Value r)
|
|
{
|
|
rad = fmod(rad, r);
|
|
return *this;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle & Circle::operator += (const Vector2 & p)
|
|
{
|
|
pos += p;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator -= (const Vector2 & p)
|
|
{
|
|
pos -= p;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator *= (const Vector2 & p)
|
|
{
|
|
pos *= p;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator /= (const Vector2 & p)
|
|
{
|
|
pos /= p;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator %= (const Vector2 & p)
|
|
{
|
|
pos %= p;
|
|
return *this;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle & Circle::operator ++ ()
|
|
{
|
|
++pos;
|
|
++rad;
|
|
return *this;
|
|
}
|
|
|
|
Circle & Circle::operator -- ()
|
|
{
|
|
--pos;
|
|
--rad;
|
|
return *this;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle Circle::operator ++ (int)
|
|
{
|
|
Circle state(*this);
|
|
++pos;
|
|
++rad;
|
|
return state;
|
|
}
|
|
|
|
Circle Circle::operator -- (int)
|
|
{
|
|
Circle state(*this);
|
|
--pos;
|
|
--rad;
|
|
return state;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle Circle::operator + (const Circle & c) const
|
|
{
|
|
return Circle(pos + c.pos, rad + c.rad);
|
|
}
|
|
|
|
Circle Circle::operator - (const Circle & c) const
|
|
{
|
|
return Circle(pos - c.pos, rad - c.rad);
|
|
}
|
|
|
|
Circle Circle::operator * (const Circle & c) const
|
|
{
|
|
return Circle(pos * c.pos, rad * c.rad);
|
|
}
|
|
|
|
Circle Circle::operator / (const Circle & c) const
|
|
{
|
|
return Circle(pos / c.pos, rad / c.rad);
|
|
}
|
|
|
|
Circle Circle::operator % (const Circle & c) const
|
|
{
|
|
return Circle(pos % c.pos, fmod(rad, c.rad));
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle Circle::operator + (Value r) const
|
|
{
|
|
return Circle(rad + r);
|
|
}
|
|
|
|
Circle Circle::operator - (Value r) const
|
|
{
|
|
return Circle(rad - r);
|
|
}
|
|
|
|
Circle Circle::operator * (Value r) const
|
|
{
|
|
return Circle(rad * r);
|
|
}
|
|
|
|
Circle Circle::operator / (Value r) const
|
|
{
|
|
return Circle(rad / r);
|
|
}
|
|
|
|
Circle Circle::operator % (Value r) const
|
|
{
|
|
return Circle(fmod(rad, r));
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle Circle::operator + (const Vector2 & p) const
|
|
{
|
|
return Circle(pos + p, rad);
|
|
}
|
|
|
|
Circle Circle::operator - (const Vector2 & p) const
|
|
{
|
|
return Circle(pos - p, rad);
|
|
}
|
|
|
|
Circle Circle::operator * (const Vector2 & p) const
|
|
{
|
|
return Circle(pos * p, rad);
|
|
}
|
|
|
|
Circle Circle::operator / (const Vector2 & p) const
|
|
{
|
|
return Circle(pos / p, rad);
|
|
}
|
|
|
|
Circle Circle::operator % (const Vector2 & p) const
|
|
{
|
|
return Circle(pos % p, rad);
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle Circle::operator + () const
|
|
{
|
|
return Circle(pos.Abs(), fabs(rad));
|
|
}
|
|
|
|
Circle Circle::operator - () const
|
|
{
|
|
return Circle(-pos, -rad);
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
bool Circle::operator == (const Circle & c) const
|
|
{
|
|
return EpsEq(rad, c.rad) && (pos == c.pos);
|
|
}
|
|
|
|
bool Circle::operator != (const Circle & c) const
|
|
{
|
|
return !EpsEq(rad, c.rad) && (pos != c.pos);
|
|
}
|
|
|
|
bool Circle::operator < (const Circle & c) const
|
|
{
|
|
return EpsLt(rad, c.rad) && (pos < c.pos);
|
|
}
|
|
|
|
bool Circle::operator > (const Circle & c) const
|
|
{
|
|
return EpsGt(rad, c.rad) && (pos > c.pos);
|
|
}
|
|
|
|
bool Circle::operator <= (const Circle & c) const
|
|
{
|
|
return EpsLtEq(rad, c.rad) && (pos <= c.pos);
|
|
}
|
|
|
|
bool Circle::operator >= (const Circle & c) const
|
|
{
|
|
return EpsGtEq(rad, c.rad) && (pos >= c.pos);
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Int32 Circle::Cmp(const Circle & o) const
|
|
{
|
|
if (*this == o)
|
|
return 0;
|
|
else if (*this > o)
|
|
return 1;
|
|
else
|
|
return -1;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
CSStr Circle::ToString() const
|
|
{
|
|
return ToStrF("%f,%f,%f", pos.x, pos.y, rad);
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
void Circle::Set(Value nr)
|
|
{
|
|
rad = nr;
|
|
}
|
|
|
|
void Circle::Set(const Circle & nc)
|
|
{
|
|
pos = nc.pos;
|
|
rad = nc.rad;
|
|
}
|
|
|
|
void Circle::Set(const Vector2 & np)
|
|
{
|
|
pos = np;
|
|
}
|
|
|
|
void Circle::Set(const Vector2 & np, Value nr)
|
|
{
|
|
pos = np;
|
|
rad = nr;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
void Circle::Set(Value nx, Value ny)
|
|
{
|
|
pos.Set(nx, ny);
|
|
}
|
|
|
|
void Circle::Set(Value nx, Value ny, Value nr)
|
|
{
|
|
pos.Set(nx, ny);
|
|
rad = nr;
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
void Circle::Set(CSStr values, SQChar delim)
|
|
{
|
|
Set(GetCircle(values, delim));
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
void Circle::Generate()
|
|
{
|
|
pos.Generate();
|
|
rad = GetRandomFloat32();
|
|
}
|
|
|
|
void Circle::Generate(Value min, Value max, bool r)
|
|
{
|
|
if (EpsLt(max, min))
|
|
STHROWF("max value is lower than min value");
|
|
else if (r)
|
|
rad = GetRandomFloat32(min, max);
|
|
else
|
|
pos.Generate(min, max);
|
|
}
|
|
|
|
void Circle::Generate(Value xmin, Value xmax, Value ymin, Value ymax)
|
|
{
|
|
if (EpsLt(xmax, xmin) || EpsLt(ymax, ymin))
|
|
STHROWF("max value is lower than min value");
|
|
|
|
pos.Generate(xmin, xmax, ymin, ymax);
|
|
}
|
|
|
|
void Circle::Generate(Value xmin, Value xmax, Value ymin, Value ymax, Value rmin, Value rmax)
|
|
{
|
|
if (EpsLt(xmax, xmin) || EpsLt(ymax, ymin) || EpsLt(rmax, rmin))
|
|
STHROWF("max value is lower than min value");
|
|
|
|
pos.Generate(xmin, xmax, ymin, ymax);
|
|
rad = GetRandomFloat32(rmin, rmax);
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
Circle Circle::Abs() const
|
|
{
|
|
return Circle(pos.Abs(), fabs(rad));
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
const Circle & GetCircle(CSStr str)
|
|
{
|
|
return GetCircle(str, Circle::Delim);
|
|
}
|
|
|
|
// ------------------------------------------------------------------------------------------------
|
|
const Circle & GetCircle(CSStr str, SQChar delim)
|
|
{
|
|
// The format specifications that will be used to scan the string
|
|
static SQChar fs[] = _SC(" %f , %f , %f ");
|
|
static Circle circle;
|
|
// Clear previous values, if any
|
|
circle.Clear();
|
|
// Is the specified string empty?
|
|
if (!str || *str == '\0')
|
|
{
|
|
return circle; // Return the value as is!
|
|
}
|
|
// Assign the specified delimiter
|
|
fs[4] = delim;
|
|
fs[9] = delim;
|
|
// Attempt to extract the component values from the specified string
|
|
std::sscanf(str, fs, &circle.pos.x, &circle.pos.y, &circle.rad);
|
|
// Return the resulted value
|
|
return circle;
|
|
}
|
|
|
|
// ================================================================================================
|
|
void Register_Circle(HSQUIRRELVM vm)
|
|
{
|
|
typedef Circle::Value Val;
|
|
|
|
RootTable(vm).Bind(_SC("Circle"), Class< Circle >(vm, _SC("Circle"))
|
|
/* Constructors */
|
|
.Ctor()
|
|
.Ctor< Val >()
|
|
.Ctor< const Vector2 &, Val >()
|
|
.Ctor< Val, Val, Val >()
|
|
/* Static Members */
|
|
.SetStaticValue(_SC("Delim"), &Circle::Delim)
|
|
/* Member Variables */
|
|
.Var(_SC("pos"), &Circle::pos)
|
|
.Var(_SC("rad"), &Circle::rad)
|
|
/* Properties */
|
|
.Prop(_SC("abs"), &Circle::Abs)
|
|
/* Core Metamethods */
|
|
.Func(_SC("_tostring"), &Circle::ToString)
|
|
.SquirrelFunc(_SC("_typename"), &Circle::Typename)
|
|
.Func(_SC("_cmp"), &Circle::Cmp)
|
|
/* Metamethods */
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("_add"), &Circle::operator +)
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("_sub"), &Circle::operator -)
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("_mul"), &Circle::operator *)
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("_div"), &Circle::operator /)
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("_modulo"), &Circle::operator %)
|
|
.Func<Circle (Circle::*)(void) const>(_SC("_unm"), &Circle::operator -)
|
|
/* Setters */
|
|
.Overload<void (Circle::*)(const Circle &)>(_SC("Set"), &Circle::Set)
|
|
.Overload<void (Circle::*)(const Vector2 &, Val)>(_SC("Set"), &Circle::Set)
|
|
.Overload<void (Circle::*)(Val, Val, Val)>(_SC("Set"), &Circle::Set)
|
|
.Overload<void (Circle::*)(Val)>(_SC("SetRad"), &Circle::Set)
|
|
.Overload<void (Circle::*)(const Vector2 &)>(_SC("SetVec2"), &Circle::Set)
|
|
.Overload<void (Circle::*)(Val, Val)>(_SC("SetVec2"), &Circle::Set)
|
|
.Overload<void (Circle::*)(CSStr, SQChar)>(_SC("SetStr"), &Circle::Set)
|
|
/* Utility Methods */
|
|
.Func(_SC("Clear"), &Circle::Clear)
|
|
/* Operator Exposure */
|
|
.Func<Circle & (Circle::*)(const Circle &)>(_SC("opAddAssign"), &Circle::operator +=)
|
|
.Func<Circle & (Circle::*)(const Circle &)>(_SC("opSubAssign"), &Circle::operator -=)
|
|
.Func<Circle & (Circle::*)(const Circle &)>(_SC("opMulAssign"), &Circle::operator *=)
|
|
.Func<Circle & (Circle::*)(const Circle &)>(_SC("opDivAssign"), &Circle::operator /=)
|
|
.Func<Circle & (Circle::*)(const Circle &)>(_SC("opModAssign"), &Circle::operator %=)
|
|
|
|
.Func<Circle & (Circle::*)(Circle::Value)>(_SC("opAddAssignR"), &Circle::operator +=)
|
|
.Func<Circle & (Circle::*)(Circle::Value)>(_SC("opSubAssignR"), &Circle::operator -=)
|
|
.Func<Circle & (Circle::*)(Circle::Value)>(_SC("opMulAssignR"), &Circle::operator *=)
|
|
.Func<Circle & (Circle::*)(Circle::Value)>(_SC("opDivAssignR"), &Circle::operator /=)
|
|
.Func<Circle & (Circle::*)(Circle::Value)>(_SC("opModAssignR"), &Circle::operator %=)
|
|
|
|
.Func<Circle & (Circle::*)(const Vector2 &)>(_SC("opAddAssignP"), &Circle::operator +=)
|
|
.Func<Circle & (Circle::*)(const Vector2 &)>(_SC("opSubAssignP"), &Circle::operator -=)
|
|
.Func<Circle & (Circle::*)(const Vector2 &)>(_SC("opMulAssignP"), &Circle::operator *=)
|
|
.Func<Circle & (Circle::*)(const Vector2 &)>(_SC("opDivAssignP"), &Circle::operator /=)
|
|
.Func<Circle & (Circle::*)(const Vector2 &)>(_SC("opModAssignP"), &Circle::operator %=)
|
|
|
|
.Func<Circle & (Circle::*)(void)>(_SC("opPreInc"), &Circle::operator ++)
|
|
.Func<Circle & (Circle::*)(void)>(_SC("opPreDec"), &Circle::operator --)
|
|
.Func<Circle (Circle::*)(int)>(_SC("opPostInc"), &Circle::operator ++)
|
|
.Func<Circle (Circle::*)(int)>(_SC("opPostDec"), &Circle::operator --)
|
|
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("opAdd"), &Circle::operator +)
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("opSub"), &Circle::operator -)
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("opMul"), &Circle::operator *)
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("opDiv"), &Circle::operator /)
|
|
.Func<Circle (Circle::*)(const Circle &) const>(_SC("opMod"), &Circle::operator %)
|
|
|
|
.Func<Circle (Circle::*)(Circle::Value) const>(_SC("opAddR"), &Circle::operator +)
|
|
.Func<Circle (Circle::*)(Circle::Value) const>(_SC("opSubR"), &Circle::operator -)
|
|
.Func<Circle (Circle::*)(Circle::Value) const>(_SC("opMulR"), &Circle::operator *)
|
|
.Func<Circle (Circle::*)(Circle::Value) const>(_SC("opDivR"), &Circle::operator /)
|
|
.Func<Circle (Circle::*)(Circle::Value) const>(_SC("opModR"), &Circle::operator %)
|
|
|
|
.Func<Circle (Circle::*)(const Vector2 &) const>(_SC("opAddP"), &Circle::operator +)
|
|
.Func<Circle (Circle::*)(const Vector2 &) const>(_SC("opSubP"), &Circle::operator -)
|
|
.Func<Circle (Circle::*)(const Vector2 &) const>(_SC("opMulP"), &Circle::operator *)
|
|
.Func<Circle (Circle::*)(const Vector2 &) const>(_SC("opDivP"), &Circle::operator /)
|
|
.Func<Circle (Circle::*)(const Vector2 &) const>(_SC("opModP"), &Circle::operator %)
|
|
|
|
.Func<Circle (Circle::*)(void) const>(_SC("opUnPlus"), &Circle::operator +)
|
|
.Func<Circle (Circle::*)(void) const>(_SC("opUnMinus"), &Circle::operator -)
|
|
|
|
.Func<bool (Circle::*)(const Circle &) const>(_SC("opEqual"), &Circle::operator ==)
|
|
.Func<bool (Circle::*)(const Circle &) const>(_SC("opNotEqual"), &Circle::operator !=)
|
|
.Func<bool (Circle::*)(const Circle &) const>(_SC("opLessThan"), &Circle::operator <)
|
|
.Func<bool (Circle::*)(const Circle &) const>(_SC("opGreaterThan"), &Circle::operator >)
|
|
.Func<bool (Circle::*)(const Circle &) const>(_SC("opLessEqual"), &Circle::operator <=)
|
|
.Func<bool (Circle::*)(const Circle &) const>(_SC("opGreaterEqual"), &Circle::operator >=)
|
|
// Static Overloads
|
|
.StaticOverload< const Circle & (*)(CSStr) >(_SC("FromStr"), &GetCircle)
|
|
.StaticOverload< const Circle & (*)(CSStr, SQChar) >(_SC("FromStr"), &GetCircle)
|
|
);
|
|
}
|
|
|
|
} // Namespace:: SqMod
|