quakeforge/ruamoko/gui/Point.r
Bill Currie ec26083228 start working on a gui lib with a Slider class. use the slider class for
the volume settings. doesn't /quite/ work properly yet
2004-02-03 08:31:26 +00:00

64 lines
746 B
R

#include "gui/Point.h"
@implementation Point
- (id) initWithComponents: (integer)_x : (integer)_y
{
self = [super init];
x = _x;
y = _y;
return self;
}
- (id) initWithPoint: (Point) aPoint
{
self = [super init];
if (!self || !aPoint)
return NIL;
x = [aPoint x];
y = [aPoint y];
return self;
}
- (id) copy
{
local id myCopy = [super copy];
if (!myCopy)
myCopy = [[self class] alloc];
return [myCopy initWithComponents: x : y];
}
- (integer) x
{
return x;
}
- (integer) y
{
return y;
}
- (void) setPoint: (Point)aPoint
{
x = [aPoint x];
y = [aPoint y];
}
- (void) addPoint: (Point) aPoint
{
x += [aPoint x];
y += [aPoint y];
}
- (void) subtractPoint: (Point) aPoint
{
x -= [aPoint x];
y -= [aPoint y];
}
@end