shrike

October 10, 2010

Hi Ranger

I downloaded your file and tried to import in MC but doesn't work , Power Language Editor shows anything when I try to import both protected that unprotected .ELD .files

July 8, 2010

HI Frank

I use Multicharts, with it you can easly make it . and much more .

there are a lot of built in functions that allow to do all statistics and math studies.

Ciao

June 7, 2010

Hi

play with this line of code

Text_setstring(Text_ID1,"H : " + numtostr(PreviousBarHigh,decimal)+"  ");
Text_SetLocation( Text_ID1,JulianToDate( IntPortion(Right_ID)),MinutesToTime( FracPortion(Right_ID)*60* 24 ),High_ID - (Offset * percent)*-BelowFactor/2 ) ;
Text_SetStyle( Text_ID1, 1,0 ) ;
Text_SetColor(Text_ID1, Text_Color);
Text_setstring(Text_ID2,"C : " + numtostr(PreviousBarCLOSE,decimal)+"  ");
Text_SetLocation( Text_ID2,JulianToDate( IntPortion(Right_ID)),MinutesToTime( FracPortion(Right_ID)*60* 24 ),High_ID - (Offset * (percent)) ) ;
Text_SetStyle( Text_ID2, 1,0 ) ;
Text_SetColor(Text_ID2, Text_Color);
Text_setstring(Text_ID3,"L : " + numtostr(PreviousBarLow,dEcimal)+" ");
Text_SetLocation( Text_ID3,JulianToDate( IntPortion(Right_ID)),MinutesToTime( FracPortion(Right_ID)*60* 24 ),High_ID - (Offset * (percent))*BelowFactor ) ;
Text_SetStyle( Text_ID3, 1,0 ) ;
Text_SetColor(Text_ID3, Text_Color);

I've put *-belowfactor in prev high so text is shifted up , and insert text H,C,L

June 6, 2010

Hi

try this

Inputs:
RangeAmount ( 1),
Decimal ( 2),
Text_Color (rgb(100,255,150)),
UpColor (rgb(255,255,255)), // You pick the color
DnColor (rgb(255,0,0)),
Percent ( 5), // Top of screen = 0, Bottom of screen = 100.
BelowFactor ( 2); // Percent amount for 2nd line to appear below first line.

Var:
PreviousBarCLOSE( 0 ),  // this refers to prev. close 
PreviousBarHigh ( 0 ),
PreviousBarLow ( 0 ),
PlacementHolder ( 0 ),
RangeAmountPrevious ( 0 ),
Text_ID1 (-1 ),
Text_ID2 (-1 ),
Text_ID3 (-1 ),
Text_ID4 (-1 ),
Left_ID ( 0 ),
Right_ID ( 0 ),
High_ID ( 0 ),
Low_ID ( 0 ),
Offset ( 0 );

PreviousBarCLOSE = c[1];    // this refers to prev. close 
PreviousBarHigh = High[1];
PreviousBarLow = Low[1];
RangeAmountPrevious = High[1] - Low[1];

// This draws the text on the first bar
once if currentbar = 1 then begin
if Text_ID1 = -1 then begin
Text_ID1 = Text_New( Date, Time, 0, " " ) ;
end;
if Text_ID2 = -1 then begin
Text_ID2 = Text_New( Date, Time, 0, " " ) ;
end;
if Text_ID3 = -1 then begin
Text_ID3 = Text_New( Date, Time, 0, " " ) ;
end;
if Text_ID4 = -1 then begin
Text_ID4 = Text_New( Date, Time, 0, " " ) ;
end;
end;

// This updates the text and places it in the upper right corner
Left_ID = GetAppInfo( aiLeftDispDateTime );
Right_ID = GetAppInfo( aiRightDispDateTime );
High_ID = GetAppInfo( aiHighestDispValue );
Low_ID = GetAppInfo( aiLowestDispValue );
Offset = ((high_ID - Low_ID)*.01); { 1% of chart height. Then Pcnt (Input) becomes Percent height of chart}

