Twitter Charts

[Darren]

I’ve created this thread for some of the charts that are posted on our Twitter account. If there are any you would like to see post the request and Tweet link in a reply.

I’ll start with this one that uses the custom Market Breadth module to calculate the daily percentage of stocks in the S&P500 that outperform the index. As the S&P500 is a market cap weighted index the largest companies have a bigger impact on performance. So when the number of companies outperforming the index is low its the big guys doing the work, whereas if 73% are outperforming then performance will be skewed to the smaller caps.

To build the breadth measure use this simple Relative Index Comparison function:

RIC() IsUp

1 2 3

RIC() IsUp

This will count the number of stocks whose relative performance is higher than the previous bar. If true, then it has outperformed the index on that day and is given a value of 1. The breadth engine will then sum this value up for each day to build the data. For accuracy, use the Historical Membership so that only stocks that were in the index at the time are included, along with the IsMember() function.

Once the breadth data has been built (my example created a ticker symbol SPXOUTPF) then it should display when you open the attached workbook. The Watchlist will load the latest data for the S&P500 stocks and put them into true/false groups. If you have our Fundamental Data on your account then it will also calculate the average market cap size of each group for that day’s trading.

Download and save the workbook top open the chart (if you don’t have the Market Breadth module then the lower panel will be blank).

6 users thanked author for this post.

Max, Matthew, James, Andy, Thomas, Julius

[Darren]

Automated Fibonacci levels: https://twitter.com/Optuma/status/1351881460156809217?s=20

The script will calculate the high/low range between January 1st and May 1st 2020, and then plot the 138.2% and 161.8% levels:

//Set Hi/Low date period; H52 = HIGHESTHIGH(RANGE=Range, RANGESTART=2020-01-01, RANGEEND=2020-02-29); L52 = LOWESTLOW(RANGE=Range, RANGESTART=2020-03-01, RANGEEND=2020-05-01); //Calculate Hi-Low range; R1=(H52-L52); //Plot levels; Plot1=LAST(L52); Plot2=LAST(H52); Plot3=LAST(L52+(R1*1.382)); Plot4=LAST(L52+(R1*1.618));

1 2 3 4 5 6 7 8 9 10 11 12

//Set Hi/Low date period; H52 = HIGHESTHIGH(RANGE=Range, RANGESTART=2020-01-01, RANGEEND=2020-02-29); L52 = LOWESTLOW(RANGE=Range, RANGESTART=2020-03-01, RANGEEND=2020-05-01); //Calculate Hi-Low range; R1=(H52-L52); //Plot levels; Plot1=LAST(L52); Plot2=LAST(H52); Plot3=LAST(L52+(R1*1.382)); Plot4=LAST(L52+(R1*1.618));

The Show View below the chart plots the retracement levels:

//Set Hi/Low date period; H52 = HIGHESTHIGH(RANGE=Range, RANGESTART=2020-01-01, RANGEEND=2020-02-29); L52 = LOWESTLOW(RANGE=Range, RANGESTART=2020-03-01, RANGEEND=2020-05-01); //Calculate Hi-Low range; R1=(H52-L52); //Calculate retracement; R2 = CLOSE()-L52; R2/R1 * 100

1 2 3 4 5 6 7 8 9 10

//Set Hi/Low date period; H52 = HIGHESTHIGH(RANGE=Range, RANGESTART=2020-01-01, RANGEEND=2020-02-29); L52 = LOWESTLOW(RANGE=Range, RANGESTART=2020-03-01, RANGEEND=2020-05-01); //Calculate Hi-Low range; R1=(H52-L52); //Calculate retracement; R2 = CLOSE()-L52; R2/R1 * 100

4 users thanked author for this post.

Peter Taylor, Thomas, Andras Belley, Julius

[Darren]

TimeSinceSignal scripts: https://twitter.com/Optuma/status/1359122061592039428

Days since RSI below 50:

TIMESINCESIGNAL(RSI(BARS=14)<50)

1 2 3

TIMESINCESIGNAL(RSI(BARS=14)<50)

Weeks since being on the left side of the RRG (on weekly watchlist – requires RRG Pro module):

V1=JDKRS().Ratio<100; TIMESINCESIGNAL(V1)

1 2 3 4

V1=JDKRS().Ratio<100; TIMESINCESIGNAL(V1)

1 user thanked author for this post.

Thomas

[Thomas]

Hi Darren,

als always thank you very much for your post and especially workbook.

One last question: Can you post the code for the column “Date since” you have in the watchlist in your Twitter chart?

Thanks,
Thomas

[Darren]

Date Since RSI(14) was last below 50:

