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.

  • Welcome Guests

    Welcome. You are currently viewing the forum as a guest which does not give you access to all the great features at Traders Laboratory such as interacting with members, access to all forums, downloading attachments, and eligibility to win free giveaways. Registration is fast, simple and absolutely free. Create a FREE Traders Laboratory account here.

chipeur59700

Pivots

By chipeur59700, in Coding Forum

Recommended Posts

chipeur59700    10

chipeur59700
Posted

hi every body

 

i thank soultrader for code of pivots..

i add code to have quart middle pivots..see code above

 

i need help to have label and value of every pivot point like picture attached...

 

for every ligne the value on the right of the chart

 

thanks

 

 

chipeur

 

code for pivots ...

 

 

 

inputs:

DailyHigh( 0 ), DailyLow( 0 ), DailyClose( 0 ), WeeklyHigh( 0 ), WeeklyLow( 0 ), WeeklyClose( 0 ),

MonthlyHigh( 0 ), MonthlyLow( 0 ), MonthlyClose( 0 ), PlotDailyMidPts( true ),PlotDailyQuartMidPts(true),

PlotWeeklyMidPts( false ),

PlotMonthlyMidPts( false ), DailyR3color( red ), DailyR2color( Red ), DailyR1color( red ),

DailyPPcolor( blue ),

DailyS1color( darkgreen ), DailyS2color( darkgreen ), DailyS3color( darkgreen ), WeeklyR3color( Magenta ),

WeeklyR2color( Red ),

WeeklyR1color( Cyan ), WeeklyPPcolor( Yellow ), WeeklyS1color( Cyan ), WeeklyS2color( Red ),

WeeklyS3color( Magenta ),

MonthlyR3color( Magenta ), MonthlyR2color( Red ), MonthlyR1color( Cyan ), MonthlyPPcolor( Yellow ),

MonthlyS1color( Cyan ), MonthlyS2color( Red ), MonthlyS3color( Magenta ), DailyMidPtcolor( LightGray),

WeeklyMidPtcolor( Blue ), MonthlyMidPtcolor( LightGray ),DailyQuartMidPtcolor( Yellow),

PivotStyle( 2 ), // 1 = solid, 2 = dashed, 3 = dotted, 4 = Dashed2, 5 = dashed3

MidPtStyle( 3 ),

QuartMidPtStyle( 1 );

 

variables:

S1( 0 ), S2( 0 ), S3( 0 ),S4( 0 ), R1( 0 ), R2( 0 ), R3( 0 ),R4( 0 ), PP( 0 ), Rng( 0 ), TL_S1( 0 ),

TL_S2( 0 ), TL_S3( 0 ),TL_S4( 0 ), TL_R1( 0 ), TL_R2( 0 ), TL_R3( 0 ),TL_R4( 0 ), TL_PP( 0 ), TL_M1( 0 ), TL_M2( 0 ),

TL_M3( 0 ), TL_M4( 0 ), TL_M5( 0 ), TL_M6( 0 ),TL_M7( 0 ),TL_M8( 0 ), TL_M9( 0 ), TL_M10( 0 ),TL_M11( 0 ) ,

TL_M12( 0 ),TL_M13( 0 ),TL_M14( 0 ),TL_M15( 0 ),TL_M16( 0 ),TL_M17( 0 ),TL_M18( 0 ),

StartDate( 0 ), StartTime( 0 );

 

if CurrentBar = 1 then

begin

StartDate = Date;

StartTime = Time;

end;

 

if LastBarOnChart then

begin

// Daily Pivot Points

Rng = DailyHigh - DailyLow;

PP = (DailyHigh + DailyLow + DailyClose) / 3 ;

R1 = (2*PP) - DailyLow ;

R2 = PP + Rng ;

R3 = R1 + Rng;

R4 = R3 + Rng;

S1 = (2*PP) - DailyHigh ;

S2 = PP - Rng ;

S3 = S1 - Rng ;

S4 = S3 - Rng ;

 

 

TL_R4 = TL_New(StartDate, StartTime, R4, Date, Time, R4);

TL_SetColor(TL_R4, DailyR3color);

TL_SetStyle(TL_R4, PivotStyle);

TL_SetExtRight(TL_R4, True);

