H/L Intrabar Indicator

[jonik 10]

Hello,

 

I am trying to create an indicator that will show the following REAL TIME values ot the LAST bar:

 

HIGH

LOW

RANGE

 

I preffer the data will be placed somewhere on the chart, but not right near the bar like showme study.

 

any help is appreciated.

 

Thanks

BC

[Guest cooter]

Software platform?

 

LAST meaning:

 

A. CURRENT bar, last tick

B. PREVIOUS bar, completed

 

Which?

[jonik 10]

I need it for Tradestation 8.2

 

High, Low and Range values (plotted as a text on the chart) for the last (unfinished) bar while it's being built IN REAL TIME.

 

Please see how I want this to look:

 

http://www.tele-king.com/jonik/pict.jpg

 

Thanks,

BC

 

 

Software platform?

 

LAST meaning:

 

A. CURRENT bar, last tick

B. PREVIOUS bar, completed

 

Which?

[jonik 10]

I added the screenshot, please take a look.

 

 

http://www.tele-king.com/jonik/pict.jpg

[trader273 10]

Jonick,

 

Here was I was able to come up with. It plots the High/Low/ and Range. I do not know how to plot the text up above the chart like your example, but toy around with this one and you should be able to get it how you like. Also, I am in no way a coder but I was able to search around and piece together what I was looking for. I'm sure there are better ways to get this done, but this is what I was able to build. All I ask is that if you come across someone who needs something that you got you help them out, kind of a pay-it-forward idea. I built this in MC so I'm sure if everything will compile correctly, but the things that don't should be an easy fix.

 

inputs:  
HL_OFFSET(3),
DECIMALS(0),
Text_Attr(1),
HIGH_Text_Color(DARKGREEN),
LOW_Text_Color(DARKRED),
RAN_TEXT_COLOR(darkblue),

HIGH_TEXT("H:"),
LOW_TEXT("L: "),
RAN_TEXT("RANGE:  "),

Texts("Calibri"),
Texts_Size(12),
LEFT_RIGHT("           ");


vars:
  HIGH_TL( 0 ),
  LOW_TL(0),
  Hid(0),
  Lid(0),
  RAN(0),
  RID(0),
  vDELETE(0);


If LastBarOnChart then
  begin
 RAN=absvalue(HIGH-LOW);
 HIGH_TL = TL_New(date, time, high, date, time, high);   
 LOW_TL= TL_New(date, time, low, date, time, low);   

Hid=text_new(date,time,high+HL_OFFSET,LEFT_RIGHT+HIGH_TEXT+(NumToStr(HIGH,DECIMALS)));
text_setstyle(Hid,0,1);
text_setfontname(Hid,texts);
text_setsize(Hid,texts_size);
text_setcolor(Hid,HIGH_text_color);
text_setattribute(Hid,Text_Attr,true);

Lid=text_new(date,time,low-HL_OFFSET,LEFT_RIGHT+LOW_TEXT+NumToStr(LOW,DECIMALS));
text_setstyle(Lid,0,0);
text_setfontname(Lid,texts);
text_setsize(Lid,texts_size);
text_setcolor(Lid,LOW_text_color);
text_setattribute(Lid,Text_Attr,true);

Rid=text_new(date,time,OPEN,LEFT_RIGHT+RAN_TEXT+NumToStr(RAN,DECIMALS));
text_setstyle(Rid,0,0);
text_setfontname(Rid,texts);
text_setsize(Rid,texts_size);
text_setcolor(Rid,RAN_text_color);
text_setattribute(Rid,Text_Attr,true);


if HIGH_TL[1] > 0 AND HIGH_TL<> HIGH_TL[1] then
vDELETE= TL_Delete(HIGH_TL[1]);

if LOW_TL[1] > 0 AND LOW_TL <> LOW_TL[1] then
vDELETE = TL_Delete(LOW_TL[1]);     

if HIGH_TL[1] > 0 AND HIGH_TL<> HIGH_TL[1] then          
      vDELETE = text_delete(Hid[1]);        

if LOW_TL[1] > 0 AND LOW_TL <> LOW_TL[1] then    
       vDELETE = text_delete(Lid[1]);  

