通达信仿麟龙决策曲线指标公式源码(附图) MA1:=MA(CLOSE,5); MA2:=MA(CLOSE,10);
P01:=IF(MA1>MA2,1,IF(MA2>MA1,-1,0)); MA3:=MA(CLOSE,3); MA4:=MA(CLOSE,5);
P02:=IF(MA3>MA4,1,IF(MA4>MA3,-1,0)); MA5:=MA(CLOSE,12); MA6:=MA(CLOSE,50);
P03:=IF(MA5>MA6,1,IF(MA6>MA5,-1,0)); {KDJ}
RSV:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100; K:=EMA(RSV,3); D:=EMA(K,3);
P04:=IF(K>D,1,IF(D>K,-1,0)); {MACD} DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIF,9); MACD:=(DIF-DEA)*2;
P05:=IF(DIF>DEA,1,IF(DEA>DIF,-1,0)); {TRIX}
TR2:=EMA(EMA(EMA(CLOSE,12),12),12); TRIX:=(TR-REF(TR,1))/REF(TR,1)*100; MATRIX:=MA(TRIX,9) ;
P06:=IF(TRIX>MATRIX,1,IF(MATRIX>TRIX,-1,0)); {DMI}
TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),7);
HD :=HIGH-REF(HIGH,1); LD :=REF(LOW,1)-LOW;
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),7); DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),7); PDI:= DMP*100/TR; MDI:= DMM*100/TR;
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,7); ADXR:=EMA(ADX,7);
P07:=IF(PDI>MDI AND ADX>PDI AND ADX>50,3, IF(PDI RSI1:=EMA(MAX(CLOSE-LC,0),5)/EMA(ABS(CLOSE-LC),5)*100;{10} P08:=IF(RSI1>80,1,IF(RSI1<20,-1,0));{10} {CCI} TYP:=(HIGH+LOW+CLOSE)/3; CCI:=(TYP-MA(TYP,8))/(0.015*AVEDEV(TYP,8)); P09:=IF(CCI>180,2,IF(CCI<-180,-2,0));{12} {W%R} WR1:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100; P10:= IF(WR1>80,1,IF(WR1<20,-1,0));{13} {OSC} OSC:=100*(CLOSE-MA(CLOSE,20)); P11:=IF(OSC>0,1,IF(OSC<0,-1,0));{14} {MTM} MOM:=CLOSE-REF(CLOSE,7); P12:=IF(MOM>0,1,IF(MOM<0,-1,0));{15} {DPO} DPO:=CLOSE-REF(MA(CLOSE,11),11/2+1); P13:=IF(DPO>0,1,IF(DPO<0,-1,0));{16} {布林线} MB:=MA(CLOSE,12); R:=(CLOSE-MB)*(CLOSE-MB); X1:=MA(R,12); X2:=SQRT(X1); D1:=1; UPPER:=MB+(D1*X2); LOWER:=MB-(D1*X2); P14:=IF(CLOSE>UPPER,2,IF(CLOSE AR:=SUM(HIGH-OPEN,14)/SUM(OPEN-LOW,14)*100; P15:=IF(BR>350 OR AR>180,3,IF(BR<45 OR AR<45,-3,0));{21} {VR} TH:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),14); TL:=SUM(IF(CLOSE350,3,IF(VR<45,-3,0));{24} {WVAD} WVAD:=SUM((CLOSE-OPEN)/(HIGH-LOW)*VOL,6)/10000; P17:=IF(WVAD>0,1,IF(WVAD<0,-1,0));{25} {EMV} VOLUME:=MA(VOL,4)/VOL; MID:=100*(HIGH+LOW-REF(HIGH+LOW,1))/(HIGH+LOW); EMV:=MA(MID*VOLUME*(HIGH-LOW)/MA(HIGH-LOW,4),4); P18:=IF(EMV>0,1,IF(EMV<0,-1,0));{26} {OBV} VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL); OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0); MAOBV:=EMA(OBV,24); P19:=IF(OBV>MAOBV,1,IF(OBV MPVI:=EMA(PVI,24),COLORYELLOW; P20:=IF(PVI>MPVI,1,IF(PVI MNVI:=EMA(NVI,24),COLORYELLOW; P21:=IF(NVI>MNVI,2,IF(NVI NUM:=ABS(HHV(HIGH,15)-LLV(LOW,15)); DEN:=SUM(ABS(CLOSE-REF(CLOSE,1)),15); VHF:=IF(DEN=0,0,NUM/DEN); VHF1:=EMA(VHF,240); P23:=IF(VHF>VHF1,1,IF(VHF PU1:=(PU-REF(PU,1))/REF(PU,1)*100; CU1:=(CU-REF(CU,1))/REF(CU,1)*100; 逆时针曲线:=PU1+CU1; AND {www.52jufu.com _最新股票指标公式}