TL_R3 = TL_New(StartDate, StartTime, R3, Date, Time, R3);

TL_SetColor(TL_R3, DailyR3color);

TL_SetStyle(TL_R3, PivotStyle);

TL_SetExtRight(TL_R3, True);

TL_R2 = TL_New(StartDate, StartTime, R2, Date, Time, R2);

TL_SetColor(TL_R2, DailyR2color);

TL_SetStyle(TL_R2, PivotStyle);

TL_SetExtRight(TL_R2, True);

TL_R1 = TL_New(StartDate, StartTime, R1, Date, Time, R1);

TL_SetColor(TL_R1, DailyR1color);

TL_SetStyle(TL_R1, PivotStyle);

TL_SetExtRight(TL_R1, True);

TL_PP = TL_New(StartDate, StartTime, PP, Date, Time, PP);

TL_SetColor(TL_PP, DailyPPcolor);

TL_SetStyle(TL_PP, PivotStyle);

TL_SetExtRight(TL_PP, True);

TL_S1 = TL_New(StartDate, StartTime, S1, Date, Time, S1);

TL_SetColor(TL_S1, DailyS1color);

TL_SetStyle(TL_S1, PivotStyle);

TL_SetExtRight(TL_S1, True);

TL_S2 = TL_New(StartDate, StartTime, S2, Date, Time, S2);

TL_SetColor(TL_S2, DailyS2color);

TL_SetStyle(TL_S2, PivotStyle);

TL_SetExtRight(TL_S2, True);

TL_S3 = TL_New(StartDate, StartTime, S3, Date, Time, S3);

TL_SetColor(TL_S3, DailyS3color);

TL_SetStyle(TL_S3, PivotStyle);

TL_SetExtRight(TL_S3, True);

TL_S4 = TL_New(StartDate, StartTime, S4, Date, Time, S4);

TL_SetColor(TL_S4, DailyS3color);

TL_SetStyle(TL_S4, PivotStyle);

TL_SetExtRight(TL_S4, True);

 

 

If PlotDailyMidPts then

begin

TL_M1 = TL_New(StartDate, StartTime, (R2+R3)/2, Date, Time, (R2+R3)/2);

TL_SetColor(TL_M1, DailyMidPtcolor);

TL_SetStyle(TL_M1, MidPtStyle);

TL_SetExtRight(TL_M1, True);

TL_M2 = TL_New(StartDate, StartTime, (R1+R2)/2, Date, Time, (R1+R2)/2);

TL_SetColor(TL_M2, DailyMidPtcolor);

TL_SetStyle(TL_M2, MidptStyle);

TL_SetExtRight(TL_M2, True);

TL_M3 = TL_New(StartDate, StartTime, (PP+R1)/2, Date, Time, (PP+R1)/2);

TL_SetColor(TL_M3, DailyMidPtcolor);

TL_SetStyle(TL_M3, MidPtStyle);

TL_SetExtRight(TL_M3, True);

TL_M4 = TL_New(StartDate, StartTime, (S1+PP)/2, Date, Time, (S1+PP)/2);

TL_SetColor(TL_M4, DailyMidPtcolor);

TL_SetStyle(TL_M4, MidPtStyle);

TL_SetExtRight(TL_M4, True);

TL_M5 = TL_New(StartDate, StartTime, (S2+S1)/2, Date, Time, (S2+S1)/2);

TL_SetColor(TL_M5, DailyMidPtcolor);

TL_SetStyle(TL_M5, MidPtStyle);

TL_SetExtRight(TL_M5, True);

 

TL_M6 = TL_New(StartDate, StartTime, (S3+S2)/2, Date, Time, (S3+S2)/2);

TL_SetColor(TL_M6, DailyMidPtcolor);

TL_SetStyle(TL_M6, MidPtStyle);

TL_SetExtRight(TL_M6, True);

 

TL_M13 = TL_New(StartDate, StartTime, (S4+S3)/2, Date, Time, (S4+S3)/2);

TL_SetColor(TL_M13, DailyMidPtcolor);

TL_SetStyle(TL_M13, MidPtStyle);

TL_SetExtRight(TL_M13, True);

 

