WD:=IF(WEEKDAY =5,WEEKDAY,1);{返回周几}
WDM:=(WEEKDAY-1)*240+FROMOPEN;{计算本周的开盘分钟数}
当期:AMOUNT/1000000,VOLSTICK COLORWHITE ;
V1:=DAY;{日期}
V2:=WEEKDAY;
V3:=V2-(V1-INTPART(V1/7)*7); {取得当日和7以及周几的关连因子}
{(V1+X) MOD 7 =V2 }
V4:=IF(V3 0,V3,7-ABS(V3));{全部换算成正数}
{算第一天是周几}
V5:=1+V4; {第一天周几,已经调试正确}
V6:=IF(V5 =5,5-V5+1,0);{第一周的工作日,调试准确}
V7:=7-V5+2;{计算第二周开始的日期,调试准确,即第二周周一的日期}
V8:=IF(V1 V7,V1+V4,0);{第一周的当前日是周几}
V9:=IF(V8 =5 AND V1 V7,V8-V5+1,0);{第一周的当前工作日数}
VA:=IF(V1 =V7,V1-V7,0);
{第二周开始截至目前的工作日＋第一周的工作日,经过验证，但是停牌无法处理};
VB:=IF(V1 =V7,INTPART(VA/7)*5 + VA-INTPART(VA/7)*7 + V6+1,V9);
VM1:=MONTH;
VM2:=IF(VM1=2,28,IF((VM1=1 OR VM1=3 OR VM1=5 OR VM1=7 OR VM1=8 OR VM1=10 OR VM1=12),31,30));
VM3:=VM2-V7;
VMB:=INTPART(VM3/7)*5 + VM3-INTPART(VM3/7)*7 + V6+1;{当月最大交易日}
MDM:=(VB-1)*240+FROMOPEN;{计算本月的开盘分钟数}
VAMO:IF(CURRBARSCOUNT=1 AND PERIOD=5,AMO*240/FROMOPEN/1000000,
IF(CURRBARSCOUNT=1 AND PERIOD=6,AMO/WDM*1200/1000000,
IF(CURRBARSCOUNT=1 AND PERIOD=7,AMO/MDM*(240*VMB)/1000000,AMO/1000000))),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VAMO,AMO/1000000,-1,-1),COLOR00C0C0;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=6,VAMO,AMO/1000000,-1,-1),COLOR00C0C0;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=7,VAMO,AMO/1000000,-1,-1),COLOR00C0C0;
环比:VAMO*1000000/REF(AMO,1),NODRAW;
波动:MA(VAMO,5),COLORYELLOW,LINETHICK1;
延伸:EMA(VAMO,10),COLORGREEN LINETHICK2;
{行情线,也叫主线，判断是否还在行情中，如果主线持续两周向下，是顶部}
行情:EMA(VAMO,20),COLORRED LINETHICK2;
牛熊分界:EMA(AMO/1000000,60) COLORMAGENTA LINETHICK2;
HY大主:EMA(AMO/1000000,120) COLORBLUE LINETHICK2;
YY:EMA(AMO/1000000,250) COLORWHITE LINETHICK2;
MAHQX:MA(行情,3);
