buyhold.m

仿真人工金融市场Jackson代码

//  BuyHold.m
//  This file defines the method of stock valuation for
//  fundamental traders....
//     -- this trader just retains the initial endowment and
//	  all periodic cash flow resulting from those positions.
//     -- we will use this individual to derive the fundamental
//	  price
//



#import "BuyHold.h"

// Implementation of a fundamental trader ..

@implementation BuyHold

- (double) getRiskyValue
{
   if (diagLevel & METHOD_ENTRY) 
     printf("*** getRiskyValue (BuyHold) entry\n");

  return (riskyValue);
}

-balancePort {

  // BASE BuyHold trader does NO rebalancing.
  return self;
}

-step {

   if ((diagLevel & METHOD_ENTRY) ||
       (diagLevel & METHOD_SCHED)) 
     printf("*** step (BuyHold) entry\n");

   liqNeeds = [self getLiqNeeds];

   wealth = [self getWealth];

   if (diagLevel & TRADER_WEALTH) {
     printf("<%s> wealth is <%f>", [self getName], wealth);
     printf("  riskyU <%f> riskLU <%f> C <%f>\n", 
       riskyUnits, riskLessUnits, cash);
   }

   [self balancePort];

   return self;
}

@end