V1=TIMESINCESIGNAL(RSI(BARS=14)<50, UNIT=Days); LAST(BARDATE())-V1

1 2 3 4

V1=TIMESINCESIGNAL(RSI(BARS=14)<50, UNIT=Days); LAST(BARDATE())-V1

This will display as a number, so right-click on the watchlist column heading and change the Column Type to Date.

More examples here: https://forum.optuma.com/topic/using-bardate-to-display-when-a-condition-last-happened/

1 user thanked author for this post.

Thomas

[Darren]

Stats on stocks joining the S&P500 index

https://twitter.com/Optuma/status/1362792200778772486?s=20

Workbook with scripts attached.

3 users thanked author for this post.

Max, Thomas, Jeffrey A.

[Darren]

VIX curve chart (requires access to the CBOE Indices data).

https://twitter.com/Optuma/status/1381926511024934912?s=20

[Darren]

RSI Switch: https://twitter.com/Optuma/status/1389914639211929604

This uses the Switch function to signal when the RSI crosses above 70 and remain true until it crosses below 30, as seen in the green shaded area (created in a Show View dragged over the RSI).

SWITCH(RSI(BARS=14)>70, RSI(BARS=14)<30)

1 2 3

SWITCH(RSI(BARS=14)>70, RSI(BARS=14)<30)

Days since Overbought:

V1 = RSI(BARS=14)>70; TIMESINCESIGNAL(V1)

1 2 3 4

V1 = RSI(BARS=14)>70; TIMESINCESIGNAL(V1)

Number of Overbought conditions since the last Oversold:

//Create 2 Boolean conditions V1 = RSI(BARS=14) CrossesAbove 70; V2 = RSI(BARS=14) CrossesBelow 30; //Count the number of times V1 occurred since V2 COUNTMATCHSINCESIGNAL(V1,V2)

1 2 3 4 5 6 7

//Create 2 Boolean conditions V1 = RSI(BARS=14) CrossesAbove 70; V2 = RSI(BARS=14) CrossesBelow 30; //Count the number of times V1 occurred since V2 COUNTMATCHSINCESIGNAL(V1,V2)

2 users thanked author for this post.

Max, Thomas

[Deepak]

https://mobile.twitter.com/Optuma/status/1386638124466507778

Hiii sir

Can u tell how this test was done.

Regards

Deepak

[Darren]

Use this on weekly timeframe for when the 1 bar stochastic is below 10:

STOCH(BAR1=1, BAR2=1)<10

1 2 3

STOCH(BAR1=1, BAR2=1)<10

1 user thanked author for this post.

Deepak Gharpure

[Darren]

To count the number of higher swing lows since the last lower swing low: https://twitter.com/Optuma/status/1399700048829616134

The script uses the following functions with a Gann Swing in a Show View:

SwingTrendUp and SwingTrendDown: https://help.optuma.com/kb/faq.php?id=1225

CountMatchSinceSignal: https://help.optuma.com/kb/faq.php?id=962

//Define Swings; GS1 = GANNSWING(SWINGCOUNT=3, METHOD=Use Next Bar, USEINSIDE=True); //SwingTrend is Up; R1 = SWINGTRENDUP(GS1) == 1; //Swing direction changes to up when trend is Up; R2 = SWINGUP(GS1) ChangeTo 1 and R1; //Lower swing low when trend is down; R3 = SWINGTRENDDOWN(GS1) == 1; //Count how many occurrences of R2 since R3 (not incl initial low swing); COUNTMATCHSINCESIGNAL(R2, R3) - 1

1 2 3 4 5 6 7 8 9 10 11 12

//Define Swings; GS1 = GANNSWING(SWINGCOUNT=3, METHOD=Use Next Bar, USEINSIDE=True); //SwingTrend is Up; R1 = SWINGTRENDUP(GS1) == 1; //Swing direction changes to up when trend is Up; R2 = SWINGUP(GS1) ChangeTo 1 and R1; //Lower swing low when trend is down; R3 = SWINGTRENDDOWN(GS1) == 1; //Count how many occurrences of R2 since R3 (not incl initial low swing); COUNTMATCHSINCESIGNAL(R2, R3) - 1

2 users thanked author for this post.

Julius, Thomas

[Darren]

Advancing volume %: https://twitter.com/Optuma/status/1417809118631452674?s=20

The example in the Tweet was using IQFeed data (VINA.Z / VINT.Z) but the same can be calculated using our Breadth Measures data. This example is for SPX, which can be used in a Show View set to histogram:

ADV = GETDATA(CODE=AVVSPX:BM); DEC = GETDATA(CODE=DVCSPX:BM); ADV/(ADV+DEC)*100

