ftp.nice.ch/pub/next/graphics/3d/Sphere.1.0.N.bs.tar.gz#/Sphere/IB-Sphere/SphereView.m

This is SphereView.m in view mode; [Download] [Up]

/* Generated by Interface Builder */

#import "SphereView.h"
#import "SphereControl.h"
#import "SphereDrawerObject.h"
#import <appkit/appkit.h>
#import <dpsclient/wraps.h>

@implementation SphereView

- initFrame:(const NXRect *)r
{
	[super initFrame:r];
	return self;
}

- drawSelf:(const NXRect *)r: (int)c;
{
	if ([sphereControlPtr readShadeFlag]) PSsetgray(0.333);
	else PSsetgray(1.0);
	NXRectFill(r);
	PSsetgray(0.0);
	NXFrameRect(r);
	[sphereDrawerObjectPtr computeSphere];
	return self;
}
@end

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.