ftp.nice.ch/pub/next/games/fun/Fortune.s.tar.gz#/Fortune/Fortune_main.m

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

/*
 *     Generated by the NeXT Interface Builder.
 */

#import <stdlib.h>
#import <appkit/Application.h>

void main(int argc, char *argv[])
{
    long srandom();
    int getpid();
    
    NXApp = [Application new];
    [NXApp loadNibSection:"Fortune.nib" owner:NXApp];
    srandom(getpid());
    [NXApp activateSelf:YES];
    [NXApp run];
    [NXApp free];
    exit(0);
}

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