1 2 3 4 5

ADV = GETDATA(CODE=AVVSPX:BM); DEC = GETDATA(CODE=DVCSPX:BM); ADV/(ADV+DEC)*100

This can then be used in a Show Bar to highlight when the day’s value is > 80% or < 20%. The following combines the two to show when an  >80% day follows a <20% day:

ADV = GETDATA(CODE=AVVSPX:BM); DEC = GETDATA(CODE=DVCSPX:BM); V1 = ADV/(ADV+DEC)*100; R1 = V1>80; R2 = V1<20; //Is today > 80 and yesterday < 20? R1 and R2[1]

1 2 3 4 5 6 7 8 9

ADV = GETDATA(CODE=AVVSPX:BM); DEC = GETDATA(CODE=DVCSPX:BM); V1 = ADV/(ADV+DEC)*100; R1 = V1>80; R2 = V1<20; //Is today > 80 and yesterday < 20? R1 and R2[1]

• This reply was modified 3 months ago by Darren.

[Darren]

% change from COVID lows: https://twitter.com/Optuma/status/1425791260263165956

// Get lowest low from date range; L52 = LOWESTLOW(RANGE=Range, RANGESTART=2020-03-01, RANGEEND=2020-05-01); //Calculate % Change; (CLOSE() - L52)/L52

1 2 3 4 5 6

// Get lowest low from date range; L52 = LOWESTLOW(RANGE=Range, RANGESTART=2020-03-01, RANGEEND=2020-05-01); //Calculate % Change; (CLOSE() - L52)/L52

Show Plots for the low and 2 x low:

// Get lowest low from date range; L52 = LOWESTLOW(RANGE=Range, RANGESTART=2020-03-01, RANGEEND=2020-05-01); // Plot the low; Plot1 = LAST(L52); Plot1.Colour = Red; Plot1.Linestyle = Dash; // 2 x Low; Plot2 = LAST(L52) * 2; Plot2.Colour = Blue; Plot2.Linestyle = Dash; // Repeat for any other levels, eg 2.618, 3, etc;

1 2 3 4 5 6 7 8 9 10 11 12 13

// Get lowest low from date range; L52 = LOWESTLOW(RANGE=Range, RANGESTART=2020-03-01, RANGEEND=2020-05-01); // Plot the low; Plot1 = LAST(L52); Plot1.Colour = Red; Plot1.Linestyle = Dash; // 2 x Low; Plot2 = LAST(L52) * 2; Plot2.Colour = Blue; Plot2.Linestyle = Dash; // Repeat for any other levels, eg 2.618, 3, etc;

1 user thanked author for this post.

Thomas

[Darren]

Number of new all-time highs in 2021: https://twitter.com/Optuma/status/1427600292502294557?s=20

//Get new all-time highs; V1 = HIGH()>=HIGHESTHIGH(RANGE=All History); //Sum true conditions; ACC(V1,RANGE=Look Back Period, BACKTYPE=Date, STARTDATE=2020-12-31)

1 2 3 4 5 6

//Get new all-time highs; V1 = HIGH()>=HIGHESTHIGH(RANGE=All History); //Sum true conditions; ACC(V1,RANGE=Look Back Period, BACKTYPE=Date, STARTDATE=2020-12-31)

Time since last ATH:

V1 = HIGH()>=HIGHESTHIGH(RANGE=All History); TIMESINCESIGNAL(V1)

1 2 3 4

V1 = HIGH()>=HIGHESTHIGH(RANGE=All History); TIMESINCESIGNAL(V1)

New ATHs in the last 10 days:

V1 = HIGH()>=HIGHESTHIGH(RANGE=All History); BARSTRUE(V1, LOOKBACK=10)

1 2 3 4

V1 = HIGH()>=HIGHESTHIGH(RANGE=All History); BARSTRUE(V1, LOOKBACK=10)

1 user thanked author for this post.

Thomas

[Darren]

SPX outperformance: https://twitter.com/Optuma/status/1432685094788009990?s=20

These measures were built using the Custom Breadth module on historical members:

Daily % outperforming the index:

RIC() IsUp and IsMember()

1 2 3

RIC() IsUp and IsMember()

% Outperforming SPX YTD (Start Date of calculation Jan 4th 2021):

RIC(DATESEL=User Defined, START_DATE=2020-12-31, ZEROBASED=True) > 0 and IsMember()

1 2 3

RIC(DATESEL=User Defined, START_DATE=2020-12-31, ZEROBASED=True) > 0 and IsMember()

1 user thanked author for this post.

Thomas

[Author]

Posts