Plot daily indicator in real time

Author: Starburst

Creation Date: 10/7/2013 9:05 PM

Wealth Lab » WealthScript (.NET) » Plot daily indicator in real time

Starburst

10/7/2013 9:05 PM

I saw BigReturns post and I too would like to plot a daily indicator in real time on an intraday chart. I am not a programmer but could someone help me work through this code.
Here is my indicator.

CODE:
Please log in to see this code.

Size:

Color:

I saw [link=http://www.wealth-lab.com/Forum/Posts/Custom-Daily-Indicator-based-on-Intraday-Data-33569]BigReturns post[/link] and I too would like to plot a daily indicator in real time on an intraday chart.  I am not a programmer but could someone help me work through this code.
Here is my indicator.
[code]
//*************** Value Charts *******************
			double NumBars = 5.0;
			double VarNumBars = 0.0; 
			int VarP;
			int Bar = 0;

DataSeries VarA = new DataSeries(Bars, "VarA Series");
			DataSeries VarB = new DataSeries(Bars, "VarB Series");
			DataSeries VarC = new DataSeries(Bars, "VarC Series");
			DataSeries VarD = new DataSeries(Bars, "VarD Series");
			DataSeries VarE = new DataSeries(Bars, "VarE Series");
			DataSeries Var0 = new DataSeries(Bars, "Var0 Series");
			DataSeries VarR1 = new DataSeries(Bars, "VarR1 Series");
			DataSeries VarR2 = new DataSeries(Bars, "VarR2 Series");
			DataSeries VarR3 = new DataSeries(Bars, "VarR3 Series");
			DataSeries VarR4 = new DataSeries(Bars, "VarR4 Series");
			DataSeries VarR5 = new DataSeries(Bars, "VarR5 Series");
			DataSeries LRange = new DataSeries(Bars, "LRange Series");
			
			/** Insure NumBars is between 2 and 1000 */ 
			if ((NumBars < 2.0)) VarNumBars = 2.0;
			/** Insure NumBars is between 2 and 1000 */ 
			if ((NumBars > 1000.0)) VarNumBars = 1000.0;
			if ((((NumBars >= 2.0)) && ((NumBars <= 1000.0)))) VarNumBars = NumBars;
			VarP = (int)Math.Round((VarNumBars / 5.0 ), 0 );
			
			DataSeries HiVar = Highest.Series( High, VarP);
			DataSeries LoVar = Lowest.Series( Low, VarP);

if ((VarNumBars > 7)) 
			{
				for (Bar = 8; Bar <= (Bars.Count - 1); Bar++) 
				{  
					VarA[Bar] = HiVar[Bar] - LoVar[Bar];
					if ((VarA[Bar] == 0) & (VarP == 1)) VarR1[Bar] = Math.Abs(Close[Bar] - Close[Bar - VarP]);	
					else VarR1[Bar] = VarA[Bar];
					VarB[Bar] = HiVar[Bar -(VarP + 1)] - LoVar[Bar - VarP];
					if ((VarB[Bar] == 0) & (VarP == 1)) VarR2[Bar] = Math.Abs(Close[Bar - VarP] - Close[Bar - VarP * 2]);
					else VarR2[Bar] = VarB[Bar];
					VarC[Bar] = HiVar[Bar - (VarP * 2)] - LoVar[Bar - (VarP * 2)];
					if ((VarC[Bar] == 0) & (VarP == 1)) VarR3[Bar] = Math.Abs(Close[Bar - (VarP * 2)] - Close[Bar - (VarP * 3)]);
					else VarR3[Bar] = VarC[Bar];
					VarD[Bar] = HiVar[Bar - (VarP * 3)] - LoVar[Bar - (VarP * 3)];
					if ((VarD[Bar] == 0) & (VarP == 1)) VarR4[Bar] = Math.Abs(Close[Bar - (VarP * 3)] - Close[Bar - (VarP * 4)]);
					else VarR4[Bar] = VarD[Bar];
					VarE[Bar] = HiVar[Bar - (VarP * 4)] - LoVar[Bar - (VarP * 4)];
					if ((VarE[Bar] == 0) & (VarP == 1)) VarR5[Bar] = Math.Abs(Close[Bar - (VarP * 4)] - Close[Bar - (VarP * 5)]);
					else VarR5[Bar] = VarE[Bar];
					LRange[Bar] = ((VarR1[Bar] + VarR2[Bar] + VarR3[Bar] + VarR4[Bar] + VarR5[Bar])/5) * 0.2;
				}
			}	
			if ((VarNumBars <=7)) 
			{
				for (Bar = 1; Bar <= (Bars.Count - 1); Bar++) 
				{
					if (( Math.Abs(Close[Bar] - Close[Bar - 1]) >  High[Bar] - Low[Bar])) Var0[Bar] = Math.Abs(Close[Bar] - Close[Bar - 1]);
					else Var0[Bar] = High[Bar] - Low[Bar];
					if (( High[Bar] == Low[Bar] )) Var0[Bar] = Math.Abs(Close[Bar] - Close[Bar - 1]);
				}
				LRange = SMA.Series( Var0, 5 ) * 0.2;
			}	
			DataSeries VOpen = ( Open - SMA.Series( AveragePriceC.Series(Bars),5 )) / LRange;
			DataSeries VHigh = ( High - SMA.Series( AveragePriceC.Series(Bars),5 )) / LRange;
			DataSeries VLow = ( Low - SMA.Series( AveragePriceC.Series(Bars),5 )) / LRange;
			DataSeries VClose = ( Close - SMA.Series( AveragePriceC.Series(Bars),5 )) / LRange;
			
			ChartPane VCPane = CreatePane( 40, false, true );
			DrawHorzLine( VCPane, 8.0, Color.Blue, WealthLab.LineStyle.Solid, 1 );
			DrawHorzLine( VCPane, 4.0, Color.Green, WealthLab.LineStyle.Solid, 1 );
			DrawHorzLine( VCPane, 0.0, Color.Black, WealthLab.LineStyle.Solid, 1 );
			DrawHorzLine( VCPane, -4.0, Color.Green, WealthLab.LineStyle.Solid, 1 );
			DrawHorzLine( VCPane, -8.0, Color.Blue, WealthLab.LineStyle.Solid, 1 );
			PlotSyntheticSymbol( VCPane, "VC Charts", VOpen, VHigh, VLow, VClose, null, Color.Maroon, Color.Maroon );
[/code]

Eugene

10/8/2013 1:43 AM

I wonder how many more new threads might be required for the same code?

Help with Math.Round
Test if bar scale is daily

You could save us time on searching by just collecting all questions regarding one particular strategy/code, in a single thread.

Additionally, I already analyzed your code, identifying a performance problem:

Help with Math.Round, see reply #3

It hardly makes great sense to return to your version as it still suffers from the same problem, already solved in my reply.

Starburst

10/8/2013 8:35 PM

Hi Eugene, Thank you for your reply. I’m sorry; did I make my post in the wrong forum? Should I be posting in Wealth-Lab 101 or Technical Indicators?

I thought I had resolved my issue with math round and that my code was working as it should. It may be obvious to you but could you try to show me my short coming again. Please bear with me I do appreciate your help.

Eugene

10/9/2013 2:52 AM

Jeff,

It's not about targeting the wrong forum - it's creating numerous threads dedicated to what essentially is one short code - even though questions might be different.

I'm not concerned about Math.Round - rather with not making the code readable by fixing the VarA, VarR1... DataSeries.

Anyway, I'm not that familiar with what your script is doing to transform it into updating in real-time following this pattern. Sorry.

Starburst

10/10/2013 9:08 PM

Eugene,

I had acquired this code when I was using TS. I have just recently moved my account to fidelity and started using WLP6.

All I have done was translated the code from TS to WLP6. My questions have mainly been when I get stuck on code syntax.

Did I mention I am not a programmer and I feel that I may be a little in over my head. Not that it discourages me. I know that Wealth Lab is a great product and I haven’t begun to use the full potential that it has to offer but that is why I am here. It has a lot of features that I like over TS, but TS did update their indicators in real time.

How to use this indicator is simple, buy when it is below -8 and sell when it above 8. This link is to a book about it.

http://www.barnesandnoble.com/w/dynamic-trading-indicators-david-stendahl/1112114921?ean=9780471215578

I know you have a lot on your plate. I will try to keep any of my future questions as brief as I can and I look forward to you guiding me along.

Thank you for your time.

Eugene

10/11/2013 2:15 AM

QUOTE:
but TS did update their indicators in real time.

Wealth-Lab works differently, and real time update is not required for systematic trading which Wealth-Lab is about. It's explained in this FAQ:

Is it necessary to have access to intra-bar tick data to daytrade with Wealth-Lab?

Serving a different purpose, the solution you referred to outlines the process of updating a Daily indicator using Intraday values. It will NOT help update the indicator in real time, as it's not supported in WL6. Sorry if I wasn't clear.