据梦佳2010同学源码改编

DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
DIF1:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA1:=EMA(DIF1,9);
MACD1:=(DIF1-DEA1)*2;
MACD上:{IF(MACD1>REF(MACD1,1),MACD1,DRAWNULL),STICK,COLORRED,LINETHICK1;} STICKLINE(MACD1>REF(MACD1,1),MACD1,0,0,1),COLORRED;
MACD下:{IF(MACD1<REF(MACD1,1),MACD1,DRAWNULL),STICK,COLORFF9900,LINETHICK1;} STICKLINE(MACD1<REF(MACD1,1),MACD1,0,0,1),COLORFF9900;
YLZC:=IF(CLOSE=INDEXC,(INDEXC+INDEXH+INDEXL+INDEXO)/4,AMOUNT/(VOL+0.01)/100);
阻价:=IF(CLOSE=INDEXC,YLZC+INDEXC-INDEXL,YLZC+(CLOSE-LOW));
支价:=IF(CLOSE=INDEXC,INDEXL+INDEXC-YLZC,LOW+(CLOSE-YLZC));
今压:REF(阻价,1),LINETHICK0,COLORAA11BB,LINETHICK0;
今撑:REF(支价,1),LINETHICK0,COLOR009900,LINETHICK0;
明压:阻价,LINETHICK0;
明撑:支价,LINETHICK0;
EMA(CLOSE,12)-EMA(CLOSE,26),colorffffff;
EMA(DIF,9),color00ffff;

有同学要主图 呵呵 回廊班长的新作 我加了两条线玩儿

喜欢就拿去吧

M105:EMA(C,105);
VAR6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL);
VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL);
VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL);
VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100)))));
JJ:=(3*C+H+L+O)/6;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);
LJL:=FILTER(TJ1,5);
STICKLINE(C,REF(L,BARSLAST(LJL)),REF(L,BARSLAST(LJL)),6,0),COLORred;
STICKLINE(C,REF(C,BARSLAST(LJL)),REF(C,BARSLAST(LJL)),6,0),COLORyellow;
DLX:=(指数平滑移动平均(收盘价,17)-向前引用(指数平滑移动平均(收盘价,17),1));
DLX1:=求和(DLX,3);
DLX2:=简单移动平均(DLX1,5);
S1:=持续存在(DLX1<DLX2 and DLX1<向前引用(DLX1,1),-1,0);
S2:=持续存在(DLX1>=DLX2 and DLX1>=向前引用(DLX1,1),-1,0);
显示数字(S1>0,最高价*1.02,上一次条件成立位置(S1=0),0),color00FF00,LINETHICK1;
显示数字(S2>0,最低价*1,上一次条件成立位置(S2=0),0),color0000FF,LINETHICK1;
A:EMA(EMA(EMA(C,3),3),3),COLORMAGENTA;
B:EMA(REF(A,1),2),COLORCYAN;