TL_M14 = TL_New(StartDate, StartTime, (R4+R3)/2, Date, Time, (R4+R3)/2);

TL_SetColor(TL_M14, DailyMidPtcolor);

TL_SetStyle(TL_M14, MidPtStyle);

TL_SetExtRight(TL_M14, True);

 

 

 

end;

 

//quart Pivots daily

 

if PlotDailyQuartMidPts then

begin

 

 

TL_M1 = TL_New(StartDate, StartTime,R2-(R2-R1)/4 , Date, Time, R2-(R2-R1)/4);

TL_SetColor(TL_M1,DailyQuartMidPtcolor );

TL_SetStyle(TL_M1, MidPtStyle);

TL_SetExtRight(TL_M1, True);

 

TL_M2 = TL_New(StartDate, StartTime,R1-(R1-R2)/4 , Date, Time,R1-(R1-R2)/4) ;

TL_SetColor(TL_M2,DailyQuartMidPtcolor );

TL_SetStyle(TL_M2, MidptStyle);

TL_SetExtRight(TL_M2, True);

 

TL_M3 = TL_New(StartDate, StartTime,R1-(R1-PP)/4 , Date, Time,R1-(R1-PP)/4) ;

TL_SetColor(TL_M3, DailyQuartMidPtcolor);

TL_SetStyle(TL_M3, MidPtStyle);

TL_SetExtRight(TL_M3, True);

 

TL_M4 = TL_New(StartDate, StartTime,PP+(R1-PP)/4 , Date, Time,PP+(R1-PP)/4);

TL_SetColor(TL_M4, DailyQuartMidPtcolor);

TL_SetStyle(TL_M4, MidPtStyle);

TL_SetExtRight(TL_M4, True);

 

TL_M5 = TL_New(StartDate, StartTime, PP-(PP-S1)/4, Date, Time, PP-(PP-S1)/4);

TL_SetColor(TL_M5, DailyQuartMidPtcolor);

TL_SetStyle(TL_M5, MidPtStyle);

TL_SetExtRight(TL_M5, True);

 

TL_M6 = TL_New(StartDate, StartTime, S1+(PP-S1)/4, Date, Time, S1+(PP-S1)/4);

TL_SetColor(TL_M6, DailyQuartMidPtcolor);

TL_SetStyle(TL_M6, MidPtStyle);

TL_SetExtRight(TL_M6, True);

 

TL_M7 = TL_New(StartDate, StartTime, S1+(S2-S1)/4, Date, Time, S1+(S2-S1)/4);

TL_SetColor(TL_M7, DailyQuartMidPtcolor);

TL_SetStyle(TL_M7, MidPtStyle);

TL_SetExtRight(TL_M7, True);

 

 

TL_M8 = TL_New(StartDate, StartTime,S2-(S2-S1)/4 , Date, Time,S2-(S2-S1)/4) ;

TL_SetColor(TL_M8, DailyQuartMidPtcolor);

TL_SetStyle(TL_M8, MidPtStyle);

TL_SetExtRight(TL_M8, True);

 

TL_M9 = TL_New(StartDate, StartTime,S2-(S2-S3)/4 , Date, Time,S2-(S2-S3)/4);

TL_SetColor(TL_M9, DailyQuartMidPtcolor);

TL_SetStyle(TL_M9, MidPtStyle);

TL_SetExtRight(TL_M9, True);

 

TL_M10 = TL_New(StartDate, StartTime, S3+(S2-S3)/4, Date, Time, S3+(S2-S3)/4);

TL_SetColor(TL_M10, DailyQuartMidPtcolor);

TL_SetStyle(TL_M10, MidPtStyle);

TL_SetExtRight(TL_M10, True);

 

TL_M11 = TL_New(StartDate, StartTime, R2+(R3-R2)/4, Date, Time, R2+(R3-R2)/4);

TL_SetColor(TL_M11, DailyQuartMidPtcolor);

TL_SetStyle(TL_M11, MidPtStyle);

TL_SetExtRight(TL_M11, True);

 

TL_M12 = TL_New(StartDate, StartTime, R3-(R3-R2)/4, Date, Time, R3-(R3-R2)/4);

TL_SetColor(TL_M12, DailyQuartMidPtcolor);