Text_setstring(Text_ID1,numtostr(PreviousBarHigh,decimal)+" ");
Text_SetLocation( Text_ID1,JulianToDate( IntPortion(Right_ID)),MinutesToTime( FracPortion(Right_ID)*60* 24 ),High_ID - (Offset * percent) ) ;
Text_SetStyle( Text_ID1, 1,0 ) ;
Text_SetColor(Text_ID1, Text_Color);
Text_setstring(Text_ID2,numtostr(PreviousBarCLOSE,decimal));  // shows prev. close 
Text_SetLocation( Text_ID2,JulianToDate( IntPortion(Right_ID)),MinutesToTime( FracPortion(Right_ID)*60* 24 ),High_ID - (Offset * percent) ) ;
Text_SetStyle( Text_ID2, 1,0 ) ;
Text_SetColor(Text_ID2, Text_Color);
Text_setstring(Text_ID3,numtostr(PreviousBarLow,dEcimal)+" ");
Text_SetLocation( Text_ID3,JulianToDate( IntPortion(Right_ID)),MinutesToTime( FracPortion(Right_ID)*60* 24 ),High_ID - (Offset * percent)*BelowFactor ) ;
Text_SetStyle( Text_ID3, 1,0 ) ;
Text_SetColor(Text_ID3, Text_Color);


// This colors the previous bars range numbers

If RangeAmountPrevious > RangeAmount then begin
Text_SetColor(Text_ID1, DnColor);
Text_SetColor(Text_ID3, DnColor);
end;
If RangeAmountPrevious < RangeAmount then begin
Text_SetColor(Text_ID1, UpColor);
Text_SetColor(Text_ID3, UpColor);
end;
If RangeAmountPrevious = RangeAmount then begin
Text_SetColor(Text_ID1, Text_Color);
Text_SetColor(Text_ID3, Text_Color);
end;

June 2, 2010

Hi Logic:)

thanks for the reply,I see that you insert 2 different kinds of CVB on the same chart(2401 & 16807) after you insert your indicators,the first calculated on 2401 CVB, and the second is calculated on 16807 CVB .this ,I think ,is what you intend about the different speeds.

I didn't believe was possible putting different formats of a symbol in the same graph whit MC without to have issues of rappresentation of the Symbols(e.g. different spaces between the symbols and indicators).

Could you tell me how this is possible? Maybe this is possible using ADE or can be made with buying some third-party sw

June 1, 2010

Hi Logic

Sorry if I'm annoying ,but I really didn't understand if we have to set up 3 differents graphs or in the same graph you use three different kinds of indicators ?

tanks Max

May 30, 2010

Hi John

I use it only as Datafeed , I feed 2 different sw at the same time , with Barchart this could not be possible , it must subscribe for each sw :confused: .

now i'm just making trading from my bank , I tried OEC . I am going to open an account by them in order to trade Eminisp500. their fees are absolutely competitive than those at my bank and customer service is ok as well (IMHO).

May 29, 2010

Hi

I stay with Esignal, why^?

1)NO answer from Barchart , I called & mail them much time

2) Esigal support is ok(IMHO)

3)Esignal covers more Market than IQfeed

4)your account is very simple to manage

I hoped on Barchart much,but no answer to my inquiries make me thinking very bad on their customer service

hope it helps

May 6, 2010

Hi Tams

ok I'll try to read again and make more test

May 6, 2010

Hi

I'd write an indicator that store Bid/ask data into a file and reload saved data at new open of the software.

I made some research on TL and

if i don't understand bad I need ADE and GV . I'm reading Doc but don't find many example how can do it .

could anyone give me some more links where can i find Doc and examples ,tutorials ecc.

May 6, 2010

Hi

I read entire thred and the rules posted by Tams , thanks for his effort to help TL.

i have a doubt related to this :

In the rules i read about three charts:

Trading Decision Chart,Strength Chart,Entry Chart , they are 3 differents type of charts ? each with different setting?

thanks to all

May 4, 2010

Hi AgeKay

I don't try their demo , is too short, only 7 days. I'm staying to Esignal waiting for an answer from Barchart.

May 3, 2010

Hi AgeKay

thanks for the reply, I also trade from Europe

I'm waiting for an answer by BarChart , if there is a subscription with wich can connect two or more sw at the same time.

April 29, 2010

Hi Tex

thanks for the reply

I've also contacted BarChart but ,if i understood well, it can't use it with two sw at the same time like with Esignal.

Barchart seems less expensive then ES or IQ and has more data.(50 day tick).

I sent them an email asking if there is some offers with multiple subscriptions , but no answer yet.

April 17, 2010

Hi

I have a subscription with Esignal,i checked IQfeed's prices for the same product ( CME e-mini) and i found that are less expensive plus there is more hystorical data.

Before i change i'd like to know some experiences with IQfeed , their reliability, customer service Ecc. and if someone has tried Esignal and IQfeed together , could me show the big differences,if they are

This because their free trial is too short ,only 7 days.

thanks to all .

March 13, 2010

Hi

Today while i've surfing ,i found this site :

