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.

pitrader

Countdown Timer

Recommended Posts

I have a countdown timer that was written for TS but it will not compile for MC. I have the code below if somebody can help me to get it to compile.

 

Thanks

 

Pi

 

{ _TimerExample4

 

v1.1 6 February 2012

 

Designed for TradeStation 9

 

This code is a simple bar countdown timer for minute bars.

}

 

 

using elsystem;

 

vars: int TXID(0),

 

IntrabarPersist Countdown_Text(" time"),

 

IntrabarPersist mins(0), IntrabarPersist secs(0),

IntrabarPersist mins_str(""), IntrabarPersist secs_str(""),

 

IntrabarPersist Guess(true),

 

Countdown_seconds(1),

 

Timer Timer(null);

 

 

//This is the Timer event. Note that we've seperated out the 'time left in bar' calculation,

// and the 'display text' calculation into their own methods. And then we call them from

// this event. This is good coding practice.

method void Timer1_Elapsed( Object sender, TimerElapsedEventArgs args )

begin

Calc_Time_Remaining(); //Calculate the amount of time remaining

 

Display_Text(); //Display the amount of time remaining

end;

 

 

//Calculate the amount of time remaining in the bar

// This is reasonably complex, but isn't particularly relevant to how the Timer object works

// so you don't need to understand it

method void Calc_Time_Remaining()

begin

//If its the end of a bar then set the countdown to the bar interval

if BarStatus(1) = 2 then begin

mins = BarInterval;

secs = 0;

 

Guess = false;

 

//We're turning the time off and on here just to sync it correctly with the bar end

Timer1.Enable = false;

Timer1.Enable = true;

end

//This is our first guess at the bar time, before we have a bar end to sync properly.

// It uses your computer clock to work out roughly how much time is left in a bar.

else if Guess then begin

mins = time - CurrentTime;

secs = 60 - SecondsFromDateTime(ComputerDateTime);

if secs = 60 then secs = 0;

if secs > 0 then mins = mins - 1;

end

//Countdown our timer

else begin

secs = secs - Countdown_seconds;

if secs < 0 then begin

 

secs = 9;

end;

end;

 

//Set our Countdown_Text variable to the correct string

 

secs_str = NumToStr(secs, 0);

if strlen(secs_str) = 1 then secs_str = "0" + secs_str;

Countdown_Text = " " + mins_str +":" + secs_str;

end;

 

 

 

//Display our countdown text

method void Display_Text()

begin

Text_SetString(TXID, Countdown_Text);

Text_SetLocation(TXID, date, time, Close);

Text_SetStyle(TXID, 0, 2);

Text_SetColor(TXID, yellow);

end;

 

 

 

//This author uses 'once' to initialize objects. Other authors may use

// AnalysisTechnique_Initialize, or a component dragged and dropped from the

// ToolBox. All approaches are equally valid, they are just down to the

// authors style.

once

begin

//Create the Timer, set it to update every second, but don't start it yet

Timer1 = new elsystem.Timer;

Timer1.Interval = Countdown_seconds * 1000;

Timer1.Elapsed += Timer1_Elapsed;

 

//Create the text to display the countdown

TXID = Text_New(date, time, close, Countdown_Text);

end;

 

 

//When the first real-time tick arrives...

if GetAppInfo(aiRealTimeCalc) = 1 then begin

//...start the Timer

Timer1.Enable = true;

 

//Set the amount of time left in a bar at the end of every bar

if BarStatus(1) = 2 then begin

Calc_Time_Remaining();

end;

end;

 

Display_Text();

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.


×
×
  • Create New...

Important Information

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