TL_SetStyle(TL_M12, MidPtStyle);

TL_SetExtRight(TL_M12, True);

 

TL_M15 = TL_New(StartDate, StartTime, R4-(R4-R3)/4, Date, Time, R4-(R4-R3)/4);

TL_SetColor(TL_M15, DailyQuartMidPtcolor);

TL_SetStyle(TL_M15, MidPtStyle);

TL_SetExtRight(TL_M15, True);

 

TL_M16 = TL_New(StartDate, StartTime, R3+(R4-R3)/4, Date, Time, R3+(R4-R3)/4);

TL_SetColor(TL_M16, DailyQuartMidPtcolor);

TL_SetStyle(TL_M16, MidPtStyle);

TL_SetExtRight(TL_M16, True);

 

TL_M17 = TL_New(StartDate, StartTime, S4+(S3-S4)/4, Date, Time, S4+(S3-S4)/4);

TL_SetColor(TL_M17, DailyQuartMidPtcolor);

TL_SetStyle(TL_M17, MidPtStyle);

TL_SetExtRight(TL_M17, True);

 

TL_M18 = TL_New(StartDate, StartTime, S3-(S3-S4)/4, Date, Time, S3-(S3-S4)/4);

TL_SetColor(TL_M18, DailyQuartMidPtcolor);

TL_SetStyle(TL_M18, MidPtStyle);

TL_SetExtRight(TL_M18, True);

 

 

 

 

 

end;

 

 

 

// Weekly Pivot Points

Rng = WeeklyHigh - WeeklyLow;

PP = (WeeklyHigh + WeeklyLow + WeeklyClose) / 3 ;

R1 = (2*PP) - WeeklyLow ;

R2 = PP + Rng ;

R3 = R1 + Rng;

S1 = (2*PP) - WeeklyHigh ;

S2 = PP - Rng ;

S3 = S1 - Rng ;

 

TL_R3 = TL_New(StartDate, StartTime, R3, Date, Time, R3);

TL_SetColor(TL_R3, WeeklyR3color);

TL_SetStyle(TL_R3, PivotStyle);

TL_SetExtRight(TL_R3, True);

TL_R2 = TL_New(StartDate, StartTime, R2, Date, Time, R2);

TL_SetColor(TL_R2, WeeklyR2color);

TL_SetStyle(TL_R2, PivotStyle);

TL_SetExtRight(TL_R2, True);

TL_R1 = TL_New(StartDate, StartTime, R1, Date, Time, R1);

TL_SetColor(TL_R1, WeeklyR1color);

TL_SetStyle(TL_R1, PivotStyle);

TL_SetExtRight(TL_R1, True);

TL_PP = TL_New(StartDate, StartTime, PP, Date, Time, PP);

TL_SetColor(TL_PP, WeeklyPPcolor);

TL_SetStyle(TL_PP, PivotStyle);

TL_SetExtRight(TL_PP, True);

TL_S1 = TL_New(StartDate, StartTime, S1, Date, Time, S1);

TL_SetColor(TL_S1, WeeklyS1color);

TL_SetStyle(TL_S1, PivotStyle);

TL_SetExtRight(TL_S1, True);

TL_S2 = TL_New(StartDate, StartTime, S2, Date, Time, S2);

TL_SetColor(TL_S2, WeeklyS2color);

TL_SetStyle(TL_S2, PivotStyle);

TL_SetExtRight(TL_S2, True);

TL_S3 = TL_New(StartDate, StartTime, S3, Date, Time, S3);

TL_SetColor(TL_S3, WeeklyS3color);

TL_SetStyle(TL_S3, PivotStyle);

TL_SetExtRight(TL_S3, True);

 

if PlotWeeklyMidPts then

begin

TL_M1 = TL_New(StartDate, StartTime, (R2+R3)/2, Date, Time, (R2+R3)/2);

TL_SetColor(TL_M1, WeeklyMidPtcolor);

TL_SetStyle(TL_M1, MidPtStyle);

TL_SetExtRight(TL_M1, True);

TL_M2 = TL_New(StartDate, StartTime, (R1+R2)/2, Date, Time, (R1+R2)/2);

TL_SetColor(TL_M2, WeeklyMidPtcolor);

