/***************************************************************************
                            KRandomSequence.m -  description
                             -------------------
    begin                : Fri Mar  8 13:55:08 2002
    copyright            : (C) 2000-2002 Lost Highway Ltd. All rights reserved.
    email                : Lost_Highway@tipitina.demon.co.uk
    generated by         : duke@tipitina on Fri Mar  8 13:55:08 2002, using kalyptus 0.9.
 ***************************************************************************/

/***************************************************************************
 *                                                                         *
 *   This library is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU Library General Public License as       *
 *   published by the Free Software Foundation; either version 2 of the    *
 *   License, or (at your option) any later version.                       *
 *                                                                         *
 ***************************************************************************/

#include <qtc/qt_QString.h>
#include <qtc/qt_QCString.h>
#include <kdec/kde_KRandomSequence.h>
#include <kdeobjc/KDESupport.h>
#include <kdeobjc/KRandomSequence.h>


@implementation  KRandomSequence

- (void *) qt
{
	return _qt;
}

- setQt: (void *) qt
{
	_qt = qt;
	return self;
}

- (BOOL) allocatedInObjcWorld
{
	return _allocatedInObjcWorld;
}

- setAllocatedInObjcWorld: (BOOL) yn
{
	_allocatedInObjcWorld = yn;
	return self;
}


- initWithLong: (long)lngSeed
{
	if ([self qt] == 0L) {
		[self setQt: kde_new_KRandomSequence((long)lngSeed)];
		[self setAllocatedInObjcWorld: YES];
		[QtSupport setObject: self forQtKey: [self qt]];
	}
	[super init];
	return self;
}

- init
{
	if ([self qt] == 0L) {
		[self setQt: kde_new_KRandomSequence(0)];
		[self setAllocatedInObjcWorld: YES];
		[QtSupport setObject: self forQtKey: [self qt]];
	}
	[super init];
	return self;
}

- (void) dealloc
{
	if ([self qt] != 0L) {
		if ([self allocatedInObjcWorld]) {
			kde_del_KRandomSequence((kde_KRandomSequence *)[self qt]);
		}
		[QtSupport removeQtKey: [self qt]];
		[self setQt: 0L];
	}
	[super dealloc];
}

- copyWithZone: (NSZone *) zone
{
	KRandomSequence * aCopy;
	aCopy = [[(KRandomSequence *)[[self class] allocWithZone: zone] setQt: kde_new_KRandomSequence1([self qt])] init];
	[aCopy setAllocatedInObjcWorld: YES];
	[QtSupport setObject: aCopy forQtKey: [aCopy qt]];
	return aCopy;
}

- setSeed: (long)lngSeed
{
	kde_KRandomSequence_setSeed((kde_KRandomSequence *)[self qt], (long)lngSeed);
	return self;
}

- setSeed
{
	kde_KRandomSequence_setSeed((kde_KRandomSequence *)[self qt], 1);
	return self;
}

- (double) getDouble
{
	return (double) kde_KRandomSequence_getDouble((kde_KRandomSequence *)[self qt]);
}

- (unsigned long) getLong: (unsigned long)max
{
	return (unsigned long) kde_KRandomSequence_getLong((kde_KRandomSequence *)[self qt], (unsigned long)max);
}

- (BOOL) getBool
{
	return (BOOL) kde_KRandomSequence_getBool((kde_KRandomSequence *)[self qt]);
}

//- randomize: (QGList*)list
//{
//	kde_KRandomSequence_randomize((kde_KRandomSequence *)[self qt], (qt_QGList*) [list qt]);
//	return self;
//}

- modulate: (int)i
{
	kde_KRandomSequence_modulate((kde_KRandomSequence *)[self qt], (int)i);
	return self;
}

@end
