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
|