TL_SetStyle(TL_M2, MidptStyle);

TL_SetExtRight(TL_M2, True);

TL_M3 = TL_New(StartDate, StartTime, (PP+R1)/2, Date, Time, (PP+R1)/2);

TL_SetColor(TL_M3, WeeklyMidPtcolor);

TL_SetStyle(TL_M3, MidPtStyle);

TL_SetExtRight(TL_M3, True);

TL_M4 = TL_New(StartDate, StartTime, (S1+PP)/2, Date, Time, (S1+PP)/2);

TL_SetColor(TL_M4, WeeklyMidPtcolor);

TL_SetStyle(TL_M4, MidPtStyle);

TL_SetExtRight(TL_M4, True);

TL_M5 = TL_New(StartDate, StartTime, (S2+S1)/2, Date, Time, (S2+S1)/2);

TL_SetColor(TL_M5, WeeklyMidPtcolor);

TL_SetStyle(TL_M5, MidPtStyle);

TL_SetExtRight(TL_M5, True);

TL_M6 = TL_New(StartDate, StartTime, (S3+S2)/2, Date, Time, (S3+S2)/2);

TL_SetColor(TL_M6, WeeklyMidPtcolor);

TL_SetStyle(TL_M6, MidPtStyle);

TL_SetExtRight(TL_M6, True);

end;

 

// Monthly Pivot Points

Rng = MonthlyHigh - MonthlyLow;

PP = (MonthlyHigh + MonthlyLow + MonthlyClose) / 3 ;

R1 = (2*PP) - MonthlyLow ;

R2 = PP + Rng ;

R3 = R1 + Rng;

S1 = (2*PP) - MonthlyHigh ;

S2 = PP - Rng ;

S3 = S1 - Rng ;

 

TL_R3 = TL_New(StartDate, StartTime, R3, Date, Time, R3);

TL_SetColor(TL_R3, MonthlyR3color);

TL_SetStyle(TL_R3, PivotStyle);

TL_SetExtRight(TL_R3, True);

TL_R2 = TL_New(StartDate, StartTime, R2, Date, Time, R2);

TL_SetColor(TL_R2, MonthlyR2color);

TL_SetStyle(TL_R2, PivotStyle);

TL_SetExtRight(TL_R2, True);

TL_R1 = TL_New(StartDate, StartTime, R1, Date, Time, R1);

TL_SetColor(TL_R1, MonthlyR1color);

TL_SetStyle(TL_R1, PivotStyle);

TL_SetExtRight(TL_R1, True);

TL_PP = TL_New(StartDate, StartTime, PP, Date, Time, PP);

TL_SetColor(TL_PP, MonthlyPPcolor);

TL_SetStyle(TL_PP, PivotStyle);

TL_SetExtRight(TL_PP, True);

TL_S1 = TL_New(StartDate, StartTime, S1, Date, Time, S1);

TL_SetColor(TL_S1, MonthlyS1color);

TL_SetStyle(TL_S1, PivotStyle);

TL_SetExtRight(TL_S1, True);

TL_S2 = TL_New(StartDate, StartTime, S2, Date, Time, S2);

TL_SetColor(TL_S2, MonthlyS2color);

TL_SetStyle(TL_S2, PivotStyle);

TL_SetExtRight(TL_S2, True);

TL_S3 = TL_New(StartDate, StartTime, S3, Date, Time, S3);

TL_SetColor(TL_S3, MonthlyS3color);

TL_SetStyle(TL_S3, PivotStyle);

TL_SetExtRight(TL_S3, True);

 

if PlotMonthlyMidPts then

begin

TL_M1 = TL_New(StartDate, StartTime, (R2+R3)/2, Date, Time, (R2+R3)/2);

TL_SetColor(TL_M1, MonthlyMidPtcolor);

TL_SetStyle(TL_M1, MidPtStyle);

TL_SetExtRight(TL_M1, True);

TL_M2 = TL_New(StartDate, StartTime, (R1+R2)/2, Date, Time, (R1+R2)/2);

TL_SetColor(TL_M2, MonthlyMidPtcolor);

TL_SetStyle(TL_M2, MidptStyle);

TL_SetExtRight(TL_M2, True);

