通达信日月同辉主图指标源码

以下是通达信日月同辉主图指标源码

M:=((3*C+L+O+H)/6),COLORGREEN,NODRAW;
周O1:=IF(WEEKDAY<REF(WEEKDAY,1),O,DRAWNULL);
周O:HHV(周O1,WEEKDAY),LINETHICK0;
周H:HHV(H,WEEKDAY),LINETHICK0;
周L:LLV(L,WEEKDAY),LINETHICK0;
 MC:=C#MONTH,LINETHICK0;
 MO1:=IF(DAY<REF(DAY,1),O,DRAWNULL);
 MO:=HHV(MO1,DAY),LINETHICK0;
 A:=DAY<REF(DAY,1);
 B:=BARSLAST(A)+1;
 MH:=HHV(H,B),LINETHICK0;
 ML:=LLV(L,B),LINETHICK0;
日C:C#WEEK,COLORFFFF38,NODRAW;
 STICKLINE(MC>=MO,MO,MC,4,0),COLOR5CA8FD;
 STICKLINE(MC<MO,MO,MC,4,0),COLOR008B00;
 STICKLINE(日C>=周O,周O,日C,4,0),COLOR003399;
 STICKLINE(日C<周O,周O,日C,4,0),COLOR9F3333;
 DRAWKLINE(H,O,L,C);
生命点:EMA(C,24),COLOR00FF00,CIRCLEDOT;
今日阻力:L+(M-L)+(C-L),LINETHICK0;
今日支撑:L+(C-M),LINETHICK0;
 NNN:=IF(PERIOD=5,240,IF(PERIOD=6,48,IF(PERIOD=4,240*4,IF(PERIOD=7,12,1))));
周:MA(C,NNN/48),COLORFF58FF,LINETHICK1;
月:MA(C,NNN/12),COLOR00FFFF,LINETHICK2;
季:MA(C,NNN/4),COLOR00FF00,LINETHICK1;
半年:MA(C,NNN/2),COLORFFFF00,LINETHICK1;
年:MA(C,NNN),COLOR1683FF,LINETHICK2;