源码
Var1:=EMA(CLOSE,34)-EMA(CLOSE,5);
Var2:=EMA(Var1,5);
趋势: (-3)*(Var1-Var2), COLORSTICK;长期趋势:EMA(Var1,10)*(-1);
趋势;
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26)COLORSTICK;
DEA
AA:=BARSLAST(CROSS(DIFF,DEA) AND DEA<-0.1)<=8,;
DEA<-0.1 AND CROSS(DIFF,DEA) AND IF(AA=1,1,0);
EXPLAIN(AA,'MACD最佳买入时机')linethick2, COLORYELLOW;
EXPLAIN(趋势>0,'Z线趋势上升中
');
EXPLAIN(趋势<0,'Z线趋势下降中
');
EXPLAIN(cross(趋势,0),'Z线考虑买入
');
EXPLAIN(cross(0,趋势),'Z线考虑卖出
');
Var11:=ma((v/(h-l)),4);
Var33:=abs(c-o);Var44:=v/(h-l);
EXPLAIN(Var44
EXPLAIN(Var44ma(Var33,4),'场内资金运作行为
');
EXPLAIN(Var44>var11 AND Var33
EXPLAIN(Var44>var11 AND Var33>ma(Var33,4),'场外资金介入（或出局）意愿强烈
');
TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= MA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=(ADX+REF(ADX,6))/2;
EXPLAIN(cross(pdi,mdi),'PDI线从下向上突破MDI线，显示有新多头进场，为买进信号
');
EXPLAIN(cross(mdi,pdi),'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号
');
EXPLAIN(adx>ref(adx,1),'ADX值持续高于前一日，行情将维持原趋势
');
EXPLAIN(adx<20,'ADX值递减，降到20以下，且横向行进时，市场气氛为盘整
');
EXPLAIN(adxref(adx,3) and ref(adx,3)>ref(adx,4),'ADX值从上升倾向转为下降时，表明行情即将反转
');
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
EXPLAIN(1=1,'※※※※※※※※※
下面为KDJ,CCI,W&R,RSI,MTM等指标的判断
※※※※※※※※※
');
EXPLAIN(cross(j,k) and k<50,'KDJ金叉
');
EXPLAIN(cross(k,j) and k>50,'KDJ死叉
');
EXPLAIN(j>84,'KDJ指标高位');EXPLAIN(j<16,'KDJ指标低位
');
TYP := (HIGH + LOW + CLOSE)/3;
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
EXPLAIN(cci<-100,'CCI指标底位，买入机会
');
EXPLAIN(cci>100,'CCI指标高位，卖出机会
');
EXPLAINEX(1=1,'换手率=',vol/CAPITAl*100,2,1);
explain((vol/CAPITAl)>0.075,'换手过大，小心主力出逃，短期头部
');
wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
explain(wr>-20,'W&R超买，即将见顶，应及时卖出
');
explain(wr<-80,'W&R超卖，即将见底，应伺机买进
');
MTM := CLOSE-REF(CLOSE,6);
MTMMA := MA(MTM,6);
EXPLAIN(CROSS(MTM,MTMMA),'MTM从下向上突破MTMMA，买入信号
');
EXPLAIN(CROSS(MTMMA,MTM),'MTM从上向下跌破MTMMA，卖出信号
');
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
EXPLAIN(RSI1>85,'6日RSI向上突破85，超买,考虑卖出
');
EXPLAIN(RSI1<15,'6日RSI向下跌破15，超卖，考虑买入
');
EXPLAIN(CROSS(RSI1,RSI2),'6日RSI向上突破12日RSI，买进信号
');
EXPLAIN(CROSS(RSI2,RSI1),'6日RSI向下跌破12日RSI，卖出信号
');
psy:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
EXPLAINEX(1=1,'12天心理线,PSY=',psy,2,1);
EXPLAINEX(1=1,'获利盘比例=',WINNER(c)*100,2,1);
EXPLAINEX(1=1,'套牢盘比例=',100-WINNER(c)*100,2,1);