TL_M3 = TL_New(StartDate, StartTime, (PP+R1)/2, Date, Time, (PP+R1)/2);

TL_SetColor(TL_M3, MonthlyMidPtcolor);

TL_SetStyle(TL_M3, MidPtStyle);

TL_SetExtRight(TL_M3, True);

TL_M4 = TL_New(StartDate, StartTime, (S1+PP)/2, Date, Time, (S1+PP)/2);

TL_SetColor(TL_M4, MonthlyMidPtcolor);

TL_SetStyle(TL_M4, MidPtStyle);

TL_SetExtRight(TL_M4, True);

TL_M5 = TL_New(StartDate, StartTime, (S2+S1)/2, Date, Time, (S2+S1)/2);

TL_SetColor(TL_M5, MonthlyMidPtcolor);

TL_SetStyle(TL_M5, MidPtStyle);

TL_SetExtRight(TL_M5, True);

TL_M6 = TL_New(StartDate, StartTime, (S3+S2)/2, Date, Time, (S3+S2)/2);

TL_SetColor(TL_M6, MonthlyMidPtcolor);

TL_SetStyle(TL_M6, MidPtStyle);

TL_SetExtRight(TL_M6, True);

end;

end;

ATPRO.jpg.c03fbacf5190348fead41af183eac132.jpg

Share this post

Link to post
Share on other sites

synonym    10

synonym
Posted

 

Hi Tams

thanks very much for the post. I have in fact already found the ABC floor pivots indicator. I really like it but i'd like to make my own tweaks to it.

 

There are two things i would really like to do to this indicator, but don't know how. :( I'd really appreciate anyones help.

 

1) To display the prices (as well as the label, e.g. 27.93 RR2) at each floor level

 

2) To have it plot the levels in anticipation of the forthcoming period, i.e. at the end of trading today, to plot the levels in the clear space at the end of the chart where the tomorrow's bars will plot. Otherwise you still have manually calculate the forthcming pivot levels and add them to the chart (or simply bear them in mind), which is far from ideal.

 

I don't know if anyone has already done this, or knows how to?

Cheers

Syn

Share this post

Link to post
Share on other sites

Harlequin    10

Harlequin
Posted

Here's the bit from my pivot study you just need to change the variables to match yours

 

if ShowLabels then

begin

 

{ only show for today }

// If Date = CurrentDate and Time>= Sess1StartTime and Time <= sess1endtime - BarInterval then

Begin

 

TextPP = Text_New( Date, Time, PP, "PP " + NumToStr( PP, DecP) ) ;

Text_SetStyle( TextPP, 1, 1 ) ;

Text_SetColor(TextPP, PCol);

 

TextS1 = Text_New( Date, Time, S1, "S1 " + NumToStr( S1, DecP) ) ;

Text_SetStyle( TextS1, 1, 1 ) ;

Text_SetColor(TextS1, PCol);

 

TextS2 = Text_New( Date, Time, S2, "S2 " + NumToStr( S2, DecP) ) ;

Text_SetStyle( TextS2, 1, 1 ) ;

Text_SetColor(TextS2, PCol);

 

TextS3 = Text_New( Date, Time, S3, "S3 " + NumToStr( S3, DecP) ) ;

Text_SetStyle( TextS3, 1, 1 ) ;

Text_SetColor(TextS3, PCol);

 

TextS4 = Text_New( Date, Time, S4, "S4 " + NumToStr( S4, DecP) ) ;

Text_SetStyle( TextS4, 1, 1 ) ;

Text_SetColor(TextS4, PCol);

 

TextS5 = Text_New( Date, Time, S5, "S5 " + NumToStr( S5, DecP) ) ;

Text_SetStyle( TextS5, 1, 1 ) ;

Text_SetColor(TextS5, PCol);

 

TextR1 = Text_New( Date, Time, R1, "R1 " + NumToStr( R1, DecP) ) ;

Text_SetStyle( TextR1, 1, 1 ) ;

Text_SetColor(TextR1, PCol);

 

TextR2 = Text_New( Date, Time, R2, "R2 " + NumToStr( R2, DecP) ) ;

Text_SetStyle( TextR2, 1, 1 ) ;

Text_SetColor(TextR2, PCol);

 