if LOW_TL[1] > 0 AND LOW_TL <> LOW_TL[1] then
vDELETE = TEXT_Delete(RID[1]);     


end;                   

[jonik 10]

thank for your help. When I try to VERIFY the code in Power Editor I get a message "Word is not recognized by easy language" for the first time -

text_setfontname is listed.

 

Please advice.

 

Thanks,

BC

[trader273 10]

Thats what I was thinking would happen. MC has more ways to customize the fonts then TS. Just try to take out what it cant verify and see what happens. Just use "//" ( w/o the quotes. eg text_setfontname would be //text_setfontname) it should turn green. We'll start there and take it from there. I dont use TS anymore that is why I cant do this myself.

[houghton 10]

Trader273/jonik,

 

This is code for a similar indicator I use. It places a trend line (extended to the right) at the hi and lo of the previous bar, and annotes the hi/lo prices and the range differential between them. Perhaps you can modify this to meet jonik's format.

 

 

 

 

//ID_64100

 

// High Low Range

// Courtesy of tradingkevin

// <a href="https://www.tradestation.com/Discussions/Topic.aspx?Topic_ID=64100'>https://www.tradestation.com/Discussions/Topic.aspx?Topic_ID=64100 " target="_blank">https://www.tradestation.com/Discussions/Topic.aspx?Topic_ID=64100 </a>

 

{

shows on the chart the HIGH-LOW and the range in ticks

between those 2 extrems for the last bar close.

}

 

input:TextColor(White),LineColor(White),LineWeight (0),LineLength(3),DecimalPlaces(0);

var:init(false),ed(0),et(0),tl1(0),tl2(0),tx1(0),tx2(0),tx3(0);

if lastbaronchart then begin

ed=d;

et=timetominutes(t)+linelength;

if et>1439 then begin

ed=juliantodate(datetojulian(ed)+1);

et=et-1440;

end;

et=minutestotime(et);

if init then begin

tl_setbegin(tl1,d[1],t[1],h[1]);

tl_setbegin(tl2,d[1],t[1],l[1]);

tl_setend(tl1,ed,et,h[1]);

tl_setend(tl2,ed,et,l[1]);

text_setstring(tx1," "+numtostr(h[1],decimalplaces));

text_setstring(tx2," "+numtostr(l[1],decimalplaces));

text_setstring(tx3,"+ "+numtostr(h[1]-l[1],decimalplaces));

text_setlocation(tx1,ed,et,h[1]);

text_setlocation(tx2,ed,et,l[1]);

text_setlocation(tx3,ed,et,(h[1]+l[1])/2);

end else begin

tl1=tl_new(d[1],t[1],h[1],ed,et,h[1]);

tl2=tl_new(d[1],t[1],l[1],ed,et,l[1]);

tl_setcolor(tl1,linecolor);

tl_setcolor(tl2,linecolor);

tl_setsize(tl1,lineweight);

tl_setsize(tl2,lineweight);

tl_setstyle(tl1,1);

tl_setstyle(tl2,1);

if datacompression=0 then begin

tl_setextleft(tl1,true);

tl_setextleft(tl2,true);

end else begin

tl_setextleft(tl1,false);

tl_setextleft(tl2,false);

end;

tl_setextright(tl1,false);

tl_setextright(tl2,false);

tx1=text_new(ed,et,h[1]," "+numtostr(h[1],decimalplaces));

tx2=text_new(ed,et,l[1]," "+numtostr(l[1],decimalplaces));

tx3=text_new(ed,et,(h[1]+l[1])/2,"+ "+numtostr(h[1]-l[1],decimalplaces));

text_setcolor(tx1,textcolor);

text_setcolor(tx2,textcolor);

text_setcolor(tx3,textcolor);

text_setstyle(tx1,0,2);

text_setstyle(tx2,0,2);

text_setstyle(tx3,0,2);

init=true;

end;

end;

[btrader2 10]

Hi trader273,

 

I would like to have a copy of your H/L indicator. Can be VERY useful for my entry TF chart. I also use MC and will follow your pay-it-forward idea.

 

btrader2