{四量图}MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;牛线:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF( MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10 )+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*RE F(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORGREEN{COLORRE D};马线:=MA(牛线,6),COLORMAGENTA{COLORYELLOW};STICKLINE(C>牛线,2.5,4,8,0),COLORRED{COLORGREEN},LINETHICK2;STICKLINE(C<马线,2.5,4,8,0),COLORGREEN{COLORRED},LINETHICK2;STICKLINE(牛线>=C AND C>=马线,2.5,4,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;A:=MAX(MA(C,60),MA(C,120));B:=MIN(MA(C,60),MA(C,120));STICKLINE(C>=A,0.5,2,8,0),COLORRED{COLORGREEN},LINETHICK2;STICKLINE(C<=B,0.5,2,8,0),COLORGREEN{COLORRED},LINETHICK2;STICKLINE(A>=C AND C>=B,0.5,2,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;{R:=0;}E:=MAX(MA(C,45),MA(C,90));F:=MIN(MA(C,45),MA(C,90));STICKLINE(C>E,-1.5,0,8,0),COLORRED{COLORGREEN},LINETHICK2;STICKLINE(C<F,-1.5,0,8,0),COLORGREEN{COLORRED},LINETHICK2;STICKLINE(E>=C AND C>=F,-1.5,0,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2; J:=MAX(MA(C,30),MA(C,60));K:=MIN(MA(C,30),MA(C,60));STICKLINE(C>J,-3.5,-2,8,0),COLORRED{COLORGREEN},LINETHICK2;STICKLINE(C<K,-3.5,-2,8,0),COLORGREEN{COLORRED},LINETHICK2;STICKLINE(J>=C AND C>=K,-3.5,-2,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;{麟龙四色谱}M3:MA(CLOSE,3),COLORRED,LINETHICK;M13:MA(CLOSE,13),COLORRED,LINETHICK;M34:MA(CLOSE,34),COLORRED,LINETHICK;X:=BARSLAST(REF(CROSS(C,MA(C,120)),1)) AND CROSS(MA(C,20),MA(C,120));IF(M34<REF(M34,1),M34,DRAWNULL),COLORGREEN,LINETHICK;STICKLINE(M3>=M13 AND M34>=REF(M34,1) ,H ,L ,0.1 ,0 ),COLORRED;STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORRED; STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORRED;STICKLINE(M3<M13 AND M34>=REF(M34,1) ,H ,L ,0.1 ,0 ),COLORYELLOW; STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORYELLOW; STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORYELLOW; STICKLINE(M3<M13 AND M34<REF(M34,1) ,H ,L ,0.1 ,0 ),COLORGREEN;STICKLINE(M3<M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORGREEN; STICKLINE(M3<M13 AND M34<REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORGREEN; STICKLINE(M3>=M13 AND M34<REF(M34,1) ,H ,L ,0.1 ,0 ),COLORMAGENTA; STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORMAGENTA; STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORMAGENTA; {DRAWTEXT(X,MA(C,120)-0.13,'牛股'),COLORRED,LINETHICK3;};麟龙决策曲线MA01:=MA(CLOSE,5);MA02:=MA(CLOSE,8);P01:=IF(CROSS(MA01,MA02),1,0);P02:=IF(CROSS(MA02,MA01),-1,0);P0:=P01+P02;MA11:=MA(CLOSE,8);MA12:=MA(CLOSE,21);P11:=IF(CROSS(MA11,MA12),1,0);P12:=IF(CROSS(MA12,MA11),-1,0);P1:=P11+P12;RSV:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100;K:=SMA(RSV,12,1);D:=SMA(K,24,1);J:=3*K-2*D;P21:=IF(CROSS(K,D)AND D<20,1,0);P22:=IF(CROSS(D,K)AND K>80,-1,0);P23:=IF(CROSS(J,0),0.5,0);P24:=IF(CROSS(100,J),-0.5,0);P2:=P21+P22+P23+P24;DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);DEA:=EMA(DIFF,9);MACD:=2*(DIFF-DEA);P31:=IF(CROSS(DIFF,DEA)AND DEA<0,1,0);P32:=IF(CROSS(DEA,DIFF)AND DIFF>0,-1,0);P3:=P31+P32;WR1:=100*(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,113));P41:=IF(WR1>80,1,0);P42:=IF(WR1<20,-1,0);P4:=P41+P42;OB:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);P51:=IF(OBV>REF(EMA(OBV,24),1),1.5,0);P52:=IF(OBV<REF(EMA(OBV,24),1),-1.5,0);P5:=P51+P52;BR:=SUM(MAX(0,HIGH-REF(CLOSE,1)),26)/SUM(MAX(0,REF(CLOSE,1)-LOW),26)*100; AR:=SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;P61:=IF(BR>350,3,0);P62:=IF(BR<45,-3,0);P63:=IF(AR>180,3,0);P64:=IF(AR<45,-3,0);P6:=P61+P62+P63+P64;TH:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),26);TL:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),26);TQ:=SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),26);VR:=100*(TH*2+TQ)/(TL*2+TQ);P71:=IF(VR>350,3,0);P72:=IF(VR<45,-3,0);P7:=P71+P72;MASS:=SUM(MA(HIGH-LOW,9)/MA(MA(HIGH-LOW,9),9),25);MAMASS:=MA(MASS,6);P81:=IF(MASS<27 AND CROSS(MASS,26.5),2,0);P82:=IF(MASS>27 AND CROSS(MASS,26.5),-2,0);P8:=P81+P82;WV AD:=SUM((CLOSE-OPEN)/(HIGH-LOW)*VOL,24)/10000;MAWV AD:=MA(WV AD,6);P91:=IF(WV AD>0,1,0);P92:=IF(WV AD<0,-1,0);P9:=P91+P92;VOLUME:=MA(VOL,10)/VOL;MID:=100*(HIGH+LOW-REF(HIGH+LOW,1))/(HIGH+LOW);EMV:=MA(MID*VOLUME*(HIGH-LOW)/MA(HIGH-LOW,14),14);Q11:=IF(EMV>0,1.5,0);Q12:=IF(EMV<0,-1.5,0);Q1:=Q11+Q12;TR:=EMA(EMA(EMA(CLOSE,13),13),13);TRIX:=(TR-REF(TR,1))/REF(TR,1)*100;Q21:=IF( CROSS(TRIX,TR),1.5,0);Q22:=IF( CROSS(TR,TRIX),-1.5,0);Q2:=Q21+Q22;LC:=REF(CLOSE,1);RSI:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;Q31:=IF(RSI>80,1,0);Q32:=IF(RSI<20,-1,0);Q3:=Q31+Q32;OSC:=100*(CLOSE-MA(CLOSE,20));MAOSC:=EXPMEMA(OSC,6);Q41:=IF(CROSS(OSC,MAOSC),1,0);Q4:=Q41+Q42;TYP:=(HIGH+LOW+CLOSE)/3;CCI:=(TYP-MA(TYP,13))/(0.015*AVEDEV(TYP,13));Q51:=IF(CCI>180,2,0);Q52:=IF(CCI<-180,-2,0);Q5:=Q51+Q52;TR1:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1 )-LOW)),14);HD :=HIGH-REF(HIGH,1);LD :=REF(LOW,1)-LOW;DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);PDI:=DMP*100/TR1;MDI:=DMM*100/TR1;ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);ADXR:=EXPMEMA(ADX,6);Q61:=IF(CROSS(PDI,MDI),2,0);Q62:=IF(CROSS(DMI,PDI),-2,0);Q6:=Q61+Q62;DPO:=CLOSE-REF(MA(CLOSE,21),21/2+1);MADPO:=MA(DPO,6);Q71:=IF(DPO>0,1,0);Q72:=IF(DPO<0,-1,0);Q7:=Q71+Q72;MTM:CLOSE-REF(CLOSE,12);MAMTM:=MA(MTM,6);Q81:=IF(CROSS(MTM,MAMTM),1,0);Q82:=IF(CROSS(MAMTM,MTM),-1,0);Q8:=Q81+Q82;MID1:=SUM(VOL*(2*CLOSE-HIGH-LOW)/(HIGH+LOW),0);CHO:=MA(MID,10)-MA(MID,20);MACHO:=MA(CHO,6);Q91:=IF((CLOSE>MA(CLOSE,90))AND CROSS(CLOSE,0), 1.5,0);Q92:= IF((CLOSE<MA(CLOSE,90))AND CROSS(0,CLOSE), -1.5,0);Q9:=Q91+Q92;PSY:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;PSYMA:=MA(PSY,6);R11:=IF(PSY>75,1.5,0);R12:=IF(PSY<25,-1.5,0);R1:=R11+R12;MID2 := MA(CLOSE,20);UPPER:= MID2+2*STD(CLOSE,20);LOWER:= MID2-2*STD(CLOSE,20);R22:=IF(CROSS(UPPER,CLOSE),-2,0);R2:=R21+R22;TYP1 := (HIGH + LOW + CLOSE)/3;V1:=SUM(IF(TYP1>REF(TYP1,1),TYP1*VOL,0),14)/SUM(IF(TYP1<REF(TYP1,1),TYP1*VOL,0),14);MFI:=100-(100/(1+V1));R31:=IF(MFI>80,1,0);R32:=IF(MFI<20,-1,0);R3:=R31+R32;V ARA:=R1+R2+R3+Q1+Q2+Q3+Q4+Q5+Q6+Q7+Q8+Q9+P0+P1+P2+P3+P4+P5+P6+P7+P8+ P9;决策曲线:V ARA;。