PureBytes Links
Trading Reference Links
|
Hello,
You have a typo here:
shapePositonAbove
instead of
shapePositionAbove
But...
You should not use shapePositionAbove with ANY of shapes that have UP or DOWN
in the constant name because they already contain information about positions.
"UP" shapes are ALWAYS positioned below line
"DOWN" shapes are ALWAYS positioned above line
The numerical values are
shapeUpArrow = 1
shapeDownArrow = 2
shapeHollowUpArrow = 3;
shapePositonAbove = 1
if you write (shapeDownArrow + shapePositonAbove) (2+1) you get shapeHollowUpArrow (3)
instead of down arrow positioned above line.
shapePositonAbove should be used ONLY for shapeSmallSquare and higher shapes.
If you really want to move them along you may use offset parameter of plotshapes
Best regards,
Tomasz Janeczko
amibroker.com
----- Original Message -----
From: "jnk1997" <jnk1997@xxxxxxxxx>
To: <amibroker@xxxxxxxxxxxxxxx>
Sent: Sunday, May 18, 2003 7:33 PM
Subject: [amibroker] Thomasz : Re: TJ; RE: AB 4.37 Release Bug Clarification
> Thank you Thomasz the OptZig works now with no error.
> Have you looked at this error message and code?
>
> > 2) The second Indicator error is reported as:
> >
> > Line 174, Column 19:
> > /////////////////////
> >
> > PlotShapes( IIf( BuyNow, shapeSmallUpTriangle + shapePositonAbove,
> > shapeNone ), colorBrightGreen );
> > --------------------------------------------------------------------
> --
> > ----------------------------^
> >
> > Variable 'shapepositonabove' used without having been initialized.
> >
> >
> > For code:
> >
> > /* Asymetrical Market Profile Band System v1*/
> >
> > /* Author Marc Valley */
> >
> > per1 = 256; //Optimize("Per1",1,1,20,1);
> > per2 = Optimize("Per2",14,1,20,1);
> > HistVol= 100*sqrt(260 )*StDev((Close-Ref(Close,-1))/Close,per1 );
> > Ga = DEMA(HistVol,per1 );
> > G1 = DEMA(RSI(per2 ),per2 );
> > G2= (((G1 *Avg)* MA(V,per1))*Ga);
> > G0 = BBandTop(G2, 11, 1.00);
> > G3 = BBandBot(G2, 11, .95);
> > G4 = ValueWhen(LLV(G2,2), G2, 1);
> > /*HistVol= 100*sqrt(260)*StDev((Close-Ref(Close,-1))/Close,256);
> > Ga = DEMA(HistVol,256);
> > G1 = DEMA(DEMA(RSI(14),14),14);
> > G2= (((G1 *Avg)* MA(V,256))*Ga);
> > G0 = BBandTop(G2, 11, 1.00);
> > G3 = BBandBot(G2, 11, .95);
> > G4 = ValueWhen(LLV(G2,2), G2, 1);
> > /********************/
> > /* A theoretical trading system for RSI(14)*/
> >
> > /*(it is not proper for real trading)*/
> > //perc=3;//calibrate the sensitivity
> > //Var= G2; //RSI(14);//Your variable input
> > //C1=PeakBars(Var,perc)==0;//peak condition
> > //C2=TroughBars(Var,perc)==0;//trough condition
> > /*Filter=C1 OR C2;//To find peak or trough dates
> > AddColumn(IIf(C1,Var,0),"PEAK",1.2);//To read peak values
> > AddColumn(IIf(C2,Var,0),"TROUGH",1.2);//To read trough values
> > Buy=C2;//Buy at trough
> > Sell=C1;//Sell at peak
> > Buy=ExRem(Buy,Sell);Sell=ExRem(Sell,Buy);
> > Short=Sell;//A first approach short condition
> > Cover=Buy;//A first approach cover condition
> > Short=ExRem(Short,Cover);Cover=ExRem(Cover,Short); */
> > //perc=40;//calibrate the sensitivity;
> > //Var=RSI(14);//Your variable input
> >
> > Plot(G2,"G2",1,4); //BLACK
> > ///////////Plot(Peak(g2,1,1),"Peak",2,4);
> > ///////////Plot(Trough(g2,1,1),"Trough",2,4);
> > Plot(G0,"BH",4,4); //RED
> > Plot(G3,"BL",5,4); //GREEN
> > //Plot(G4,"G4",colorLightGrey,styleHistogram);
> > //Plot(Var,"BAND Trend System V1",1,1);
> > //////////Plot(Zig(Var,perc),"Zig",2,4); //PLOT ZIG LINE FOR VIEWING
> > PURPOSES ONLY
> >
> > //Plot(C1*g2,"C1",4,6);
> > //Plot(C2*g2,"C2",5,6);
> >
> > ///////////////
> > BuyNow = Cross(G2,G3); // OR Cross(G2,G0);
> > SellNow = Cross(G0,G2);// OR Cross(G2,G3);
> > Buy = BuyNow;
> > Sell = SellNow;
> > Short=Sell;
> > //ShortPrice =Sell;
> >
> > Cover=Buy;
> > //CoverPrice= Cover;
> > Buy=ExRem(Buy,Sell);
> > Sell=ExRem(Sell,Buy);
> > Short=ExRem(Short,Cover);
> > Cover=ExRem(Cover,Short);
> > Equity(1);
> >
> > /////////////////////
> >
> > PlotShapes( IIf( BuyNow, shapeSmallUpTriangle + shapePositonAbove,
> > shapeNone ), colorBrightGreen );
> > PlotShapes( IIf( SellNow, shapeSmallDownTriangle +
> shapePositonAbove,
> > shapeNone ), colorRed )
> > GraphXSpace = 2;
> > GraphZOrder = 1;
> >
> >
> >
> >
> >
> >
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> --- In amibroker@xxxxxxxxxxxxxxx, "Tomasz Janeczko" <amibroker@xxxx>
> wrote:
> > Hello,
> >
> > In your VBScript section replace:
> > ' Initialize Variables
> > FirstBar = UBound(Trades) - (TestPeriod(0) - 1)
> >
> > with
> >
> > ' Initialize Variables
> > FirstBar = UBound(Trades) - (TestPeriod - 1)
> >
> > (you get type mismatch because you are referencing TestPeriod
> > as array while it is just scalar)
> >
> > Best regards,
> > Tomasz Janeczko
> > amibroker.com
> > ----- Original Message -----
> > From: "jnk1997" <jnk1997@xxxx>
> > To: <amibroker@xxxxxxxxxxxxxxx>
> > Sent: Sunday, May 18, 2003 6:26 PM
> > Subject: [amibroker] Re: TJ; RE: AB 4.37 Release Bug Clarification
> >
> >
> > > I apologize, I had a little trouble with my desktop AB after the
> 4.37
> > > install and the following indicators (fired up my laptop, older
> AB to
> > > see which ones the were)
> > > This IS accurate now complete with error codes, the firs code is
> > > rather long but please scroll down to see the second indicator
> error
> > > also.
> > >
> > > Thanks
> > > Jim
> > >
> > > 1) The error is reported as :
> > >
> > > Source: Microsoft VBScript runtime error
> > > Line: 13 Char: 3
> > > Error: 0 - Type mismatch: 'TestPeriod'
> > >
> > > --^
> > > The Code:
> > >
> > > // Optimized ZigZag by Steve Dugas ( sjdugas@xxxx )
> > >
> > > TestPeriods = 126; // # of periods to use for backtest
> > > SignalArray = Close; // array used to determine trade signals
> and
> > > also plot Zig
> > > AcctEquity = 20000; // initial equity
> > > Commission = 11; // dollars per trade
> > > TradeDelay = 1; // number of days after signal to execute
> trade
> > > ExecuteArray = Open; // array used for executing trades
> > > AmtPerTrade = 100; // specify amount to risk per trade (see
> > > PctOrUnits, next)
> > > PctOrUnits = 1; // for AmtPerTrade (above), 1 = %, 0 =
> units of
> > > currency
> > > Margin = 100; // % equity to use (1-100), 100 = no
> margin,
> > > 50 = 50% margin
> > >
> > > ZigValue01 = Zig(SignalArray,1);
> > > ZigValue02 = Zig(SignalArray,2);
> > > ZigValue03 = Zig(SignalArray,3);
> > > ZigValue04 = Zig(SignalArray,4);
> > > ZigValue05 = Zig(SignalArray,5);
> > > ZigValue06 = Zig(SignalArray,6);
> > > ZigValue07 = Zig(SignalArray,7);
> > > ZigValue08 = Zig(SignalArray,8);
> > > ZigValue09 = Zig(SignalArray,9);
> > > ZigValue10 = Zig(SignalArray,10);
> > > ZigValue11 = Zig(SignalArray,11);
> > > ZigValue12 = Zig(SignalArray,12);
> > > ZigValue13 = Zig(SignalArray,13);
> > > ZigValue14 = Zig(SignalArray,14);
> > > ZigValue15 = Zig(SignalArray,15);
> > > ZigValue16 = Zig(SignalArray,16);
> > > ZigValue17 = Zig(SignalArray,17);
> > > ZigValue18 = Zig(SignalArray,18);
> > > ZigValue19 = Zig(SignalArray,19);
> > > ZigValue20 = Zig(SignalArray,20);
> > > ZigValue21 = Zig(SignalArray,21);
> > > ZigValue22 = Zig(SignalArray,22);
> > > ZigValue23 = Zig(SignalArray,23);
> > > ZigValue24 = Zig(SignalArray,24);
> > > ZigValue25 = Zig(SignalArray,25);
> > > ZigValue26 = Zig(SignalArray,26);
> > > ZigValue27 = Zig(SignalArray,27);
> > > ZigValue28 = Zig(SignalArray,28);
> > > ZigValue29 = Zig(SignalArray,29);
> > > ZigValue30 = Zig(SignalArray,30);
> > > ZigValue31 = Zig(SignalArray,31);
> > > ZigValue32 = Zig(SignalArray,32);
> > > ZigValue33 = Zig(SignalArray,33);
> > > ZigValue34 = Zig(SignalArray,34);
> > > ZigValue35 = Zig(SignalArray,35);
> > > ZigValue36 = Zig(SignalArray,36);
> > > ZigValue37 = Zig(SignalArray,37);
> > > ZigValue38 = Zig(SignalArray,38);
> > > ZigValue39 = Zig(SignalArray,39);
> > > ZigValue40 = Zig(SignalArray,40);
> > > ZigValue41 = Zig(SignalArray,41);
> > > ZigValue42 = Zig(SignalArray,42);
> > > ZigValue43 = Zig(SignalArray,43);
> > > ZigValue44 = Zig(SignalArray,44);
> > > ZigValue45 = Zig(SignalArray,45);
> > > ZigValue46 = Zig(SignalArray,46);
> > > ZigValue47 = Zig(SignalArray,47);
> > > ZigValue48 = Zig(SignalArray,48);
> > >
> > > PeakSigs01 = ZigValue01 < Ref(ZigValue01,-1) AND Ref(ZigValue01,-
> 1) >
> > > Ref(ZigValue01,-2);
> > > PeakSigs02 = ZigValue02 < Ref(ZigValue02,-1) AND Ref(ZigValue02,-
> 1) >
> > > Ref(ZigValue02,-2);
> > > PeakSigs03 = ZigValue03 < Ref(ZigValue03,-1) AND Ref(ZigValue03,-
> 1) >
> > > Ref(ZigValue03,-2);
> > > PeakSigs04 = ZigValue04 < Ref(ZigValue04,-1) AND Ref(ZigValue04,-
> 1) >
> > > Ref(ZigValue04,-2);
> > > PeakSigs05 = ZigValue05 < Ref(ZigValue05,-1) AND Ref(ZigValue05,-
> 1) >
> > > Ref(ZigValue05,-2);
> > > PeakSigs06 = ZigValue06 < Ref(ZigValue06,-1) AND Ref(ZigValue06,-
> 1) >
> > > Ref(ZigValue06,-2);
> > > PeakSigs07 = ZigValue07 < Ref(ZigValue07,-1) AND Ref(ZigValue07,-
> 1) >
> > > Ref(ZigValue07,-2);
> > > PeakSigs08 = ZigValue08 < Ref(ZigValue08,-1) AND Ref(ZigValue08,-
> 1) >
> > > Ref(ZigValue08,-2);
> > > PeakSigs09 = ZigValue09 < Ref(ZigValue09,-1) AND Ref(ZigValue09,-
> 1) >
> > > Ref(ZigValue09,-2);
> > > PeakSigs10 = ZigValue10 < Ref(ZigValue10,-1) AND Ref(ZigValue10,-
> 1) >
> > > Ref(ZigValue10,-2);
> > > PeakSigs11 = ZigValue11 < Ref(ZigValue11,-1) AND Ref(ZigValue11,-
> 1) >
> > > Ref(ZigValue11,-2);
> > > PeakSigs12 = ZigValue12 < Ref(ZigValue12,-1) AND Ref(ZigValue12,-
> 1) >
> > > Ref(ZigValue12,-2);
> > > PeakSigs13 = ZigValue13 < Ref(ZigValue13,-1) AND Ref(ZigValue13,-
> 1) >
> > > Ref(ZigValue13,-2);
> > > PeakSigs14 = ZigValue14 < Ref(ZigValue14,-1) AND Ref(ZigValue14,-
> 1) >
> > > Ref(ZigValue14,-2);
> > > PeakSigs15 = ZigValue15 < Ref(ZigValue15,-1) AND Ref(ZigValue15,-
> 1) >
> > > Ref(ZigValue15,-2);
> > > PeakSigs16 = ZigValue16 < Ref(ZigValue16,-1) AND Ref(ZigValue16,-
> 1) >
> > > Ref(ZigValue16,-2);
> > > PeakSigs17 = ZigValue17 < Ref(ZigValue17,-1) AND Ref(ZigValue17,-
> 1) >
> > > Ref(ZigValue17,-2);
> > > PeakSigs18 = ZigValue18 < Ref(ZigValue18,-1) AND Ref(ZigValue18,-
> 1) >
> > > Ref(ZigValue18,-2);
> > > PeakSigs19 = ZigValue19 < Ref(ZigValue19,-1) AND Ref(ZigValue19,-
> 1) >
> > > Ref(ZigValue19,-2);
> > > PeakSigs20 = ZigValue20 < Ref(ZigValue20,-1) AND Ref(ZigValue20,-
> 1) >
> > > Ref(ZigValue20,-2);
> > > PeakSigs21 = ZigValue21 < Ref(ZigValue21,-1) AND Ref(ZigValue21,-
> 1) >
> > > Ref(ZigValue21,-2);
> > > PeakSigs22 = ZigValue22 < Ref(ZigValue22,-1) AND Ref(ZigValue22,-
> 1) >
> > > Ref(ZigValue22,-2);
> > > PeakSigs23 = ZigValue23 < Ref(ZigValue23,-1) AND Ref(ZigValue23,-
> 1) >
> > > Ref(ZigValue23,-2);
> > > PeakSigs24 = ZigValue24 < Ref(ZigValue24,-1) AND Ref(ZigValue24,-
> 1) >
> > > Ref(ZigValue24,-2);
> > > PeakSigs25 = ZigValue25 < Ref(ZigValue25,-1) AND Ref(ZigValue25,-
> 1) >
> > > Ref(ZigValue25,-2);
> > > PeakSigs26 = ZigValue26 < Ref(ZigValue26,-1) AND Ref(ZigValue26,-
> 1) >
> > > Ref(ZigValue26,-2);
> > > PeakSigs27 = ZigValue27 < Ref(ZigValue27,-1) AND Ref(ZigValue27,-
> 1) >
> > > Ref(ZigValue27,-2);
> > > PeakSigs28 = ZigValue28 < Ref(ZigValue28,-1) AND Ref(ZigValue28,-
> 1) >
> > > Ref(ZigValue28,-2);
> > > PeakSigs29 = ZigValue29 < Ref(ZigValue29,-1) AND Ref(ZigValue29,-
> 1) >
> > > Ref(ZigValue29,-2);
> > > PeakSigs30 = ZigValue30 < Ref(ZigValue30,-1) AND Ref(ZigValue30,-
> 1) >
> > > Ref(ZigValue30,-2);
> > > PeakSigs31 = ZigValue31 < Ref(ZigValue31,-1) AND Ref(ZigValue31,-
> 1) >
> > > Ref(ZigValue31,-2);
> > > PeakSigs32 = ZigValue32 < Ref(ZigValue32,-1) AND Ref(ZigValue32,-
> 1) >
> > > Ref(ZigValue32,-2);
> > > PeakSigs33 = ZigValue33 < Ref(ZigValue33,-1) AND Ref(ZigValue33,-
> 1) >
> > > Ref(ZigValue33,-2);
> > > PeakSigs34 = ZigValue34 < Ref(ZigValue34,-1) AND Ref(ZigValue34,-
> 1) >
> > > Ref(ZigValue34,-2);
> > > PeakSigs35 = ZigValue35 < Ref(ZigValue35,-1) AND Ref(ZigValue35,-
> 1) >
> > > Ref(ZigValue35,-2);
> > > PeakSigs36 = ZigValue36 < Ref(ZigValue36,-1) AND Ref(ZigValue36,-
> 1) >
> > > Ref(ZigValue36,-2);
> > > PeakSigs37 = ZigValue37 < Ref(ZigValue37,-1) AND Ref(ZigValue37,-
> 1) >
> > > Ref(ZigValue37,-2);
> > > PeakSigs38 = ZigValue38 < Ref(ZigValue38,-1) AND Ref(ZigValue38,-
> 1) >
> > > Ref(ZigValue38,-2);
> > > PeakSigs39 = ZigValue39 < Ref(ZigValue39,-1) AND Ref(ZigValue39,-
> 1) >
> > > Ref(ZigValue39,-2);
> > > PeakSigs40 = ZigValue40 < Ref(ZigValue40,-1) AND Ref(ZigValue40,-
> 1) >
> > > Ref(ZigValue40,-2);
> > > PeakSigs41 = ZigValue41 < Ref(ZigValue41,-1) AND Ref(ZigValue41,-
> 1) >
> > > Ref(ZigValue41,-2);
> > > PeakSigs42 = ZigValue42 < Ref(ZigValue42,-1) AND Ref(ZigValue42,-
> 1) >
> > > Ref(ZigValue42,-2);
> > > PeakSigs43 = ZigValue43 < Ref(ZigValue43,-1) AND Ref(ZigValue43,-
> 1) >
> > > Ref(ZigValue43,-2);
> > > PeakSigs44 = ZigValue44 < Ref(ZigValue44,-1) AND Ref(ZigValue44,-
> 1) >
> > > Ref(ZigValue44,-2);
> > > PeakSigs45 = ZigValue45 < Ref(ZigValue45,-1) AND Ref(ZigValue45,-
> 1) >
> > > Ref(ZigValue45,-2);
> > > PeakSigs46 = ZigValue46 < Ref(ZigValue46,-1) AND Ref(ZigValue46,-
> 1) >
> > > Ref(ZigValue46,-2);
> > > PeakSigs47 = ZigValue47 < Ref(ZigValue47,-1) AND Ref(ZigValue47,-
> 1) >
> > > Ref(ZigValue47,-2);
> > > PeakSigs48 = ZigValue48 < Ref(ZigValue48,-1) AND Ref(ZigValue48,-
> 1) >
> > > Ref(ZigValue48,-2);
> > >
> > > TroughSigs01 = ZigValue01 > Ref(ZigValue01,-1) AND Ref
> (ZigValue01,-1)
> > > < Ref(ZigValue01,-2);
> > > TroughSigs02 = ZigValue02 > Ref(ZigValue02,-1) AND Ref
> (ZigValue02,-1)
> > > < Ref(ZigValue02,-2);
> > > TroughSigs03 = ZigValue03 > Ref(ZigValue03,-1) AND Ref
> (ZigValue03,-1)
> > > < Ref(ZigValue03,-2);
> > > TroughSigs04 = ZigValue04 > Ref(ZigValue04,-1) AND Ref
> (ZigValue04,-1)
> > > < Ref(ZigValue04,-2);
> > > TroughSigs05 = ZigValue05 > Ref(ZigValue05,-1) AND Ref
> (ZigValue05,-1)
> > > < Ref(ZigValue05,-2);
> > > TroughSigs06 = ZigValue06 > Ref(ZigValue06,-1) AND Ref
> (ZigValue06,-1)
> > > < Ref(ZigValue06,-2);
> > > TroughSigs07 = ZigValue07 > Ref(ZigValue07,-1) AND Ref
> (ZigValue07,-1)
> > > < Ref(ZigValue07,-2);
> > > TroughSigs08 = ZigValue08 > Ref(ZigValue08,-1) AND Ref
> (ZigValue08,-1)
> > > < Ref(ZigValue08,-2);
> > > TroughSigs09 = ZigValue09 > Ref(ZigValue09,-1) AND Ref
> (ZigValue09,-1)
> > > < Ref(ZigValue09,-2);
> > > TroughSigs10 = ZigValue10 > Ref(ZigValue10,-1) AND Ref
> (ZigValue10,-1)
> > > < Ref(ZigValue10,-2);
> > > TroughSigs11 = ZigValue11 > Ref(ZigValue11,-1) AND Ref
> (ZigValue11,-1)
> > > < Ref(ZigValue11,-2);
> > > TroughSigs12 = ZigValue12 > Ref(ZigValue12,-1) AND Ref
> (ZigValue12,-1)
> > > < Ref(ZigValue12,-2);
> > > TroughSigs13 = ZigValue13 > Ref(ZigValue13,-1) AND Ref
> (ZigValue13,-1)
> > > < Ref(ZigValue13,-2);
> > > TroughSigs14 = ZigValue14 > Ref(ZigValue14,-1) AND Ref
> (ZigValue14,-1)
> > > < Ref(ZigValue14,-2);
> > > TroughSigs15 = ZigValue15 > Ref(ZigValue15,-1) AND Ref
> (ZigValue15,-1)
> > > < Ref(ZigValue15,-2);
> > > TroughSigs16 = ZigValue16 > Ref(ZigValue16,-1) AND Ref
> (ZigValue16,-1)
> > > < Ref(ZigValue16,-2);
> > > TroughSigs17 = ZigValue17 > Ref(ZigValue17,-1) AND Ref
> (ZigValue17,-1)
> > > < Ref(ZigValue17,-2);
> > > TroughSigs18 = ZigValue18 > Ref(ZigValue18,-1) AND Ref
> (ZigValue18,-1)
> > > < Ref(ZigValue18,-2);
> > > TroughSigs19 = ZigValue19 > Ref(ZigValue19,-1) AND Ref
> (ZigValue19,-1)
> > > < Ref(ZigValue19,-2);
> > > TroughSigs20 = ZigValue20 > Ref(ZigValue20,-1) AND Ref
> (ZigValue20,-1)
> > > < Ref(ZigValue20,-2);
> > > TroughSigs21 = ZigValue21 > Ref(ZigValue21,-1) AND Ref
> (ZigValue21,-1)
> > > < Ref(ZigValue21,-2);
> > > TroughSigs22 = ZigValue22 > Ref(ZigValue22,-1) AND Ref
> (ZigValue22,-1)
> > > < Ref(ZigValue22,-2);
> > > TroughSigs23 = ZigValue23 > Ref(ZigValue23,-1) AND Ref
> (ZigValue23,-1)
> > > < Ref(ZigValue23,-2);
> > > TroughSigs24 = ZigValue24 > Ref(ZigValue24,-1) AND Ref
> (ZigValue24,-1)
> > > < Ref(ZigValue24,-2);
> > > TroughSigs25 = ZigValue25 > Ref(ZigValue25,-1) AND Ref
> (ZigValue25,-1)
> > > < Ref(ZigValue25,-2);
> > > TroughSigs26 = ZigValue26 > Ref(ZigValue26,-1) AND Ref
> (ZigValue26,-1)
> > > < Ref(ZigValue26,-2);
> > > TroughSigs27 = ZigValue27 > Ref(ZigValue27,-1) AND Ref
> (ZigValue27,-1)
> > > < Ref(ZigValue27,-2);
> > > TroughSigs28 = ZigValue28 > Ref(ZigValue28,-1) AND Ref
> (ZigValue28,-1)
> > > < Ref(ZigValue28,-2);
> > > TroughSigs29 = ZigValue29 > Ref(ZigValue29,-1) AND Ref
> (ZigValue29,-1)
> > > < Ref(ZigValue29,-2);
> > > TroughSigs30 = ZigValue30 > Ref(ZigValue30,-1) AND Ref
> (ZigValue30,-1)
> > > < Ref(ZigValue30,-2);
> > > TroughSigs31 = ZigValue31 > Ref(ZigValue31,-1) AND Ref
> (ZigValue31,-1)
> > > < Ref(ZigValue31,-2);
> > > TroughSigs32 = ZigValue32 > Ref(ZigValue32,-1) AND Ref
> (ZigValue32,-1)
> > > < Ref(ZigValue32,-2);
> > > TroughSigs33 = ZigValue33 > Ref(ZigValue33,-1) AND Ref
> (ZigValue33,-1)
> > > < Ref(ZigValue33,-2);
> > > TroughSigs34 = ZigValue34 > Ref(ZigValue34,-1) AND Ref
> (ZigValue34,-1)
> > > < Ref(ZigValue34,-2);
> > > TroughSigs35 = ZigValue35 > Ref(ZigValue35,-1) AND Ref
> (ZigValue35,-1)
> > > < Ref(ZigValue35,-2);
> > > TroughSigs36 = ZigValue36 > Ref(ZigValue36,-1) AND Ref
> (ZigValue36,-1)
> > > < Ref(ZigValue36,-2);
> > > TroughSigs37 = ZigValue37 > Ref(ZigValue37,-1) AND Ref
> (ZigValue37,-1)
> > > < Ref(ZigValue37,-2);
> > > TroughSigs38 = ZigValue38 > Ref(ZigValue38,-1) AND Ref
> (ZigValue38,-1)
> > > < Ref(ZigValue38,-2);
> > > TroughSigs39 = ZigValue39 > Ref(ZigValue39,-1) AND Ref
> (ZigValue39,-1)
> > > < Ref(ZigValue39,-2);
> > > TroughSigs40 = ZigValue40 > Ref(ZigValue40,-1) AND Ref
> (ZigValue40,-1)
> > > < Ref(ZigValue40,-2);
> > > TroughSigs41 = ZigValue41 > Ref(ZigValue41,-1) AND Ref
> (ZigValue41,-1)
> > > < Ref(ZigValue41,-2);
> > > TroughSigs42 = ZigValue42 > Ref(ZigValue42,-1) AND Ref
> (ZigValue42,-1)
> > > < Ref(ZigValue42,-2);
> > > TroughSigs43 = ZigValue43 > Ref(ZigValue43,-1) AND Ref
> (ZigValue43,-1)
> > > < Ref(ZigValue43,-2);
> > > TroughSigs44 = ZigValue44 > Ref(ZigValue44,-1) AND Ref
> (ZigValue44,-1)
> > > < Ref(ZigValue44,-2);
> > > TroughSigs45 = ZigValue45 > Ref(ZigValue45,-1) AND Ref
> (ZigValue45,-1)
> > > < Ref(ZigValue45,-2);
> > > TroughSigs46 = ZigValue46 > Ref(ZigValue46,-1) AND Ref
> (ZigValue46,-1)
> > > < Ref(ZigValue46,-2);
> > > TroughSigs47 = ZigValue47 > Ref(ZigValue47,-1) AND Ref
> (ZigValue47,-1)
> > > < Ref(ZigValue47,-2);
> > > TroughSigs48 = ZigValue48 > Ref(ZigValue48,-1) AND Ref
> (ZigValue48,-1)
> > > < Ref(ZigValue48,-2);
> > >
> > > Trades01 = IIf(Ref(PeakSigs01,-TradeDelay),1,IIf(Ref
> (TroughSigs01,-
> > > TradeDelay),-1,0));
> > > Trades02 = IIf(Ref(PeakSigs02,-TradeDelay),1,IIf(Ref
> (TroughSigs02,-
> > > TradeDelay),-1,0));
> > > Trades03 = IIf(Ref(PeakSigs03,-TradeDelay),1,IIf(Ref
> (TroughSigs03,-
> > > TradeDelay),-1,0));
> > > Trades04 = IIf(Ref(PeakSigs04,-TradeDelay),1,IIf(Ref
> (TroughSigs04,-
> > > TradeDelay),-1,0));
> > > Trades05 = IIf(Ref(PeakSigs05,-TradeDelay),1,IIf(Ref
> (TroughSigs05,-
> > > TradeDelay),-1,0));
> > > Trades06 = IIf(Ref(PeakSigs06,-TradeDelay),1,IIf(Ref
> (TroughSigs06,-
> > > TradeDelay),-1,0));
> > > Trades07 = IIf(Ref(PeakSigs07,-TradeDelay),1,IIf(Ref
> (TroughSigs07,-
> > > TradeDelay),-1,0));
> > > Trades08 = IIf(Ref(PeakSigs08,-TradeDelay),1,IIf(Ref
> (TroughSigs08,-
> > > TradeDelay),-1,0));
> > > Trades09 = IIf(Ref(PeakSigs09,-TradeDelay),1,IIf(Ref
> (TroughSigs09,-
> > > TradeDelay),-1,0));
> > > Trades10 = IIf(Ref(PeakSigs10,-TradeDelay),1,IIf(Ref
> (TroughSigs10,-
> > > TradeDelay),-1,0));
> > > Trades11 = IIf(Ref(PeakSigs11,-TradeDelay),1,IIf(Ref
> (TroughSigs11,-
> > > TradeDelay),-1,0));
> > > Trades12 = IIf(Ref(PeakSigs12,-TradeDelay),1,IIf(Ref
> (TroughSigs12,-
> > > TradeDelay),-1,0));
> > > Trades13 = IIf(Ref(PeakSigs13,-TradeDelay),1,IIf(Ref
> (TroughSigs13,-
> > > TradeDelay),-1,0));
> > > Trades14 = IIf(Ref(PeakSigs14,-TradeDelay),1,IIf(Ref
> (TroughSigs14,-
> > > TradeDelay),-1,0));
> > > Trades15 = IIf(Ref(PeakSigs15,-TradeDelay),1,IIf(Ref
> (TroughSigs15,-
> > > TradeDelay),-1,0));
> > > Trades16 = IIf(Ref(PeakSigs16,-TradeDelay),1,IIf(Ref
> (TroughSigs16,-
> > > TradeDelay),-1,0));
> > > Trades17 = IIf(Ref(PeakSigs17,-TradeDelay),1,IIf(Ref
> (TroughSigs17,-
> > > TradeDelay),-1,0));
> > > Trades18 = IIf(Ref(PeakSigs18,-TradeDelay),1,IIf(Ref
> (TroughSigs18,-
> > > TradeDelay),-1,0));
> > > Trades19 = IIf(Ref(PeakSigs19,-TradeDelay),1,IIf(Ref
> (TroughSigs19,-
> > > TradeDelay),-1,0));
> > > Trades20 = IIf(Ref(PeakSigs20,-TradeDelay),1,IIf(Ref
> (TroughSigs20,-
> > > TradeDelay),-1,0));
> > > Trades21 = IIf(Ref(PeakSigs21,-TradeDelay),1,IIf(Ref
> (TroughSigs21,-
> > > TradeDelay),-1,0));
> > > Trades22 = IIf(Ref(PeakSigs22,-TradeDelay),1,IIf(Ref
> (TroughSigs22,-
> > > TradeDelay),-1,0));
> > > Trades23 = IIf(Ref(PeakSigs23,-TradeDelay),1,IIf(Ref
> (TroughSigs23,-
> > > TradeDelay),-1,0));
> > > Trades24 = IIf(Ref(PeakSigs24,-TradeDelay),1,IIf(Ref
> (TroughSigs24,-
> > > TradeDelay),-1,0));
> > > Trades25 = IIf(Ref(PeakSigs25,-TradeDelay),1,IIf(Ref
> (TroughSigs25,-
> > > TradeDelay),-1,0));
> > > Trades26 = IIf(Ref(PeakSigs26,-TradeDelay),1,IIf(Ref
> (TroughSigs26,-
> > > TradeDelay),-1,0));
> > > Trades27 = IIf(Ref(PeakSigs27,-TradeDelay),1,IIf(Ref
> (TroughSigs27,-
> > > TradeDelay),-1,0));
> > > Trades28 = IIf(Ref(PeakSigs28,-TradeDelay),1,IIf(Ref
> (TroughSigs28,-
> > > TradeDelay),-1,0));
> > > Trades29 = IIf(Ref(PeakSigs29,-TradeDelay),1,IIf(Ref
> (TroughSigs29,-
> > > TradeDelay),-1,0));
> > > Trades30 = IIf(Ref(PeakSigs30,-TradeDelay),1,IIf(Ref
> (TroughSigs30,-
> > > TradeDelay),-1,0));
> > > Trades31 = IIf(Ref(PeakSigs31,-TradeDelay),1,IIf(Ref
> (TroughSigs31,-
> > > TradeDelay),-1,0));
> > > Trades32 = IIf(Ref(PeakSigs32,-TradeDelay),1,IIf(Ref
> (TroughSigs32,-
> > > TradeDelay),-1,0));
> > > Trades33 = IIf(Ref(PeakSigs33,-TradeDelay),1,IIf(Ref
> (TroughSigs33,-
> > > TradeDelay),-1,0));
> > > Trades34 = IIf(Ref(PeakSigs34,-TradeDelay),1,IIf(Ref
> (TroughSigs34,-
> > > TradeDelay),-1,0));
> > > Trades35 = IIf(Ref(PeakSigs35,-TradeDelay),1,IIf(Ref
> (TroughSigs35,-
> > > TradeDelay),-1,0));
> > > Trades36 = IIf(Ref(PeakSigs36,-TradeDelay),1,IIf(Ref
> (TroughSigs36,-
> > > TradeDelay),-1,0));
> > > Trades37 = IIf(Ref(PeakSigs37,-TradeDelay),1,IIf(Ref
> (TroughSigs37,-
> > > TradeDelay),-1,0));
> > > Trades38 = IIf(Ref(PeakSigs38,-TradeDelay),1,IIf(Ref
> (TroughSigs38,-
> > > TradeDelay),-1,0));
> > > Trades39 = IIf(Ref(PeakSigs39,-TradeDelay),1,IIf(Ref
> (TroughSigs39,-
> > > TradeDelay),-1,0));
> > > Trades40 = IIf(Ref(PeakSigs40,-TradeDelay),1,IIf(Ref
> (TroughSigs40,-
> > > TradeDelay),-1,0));
> > > Trades41 = IIf(Ref(PeakSigs41,-TradeDelay),1,IIf(Ref
> (TroughSigs41,-
> > > TradeDelay),-1,0));
> > > Trades42 = IIf(Ref(PeakSigs42,-TradeDelay),1,IIf(Ref
> (TroughSigs42,-
> > > TradeDelay),-1,0));
> > > Trades43 = IIf(Ref(PeakSigs43,-TradeDelay),1,IIf(Ref
> (TroughSigs43,-
> > > TradeDelay),-1,0));
> > > Trades44 = IIf(Ref(PeakSigs44,-TradeDelay),1,IIf(Ref
> (TroughSigs44,-
> > > TradeDelay),-1,0));
> > > Trades45 = IIf(Ref(PeakSigs45,-TradeDelay),1,IIf(Ref
> (TroughSigs45,-
> > > TradeDelay),-1,0));
> > > Trades46 = IIf(Ref(PeakSigs46,-TradeDelay),1,IIf(Ref
> (TroughSigs46,-
> > > TradeDelay),-1,0));
> > > Trades47 = IIf(Ref(PeakSigs47,-TradeDelay),1,IIf(Ref
> (TroughSigs47,-
> > > TradeDelay),-1,0));
> > > Trades48 = IIf(Ref(PeakSigs48,-TradeDelay),1,IIf(Ref
> (TroughSigs48,-
> > > TradeDelay),-1,0));
> > >
> > > EnableScript("vbscript");
> > > <%
> > > function CalcProfit
> (ZigValue,Trades,TestPeriod,ExecArray,AcctEquity, _
> > > Commission,AmtPerTrade,PctOrUnits,Margin)
> > >
> > > ' Mark the trade that closes the final Open position
> > > if ZigValue(UBound(ZigValue)) > ZigValue(UBound(ZigValue)-1)
> Then
> > > Trades(UBound(Trades)) = 1
> > > else
> > > Trades(UBound(Trades)) = -1
> > > End if
> > >
> > > ' Initialize Variables
> > > FirstBar = UBound(Trades) - (TestPeriod(0) - 1)
> > > TotalProfit = 0
> > > PricePriorTrade = ExecArray(FirstBar)
> > > if PctOrUnits Then
> > > EquityToUse = AcctEquity*(AmtPerTrade/100)
> > > else
> > > EquityToUse = AmtPerTrade
> > > End if
> > >
> > > ' Calculate profit for this Zig % change
> > > for Bar = (FirstBar + 1) To UBound(Trades)
> > > if Trades(Bar) = 1 Then
> > > Shares = int((EquityToUse*(100/Margin))/PricePriorTrade)
> > > TradeProfit = ((ExecArray(Bar)-PricePriorTrade)*Shares)-
> > > (Commision*2)
> > > TotalProfit = TotalProfit + TradeProfit
> > > AcctEquity = AcctEquity + TradeProfit
> > > PricePriorTrade = ExecArray(Bar)
> > > ElseIf Trades(Bar) = -1 Then
> > > Shares = int((EquityToUse*(100/Margin))/PricePriorTrade)
> > > TradeProfit = ((PricePriorTrade-ExecArray(Bar))*Shares)-
> > > (Commision*2)
> > > TotalProfit = TotalProfit + TradeProfit
> > > AcctEquity = AcctEquity + TradeProfit
> > > PricePriorTrade = ExecArray(Bar)
> > > End if
> > > Next
> > >
> > > CalcProfit = TotalProfit
> > >
> > > End function
> > > %>
> > >
> > > TestPeriod = Min(TestPeriods,LastValue(Cum(1)));
> > >
> > > Script = GetScriptObject();
> > > Profit01 = script.CalcProfit
> > > (ZigValue01,Trades01,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit02 = script.CalcProfit
> > > (ZigValue02,Trades02,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit03 = script.CalcProfit
> > > (ZigValue03,Trades03,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit04 = script.CalcProfit
> > > (ZigValue04,Trades04,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit05 = script.CalcProfit
> > > (ZigValue05,Trades05,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit06 = script.CalcProfit
> > > (ZigValue06,Trades06,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit07 = script.CalcProfit
> > > (ZigValue07,Trades07,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit08 = script.CalcProfit
> > > (ZigValue08,Trades08,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit09 = script.CalcProfit
> > > (ZigValue09,Trades09,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit10 = script.CalcProfit
> > > (ZigValue10,Trades10,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit11 = script.CalcProfit
> > > (ZigValue11,Trades11,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit12 = script.CalcProfit
> > > (ZigValue12,Trades12,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit13 = script.CalcProfit
> > > (ZigValue13,Trades13,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit14 = script.CalcProfit
> > > (ZigValue14,Trades14,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit15 = script.CalcProfit
> > > (ZigValue15,Trades15,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit16 = script.CalcProfit
> > > (ZigValue16,Trades16,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit17 = script.CalcProfit
> > > (ZigValue17,Trades17,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit18 = script.CalcProfit
> > > (ZigValue18,Trades18,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit19 = script.CalcProfit
> > > (ZigValue19,Trades19,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit20 = script.CalcProfit
> > > (ZigValue20,Trades20,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit21 = script.CalcProfit
> > > (ZigValue21,Trades21,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit22 = script.CalcProfit
> > > (ZigValue22,Trades22,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit23 = script.CalcProfit
> > > (ZigValue23,Trades23,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit24 = script.CalcProfit
> > > (ZigValue24,Trades24,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit25 = script.CalcProfit
> > > (ZigValue25,Trades25,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit26 = script.CalcProfit
> > > (ZigValue26,Trades26,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit27 = script.CalcProfit
> > > (ZigValue27,Trades27,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit28 = script.CalcProfit
> > > (ZigValue28,Trades28,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit29 = script.CalcProfit
> > > (ZigValue29,Trades29,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit30 = script.CalcProfit
> > > (ZigValue30,Trades30,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit31 = script.CalcProfit
> > > (ZigValue31,Trades31,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit32 = script.CalcProfit
> > > (ZigValue32,Trades32,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit33 = script.CalcProfit
> > > (ZigValue33,Trades33,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit34 = script.CalcProfit
> > > (ZigValue34,Trades34,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit35 = script.CalcProfit
> > > (ZigValue35,Trades35,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit36 = script.CalcProfit
> > > (ZigValue36,Trades36,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit37 = script.CalcProfit
> > > (ZigValue37,Trades37,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit38 = script.CalcProfit
> > > (ZigValue38,Trades38,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit39 = script.CalcProfit
> > > (ZigValue39,Trades39,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit40 = script.CalcProfit
> > > (ZigValue40,Trades40,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit41 = script.CalcProfit
> > > (ZigValue41,Trades41,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit42 = script.CalcProfit
> > > (ZigValue42,Trades42,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit43 = script.CalcProfit
> > > (ZigValue43,Trades43,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit44 = script.CalcProfit
> > > (ZigValue44,Trades44,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit45 = script.CalcProfit
> > > (ZigValue45,Trades45,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit46 = script.CalcProfit
> > > (ZigValue46,Trades46,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit47 = script.CalcProfit
> > > (ZigValue47,Trades47,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > > Profit48 = script.CalcProfit
> > > (ZigValue48,Trades48,TestPeriod,ExecuteArray,
> > >
> > > AcctEquity,Commission,AmtPerTrade,PctOrUnits,Margin);
> > >
> > > OptProfit = Max(Max(Max(Max(Max(Max(Profit01,Profit02),Max
> > > (Profit03,Profit04)),
> > > Max(Max(Profit05,Profit06),Max
> > > (Profit07,Profit08))),
> > > Max(Max(Max(Profit09,Profit10),Max
> > > (Profit11,Profit12)),
> > > Max(Max(Profit13,Profit14),Max
> > > (Profit15,Profit16)))),
> > > Max(Max(Max(Max(Profit17,Profit18),Max
> > > (Profit19,Profit20)),
> > > Max(Max(Profit21,Profit22),Max
> > > (Profit23,Profit24))),
> > > Max(Max(Max(Profit25,Profit26),Max
> > > (Profit27,Profit28)),
> > > Max(Max(Profit29,Profit30),Max
> > > (Profit31,Profit32))))),
> > > Max(Max(Max(Max(Profit33,Profit34),Max
> > > (Profit35,Profit36)),
> > > Max(Max(Profit37,Profit38),Max
> > > (Profit39,Profit40))),
> > > Max(Max(Max(Profit41,Profit42),Max
> > > (Profit43,Profit44)),
> > > Max(Max(Profit45,Profit46),Max
> > > (Profit47,Profit48)))));
> > >
> > > OptZigPct = IIf(OptProfit==Profit01,1,
> > > IIf(OptProfit==Profit02,2,
> > > IIf(OptProfit==Profit03,3,
> > > IIf(OptProfit==Profit04,4,
> > > IIf(OptProfit==Profit05,5,
> > > IIf(OptProfit==Profit06,6,
> > > IIf(OptProfit==Profit07,7,
> > > IIf(OptProfit==Profit08,8,
> > > IIf(OptProfit==Profit09,9,
> > > IIf(OptProfit==Profit10,10,
> > > IIf(OptProfit==Profit11,11,
> > > IIf(OptProfit==Profit12,12,
> > > IIf(OptProfit==Profit13,13,
> > > IIf(OptProfit==Profit14,14,
> > > IIf(OptProfit==Profit15,15,
> > > IIf(OptProfit==Profit16,16,
> > > IIf(OptProfit==Profit17,17,
> > > IIf(OptProfit==Profit18,18,
> > > IIf(OptProfit==Profit19,19,
> > > IIf(OptProfit==Profit20,20,
> > > IIf(OptProfit==Profit21,21,
> > > IIf(OptProfit==Profit22,22,
> > > IIf(OptProfit==Profit23,23,
> > > IIf(OptProfit==Profit24,24,
> > > IIf(OptProfit==Profit25,25,
> > > IIf(OptProfit==Profit26,26,
> > > IIf(OptProfit==Profit27,27,
> > > IIf(OptProfit==Profit28,28,
> > > IIf(OptProfit==Profit29,29,
> > > IIf(OptProfit==Profit30,30,
> > > IIf(OptProfit==Profit31,31,
> > > IIf(OptProfit==Profit32,32,
> > > IIf(OptProfit==Profit33,33,
> > > IIf(OptProfit==Profit34,34,
> > > IIf(OptProfit==Profit35,35,
> > > IIf(OptProfit==Profit36,36,
> > > IIf(OptProfit==Profit37,37,
> > > IIf(OptProfit==Profit38,38,
> > > IIf(OptProfit==Profit39,39,
> > > IIf(OptProfit==Profit40,40,
> > > IIf(OptProfit==Profit41,41,
> > > IIf(OptProfit==Profit42,42,
> > > IIf(OptProfit==Profit43,43,
> > > IIf(OptProfit==Profit44,44,
> > > IIf(OptProfit==Profit45,45,
> > > IIf(OptProfit==Profit46,46,
> > > IIf(OptProfit==Profit47,47,48)
> > > ))))))))))))))))))))))))))))))))))))))))))))));
> > >
> > > OptPctProfit = (OptProfit / AcctEquity) * 100;
> > > PctBarsTested = (TestPeriod / TestPeriods) * 100;
> > > FinalEquity = AcctEquity + OptProfit;
> > > AnnualOptPctProfit = 100 * ((FinalEquity / AcctEquity) ^ (251 /
> > > TestPeriod) - 1);
> > > AnnualOptProfit = (AnnualOptPctProfit / 100) * AcctEquity;
> > >
> > > Filter = 1;
> > > AddTextColumn(FullName(),"Name");
> > > AddTextColumn(SectorID(1),"Sector");
> > > AddTextColumn(IndustryID(1),"Industry");
> > > AddColumn(OptZigPct,"Opt Zig %",1.0);
> > > AddColumn(OptPctProfit,"% Profit",1.2);
> > > AddColumn(OptProfit,"$ Profit",1.2);
> > > AddColumn(TestPeriod,"Bars Tested",1.0);
> > > AddColumn(PctBarsTested,"% Test Pd",1.2);
> > > AddColumn(AnnualOptPctProfit,"Ann % Profit",1.2);
> > > AddColumn(AnnualOptProfit,"Ann $ Profit",1.2);
> > >
> > > CurrentTrendUp = Zig(SignalArray,LastValue(OptZigPct))
> > > > Ref(Zig(SignalArray,LastValue(OptZigPct)),-1);
> > > BaseZigPrice = IIf(CurrentTrendUp,
> > > Trough(SignalArray,LastValue(OptZigPct),1),
> > > Peak(SignalArray,LastValue(OptZigPct),1));
> > > ZigConfirmedPrice = IIf(CurrentTrendUp,
> > > BaseZigPrice + ((OptZigPct / 100) *
> BaseZigPrice),
> > > BaseZigPrice - ((OptZigPct / 100) *
> > > BaseZigPrice));
> > > ZigNotConfirmed = IIf(CurrentTrendUp,SignalArray <
> ZigConfirmedPrice,
> > > SignalArray >
> ZigConfirmedPrice);
> > > ZigColor = IIf(ZigNotConfirmed,colorBlack,colorYellow);
> > > ZigConfirmedPriceColor = IIf(BaseZigPrice > Zig
> (SignalArray,LastValue
> > > (OptZigPct)),
> > > colorRose,colorPaleTurquoise);
> > >
> > > Plot(ZigConfirmedPrice,"Conf
> > > Price",ZigConfirmedPriceColor,styleStaircase);
> > > Plot(Zig(SignalArray,LastValue(OptZigPct)),"Zig Value",
> > > ZigColor,styleLine + styleDots);
> > > Plot(SignalArray,"Price",colorBrown,styleCandle);
> > > Title = EncodeColor(colorBlue) + Name()
> > > + EncodeColor(colorBrightGreen) + " " + Date()
> > > + EncodeColor(colorBlack) + " Price: "
> > > + EncodeColor(colorRed) + WriteVal(SignalArray,1.2)
> > > + EncodeColor(colorBlack) + " Zig Confirmed at: "
> > > + EncodeColor(colorCustom11) + WriteVal
> (ZigConfirmedPrice,1.2)
> > > + EncodeColor(colorBlack) + " Opt Zig %: "
> > > + EncodeColor(colorYellow) + WriteVal(OptZigPct,1.0)
> > > +"\n" + EncodeColor(colorBlack) + "Name: "
> > > + EncodeColor(colorBlue) + FullName()
> > > +"\n" + EncodeColor(colorBlack) + "Sector: "
> > > + EncodeColor(colorGold) + SectorID(1)
> > > +"\n" + EncodeColor(colorBlack) + "Industry: "
> > > + EncodeColor(colorBrown) + IndustryID(1);
> > > /*
> > > Plot() - syntax: Plot(array,title,color/barcolor,style)
> > > - color/barcolor could be name/number (static) or
> formula
> > > (dynamic)
> > > colorCustom1 = 0
> > > colorCustom2 = 1
> > > colorCustom3 = 2
> > > colorCustom4 = 3
> > > colorCustom5 = 4
> > > colorCustom6 = 5
> > > colorCustom7 = 6
> > > colorCustom8 = 7
> > > colorCustom9 = 8
> > > colorCustom10 = 9
> > > colorCustom11 = 10
> > > colorCustom12 = 11
> > > colorCustom13 = 12
> > > colorCustom14 = 13
> > > colorCustom15 = 14
> > > colorCustom16 = 15
> > > colorBlack = 16
> > > colorBrown = 17
> > > colorDarkOliveGreen = 18
> > > colorDarkGreen = 19
> > > colorDarkTeal = 20
> > > colorDarkBlue = 21
> > > colorIndigo = 22
> > > colorDarkGrey = 23
> > > colorDarkRed = 24
> > > colorOrange = 25
> > > colorDarkYellow = 26
> > > colorGreen = 27
> > > colorTeal = 28
> > > colorBlue = 29
> > > colorBlueGrey = 30
> > > colorGrey40 = 31
> > > colorRed = 32
> > > colorLightOrange = 33
> > > colorLime = 34
> > > colorSeaGreen = 35
> > > colorAqua = 36
> > > colorLightBlue = 37
> > > colorViolet = 38
> > > colorGrey50 = 39
> > > colorPink = 40
> > > colorGold = 41
> > > colorYellow = 42
> > > colorBrightGreen = 43
> > > colorTurquoise = 44
> > > colorSkyblue = 45
> > > colorPlum = 46
> > > colorLightGrey = 47
> > > colorRose = 48
> > > colorTan = 49
> > > colorLightYellow = 50
> > > colorPaleGreen = 51
> > > colorPaleTurquoise = 52
> > > colorPaleBlue = 53
> > > colorLavender = 54
> > > colorWhite = 55
> > > - style is a combination of one or more of following
> > > values:
> > > styleLine = 1 - normal (line) chart
> > > (default)
> > > styleHistogram = 2 - histogram chart
> > > styleThick = 4 - fat (thick)
> > > styleDots = 8 - include dots
> > > styleNoLine = 16 - no line
> > > styleLog = 32 - semi-logarithmic
> scale
> > > styleCandle = 64 - candlestick chart
> > > styleBar = 128 - traditional bar chart
> > > styleNoDraw = 256 - no draw (perform
> axis
> > > scaling only)
> > > styleStaircase = 512 - staircase (square)
> chart
> > > styleSwingDots = 1024 - middle dots for
> > > staircase chart
> > > styleNoRescale = 2048 - no rescale
> > > styleNoLabel = 4096 - no value label
> > > stylePointAndFigure = 8192 - point and figure
> > > styleArea = 16384 - area chart
> > > styleOwnScale = 32768 - use independent
> scaling
> > > styleLeftAxisScale = 65536 - use independant left
> > > axis scale */
> > >
> > >
> > > >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
> > >
> > > 2) The second Indicator error is reported as:
> > >
> > > Line 174, Column 19:
> > > /////////////////////
> > >
> > > PlotShapes( IIf( BuyNow, shapeSmallUpTriangle +
> shapePositonAbove,
> > > shapeNone ), colorBrightGreen );
> > > ------------------------------------------------------------------
> ----
> > > ----------------------------^
> > >
> > > Variable 'shapepositonabove' used without having been initialized.
> > >
> > >
> > > For code:
> > >
> > > /* Asymetrical Market Profile Band System v1*/
> > >
> > > /* Author Marc Valley */
> > >
> > > per1 = 256; //Optimize("Per1",1,1,20,1);
> > > per2 = Optimize("Per2",14,1,20,1);
> > > HistVol= 100*sqrt(260 )*StDev((Close-Ref(Close,-1))/Close,per1 );
> > > Ga = DEMA(HistVol,per1 );
> > > G1 = DEMA(RSI(per2 ),per2 );
> > > G2= (((G1 *Avg)* MA(V,per1))*Ga);
> > > G0 = BBandTop(G2, 11, 1.00);
> > > G3 = BBandBot(G2, 11, .95);
> > > G4 = ValueWhen(LLV(G2,2), G2, 1);
> > > /*HistVol= 100*sqrt(260)*StDev((Close-Ref(Close,-1))/Close,256);
> > > Ga = DEMA(HistVol,256);
> > > G1 = DEMA(DEMA(RSI(14),14),14);
> > > G2= (((G1 *Avg)* MA(V,256))*Ga);
> > > G0 = BBandTop(G2, 11, 1.00);
> > > G3 = BBandBot(G2, 11, .95);
> > > G4 = ValueWhen(LLV(G2,2), G2, 1);
> > > /********************/
> > > /* A theoretical trading system for RSI(14)*/
> > >
> > > /*(it is not proper for real trading)*/
> > > //perc=3;//calibrate the sensitivity
> > > //Var= G2; //RSI(14);//Your variable input
> > > //C1=PeakBars(Var,perc)==0;//peak condition
> > > //C2=TroughBars(Var,perc)==0;//trough condition
> > > /*Filter=C1 OR C2;//To find peak or trough dates
> > > AddColumn(IIf(C1,Var,0),"PEAK",1.2);//To read peak values
> > > AddColumn(IIf(C2,Var,0),"TROUGH",1.2);//To read trough values
> > > Buy=C2;//Buy at trough
> > > Sell=C1;//Sell at peak
> > > Buy=ExRem(Buy,Sell);Sell=ExRem(Sell,Buy);
> > > Short=Sell;//A first approach short condition
> > > Cover=Buy;//A first approach cover condition
> > > Short=ExRem(Short,Cover);Cover=ExRem(Cover,Short); */
> > > //perc=40;//calibrate the sensitivity;
> > > //Var=RSI(14);//Your variable input
> > >
> > > Plot(G2,"G2",1,4); //BLACK
> > > ///////////Plot(Peak(g2,1,1),"Peak",2,4);
> > > ///////////Plot(Trough(g2,1,1),"Trough",2,4);
> > > Plot(G0,"BH",4,4); //RED
> > > Plot(G3,"BL",5,4); //GREEN
> > > //Plot(G4,"G4",colorLightGrey,styleHistogram);
> > > //Plot(Var,"BAND Trend System V1",1,1);
> > > //////////Plot(Zig(Var,perc),"Zig",2,4); //PLOT ZIG LINE FOR
> VIEWING
> > > PURPOSES ONLY
> > >
> > > //Plot(C1*g2,"C1",4,6);
> > > //Plot(C2*g2,"C2",5,6);
> > >
> > > ///////////////
> > > BuyNow = Cross(G2,G3); // OR Cross(G2,G0);
> > > SellNow = Cross(G0,G2);// OR Cross(G2,G3);
> > > Buy = BuyNow;
> > > Sell = SellNow;
> > > Short=Sell;
> > > //ShortPrice =Sell;
> > >
> > > Cover=Buy;
> > > //CoverPrice= Cover;
> > > Buy=ExRem(Buy,Sell);
> > > Sell=ExRem(Sell,Buy);
> > > Short=ExRem(Short,Cover);
> > > Cover=ExRem(Cover,Short);
> > > Equity(1);
> > >
> > > /////////////////////
> > >
> > > PlotShapes( IIf( BuyNow, shapeSmallUpTriangle +
> shapePositonAbove,
> > > shapeNone ), colorBrightGreen );
> > > PlotShapes( IIf( SellNow, shapeSmallDownTriangle +
> shapePositonAbove,
> > > shapeNone ), colorRed )
> > > GraphXSpace = 2;
> > > GraphZOrder = 1;
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > > .
> > >
> > >
> > >
> > > Send BUG REPORTS to bugs@xxxx
> > > Send SUGGESTIONS to suggest@xxxx
> > > -----------------------------------------
> > > Post AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx
> > > (Web page: http://groups.yahoo.com/group/amiquote/messages/)
> > > --------------------------------------------
> > > Check group FAQ at:
> http://groups.yahoo.com/group/amibroker/files/groupfaq.html
> > >
> > > Your use of Yahoo! Groups is subject to
> http://docs.yahoo.com/info/terms/
> > >
> > >
> > >
>
>
>
> Send BUG REPORTS to bugs@xxxxxxxxxxxxx
> Send SUGGESTIONS to suggest@xxxxxxxxxxxxx
> -----------------------------------------
> Post AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx
> (Web page: http://groups.yahoo.com/group/amiquote/messages/)
> --------------------------------------------
> Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>
>
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Get A Free Psychic Reading! Your Online Answer To Life's Important Questions.
http://us.click.yahoo.com/Lj3uPC/Me7FAA/uetFAA/GHeqlB/TM
---------------------------------------------------------------------~->
Send BUG REPORTS to bugs@xxxxxxxxxxxxx
Send SUGGESTIONS to suggest@xxxxxxxxxxxxx
-----------------------------------------
Post AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx
(Web page: http://groups.yahoo.com/group/amiquote/messages/)
--------------------------------------------
Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
|