H/L Intrabar Indicator

[jonik]

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

[cooter]

Software platform?

LAST meaning:

A. CURRENT bar, last tick
B. PREVIOUS bar, completed

Which?

[jonik]

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

	Quote:	cooter
	Software platform? LAST meaning: A. CURRENT bar, last tick B. PREVIOUS bar, completed Which?

[jonik]

I added the screenshot, please take a look.


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

[trader273]

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]

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]

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]

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 " target="_blank">https://www.tradestation.com/Discuss...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),Li neColor(White),LineWeight (0),LineLength(3),Decimal Places(0);
var:init(false),ed(0),et( 0),tl1(0),tl2(0),tx1(0),t x2(0),tx3(0);
if lastbaronchart then begin
ed=d;
et=timetominutes(t)+linel ength;
if et>1439 then begin
ed=juliantodate(datetojul ian(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,e t,h[1]);
text_setlocation(tx2,ed,e t,l[1]);
text_setlocation(tx3,ed,e t,(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,textcol or);
text_setcolor(tx2,textcol or);
text_setcolor(tx3,textcol or);
text_setstyle(tx1,0,2);
text_setstyle(tx2,0,2);
text_setstyle(tx3,0,2);
init=true;
end;
end;

[btrader2]

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