TRO 24Hours

post your indicators here

Moderator: moderators

User avatar
TheRumpledOne
rank: 10000+ posts
rank: 10000+ posts
Posts: 11396
Joined: Sun May 14, 2006 9:31 pm
Reputation: 45
Location: Oregon
Real name: Avery T. Horton, Jr.
Gender: None specified
Contact:

TRO 24Hours

Postby TheRumpledOne » Sat Aug 18, 2007 5:33 pm

TRO 24Hours



I was emailing with Mike Parker (MP) this week about forex trading. MP told me he was playing the reversals. A currency seems to follow a pattern - certain hours it goes down and other hours it goes up.

TRO 24hours displays the candle body size. Green is up and Red is down.

What pattern do you see?


Code: Select all

{ _TRO_24Hours }
   
   
{Attn: TradeStation
if this indicator is posted on the TradeStation Forum, I, TheRumpledOne, did NOT post it there,
so I can't be blamed for this indicator having my contact info.}


{Programmer:  Avery T. Horton, Jr.  aka TheRumpledOne,
gifts and donations accepted, PO Box 43575, Tucson, AZ 85733 }

{ ? Copyright 2007 Avery T. Horton, Jr.}


inputs:
   
iDecimals(4),

iPlotDate(1070817),
iPlotValue(close - open);




variables:

pv1(white),
pv2(white),
pv3(white),
pv4(white),
pv5(white),
pv6(white),
pv7(white),
pv8(white),
pv9(white),
pv10(white),
pv11(white),
pv12(white),
pv13(white),
pv14(white),
pv15(white),
pv16(white),
pv17(white),
pv18(white),
pv19(white),
pv20(white),
pv21(white),
pv22(white),
pv23(white),
pv24(white);

variables:

FG1(white),
FG2(white),
FG3(white),
FG4(white),
FG5(white),
FG6(white),
FG7(white),
FG8(white),
FG9(white),
FG10(white),
FG11(white),
FG12(white),
FG13(white),
FG14(white),
FG15(white),
FG16(white),
FG17(white),
FG18(white),
FG19(white),
FG20(white),
FG21(white),
FG22(white),
FG23(white),
FG24(white),

BG1(white),
BG2(white),
BG3(white),
BG4(white),
BG5(white),
BG6(white),
BG7(white),
BG8(white),
BG9(white),
BG10(white),
BG11(white),
BG12(white),
BG13(white),
BG14(white),
BG15(white),
BG16(white),
BG17(white),
BG18(white),
BG19(white),
BG20(white),
BG21(white),
BG22(white),
BG23(white),
BG24(white);

{commentary variables}

variables:
xcomm(0),
oComm1( "" ),    
oComm2( "" ),    
oComm3( "" ),    
oComm4( "" ),    
oComm5( "" ),
oComm6( "" ),
oComm7( "" ),
oComm8( "" ),
oComm9( "" ),    
oComm10( "" );
   

{ INITIALIZE }
   

FG1 = black ;
FG2 = black ;
FG3 = black ;
FG4 = black ;
FG5 = black ;
FG6 = black ;
FG7 = black ;
FG8 = black ;
FG9 = black ;
FG10 = black ;
FG11 = black ;
FG12 = black ;
FG13 = black ;
FG14 = black ;
FG15 = black ;
FG16 = black ;
FG17 = black ;
FG18 = black ;
FG19 = black ;
FG20 = black ;
FG21 = black ;
FG22 = black ;
FG23 = black ;
FG24 = black ;



If date = iPlotDate      
then begin


if time = 0000
then begin
   FG1 = white ;
   pv1 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG1 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG1 = red;
   end;
end; // if time= 0000

if time = 0100
then begin
   FG2 = white ;
   pv2 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG2 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG2 = red;
   end;
end; // if time= 0100


if time = 0200
then begin
   FG3 = white ;
   pv3 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG3 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG3 = red;
   end;
end; // if time= 0200


if time = 0300
then begin
   FG4 = white ;
   pv4 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG4 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG4 = red;
   end;
end; // if time= 0300




if time = 0400
then begin
   FG5 = white ;
   pv5 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG5 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG5 = red;
   end;
end; // if time= 0400

if time = 0500
then begin
   FG6 = white ;
   pv6 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG6 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG6 = red;
   end;
end; // if time= 0500


if time = 0600
then begin
   FG7 = white ;
   pv7 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG7 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG7 = red;
   end;
end; // if time= 0600

if time = 0700
then begin
   FG8 = white ;
   pv8 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG8 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG8 = red;
   end;
end; // if time= 0700

if time = 0800
then begin
   FG9 = white ;
   pv9 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG9 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG9 = red;
   end;
end; // if time= 0800

if time = 0900
then begin
   FG10 = white ;
   pv10 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG10 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG10 = red;
   end;
end; // if time= 0900
   
if time = 1000
then begin
   FG11 = white ;
   pv11 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG11 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG11 = red;
   end;
end; // if time= 1000

if time = 1100
then begin
   FG12 = white ;
   pv12 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG12 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG12 = red;
   end;
end; // if time= 1100

if time = 1200
then begin
   FG13 = white ;
   pv13 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG13 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG13 = red;
   end;
end; // if time= 1200


if time = 1300
then begin
   FG14 = white ;
   pv14 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG14 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG14 = red;
   end;
end; // if time= 1300

if time = 1400
then begin
   FG15 = white ;
   pv15 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG15 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG15 = red;
   end;
end; // if time= 1400

if time = 1500
then begin
   FG16 = white ;
   pv16 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG16 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG16 = red;
   end;
end; // if time= 1500

if time = 1600
then begin
   FG17 = white ;
   pv17 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG17 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG17 = red;
   end;
end; // if time= 1600

if time = 1700
then begin
   FG18 = white ;
   pv18 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG18 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG18 = red;
   end;
end; // if time= 1700

if time = 1800
then begin
   FG19 = white ;
   pv19 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG19 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG19 = red;
   end;
end; // if time= 1800

if time = 1900
then begin
   FG20 = white ;
   pv20 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG20 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG20 = red;
   end;
end; // if time= 1900

if time = 2000
then begin
   FG21 = white ;
   pv21 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG21 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG21 = red;
   end;
end; // if time= 2000

if time = 2100
then begin
   FG22 = white ;
   pv22 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG22 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG22 = red;
   end;
end; // if time= 2100
 
if time = 2200
then begin
   FG23 = white ;
   pv23 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG23 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG23 = red;
   end;
end; // if time= 2200

if time = 2300
then begin
   FG24 = white ;
   pv24 = iPlotValue ;
   If iPlotValue > 0
   then begin
      BG24 = green;
   end
   else
   If iPlotValue < 0
   then begin
      BG24 = red;
   end;
end; // if time= 2300


end; //If date = iPlotDate   


{ PLOT }

Plot1 ( pv1 , "0000", fg1 );
SetPlotBGColor( 1, bg1);

Plot2 ( pv2 , "0100", fg2 );
SetPlotBGColor( 2, bg2);

Plot3 ( pv3 , "0200", fg3);
SetPlotBGColor( 3, bg3);

Plot4 ( pv4 , "0300", fg4);
SetPlotBGColor( 4, bg4);

Plot5 ( pv5 , "0400", fg5);
SetPlotBGColor( 5, bg5);

Plot6 ( pv6 , "0500", fg6);
SetPlotBGColor( 6, bg6);

Plot7 ( pv7 , "0600", fg7);
SetPlotBGColor( 7, bg7);

Plot8 ( pv8 , "0700", fg8);
SetPlotBGColor( 8, bg8);

Plot9 ( pv9 , "0800", fg9);
SetPlotBGColor( 9, bg9);

Plot10 ( pv10 , "0900", fg10);
SetPlotBGColor( 10, bg10);

Plot11 ( pv11 , "1000", fg11);
SetPlotBGColor( 11, bg11);

Plot12 ( pv12 , "1100", fg12);
SetPlotBGColor( 12, bg12);

Plot13 ( pv13 , "1200", fg13);
SetPlotBGColor( 13, bg13);

Plot14 ( pv14 , "1300", fg14);
SetPlotBGColor( 14, bg14);

Plot15 ( pv15 , "1400", fg15);
SetPlotBGColor( 15, bg15);

Plot16 ( pv16 , "1500", fg16);
SetPlotBGColor( 16, bg16);

Plot17 ( pv17 , "1600", fg17);
SetPlotBGColor( 17, bg17);

Plot18 ( pv18 , "1700", fg18);
SetPlotBGColor( 18, bg18);

Plot19 ( pv19 , "1800", fg19);
SetPlotBGColor( 19, bg19);

Plot20 ( pv20 , "1900", fg20);
SetPlotBGColor( 20, bg20);

Plot21 ( pv21 , "2000", fg21);
SetPlotBGColor( 21, bg21);

Plot22 ( pv22 , "2100", fg22);
SetPlotBGColor( 22, bg22);

Plot23 ( pv23 , "2200", fg23);
SetPlotBGColor( 23, bg23);

Plot24 ( pv24 , "2300", fg24);
SetPlotBGColor( 24, bg24);

Plot25 ( iPlotDate , "date", white);
SetPlotBGColor( 25, black);

xComm = _fCommentary(oComm1, oComm2, oComm3, oComm4, oComm5, oComm6, oComm7, oComm8, oComm9, oComm10);

CommentaryCl(oComm1 );

CommentaryCl(oComm2 );
CommentaryCl(oComm3 );
CommentaryCl(oComm4 );
CommentaryCl(oComm5 );
CommentaryCl(oComm6 );
CommentaryCl(oComm7 );
CommentaryCl(oComm8 );
CommentaryCl(oComm9 );
CommentaryCl(oComm10 );

CommentaryCl( " " );
Attachments
TRO_24HOURS.ELD
(16.72 KiB) Downloaded 392 times
TRO-24HOURS.tsw
(64 KiB) Downloaded 414 times
Last edited by TheRumpledOne on Sat Aug 18, 2007 6:05 pm, edited 1 time in total.
IT'S NOT WHAT YOU TRADE, IT'S HOW YOU TRADE IT!

Please do NOT PM me with trading or coding questions, post them in a thread.

Please add www.kreslik.com to your ad blocker white list.
Thank you for your support.

cvax
rank: 50+ posts
rank: 50+ posts
Posts: 83
Joined: Sun May 13, 2007 12:45 am
Reputation: 0
Gender: None specified

Postby cvax » Sat Aug 18, 2007 5:38 pm

Looks like a zero sum to me lol. Maybe we could find slight skews towards red/green if we take this over a sample of many years.

User avatar
TheRumpledOne
rank: 10000+ posts
rank: 10000+ posts
Posts: 11396
Joined: Sun May 14, 2006 9:31 pm
Reputation: 45
Location: Oregon
Real name: Avery T. Horton, Jr.
Gender: None specified
Contact:

Postby TheRumpledOne » Sat Aug 18, 2007 9:30 pm

Look at 0800.

Look at 1600.

Look at 2100.

Remember, I am on Pacific Time.
IT'S NOT WHAT YOU TRADE, IT'S HOW YOU TRADE IT!



Please do NOT PM me with trading or coding questions, post them in a thread.

User avatar
Patch
rank: 500+ posts
rank: 500+ posts
Posts: 941
Joined: Sat Jan 06, 2007 6:13 pm
Reputation: 0
Location: Virginia
Real name: Jeff
Gender: Male
Contact:

Postby Patch » Sun Aug 19, 2007 3:47 pm

TRO

Thanks for writing this ELD and posting it along with the code. Will this code run as an ELS in my 2000i? I will need to load 2000i on my system and see.

Thanks,

Patch
In VA
ENOUGH being a Yalie for me Back to the Sea. "What i can lose, i can win" "YES YOU CAN" - dragon33 -"Pick one method and one pair and stick with them until you master it. "The choice is yours - success or failure." TRO

bbtrader
rank: <50 posts
rank: <50 posts
Posts: 11
Joined: Wed Mar 07, 2007 4:51 am
Reputation: 0
Gender: None specified

TRO 24Hours

Postby bbtrader » Fri Aug 24, 2007 10:51 pm

TRO

Are you saying something like...
go short during the 0800 hour
long at 1600 hour
and short during the 2100 hour?

Certainly looks good....just trying to figure out how to make a tradeable strategy from it.

Please add www.kreslik.com to your ad blocker white list.
Thank you for your support.

User avatar
TheRumpledOne
rank: 10000+ posts
rank: 10000+ posts
Posts: 11396
Joined: Sun May 14, 2006 9:31 pm
Reputation: 45
Location: Oregon
Real name: Avery T. Horton, Jr.
Gender: None specified
Contact:

Re: TRO 24Hours

Postby TheRumpledOne » Sat Aug 25, 2007 7:16 pm

bbtrader wrote:TRO

Are you saying something like...
go short during the 0800 hour
long at 1600 hour
and short during the 2100 hour?

Certainly looks good....just trying to figure out how to make a tradeable strategy from it.


Just see if you can find a ( profitable ) pattern to exploit.
IT'S NOT WHAT YOU TRADE, IT'S HOW YOU TRADE IT!



Please do NOT PM me with trading or coding questions, post them in a thread.

Shane280us
rank: <50 posts
rank: <50 posts
Posts: 24
Joined: Sat May 12, 2007 1:04 am
Reputation: 0
Location: Dallas, Texas, USA
Gender: Male

Postby Shane280us » Sun Aug 26, 2007 2:57 pm

TRO,

What are the numbers within each green and red box representing. PIP movement ? or something else.

Tks

Shane

User avatar
TheRumpledOne
rank: 10000+ posts
rank: 10000+ posts
Posts: 11396
Joined: Sun May 14, 2006 9:31 pm
Reputation: 45
Location: Oregon
Real name: Avery T. Horton, Jr.
Gender: None specified
Contact:

Postby TheRumpledOne » Wed Aug 29, 2007 11:27 pm

I added a comment input field.

ELD attached.
Attachments
TRO_24HOURS.ELD
(16.9 KiB) Downloaded 136 times
IT'S NOT WHAT YOU TRADE, IT'S HOW YOU TRADE IT!



Please do NOT PM me with trading or coding questions, post them in a thread.

fibcat
rank: <50 posts
rank: <50 posts
Posts: 17
Joined: Fri Sep 08, 2006 2:15 pm
Reputation: 0
Gender: Male

Re: TRO 24Hours

Postby fibcat » Wed Sep 12, 2007 11:25 am

TheRumpledOne wrote:TRO 24Hours



... A currency seems to follow a pattern - certain hours it goes down and other hours it goes up.



The colors/values in the hour columns, wich Time are referred to?
London GMT ? NY? Other? How many hours must I subtract to obtain GMT?

User avatar
TheRumpledOne
rank: 10000+ posts
rank: 10000+ posts
Posts: 11396
Joined: Sun May 14, 2006 9:31 pm
Reputation: 45
Location: Oregon
Real name: Avery T. Horton, Jr.
Gender: None specified
Contact:

Postby TheRumpledOne » Wed Sep 12, 2007 10:54 pm

AZ time, which at the moment is the same as pacific time.
IT'S NOT WHAT YOU TRADE, IT'S HOW YOU TRADE IT!



Please do NOT PM me with trading or coding questions, post them in a thread.

Please add www.kreslik.com to your ad blocker white list.
Thank you for your support.


Return to “Tradestation indicators”