http://www.stator-afm.com/trade-volume-index.html

where speak about this indicator, i tried to built it :

I haven't tested yet , nor i know if is a bullsh... , should try and test if it can be useful

variables:
change(0),mtv(MinMove),direction(0),trvi(0);


if date >date[1] then
trvi =0;


value1=mtv/100;

change=c-c[1];

if change > value1 then
direction=1;

if change < -value1 then
direction=2;

if change <= value1 and change >= -value1 then
direction=3;


if direction=1 then 
trvi=trvi+Volume;

if direction=2 then 
trvi=trvi-Volume;


if direction=3 then 
trvi=trvi;

plot1(trvi); plot2(0);

March 3, 2010

ah ..ok

most important is you understand what I mean

so we can guess at what price bar will be closed since we have open, high, low of that bar and we know size of bar

so ...question is ...is anyone know how to code this ?

your question is strange :confused:

Close of the bar can be included in each minimun price movement ,lenght is the size of the bar

March 3, 2010

Hi JKLM

sorry but either i don't understand your question well or Tams has given the right answer , how can you predict future ?

March 2, 2010

Hi

I don't understand well your question , are you referring to range bar ? if yes you can use highor low ,using point resolution .

for instance :

resolution 4 point for ES means 1 point difference , so if high=1000 and you go short and want put stop loss 1 point above your entrance ,stop loss will be High[1]+1

March 1, 2010

Last

Returns a numerical value indicating the price of the last completed trade.

Usage

Last

Notes

Quote Fields cannot be referenced historically.

Example

Last will return the price of the last trade

March 1, 2010

Hi

try this :

value1=C[1];

if last=value1 then

buy this bar ;

Volume Profile · February 16, 2010

