home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TAS407.ZIP / MOVA.PTS < prev    next >
Encoding:
Text File  |  1991-06-20  |  236 b   |  12 lines
  1. #PROFIT_TEST  BOTH    20000 
  2. #PROFIT_COMM  SCHWAB ROUNDLOTS  1 - NEXT AVERAGE  
  3. #PROFIT_OUTPUT  DETAIL
  4. F1 : ARRAY;
  5. PLOT BEGIN
  6. F1 = MOV(C,21,'E');
  7. END; { of PLOT BEGIN}
  8. C1 = C > F1;
  9. C2 = C < F1;
  10. BUY WHEN (C1);
  11. SELL WHEN (C2);
  12.