Jump to content

Welcome to the new Traders Laboratory! Please bear with us as we finish the migration over the next few days. If you find any issues, want to leave feedback, get in touch with us, or offer suggestions please post to the Support forum here.

shrike

Members
  • Content Count

    85
  • Joined

  • Last visited

Everything posted by shrike

  1. 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
  2. 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
  3. 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
  4. 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;
  5. 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
  6. 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
  7. 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 . 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).
  8. 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
  9. shrike

    Save Data

    Hi Tams ok I'll try to read again and make more test
  10. shrike

    Save Data

    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.
  11. 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
  12. 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.
  13. 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.
  14. 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.
  15. 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 .
  16. 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);
  17. shrike

    Market Order

    your question is strange Close of the bar can be included in each minimun price movement ,lenght is the size of the bar
  18. shrike

    Market Order

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

    Market Order

    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
  20. shrike

    Market Order

    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
  21. shrike

    Market Order

    Hi try this : value1=C[1]; if last=value1 then buy this bar ;
  22. 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:
  23. 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
  24. 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 ?
  25. 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:
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.