Thank you Shrike for your reply, but I think this code is referring to Market Profile...while I am looking for Volume Profile... :-(
Do you have any idea where I can find it?

I need something like this:

Ps: Juve...! :-D Are you italian?

Hi pino

take a look at the formula , it produces the same thing that you posted :\:helloooo:

yes i'm italian and i come from the city where you have stolen the game last sunday

:boxing:

February 16, 2010

I've seen eurostoxx50 too , but I've noticed that it moves following USA market as all another markets here in Europa they do.

So simply I changed and i trade only USA market,CME emini

Volume Profile · February 16, 2010

Hi Pino

I think you are searching this :

[LegacyColorValue = TRUE];


input:compress(1),len(30),letter1(1),txtcolr(7),opncol(6),closcol(6),lastcol(6),VAprcnt(.70),Valcol(5),
Valsize(3),Stime(Sess1StartTime),passwrd("dxlgkgk79ds8sncdk");

vars:lett("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"),t1(0),vsize(0),cpt(0),dl(0),
lcount(1),fp(0),daynum(0),d0(0),mid(0),dlo(0),pc(0),pc2(0),skp(0),labl(0),vala(0),vap(0),cp(0),t0(0),nuflag(0),
hh(0),ll(0),x(0),et(0), clet(""),curtxt(""),th(0),tl(0),tpstr("00"),tot(0),va(0),d2p(0),oldclet(""),
barhi(0),barlo(0),mintick(0),xpts(0),price(0),up(0),dn(0),oldup(0),olddn(0),flag(0),flag2(0) ;

array:pri[10000](0),tpo[10000](0),pristr[10000]("");


nuflag=0;
if t0 <= Sess1EndTime and t > Sess1EndTime and Sess2StartTime <> 0 then nuflag=1;
if d <> d0 and Sess2StartTime = Sess2EndTime then nuflag=1;
if t0=sess1endtime then nuflag=1;
if  currentbar=1  or nuflag=1   then begin
if currentbar=1 then begin
	vap=VAprcnt;
	x=currentdate;
	if x < 991001 and x > 250101 and passwrd ="bngjdfjru57er" then value98=1; 
	if x < 991231 and x > 250101 and passwrd ="dxlgkgk79ds8sncdk" then value98=1; 
	if BlockNumber <> 32474  then value98=1;	
	value97= 1/value98;
	vsize=mod(valsize+7,7);        
	if vsize < 2  then value88=5 else value88=vsize;
	mintick = 1 point * minmove * compress; 
	xpts=500*mintick;
end;
lcount=letter1;
if currentbar > 1 then begin
	if valcol <> 0 and flag2=0 then begin
		mid=0;value23=0;
		cpt=tl;cp=tl + (th-tl)/2; {center of dist.}
		for x = tl to th begin 
			if pristr[x] <> "" then begin
				pristr[x]=nutpstr(tpo[x],pristr[x],pri[x]);
				value23=value23 + tpo[x]; {total tpo count}
				if tpo[x]=mid and x <= cp then cpt=x;
				if tpo[x]=mid and x>cp and(x-cp) < AbsValue(cp-cpt) then cpt=x;
				if tpo[x] > mid then begin
					cpt=x;
					mid = tpo[x];
				end;
			end;
		end;
		va=value23 * vap;

		x=mid;up=cpt;dn=cpt;
		while x < va begin
			value19=tpo[up+1]+tpo[up+2];  value20=tpo[dn-1]+tpo[dn-2];
			if value19 >= value20 then begin
				if x+tpo[up+1] >= va then begin
					x=x+tpo[up+1]; up=up+1;
				end else begin
					x=x+value19;  up=up+2;
				end;
			end else begin
				if x+tpo[dn-1] >= va then begin
					x=x+tpo[dn-1]; dn=dn-1;
				end else begin
					x=x+value20;  dn=dn-2;
				end;				
			end;
		end;	
		if up > th then up=th; if dn < tl then dn=tl;	
		up= fp+((up-500)*mintick);
		dn=fp+((dn-500)*mintick);
		value62=fp+((cpt-500)*mintick);
		labl= text_new(d2p,t1,dl-mintick,"VA:"+mp_str32(dn)+" "+mp_str32(up));
		TEXT_SETSTYLE(labl,0,2);	
		TEXT_SETCOLOR(labl,valcol);
		vala=TL_New(d2p,t1,up,d2p,t1,dn);
		TL_SetColor(vala,valcol);
		TL_SetSize(vala,vsize);

		value60=TL_New(d2p,t1,value62+mintick/15,d2p,t1,value62-mintick/15);				
		TL_SetColor(value60,valcol);
		TL_SetSize(value60,value88);
	end;
	pc2=0;
	for value4=tl to th begin
		price=fp+((value4-500)*mintick) ;					
		if price <= pc  then pc2=value4;  
	end;
	if pc2=0 then pc2=barlo;
	curtxt=pristr[pc2];
	if RightStr(curtxt,1) <> "<" then begin
		 text_setstring(pri[pc2],curtxt+" <");
		Text_SetColor(pri[pc2],closcol);
	end;
end; 
t1=t;
d2p=d;
labl=0;vala=0;
for value1=tl to th begin
	pristr[value1]="";
	tpo[value1]=0;
end;
clet=curletstr(stime,len,letter1);
oldclet=clet;
dlo=l;
fp=o; 
tpo[500]=1;
th=500;tl=500;
flag=0;                                   
pri[500]= text_new(d,t1,o,"   >"+clet);
pristr[500]="   >"+clet;
TEXT_SETSTYLE(pri[500],0,2);	
TEXT_SETCOLOR(pri[500],opncol);
hh=o;ll=o;mid=1;tot=1;value22=currentbar;
dl=l;
if d= JulianToDate(LastCalcJDate) then flag2=1;
end; 
clet=curletstr(stime,len,letter1) ;
t0=t;d0=d;pc=c;
barhi=intportion((xpts+h-fp+(mintick/10))/mintick);
barlo=ceiling((xpts+l-fp-(mintick/10))/mintick);
if barhi > th then th=barhi;
if barlo < tl then tl=barlo;
if l < dl then dl=l;
IF datacompression=0 and  currentbar  > value22 then begin
lcount=lcount+1;
if lcount=53 then lcount=1;
clet=midstr(lett,lcount,1) ;
hh=o;ll=o;flag=flag+1; 
end;
value22=currentbar;
IF datacompression = 1 and oldclet <> clet  then begin
hh=o;ll=o;flag=flag+1;
end;

for value4=barlo to barhi begin
price=fp+((value4-500)*mintick);
curtxt=pristr[value4]; 
if curtxt = ""   then begin
	tpo[value4]=1;
	pri[value4]= text_new(d2p,t1,price,"    "+clet);
	pristr[value4]="    "+clet;
	TEXT_SETSTYLE(pri[value4],0,2);	
	TEXT_SETCOLOR(pri[value4],txtcolr);
end else begin
	if RightStr(curtxt,1) <> clet then begin
		text_setstring(pri[value4],curtxt+clet);
		pristr[value4]=curtxt+clet;
		tpo[value4]=tpo[value4]+1;
	end;
end;
end;
if h>hh then hh=h;
if l < ll then ll = l;
{------------------------------------------------------------------------------------------}
if valcol <> 0  and  lastbaronchart  then begin
mid=0;value16=0;value23=0;
cpt=tl;cp=tl + (th-tl)/2; {center of dist.}
for x = tl to th begin 
if pristr[x] <> "" then begin
	pristr[x]=nutpstr(tpo[x],pristr[x],pri[x]); 
	value23=value23 + tpo[x]; {total tpo count}
	if tpo[x]=mid and x <= cp then cpt=x;
	if tpo[x]=mid and x>cp and(x-cp) < AbsValue(cp-cpt) then cpt=x;
	if tpo[x] > mid then begin
		cpt=x;
		mid = tpo[x];
	end;
end;
end;
va=value23 * vap;
if l < dlo  then begin
dlo=l;
price=fp+((tl-501)*mintick);
if labl <> 0 then Text_SetLocation(labl,d2p,t1,price);
end;
if labl =0 then begin
price=fp+((tl-501)*mintick);
labl= text_new(d2p,t1,price,"-");
TEXT_SETSTYLE(labl,0,2);	
TEXT_SETCOLOR(labl,valcol);
end;
if va <> 0 then begin
value61=value18; 
x=mid;up=cpt;dn=cpt;
while x < va begin
value19=tpo[up+1]+tpo[up+2];  value20=tpo[dn-1]+tpo[dn-2];
if value19 >= value20 then begin
	if x+tpo[up+1] >= va then begin
		x=x+tpo[up+1]; up=up+1;
	end else begin
		x=x+value19;  up=up+2;
	end;
end else begin
	if x+tpo[dn-1] >= va then begin
		x=x+tpo[dn-1]; dn=dn-1;
	end else begin
		x=x+value20;  dn=dn-2;
	end;				
end;
end;	
if up > th then up=th; if dn < tl then dn=tl;	
value18=cpt;
oldup=up;
olddn=dn;
up= fp+((up-500)*mintick);
dn=fp+((dn-500)*mintick);
if flag=1 then value63=t;
if up > dn and flag > 1  then begin
if vala = 0 then begin
	vala=TL_New(d2p,t1,up,d2p,t1,dn);
	TL_SetColor(vala,valcol);
	TL_SetSize(vala,vsize);
	value62=fp+((value18-500)*mintick);
	value60=TL_New(d2p,t1,value62+mintick/15,d2p,t1,value62-mintick/15);
	TL_SetColor(value60,valcol);
	TL_SetSize(value60,value88);
end else begin
	if oldup <> up then TL_SetBegin(vala,d2p,t1,up);
	if olddn <> dn then TL_SetEnd(vala,d2p,t1,dn);
end;
end;
if {value61 <> value18 and} flag > 1  then begin
value62=fp+((value18-500)*mintick);
TL_SetBegin(value60,d2p,t1,value62+mintick/15);
TL_SetEnd(value60,d2p,t1,value62-mintick/15);
end;
Text_SetString(labl,"VA:"+mp_str32(dn)+" "+mp_str32(up));
end;
end;

if lastcol > 0   then begin
if value10 = 0 and currentbar=3 then begin
value10=tl_new(value50,value51,c,d,t,c);
tl_setcolor(value10,lastcol);
tl_setsize(value10,0);
TL_SetExtLeft(value10,true);
end else if currentbar > 3 and LastBarOnChart   then begin
tl_setend(value10,d,t,c);
tl_setbegin(value10,value52,value53,c);
end;
value52=value50;value53=value51;
value50=d;value51=t;
end;

plot1(l-mintick,"dummy");

P.S.

Juve or Toro ?

February 15, 2010

Thanks Dinerotrade

you have clarified me exactly what i was searching .

I haven't one profit target , i prefer exit not in automatic but manage my position .

instead is very important have a stop loss ,IMHO,that works in automatic and stands at the exchange, in order to prevent huge loss if i can't connecting or i lost the connection.

thanks fot help me

:beer:

Sign In

shrike

Content Count

Joined

Last visited

Content Type

Profiles

Forums

Calendar

Articles

Posts posted by shrike

Profitable Neural Network Strategy

Regression Lines in Real Time - Charting Software

ELD for Bar Text in Corner

ELD for Bar Text in Corner

ProfLogic's Method

ProfLogic's Method

Data Feed

Data Feed

Save Data

Save Data

ProfLogic's Method

Data Feed

Data Feed

Data Feed

Data Feed

Trade Volume Index

Market Order

Market Order

Market Order

Market Order

Market Order

Volume Profile

EuroStoxx 50 Timeframes

Volume Profile

OEC Trader Software Downloads

Activity

Browse

Important Information