Trading Strategies from Active Trader Magazine

Keltner Classic System

This system test requires several settings be made in addition to the formula. It can only be used in MetaStock 8.0 or latter. To create this system:

  • Select the Enhanced System tester from the Tools menu
  • Click New
  • Enter the name of the system
  • Select the Buy Order tab and enter the following formula:

    new:=roc(month(),1,$)<>0;
    H>ref(highestsince(7,new,H),-1)

  • Set the enter size dropdown to "Number of Units"
  • Click the italics f to the right of the space for the Limit or Stop Price
  • In the window that appears, enter the following formula:

    equity:=Simulation.AccountCash+Simulation.AccountBorrowed+
    Simulation.PortfolioValue+Simulation.AccountReserved;
    ub:=MOV((H+L+C)/3,10,S) + MOV((H-L),10,S);
    lb:=MOV((H+L+C)/3,10,S) - MOV((H-L),10,S);
    (equity*.02)/(ub-lb)

  • Select the Sell order tab and enter this formula:

    ub:=MOV((H+L+C)/3,10,S) + MOV((H-L),10,S);
    lb:=MOV((H+L+C)/3,10,S) - MOV((H-L),10,S);
    cross(lb,c)

  • Select the Sell Short Order tab and enter the following formula:

    ub:=MOV((H+L+C)/3,10,S) + MOV((H-L),10,S)
    lb:=MOV((H+L+C)/3,10,S) - MOV((H-L),10,S);
    cross(lb,c)

  • Set the enter size dropdown to "Number of Units"
  • Click the italics f to the right of the space for the Limit or Stop Price
  • In the window that appears, enter the following formula:

    equity:=Simulation.AccountCash+Simulation.AccountBorrowed+
    Simulation.PortfolioValue+Simulation.AccountReserved;
    ub:=MOV((H+L+C)/3,10,S) + MOV((H-L),10,S);
    lb:=MOV((H+L+C)/3,10,S) - MOV((H-L),10,S);
    (equity*.02)/(ub-lb)

  • Select the Buy to Cover order tab and enter this formula:

    ub:=MOV((H+L+C)/3,10,S) + MOV((H-L),10,S);
    lb:=MOV((H+L+C)/3,10,S) - MOV((H-L),10,S);
    cross(c,ub)


Sign in to MetaStock.com