This is XWSun.m in view mode; [Download] [Up]
#import "XWSun.h"
@implementation XWSun
- activate:sender :(int)tag
{
NXSize tsize = {24,24};
NXSize t2 = {12, 12};
[super activate:sender :tag];
[self reinitWithImage:"sun"
frameSize:&tsize
numFrames:6
shape: CIRCLE
alliance: DESTROYALL
radius: 8
buffered: YES
x: 0
y: 0
theta: 0
vel: 0
interval: 50
distToCorner: &t2];
return self;
}
- performCollisionWith:(Actor *) dude
{
// don't go away
return self;
}
@end
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.