大道至简（三）-股市一条龙-源码无未来函数
{股市一条龙-副图}
{参数：年:1990,2050,2014；月:1,12,自设;日：1,31,自设}
-0.2,DOTLINE;
-0.5,DOTLINE;
-0.8,DOTLINE;
-1,DOTLINE;
0,DOTLINE;
Z:=ISLASTBAR;
X:-(HHV(HIGH,30)-CLOSE)/(HHV(HIGH,30)-LLV (LOW,30)),COLORMAGENTA,LINETHICK3;
XX:=(((((CLOSE - MA(CLOSE,34)) / MA(CLOSE,34))*1 ) * 100) * 5);
B001:=(((((CLOSE - MA(CLOSE,42)) / MA(CLOSE,42)) *1 ) * 100) * 5);
B002:=(((((CLOSE - MA(CLOSE,67)) / MA(CLOSE,67)) *1 ) * 100) * 5);
B003:=(((XX + B001) / 2) - (B002 ));
B004:=(((0 - 100) * (HHV(HIGH,34) - CLOSE)) / (HHV(HIGH,34) - LLV(LOW,34)));
B005:=(((0 - 100) * (HHV(HIGH,42) - CLOSE)) / (HHV(HIGH,42) - LLV(LOW,42)));
B006:=(((0 - 100) * (HHV(HIGH,72) - CLOSE)) / (HHV(HIGH,72) - LLV(LOW,72)));
B007:=EMA((((B004 + B005) / 2) - B006),6);
B008:=REF(CLOSE,1);
B009:=((((SMA(MAX((CLOSE - B008),0),19,1) / SMA(ABS((CLOSE - B008)),19,1)) * 100) - 50) *
1.25);
B010:=((((SMA(MAX((CLOSE - B008),0),34,1) / SMA(ABS((CLOSE - B008)),34,1)) * 100) - 50) *
1.25);
B011:=((((SMA(MAX((CLOSE - B008),0),72,1) / SMA(ABS((CLOSE - B008)),72,1)) * 100) - 50) *
1.25);
B012:=EMA(((((B009 + B010) / 2) - B011) * 5),6);
B013:=((((0 - 1) * ((B007 + B003) + B012)) / 3) * 1.5);
B016:=EMA(B012,4);
B017:=B012;
KKM1:=B013;
DPM1:=EMA(B013,4);
关注:=IF((YEAR = 年),1,0);
XY:=IF((MONTH = 月),1,0);
XM:=IF((DAY = 日),1,0);
XD:=(关注 * XY * XM);
VARX:=B017;
C023:=KKM1;
C024:=B016;
C025:=DPM1;
C026:=WINNER(CLOSE);
W:=(DMA(C026,((VOL / CAPITAL) * 1)) * 100);
HWXWINNER:=W;
XD1:=EMA(W,6);
XWXMH:=XD1;
DRAWTEXT_FIX(Z,0.01,0.01,0,'上穿每一条虚线都是一个起点,下穿每一条虚线都是一个减仓点')COLORLIMAGENTA,LINETHICK2;
DRAWTEXT_FIX(((HWXWINNER>XWXMH) AND Z AND (XD>0)),0.01,0.8,0,'发现大庄家连续活动,重点关注'),LINETHICK2;
DRAWTEXT_FIX((((VARX>C023) AND Z AND (VARX>C024)) AND (XD>0)),0.01,0.88,0,'从多头活动看：中线适度持股');
DRAWTEXT_FIX((((VARX>C023) AND Z AND (VARX<C024)) AND (XD>0)),0.01,0.88,0,'从多头活动看：中线获利减仓');
DRAWTEXT_FIX((((VARX<C023) AND Z AND (VARX>C024)) AND (XD>0)),0.01,0.88,0,'从多头活动看：中线择机进仓');
DRAWTEXT_FIX((((VARX<C023) AND Z AND (VARX<C024)) AND (XD>0)),0.01,0.88,0,'从多头活动看：中线空仓观望');
DRAWTEXT_FIX((((C023>VARX) AND Z AND (C023>C025)) AND (XD>0)),0.01,1,0,'从空头活动看：中线空仓观望');
DRAWTEXT_FIX((((C023>VARX) AND Z AND (C023<C025)) AND (XD>0)),0.01,1,0,'从空头活动看：中线择机进仓');
DRAWTEXT_FIX((((C023<VARX) AND Z AND (C023>C025)) AND (XD>0)),0.01,1,0,'从空头活动看：中线获利减仓');
DRAWTEXT_FIX((((C023<VARX) AND Z AND (C023<C025)) AND (XD>0)),0.01,1,0,'从空头活动看：中线适度持股');
