[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Condition Indicator 3



PureBytes Links

Trading Reference Links

Hello Jim,
{
this is specifically for the $tick index - there are a variety of ways
to display something - text tools - message logs - text files -
indicator values and probably some i have forgotten.
}

Input:B1(180),B2(280),B3(380),B4(480),
         S1(-180),S2(-280),S3(-380),S4(-480),Tyme(5);

var:nextyme(0),txt(0),zero(" zero - - - - - - - - - - - - - - - - -");

if currentbar=1 then begin txt= text_new
(d,1,0,"--"+zero+zero+zero+zero+zero+zero+zero+zero+zero+zero+zero+zero+zero+zero);
text_setcolor(txt,6{this number 6=red to change the color, pick a number from the list below});
{1=black,2=blue,3=cyan,4=green,5=magenta,6=red,7=yellow,8=white}
text_setstyle(txt,0,2);end;

VALUE8=B4;
VALUE6=B3;
VALUE4=B2;
VALUE2=B1;
VALUE9=0;
VALUE1=S1;
VALUE3=S2;
VALUE5=S3;
VALUE7=S4;

IF  TrueHigh >= VALUE8 THEN PLOT4(VALUE8,"FOUR")ELSE
IF (TrueHigh >= VALUE6 and TrueLow <= VALUE8)THEN PLOT3(VALUE6,"THREE")ELSE
IF (TrueHigh >= VALUE4 and TrueLow <= VALUE6)THEN PLOT2(VALUE4,"TWO")ELSE
IF (TrueHigh >= VALUE2 and TrueLow <= VALUE4)THEN PLOT1(VALUE2,"ONE")ELSE

if c >= 0 then begin text_setlocation(txt,d,1,value9);end;
if c <= 0 then begin text_setlocation(txt,d,1,value9);end;

IF (TrueLow <= VALUE1 and TrueHigh >= VALUE3)THEN PLOT1(VALUE1,"ONE")ELSE
IF (TrueLow <= VALUE3 and TrueHigh >= VALUE5)THEN PLOT2(VALUE3,"TWO")ELSE
IF (TrueLow <= VALUE5 and TrueHigh >= VALUE7)THEN PLOT3(VALUE5,"THREE")ELSE
IF  TrueLow <= VALUE7 THEN PLOT4(VALUE7,"FOUR");

IF CheckAlert Then Begin
IF (TrueHigh >= VALUE2 and TrueLow <= VALUE2)
or (TrueHigh >= VALUE4 and TrueLow <= VALUE4)
or (TrueHigh >= VALUE6 and TrueLow <= VALUE6)
or (TrueHigh >= VALUE8 and TrueLow <= VALUE8)
or (TrueHigh >= VALUE9 and TrueLow <= VALUE9)
or (TrueLow <= VALUE1 and TrueHigh >= VALUE1)
or (TrueLow <= VALUE3 and TrueHigh >= VALUE3)
or (TrueLow <= VALUE5 and TrueHigh >= VALUE5)
or (TrueLow <= VALUE7 and TrueHigh >= VALUE7)
Then Alert = TRUE;End;

if date=currentdate then begin

if d>d[1]then nextyme=timetominutes(Sess1FirstBarTime)+tyme;
if timetominutes(t)>=nextyme then begin nextyme=nextyme+tyme;

if (TrueHigh >= VALUE8 and TrueLow <= VALUE8)
then messagelog(date:6:0, Time:5:0, "  TickLevel 4 + ", value8:4:0,  "  C.N.  ",commoditynumber:6:0);
if (TrueHigh >= VALUE6 and TrueLow <= VALUE6)
then messagelog(date:6:0, Time:5:0, "  TickLevel 3 + ", value6:4:0,  "  C.N.  ",commoditynumber:6:0);
if (TrueHigh >= VALUE4 and TrueLow <= VALUE4)
then messagelog(date:6:0, Time:5:0, "  TickLevel 2 + ", value4:4:0,  "  C.N.  ",commoditynumber:6:0);
if (TrueHigh >= VALUE2 and TrueLow <= VALUE2)
then messagelog(date:6:0, Time:5:0, "  TickLevel 1 + ", value2:4:0,  "  C.N.  ",commoditynumber:6:0);

if (TrueHigh >= VALUE9 and TrueLow <= VALUE9)
then messagelog(date:6:0, Time:5:0, "  TickLevel 0 = ", value9:4:0,  "  C.N.  ",commoditynumber:6:0);

if (TrueLow <= VALUE1 and TrueHigh >= VALUE1)
then messagelog(date:6:0, Time:5:0, "  TickLevel 1 - ", value2:4:0,  "  C.N.  ",commoditynumber:6:0);
if (TrueLow <= VALUE3 and TrueHigh >= VALUE3)
then messagelog(date:6:0, Time:5:0, "  TickLevel 2 - ", value4:4:0,  "  C.N.  ",commoditynumber:6:0);
if (TrueLow <= VALUE5 and TrueHigh >= VALUE5)
then messagelog(date:6:0, Time:5:0, "  TickLevel 3 - ", value6:4:0,  "  C.N.  ",commoditynumber:6:0);
if (TrueLow <= VALUE7 and TrueHigh >= VALUE7)
then messagelog(date:6:0, Time:5:0, "  TickLevel 4 - ", value8:4:0,  "  C.N.  ",commoditynumber:6:0);

end;end;









Wednesday, December 29, 2004, 11:53:23 AM, you wrote:

> A few years ago I read of a Condition indicator that I think either Bob
> Fulks or Mark  Brown had developed. It is not complicated but involves using
> features that I don't normally use. It displays the status of Conditions on
> the data1 chart. It answers the question as to which condition is not met
> and eliminates the need to run a separate calculation of them. Anyone know
> of this?

> thanks,

> Jim




-- 
Best regards,
 Mark                            mailto:qpwoeirutyalskdjfhgmznxbcv_markbrown_omegalist@xxxxxxxxxxxxx