|
PureBytes Links
Trading Reference Links
|
WOW,
I am not sure where I need to add my own code and just what is the base
code. I think the then statements with a blank afterwards give me the clue.
Jim
----- Original Message -----
From: "Mark Brown"
<qpwoeirutyalskdjfhgmznxbcv_markbrown_omegalist@xxxxxxxxxxxxx>
To: "Jim Bronke" <jvbronke@xxxxxxxxxxx>
Cc: <omega-list@xxxxxxxxxx>
Sent: Wednesday, December 29, 2004 1:53 PM
Subject: Re: Condition Indicator 2
> Hello Jim,
>
> {data= sp}
>
> Input: Near(1);
> var:pp(0),r1(0),r2(0),s1(0),s2(0),idmid(0),yh(0),yl(0),yc(0);
> idmid=(idhigh+idlow)/2; r2=ResistanceLevel2;
> r1=ResistanceLevel1; pp=PivotPoint;
> s1=SupportLevel1; s2=SupportLevel2;
> yh=HighYesterday; yl=LowYesterday;
> yc=CloseYesterday;
>
> if t>Sess1StartTime then begin
> IF (h >= pp-near and l <= pp+near) then print(t," SP PP --->",pp);
> IF (h >= r1-near and l <= r1+near) then print(t," SP R1 --->",r1);
> IF (h >= s1-near and l <= s1+near) then print(t," SP S1 --->",s1);
> IF (h >= r2-near and l <= r2+near) then print(t," SP R2 --->",r2);
> IF (h >= s2-near and l <= s2+near) then print(t," SP S2 --->",s2);
>
> IF (h >= idhigh-near and l <= idhigh+near) then print(t," SP
High --->",idhigh);
> IF (h >= idlow-near and l <= idlow+near) then print(t," SP
Low --->",idlow);
> IF (h >= idmid-near and l <= idmid+near) then print(t," SP
Mid --->",idmid);
>
> IF (idhigh > idhigh[1]) then print(t," SP New High --->",idhigh,"
",idhigh-idhigh[1]);
> IF (idlow < idlow[1]) then print(t," SP New Low --->",idlow,"
",idlow-idlow[1]);
>
> IF (h >= yh-near and l <= yh+near) then print(t," SP
YHigh --->",yh);
> IF (h >= yl-near and l <= yl+near) then print(t," SP YLow --->",yl);
> IF (h >= yc-near and l <= yc+near) then print(t," SP
YClose --->",yc);
>
> IF (t=1355) then print(t," Bond Close --->1:55pm");
> IF (t=1455) then print(t," Nyse Close ---> 2:55pm");
> IF (t=1100) then print(t," Lunch Time --->11:00am");
> IF (t=1130) then print(t," Lunch Time --->11:30am");
> IF (t=1200) then print(t," Lunch Time --->12:00am");
> IF (t=1230) then print(t," Lunch Time --->12:30am");
> end;
>
> IF CheckAlert Then
> IF (h >= pp-near and l <= pp+near) then
> IF (h >= r1-near and l <= r1+near) then
> IF (h >= s1-near and l <= s1+near) then
> IF (h >= r2-near and l <= r2+near) then
> IF (h >= s2-near and l <= s2+near) then
>
> IF (h >= idhigh-near and l <= idhigh+near) then
> IF (h >= idlow-near and l <= idlow+near) then
> IF (h >= idmid-near and l <= idmid+near) then
>
> IF (idhigh > idhigh[1]) then
> IF (idlow < idlow[1]) then
>
> IF (h >= yh-near and l <= yh+near) then
> IF (h >= yl-near and l <= yl+near) then
> IF (h >= yc-near and l <= yc+near) then
>
> IF (t=1355) then
> IF (t=1455) then
> IF (t=1100) then
> IF (t=1130) then
> IF (t=1200) then
> IF (t=1230) then
> Alert = TRUE;
>
> IF (h >= pp-near and l <= pp+near) then plot1(c,"at pp");
> IF (h >= r1-near and l <= r1+near) then plot1(c,"at pp");
> IF (h >= s1-near and l <= s1+near) then plot1(c,"at pp");
> IF (h >= r2-near and l <= r2+near) then plot1(c,"at pp");
> IF (h >= s2-near and l <= s2+near) then plot1(c,"at pp");
>
> IF (h >= idhigh-near and l <= idhigh+near) then plot2(c,"id h-l");
> IF (h >= idlow-near and l <= idlow+near) then plot2(c,"id h-l");
> IF (h >= idmid-near and l <= idmid+near) then plot3(c,"id mid");
>
> input:nr(.10);
>
> Vars: String1(""), TextLoc(0), String2(""), String3("");
> String1=""; String2=""; Condition2=false;
>
> IF (h >= pp-nr and l <= pp+nr) then begin
> String1="pp";
> Condition2=True;End;
>
> IF (h >= r1-nr and l <= r1+nr) then begin
> String1="r1";
> Condition2=True;End;
>
> IF (h >= s1-nr and l <= s1+nr) then begin
> String1="s1";
> Condition2=True;End;
>
> IF (h >= r2-nr and l <= r2+nr) then begin
> String1="r2";
> Condition2=True;End;
>
> IF (h >= s2-nr and l <= s2+nr) then begin
> String1="s2";
> Condition2=True;End;
>
> IF (h >= yh-near and l <= yh+near) then begin
> String1="yh";
> Condition2=True;End;
>
> IF (h >= yl-near and l <= yl+near) then begin
> String1="yl";
> Condition2=True;End;
>
> IF (h >= yc-near and l <= yc+near) then begin
> String1="yc";
> Condition2=True;End;
>
> IF (h >= idhigh-near and l <= idhigh+near) then begin
> String1="ih";
> Condition2=True;End;
>
> IF (h >= idlow-near and l <= idlow+near) then begin
> String1="il";
> Condition2=True;End;
>
> IF (h >= idmid-near and l <= idmid+near) then begin
> String1="im";
> Condition2=True;End;
>
> If Condition2 then begin
>
> Value1=Text_New(Date,Time,(h+l)/2,String1);
> TextLoc=Text_SetStyle(Value1, 2, 1);
> If GetBackGroundColor=Tool_White then Value2=Text_SetColor(Value1,
Tool_Red)
> Else
> Value2=Text_SetColor(Value1, Tool_White);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
>
>
|