TextR3 = Text_New( Date, Time, R3, "R3 " + NumToStr( R3, DecP) ) ;

Text_SetStyle( TextR3, 1, 1 ) ;

Text_SetColor(TextR3, PCol);

 

TextR4 = Text_New( Date, Time, R4, "R4 " + NumToStr( R4, DecP) ) ;

Text_SetStyle( TextR4, 1, 1 ) ;

Text_SetColor(TextR4, PCol);

 

TextR5 = Text_New( Date, Time, R5, "R5 " + NumToStr( R5, DecP) ) ;

Text_SetStyle( TextR5, 1, 1 ) ;

Text_SetColor(TextR5, PCol);

 

if showmidpoints=true then

begin

 

TextMPS1 = Text_New( Date, Time, MPS1, "S0.5 " + NumToStr( MPS1, DecP) ) ;

Text_SetStyle( TextMPS1, 1, 1 ) ;

Text_SetColor(TextMPS1, MidCol);

 

TextMPS2 = Text_New( Date, Time, MPS2, "S1.5 " + NumToStr( MPS2, DecP) ) ;

Text_SetStyle( TextMPS2, 1, 1 ) ;

Text_SetColor(TextMPS2, MidCol);

 

TextMPS3 = Text_New( Date, Time, MPS3, "S2.5 " + NumToStr( MPS3, DecP) ) ;

Text_SetStyle( TextMPS3, 1, 1 ) ;

Text_SetColor(TextMPS3, MidCol);

 

TextMPR1 = Text_New( Date, Time, MPR1, "R0.5 " + NumToStr( MPR1, DecP) ) ;

Text_SetStyle( TextMPR1, 1, 1 ) ;

Text_SetColor(TextMPR1, MidCol);

 

TextMPR2 = Text_New( Date, Time, MPR2, "R1.5 " + NumToStr( MPR2, DecP) ) ;

Text_SetStyle( TextMPR2, 1, 1 ) ;

Text_SetColor(TextMPR2, MidCol);

 

TextMPR3 = Text_New( Date, Time, MPR3, "R2.5 " + NumToStr( MPR3, DecP) ) ;

Text_SetStyle( TextMPR3, 1, 1 ) ;

Text_SetColor(TextMPR3, MidCol);

 

end;

 

end;

end;

end;

end;

 

if ShowLabels then

begin

 

text_setlocation(textPP,date,currenttime-HorizontalOffset,PP);

text_setlocation(textS1,date,currenttime-HorizontalOffset,S1);

text_setlocation(textS2,date,currenttime-HorizontalOffset,S2);

text_setlocation(textS3,date,currenttime-HorizontalOffset,S3);

text_setlocation(textS4,date,currenttime-HorizontalOffset,S4);

text_setlocation(textS5,date,currenttime-HorizontalOffset,S5);

text_setlocation(textR1,date,currenttime-HorizontalOffset,R1);

text_setlocation(textR2,date,currenttime-HorizontalOffset,R2);

text_setlocation(textR3,date,currenttime-HorizontalOffset,R3);

text_setlocation(textR4,date,currenttime-HorizontalOffset,R4);

text_setlocation(textR5,date,currenttime-HorizontalOffset,R5);

 

if showmidpoints then

begin

text_setlocation(textMPS1,date,currenttime-HorizontalOffset,MPS1);

text_setlocation(textMPS2,date,currenttime-HorizontalOffset,MPS2);

text_setlocation(textMPS3,date,currenttime-HorizontalOffset,MPS3);

text_setlocation(textMPR1,date,currenttime-HorizontalOffset,MPR1);

text_setlocation(textMPR2,date,currenttime-HorizontalOffset,MPR2);

text_setlocation(textMPR3,date,currenttime-HorizontalOffset,MPR3);

end;

end;

end;

Share this post

Link to post
Share on other sites

synonym    10

synonym
Posted

Hi Harlequin

thanks for posting your code! Given that i'm a complete newcomer to coding, it doesn't mean much to me at the moment! But it gives me something to work with.

Cheers

S

Share this post

Link to post
Share on other sites

Harlequin    10

Harlequin
Posted

I learnt to code Basic on ZX81 when I was a kid, unfortunately my skill level hasn't improved since. I just borrowed bits from other pivot studies I found here and else where on the web.

 

