// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("Options Expiration");
dow = DayOfWeek();
expiry = IIf(dow<=5 AND Ref( dow < 2, 1 ) AND Day() > 14  AND Day() < 22,True,False);
Holiday = (dow==5 AND Ref(dow,1)>1) OR (dow<5 AND Ref(Day(),1)>Day()+1);
showRibbon = ParamList("Show Ribbon", "Yes,No");
if (showRibbon == "Yes")
	Plot(3, "Ribbon", IIf(expiry, colorRed, IIf(Holiday, colorDarkGreen, colorLightGrey)), styleOwnScale|styleArea|styleNoLabel, -0.5, 100);
else
	Plot( expiry+2*Holiday, _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), styleHistogram | styleOwnScale ); 

_SECTION_END();