ftp.nice.ch/pub/next/games/card/NeXTmille.2.0.s.tar.gz#/NeXTmille-2.0a/DrawPileStackView.m

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

/* Generated by Interface Builder */

#import "DrawPileStackView.h"

@implementation DrawPileStackView


- setCardCountFormCell:anObject
{


    cardCountFormCell = anObject;
    [ cardCountFormCell setIntValue:0 ];
    
    return self;
}


- addCard:( CardView * )aCard :sender
{

	int		count = [ cardCountFormCell intValue ];
	
	
	[ cardCountFormCell setIntValue:( count + 1 ) ];
	[ super addCard:aCard :sender ];

	return self;
}


- removeCard:( CardView * )aCard :sender
{

	int		count = [ cardCountFormCell intValue ];
	
	
	[ cardCountFormCell setIntValue:( count - 1 ) ];
	[ super removeCard:aCard :sender ];

	return self;
}


- ( int )cardsInPile
{


	return [ cardCountFormCell intValue ];
}


@end

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