What am I doing
wrong?
/* Angle Test v2 */
// I don't understand why the array
created by "Var" cannot be used as CCI(20) built-in works ???
// Comment
out the Var below and use the other to see what I mean.
// Angle and
Degrees don't read in the Title Line like they do with
CCI(20)
Var = CCI(20); // Comment
out this line
//Var = MA(C,20);Plot(Var,"",1,128); // Uncomment and try this line
instead
START=34;END=1;
ARRAY= Var
;
L1=LastValue(Cum(1));
X0=L1-START;
X1=L1-END;
Y0=ARRAY[X0];
Y1=ARRAY[X1];
ANGLE=atan((Y1-Y0)/(X1-X0));
Color
= IIf(Y1 > Y0,5,4); // Green
= Positive Red =
Negative
Title1="ANGLE="+WriteVal(ANGLE)+" RADS"+",
["+WriteVal(45*ANGLE/atan(1),1.0)+"
DEGS]";
Plot(ARRAY,"",12,1);
Plot(LineArray(X0,Y0,X1,Y1),Title1 +
"\nLine to Last Value of End Point Value",Color
,1);
Plot(LineArray(X0,Y0,X1,Y0),"Horizontal",2,1);
Plot(LastValue(Y0),"\nBegin
at This point in the Array",10,1);
Thanks,
Mr.
Valley