Hope it helps.

Share this post

Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
Go To Topic Listing

  • Topics

  • Posts

    • HFblogNews
      HFMarkets (hfm.com): Market analysis services.

      By HFblogNews · Posted

      Date: 13th May 2024. Market News – Stock markets traded mixed; Flat USD ahead of US CPI.   Economic Indicators & Central Banks:   Japanese government bond yields surged to multi years highs after the BOJ’s unexpected move to decrease the quantity of bonds it typically purchases during routine operations, signaling a more hawkish stance to the markets. BOJ Kato stated that it’s natural that monetary policy will revert to positive interest rates, while BOJ Governor Ueda signalled the potential for multiple rate hikes ahead. Chinese authorities have kicked off plans to sell $140bn of long-dated bonds on Friday, in order to support investment in key areas and reinforce economic momentum in the second quarter amid the country’s lengthy property crisis. US government plans to raise tariffs to a raft of Chinese exports were weighing on sentiment. BlackRock stated: The Yen’s weakness is turning foreign investors away from Japanese stocks. Financial Markets Performance:   The USDIndex is steady at 105 lows, at 105.58 ahead of US CPI on Wednesday, while USDJPY is holding at 155.80, after retesting May’s high at 155.96. EURUSD steady above 1.0750 as the euro zone prepares for an inflation reading of its own on Friday. USOIL declined amid demand concerns and as traders looked ahead to an OPEC+ meeting on supply policy. On the supply front, the Iraqi Oil Minister initially claimed that production cuts were adequate and opposed further reductions but later deferred decisions to OPEC. Next OPEC+ meeting: June 1. Currently USOIL is at $77.78. Gold corrected to $2349 per ounce, from $2380 highs. Market Trends:   Asian stocks fluctuate between gains and losses, as sentiment was impacted by disappointing Chinese economic data alongside optimism amid reports indicating that the country plans to initiate the sale of ultra-long bonds. European markets are also narrowly mixed in opening trade, while US futures are slightly higher. The NASDAQ is outperforming. Bonds are finding buyers and the 10-year Treasury yield is down -1.0 bp, while Bund and Gilt yields have corrected -1.3 bp and -2.3 bp in early trade. Always trade with strict risk management. Your capital is the single most important aspect of your trading business. Please note that times displayed based on local time zone and are from time of writing this report. Click HERE to access the full HFM Economic calendar. Want to learn to trade and analyse the markets? Join our webinars and get analysis and trading ideas combined with better understanding on how markets work. Click HERE to register for FREE! Click HERE to READ more Market news. Andria Pichidi Market Analyst HFMarkets Disclaimer: This material is provided as a general marketing communication for information purposes only and does not constitute an independent investment research. Nothing in this communication contains, or should be considered as containing, an investment advice or an investment recommendation or a solicitation for the purpose of buying or selling of any financial instrument. All information provided is gathered from reputable sources and any information containing an indication of past performance is not a guarantee or reliable indicator of future performance. Users acknowledge that any investment in FX and CFDs products is characterized by a certain degree of uncertainty and that any investment of this nature involves a high level of risk for which the users are solely responsible and liable. We assume no liability for any loss arising from any investment made based on the information provided in this communication. This communication must not be reproduced or further distributed without our prior written permission.
    • Stocks4life
      Breakout and Swing Stock Ideas

      By Stocks4life · Posted

      $QCOM Qualcomm stock bull flag breakout, https://stockconsultant.com/?QCOM
    • Stocks4life
      Breakout and Swing Stock Ideas

      By Stocks4life · Posted

      $JBLU Jetblue stock great day off the 5.73 triple support area, from Stocks To Watch, https://stockconsultant.com/?JBLU
    • Stocks4life
      Breakout and Swing Stock Ideas

      By Stocks4life · Posted

      AA Alcoa stock big breakout, from Stocks To Watch, https://stockconsultant.com/?AA
    • Stocks4life
      Breakout and Swing Stock Ideas

      By Stocks4life · Posted

      BOX stock finding some support 26.42 area, bullish stats, https://stockconsultant.com/?BOX
×
×
  • Create New...

Important Information

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

  I accept