[飞狐] 飞狐任意买卖主图-指标公式(源码,贴图)  
 
DRAWGBK(CLOSE=CLOSE,COLORRGB(30,30,30),COLORRGB(130,130,130),1); 
DRAWGBK(CLOSE>OPEN,COLORRGB(110,0,0),COLORRGB(0,0,0),0); 
DRAWGBK(CLOSE<OPEN,COLORRGB(0,110,0),COLORRGB(0,0,0),0); 
input:AA(5,1,1000),BB(20,1,1000); 
 
{-----------------------☆功能开关------------------------} 
{月--周期K线} 
if datacount<BB then exit; 
y1:=mod(barpos,BB); 
Y2:=if(y1=0,BB-1,y1-1); 
Y3:=barslast(Y2=0); 
Y4:=barslast(Y2=BB-1); 
Y5:=ref(o,Y3); 
Y6:=hhv(h,Y3+1)*(Y4=0); 
Y7:=llv(if(L=0,100000,L),Y3+1)*(Y4=0);  
Y8:=IF(Y3=0,C,0); 
Y9:=IF(Y4=0,C,0); 
Y10:=IF(Y4=0,Y6,0); 
Y11:=IF(Y4=0,Y7,0); 
 
for n=lbound(Y8) to ubound(Y8) do begin 
  if Y8[n]>0 then begin 
    for z=n+BB-1 to ubound(Y8) do begin  
      if Y9[z]>0 then begin 
        for s=n to z-1 do begin 
          YC1:=Y9[z]; 
          YH1:=Y10[z]; 
          YL1:=Y11[z]; 
        end; 
        break; 
      end; 
    end; 
  end; 
end; 
 
YXQc1:=C; 
YXQh1:=hhv(h,Y2[datacount]+1); 
XQL1:=LLV(if(L=0,1000000,L),Y2[datacount]+1); 
YXQCC:=if(barpos>datacount-Y2[datacount]-1,YXQc1[datacount],if(Y2=BB-1,C,YC1)); 
YXQHH:=if(barpos>datacount-Y2[datacount]-1,YXQh1[datacount],if(Y2=BB-1,ref(YH1,1),YH1)); 
YXQLL:=if(barpos>datacount-Y2[datacount]-1,XQL1[datacount],if(Y2=BB-1,ref(YL1,1),YL1)); 
 
{周--周期K线} 
if datacount<AA then exit; 
Z1:=mod(barpos,AA); 
Z2:=if(Z1=0,AA-1,Z1-1); 
Z3:=barslast(Z2=0); 
Z4:=barslast(Z2=AA-1); 
Z5:=ref(o,Z3); 
Z6:=hhv(h,Z3+1)*(Z4=0); 
Z7:=llv(if(L=0,100000,L),Z3+1)*(Z4=0);  
Z8:=IF(Z3=0,C,0); 
Z9:=IF(Z4=0,C,0); 
Z11:=IF(Z4=0,Z6,0); 
Z12:=IF(Z4=0,Z7,0); 
 
for n=lbound(Z8) to ubound(Z8) do begin 
  if Z8[n]>0 then begin 
    for z=n+AA-1 to ubound(Z8) do begin  
      if Z9[z]>0 then begin 
        for s=n to z-1 do begin 
          ZC1:=Z9[z]; 
          ZH1:=Z11[z]; 
          ZL1:=Z12[z]; 
        end; 
        break; 
      end; 
    end; 
  end; 
end; 
 
Zzc1:=C; 
Zzh1:=hhv(h,Z2[datacount]+1); 
ZzL1:=LLV(if(L=0,1000000,L),Z2[datacount]+1); 
ZzCC:=if(barpos>datacount-Z2[datacount]-1,Zzc1[datacount],if(Z2=AA-1,C,ZC1)); 
ZzHH:=if(barpos>datacount-Z2[datacount]-1,Zzh1[datacount],if(Z2=AA-1,ref(ZH1,1),ZH1)); 
ZzLL:=if(barpos>datacount-Z2[datacount]-1,ZzL1[datacount],if(Z2=AA-1,ref(ZL1,1),ZL1)); 
 
{-----------------【图解模板】---------------------} 
{月--周期K线} 
FILLRGN(Y2>0 and YXQCC>=Y5,YXQHH,YXQLL),Colorred; 
FILLRGN(Y2>0 and YXQCC<Y5,YXQHH,YXQLL),Colorgreen; 
{周--周期K线} 
FILLRGN(Z2>0 and ZzCC>=Z5,ZzHH,ZzLL),COLORMAGENTA; 
FILLRGN(Z2>0 and ZzCC<Z5,ZzHH,ZzLL),COLORCYAN; 
{日--K线} 
 
// 
 
 
A:=EMA(CLOSE,3); 
B:=EMA(CLOSE,5); 
Z:=EMA(CLOSE,15); 
资本:=REF(HHV(A,B),Z); 
运作:=A; 
体系:=MA(运作,5); 
【▲】Z:=MA(Z,7); 
 
获利盘:=WINNER(CLOSE)*100; 
套牢盘:=100-获利盘; 
WIN1:=COST(85); 
WIN2:=COST(15); 
股票卖出价预测:=MA(套牢盘,89)*0.618/50+CLOSE; 
股票买进价预测:=CLOSE-MA(套牢盘,60)*0.618/100; 
转折价明日:=REF(CLOSE,2)*2-REF(CLOSE,5); 
转折价后日:=REF(CLOSE,1)*2-REF(CLOSE,4); 
转折价大后日:=CLOSE*2-REF(CLOSE,3); 
高:=HHV(HIGH,0); 
低:=LLV(LOW,0); 
DCFL:=COST(95); 
SCFL:=COST(55); 
JCFL:=COST(15); 
CH:=COST(5); 
DI:=COST(0.38); 
M:=58; 
X:=3; 
P:=SYSPARAM(1); 
WS:=BARPOS; 
WS1:=IF(WS<M,WS,M); 
WSP:=P-WS1+1; 
WSP1:=WS1-1; 
H1:=HHV(HIGH,WS1); 
L1:=LLV(LOW,WS1); 
HP:=H1[P]; 
LP:=L1[P]; 
HLPX:=(HP-LP)/X; 
IF WS1[P]>1 THEN BEGIN  
DRAWSL(WS=WSP[P],HP,0,WSP1[P],3),POINTDOT,LINETHICK1; 
DRAWSL(WS=WSP[P],LP,0,WSP1[P],3),POINTDOT,LINETHICK1; 
DRAWSL(WS=WSP[P],LP+HLPX,0,WSP1[P],3),POINTDOT,LINETHICK1; 
DRAWSL(WS=WSP[P],LP+HLPX*2,0,WSP1[P],3),POINTDOT,LINETHICK1,colorAAAAAA; 
DRAWNUMBER(WS=WSP[P],HP,HP,2),SHIFT38,colorFF; 
DRAWNUMBER(WS=WSP[P],LP,LP,2),SHIFT38,colorFF00; 
DRAWNUMBER(WS=WSP[P],LP+HLPX,LP+HLPX,2),SHIFT38,colorFFFF; 
DRAWNUMBER(WS=WSP[P],LP+HLPX*2,LP+HLPX*2,2),SHIFT38,colorFFFFFF; 
END; 
X1:=(CLOSE+LOW+HIGH)/3; 
挑战巅峰:=MA(X1,5); 
JCZT:=IF(CROSS(体系,【▲】Z),1,0); 
SCZT:=IF(CROSS(【▲】Z,体系),2,0); 
A:=SYSPARAM(1)=BARPOS; 
时间:=IF(A>0,DATE,体系); 
MM:=BARSLAST(DATE=时间); 
HH:=HHV(HIGH,MM+1); 
LL:=LLV(LOW,MM+1); 
MID:=(HH+LL)/2; 
RENQ:=【▲】Z-(HH-LL)/6; 
加权移平均:=WMA(CLOSE,5); 
JNYY:=DMA(加权移平均,VOL/CAPITAL); 
個Z:=EMA(JNYY,3); 
十Z:=EMA(JNYY,5); 
百Z:=EMA(JNYY,7); 
千Z:=EMA(JNYY,9); 
萬Z:=EMA(JNYY,11); 
PARTLINE(個Z<REF(個Z,1),個Z),POINTDOT,LINETHICK1,colorFFAA11; 
PARTLINE(十Z<REF(十Z,1),十Z),POINTDOT,LINETHICK1,colorFFBB22; 
PARTLINE(百Z<REF(百Z,1),百Z),POINTDOT,LINETHICK1,colorFFCC33; 
PARTLINE(千Z<REF(千Z,1),千Z),POINTDOT,LINETHICK1,colorFFDD44; 
PARTLINE(萬Z<REF(萬Z,1),萬Z),POINTDOT,LINETHICK1,colorFFEE55; 
PARTLINE(個Z>REF(個Z,1),個Z),POINTDOT,LINETHICK1,colorFF00FF; 
PARTLINE(十Z>REF(十Z,1),十Z),POINTDOT,LINETHICK1,colorFF99FF; 
PARTLINE(百Z>REF(百Z,1),百Z),POINTDOT,LINETHICK1,colorFF88FF; 
PARTLINE(千Z>REF(千Z,1),千Z),POINTDOT,LINETHICK1,colorFF77FF; 
PARTLINE(萬Z>REF(萬Z,1),萬Z),POINTDOT,LINETHICK1,colorFF66FF; 
 
DRAWLINE(SCZT,HH,RENQ,HH,1),LINETHICK1,colorCCDD77; 
历史最高:=高; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                                                                                 历史最高'+NUMTOSTR(历史最高[SYSPARAM(1)],2)),ALIGN4,colorFF00FF; 
历史最低:=低; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                                                                                                 历史最低'+NUMTOSTR(历史最低[SYSPARAM(1)],2)),ALIGN4,colorFFFFFF; 
获利★:=获利盘; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'获利★'+NUMTOSTR(获利★[SYSPARAM(1)],2)),ALIGN5,colorFF00; 
套牢★:=套牢盘; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                套牢★'+NUMTOSTR(套牢★[SYSPARAM(1)],2)),ALIGN5,colorFFFFFF; 
近卖预测★:=股票卖出价预测; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                                近卖预测★'+NUMTOSTR(近卖预测★[SYSPARAM(1)],2)),ALIGN5,colorFF00; 
近买预测★:=股票买进价预测; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                                                    近买预测★'+NUMTOSTR(近买预测★[SYSPARAM(1)],2)),ALIGN5,colorFF00CC; 
【90%成本】:=WIN1; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                                                                        【90%成本】'+NUMTOSTR(【90%成本】[SYSPARAM(1)],2)),ALIGN5,colorFF; 
【70%成本】:=WIN2; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                                                                                           【70%成本】'+NUMTOSTR(【70%成本】[SYSPARAM(1)],2)),ALIGN5,colorFFFFFF; 
底出击★:=DI; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'底出击★'+NUMTOSTR(底出击★[SYSPARAM(1)],2)),ALIGN4,colorFF00CC; 
稳建仓:=CH; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'               稳建仓'+NUMTOSTR(稳建仓[SYSPARAM(1)],2)),ALIGN4,colorCCCCFF; 
快刀手:=JCFL; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                             快刀手'+NUMTOSTR(快刀手[SYSPARAM(1)],2)),ALIGN4,colorFFFFFF; 
预测★:=DCFL; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                                         预测★'+NUMTOSTR(预测★[SYSPARAM(1)],2)),ALIGN4,colorFFFF; 
升浪:=SCFL; 
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'                                                       升浪'+NUMTOSTR(升浪[SYSPARAM(1)],2)),ALIGN4,color3300CC; 
 
 
 
 
 
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2),((h+l)/2),10,0),Coloryellow,linethick2; 
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*1.01,((h+l)/2)*1.01,2,0),Coloryellow,pointdot,shift1; 
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*1.02,((h+l)/2)*1.02,2,0),Coloryellow,{pointdot},linethick1,shift1; 
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*1.03,((h+l)/2)*1.03,5,0),Coloryellow,shift1; 
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*1.05,((h+l)/2)*1.05,17,0),Colormagenta,pointdot,shift1; 
{STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*1.1,((h+l)/2)*1.1,2,0),Coloryellow,pointdot,shift1;} 
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*0.99,((h+l)/2)*0.99,2,0),ColorAFB49C,pointdot,shift1; 
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*0.98,((h+l)/2)*0.98,2,0),,ColorAFB49C,,pointdot,linethick1,shift1; 
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*0.97,((h+l)/2)*0.97,5,0),ColorAFB49C,,pointdot,shift1; 
STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*0.95,((h+l)/2)*0.95,17,0),ColorYELLOW,pointdot,shift1; 
{STICKLINE(BARSCOUNT(C)=SYSPARAM(1),((h+l)/2)*0.90,((h+l)/2)*0.90,2,0),ColorAFB49C,pointdot,shift1;} 
DRAWBKBMP(CLOSE>=OPEN or CLOSE<OPEN,'999'); 
Var1:=(OPEN+LOW+HIGH+CLOSE)/4; 
 
MA1:MA(CLOSE,5); 
MA2:MA(CLOSE,13); 
MA3:MA(CLOSE,55); 
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),COLOR0000FF; 
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),COLOR0000FF; 
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),COLOR0000FF; 
STICKLINE(CLOSE<=OPEN,HIGH,LOW,0,0),COLORred; 
STICKLINE(CLOSE<=OPEN,HIGH,LOW,0,0),COLORFFFF00; 
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,8,0),COLORcyan; 
Var32:=CLOSE/REF(CLOSE, 1)>=1.062 AND HIGH/CLOSE<1.005 AND MA(CLOSE, 90)/CLOSE>=1.150; 
Var33:=Var32 AND COUNT(Var32, 20)=1 ; 
Var34:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1); 
Var35:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1); 
Var36:=IF(Var34>0.010, 0.900, 1) AND IF(Var34>(-0.025), 1, 1.200); 
Var37:=Var36*(Var35-Var34)*100; 
Var38:=SUM(Var37, 10); 
Var39:=SMA(Var38, 40, 1); 
Var310:=Var38>20; 
Var311:=CROSS(CLOSE, MA(CLOSE*1.055, 3)) AND CLOSE>OPEN*1.060 AND VOL>=REF(VOL, 1)*1.5 AND CLOSE>=MA(CLOSE, 10); 
Var312:=Var310 AND Var311 ; 
Var313:=(-100)*(HHV(HIGH, 3)-CLOSE)/(HHV(HIGH, 3)-LLV(LOW, 3)); 
Var314:= CROSS(Var313, (-87)) AND OPEN=1.090*REF(CLOSE, 1) AND INDEXC>0.980*REF(INDEXC, 1) AND CLOSE<=1.470*LLV(CLOSE, 58); 
Var315:=EMA(CLOSE, 12)-EMA(CLOSE, 26); 
Var316:=EMA(Var315, 9); 
Var317:=2*(Var315-Var316); 
Var318:=(CLOSE-LLV(LOW, 9))/(HHV(HIGH, 9)-LLV(LOW, 9))*100; 
Var319:=SMA(Var318, 3, 1); 
Var320:=SMA(Var319, 3, 1); 
Var321:=EMA(IF(Var316>REF(Var316, 1), 1, (-1)), 14)*14; 
Var322:=EMA(IF(Var320>REF(Var320, 1), 1, (-1)), 14)*14*2; 
Var323:=(MA(CLOSE, 5)/MA(CLOSE, 70)-1)*100; 
Var324:=(Var323+Var322+Var321)/3; 
Var325:=MA(CLOSE, 80)-MA(CLOSE, 10)/3; 
Var326:=IF(CLOSE and MA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,88,0);{Var38>Var39;} 
Var327:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100<10 AND CLOSE<17 AND HIGH/CLOSE<1.010 AND Var326>0, 91, 0); 
Var328:=IF(Var324>REF(Var324, 1) AND REF(Var324, 1)<REF(Var324, 2) AND (Var33 OR Var312 OR Var314) OR Var326>0 OR Var327>0, 85, 0); 
Var329:=IF(Var327>0 ,95,0), STICK,LINETHICK2; 
Var330:=IF(Var326>0 or var327>0,91,0), STICK,LINETHICK2; 
Var331:=IF(Var328>0 or var327>0 or var326>0,88,0), STICK,LINETHICK2; 
Var332:=100*(CLOSE-LLV(LOW,42))/(HHV(HIGH,42)-LLV(LOW,42)),LINETHICK1,colorgreen; 
Var333:=COUNT(MA(CLOSE,3)>REF(MA(CLOSE,3),1),1)=1;  
Var334:=(Var332<93 AND Var333 and MAX(MAX(Var329, Var330), Var331))*100;   
DRAWICON(Var333>0,LOW*0.99,10),ALIGN5;  
DRAWICON(Var333=0,LOW*0.99,11),ALIGN4; 
STICKLINE(Var327>90,LOW*0.99,LOW*0.95,6,0),COLORYELLOW; 
DRAWTEXT(Var327>90,LOW*0.95,'▲追涨'),COLORYELLOW; 
DRAWICON(Var310>0 AND Var327=0,HIGH*1.01,5); 
 
早晨之星:=REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1) < REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND 
CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2); 
黄昏之星:=REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1) > REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02 AND 
CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2); 
长十字:=CLOSE=OPEN AND HIGH/LOW >1.03; 
垂死十字:=CLOSE=OPEN AND CLOSE=LOW AND CLOSE<>HIGH; 
早晨十字星:=REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1) < REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND 
CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2); 
黄昏十字星:=REF(CLOSE,2)/REF(OPEN,2) > 1.05 AND REF(OPEN,1) > REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND 
CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2); 
射击之星:=MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5); 
倒转锤头:=MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5); 
锤头:=HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5); 
吊颈:=HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5); 
穿头破脚:=(REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 AND CLOSE<REF(OPEN,1) AND OPEN>REF(CLOSE,1)) 
OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1)); 
乌云盖顶:=REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97 AND OPEN>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1); 
曙光初现:=REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1); 
身怀六甲:=ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04 AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND 
MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN) > MIN(REF(CLOSE,1),REF(OPEN,1)); 
十字胎:=ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04 AND CLOSE=OPEN AND 
CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1),REF(OPEN,1)); 
平顶:=ABS(HIGH-REF(HIGH,1))/HIGH<0.001; 
平底:=(ABS(LOW-REF(LOW,1))/LOW<0.001 and ABS(REF(LOW,1)-REF(LOW,2))/REF(LOW,1)<=0.001); 
大阳烛:=CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018; 
三个白武士:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND CLOSE>OPEN  
AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1); 
双飞乌鸦:=REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND CLOSE/OPEN<0.98; 
孕育线:=REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)-REF(OPEN,2))/REF(OPEN,2)>=2/100  AND REF(OPEN,1)>=REF(CLOSE,1) AND  
(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100 AND REF(OPEN,1)<=REF(CLOSE,2) AND REF(CLOSE,1)>=REF(OPEN,2) AND CLOSE>=OPEN AND 
(CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1) AND (MAX(CLOSE,REF(CLOSE,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))<=1/100; 
多方炮:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN; 
出水芙蓉:=(OPEN<EMA(CLOSE,20) OR OPEN<EMA(CLOSE,40) OR OPEN<EMA(CLOSE,60)) AND (CLOSE>MAX(EMA(CLOSE,20),MAX(EMA(CLOSE,40),EMA(CLOSE,60)))) 
AND (VOL/MA(VOL,30)>1.2 AND CLOSE/REF(CLOSE,1)>1.049); 
上升三部曲:=REF(CLOSE,4)/REF(OPEN,4)>1.03 AND REF(CLOSE,3)<REF(OPEN,3) AND REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND 
REF(LOW,4)<REF(LOW,3) AND REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND 
REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,4); 
下跌三部曲:= REF(CLOSE,4)/REF(OPEN,4)<0.97 AND REF(CLOSE,3)>REF(OPEN,3) AND REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND REF(LOW,4)<REF(LOW,3) AND 
REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN<0.97 AND 
CLOSE<REF(CLOSE,4); 
跳空缺口:=HIGH<REF(LOW,1) OR LOW>REF(HIGH,1); 
三只乌鸦:=REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND REF(CLOSE,1)<REF(CLOSE,2) AND CLOSE<REF(CLOSE,1); 
光脚阴线:=LOW=CLOSE AND HIGH<>LOW; 
光头阳线:=HIGH=CLOSE AND HIGH<>LOW; 
分离:=OPEN=REF(OPEN,1) AND (CLOSE-OPEN)*(REF(CLOSE,1)-REF(OPEN,1))<0; 
长下影:=(MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667; 
长上影:=(HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667; 
十字星:=CLOSE=OPEN AND HIGH<>LOW; 
大阴烛:=OPEN/CLOSE > 1.05 AND HIGH/LOW < OPEN/CLOSE+0.018; 
好友反攻:=(REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002)  
OR (REF(CLOSE,1)>REF(OPEN,1) AND CLOSE<OPEN AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002); 
倾盆大雨:=REF(CLOSE,1)/REF(OPEN,1)>=1.03 AND OPEN<REF(CLOSE,1) AND OPEN>REF(OPEN,1) AND CLOSE<REF(OPEN,1); 
 
EXPLAIN(倾盆大雨,'K线形态分析:倾盆大雨,见顶信号;'),COLORCYAN; 
EXPLAIN(大阴烛,'K线形态分析:大阴烛,后市向淡,发生逆转;'),COLORCYAN; 
EXPLAIN(好友反攻,'K线形态分析:好友反攻,底部反转;'),COLORRED; 
EXPLAIN(跳空缺口,'K线形态分析:跳空缺口,注意向上还是向下跳空;'),COLORWHITE; 
EXPLAIN(光脚阴线,'K线形态分析:光脚阴线,下跌信号;'),COLORCYAN; 
EXPLAIN(光头阳线,'K线形态分析:光头阳线,后市看涨;'),COLORRED; 
EXPLAIN(三只乌鸦,'K线形态分析:三只乌鸦,可能见顶回落;'),COLORCYAN; 
EXPLAIN(分离,'K线形态分析:分离,注意看涨分离和看跌分离;'),COLORWHITE; 
EXPLAIN(长下影,'K线形态分析:长下影,持续下跌后出现,有可能止跌回升;在升势末期出现,须多加留意;'),COLORRED; 
EXPLAIN(长上影,'K线形态分析:长上影,表明行情上档压力沉重,升势受阻;'),COLORCYAN; 
EXPLAIN(下跌三部曲,'K线形态分析:下跌三部曲,下跌信号;'),COLORRED; 
EXPLAIN(上升三部曲,'K线形态分析:上升三部曲,上涨信号;'),COLORCYAN; 
EXPLAIN(早晨之星,'K线形态分析:早晨之星,见底回升;'),COLORRED; 
EXPLAIN(黄昏之星,'K线形态分析:黄昏之星,见顶回落;'),COLORCYAN; 
EXPLAIN(十字星,'K线形态分析:十字星,有转向意味,注意股价位置在顶部还是底部;'),COLORWHITE; 
EXPLAIN(长十字,'K线形态分析:长十字,注意在顶部还是底部;'),COLORWHITE; 
EXPLAIN(垂死十字,'K线形态分析:垂死十字,下跌信号;'),COLORCYAN; 
EXPLAIN(早晨十字星,'K线形态分析:早晨十字星,上涨信号,见底回升;'),COLORRED; 
EXPLAIN(黄昏十字星,'K线形态分析:黄昏十字星,下跌信号,见顶回落;'),COLORCYAN; 
EXPLAIN(射击之星,'K线形态分析:射击之星,可能见顶回落,可靠性低;'),COLORCYAN; 
EXPLAIN(倒转锤头,'K线形态分析:倒转锤头,可能见底回升;'),COLORRED; 
EXPLAIN(锤头,'K线形态分析:锤头,可能见底回升,如有量配合,信号强烈;'),COLORRED; 
EXPLAIN(吊颈,'K线形态分析:吊颈,上升行情中见顶回落,顶部出现,见顶信号;'),COLORCYAN; 
EXPLAIN(平顶,'K线形态分析:平顶,温和的反转;'),COLORCYAN; 
EXPLAIN(穿头破脚,'K线形态分析:穿头破脚,顶部出现,见顶回落信号;'),COLORCYAN; 
EXPLAIN(乌云盖顶,'K线形态分析:乌云盖顶,见顶回落信号;'),COLORCYAN; 
EXPLAIN(曙光初现,'K线形态分析:曙光初现,后市见底回升;'),COLORRED; 
EXPLAIN(身怀六甲,'K线形态分析:身怀六甲,出现在底部,是见底回升信号;出现在顶部,是见顶回落信号;'),COLORRED; 
EXPLAIN(十字胎,'K线形态分析:十字胎;'),COLORRED; 
EXPLAIN(平底,'K线形态分析:平底,温和的反转;'),COLORRED; 
EXPLAIN(大阳烛,'K线形态分析:大阳烛,,看涨;'),COLORRED; 
EXPLAIN(三个白武士,'K线形态分析:三个白武士,每日收盘价上移,表示可能见底回升;'),COLORRED; 
EXPLAIN(双飞乌鸦,'K线形态分析:双飞乌鸦,行情将见顶回落;'),COLORCYAN; 
EXPLAIN(孕育线,'K线形态分析:孕育线,注意股价位置;'),COLORWHITE; 
EXPLAIN(多方炮,'K线形态分析:多方炮,在底部出现有上涨以为,在中间出现有可能是上涨中继,顶部出现是复合见顶信号;'),COLORRED; 
EXPLAIN(出水芙蓉,'K线形态分析:出水芙蓉,见底回升;'),COLORRED; 
 
MID:=MA(CLOSE,20); 
UPPER:=MID+2*STD(CLOSE,20); 
LOWER:=MID-2*STD(CLOSE,20); 
V1:=(CLOSE-LOWER)/(UPPER-LOWER)*100; 
V2:=V1-EMA(V1,5); 
K1:=SUM(LLV(V2,4),4)/4; 
V3:=EMA(V2,64)*10; 
V4:=EMA(0.4*V2*(-1),3); 
V5:=-1*EMA(V2,39)*10; 
A:=V3>10; 
B:=V2>V4; 
D:=V5>10; 
E:=V3<=10 OR V2<=V4 OR V5<=10; 
KS:=(CLOSE-SMA(CLOSE,13,1))/SMA(CLOSE,13,1)*(-100); 
RKS:=REF(KS,1); 
MLS:=RKS/KS>1.23 AND RKS>13 AND CLOSE/REF(CLOSE,1)>1.03; 
开:=OPEN; 
高:=HIGH; 
低:=LOW; 
收:=CLOSE; 
STICKLINE(收>=开 AND E,高,低,0,0),COLORred; 
STICKLINE(收>=开 AND E,收,开,8,0),COLORred; 
STICKLINE(收< 开 AND E,高,低,0,0),COLORgreen; 
STICKLINE(收< 开 AND E,收,开,8,0),COLORgreen; 
STICKLINE(开> 收 AND A,低,高,0,0),COLORYELLOW; 
STICKLINE(开> 收 AND A,收,开,8,0),COLORYELLOW; 
STICKLINE(开<=收 AND A,低,高,0,0),COLORYELLOW; 
STICKLINE(开<=收 AND A,收,开,8,1),COLORYELLOW; 
STICKLINE(开> 收 AND B,低,高,0,0),COLORRED; 
STICKLINE(开> 收 AND B,收,开,8,0),COLORRED; 
STICKLINE(开<=收 AND B,低,高,0,0),COLORRED; 
STICKLINE(开<=收 AND B,收,开,8,1),COLORRED; 
STICKLINE(开> 收 AND D,低,高,0,0),COLORGREEN; 
STICKLINE(开> 收 AND D,收,开,8,0),COLORGREEN; 
STICKLINE(开<=收 AND D,低,高,0,0),COLORGREEN; 
STICKLINE(开<=收 AND D,收,开,8,1),COLORGREEN; 
超跌:STICKLINE(KS>13,高,低,0,1),colorwhite,linethick2;  
反弹:STICKLINE(MLS=1,高,低,0,1),colormagenta,linethick2;  
STICKLINE(KS>13,开,收,8,1),colorwhite,linethick2;  
STICKLINE(MLS=1,开,收,8,1),colormagenta,linethick2; 
 
A:MA(CLOSE,3),ColorFF00FF,LINETHICK0; 
A1:=(CLOSE+HIGH+LOW)/(3); 
B:=EMA(A1,10); 
B2:=REF(B,1); 
MA20:=EMA(CLOSE,20); 
DRAWTEXT((B>B2),ma20,'*'),Colorffff00; 
DRAWTEXT((B<B2),ma20,'*'),Coloryellow; 
VAR1:=EMA(CLOSE,3); 
VAR2:=EMA(CLOSE,8); 
MA5:MA(CLOSE,5),Coloryellow; 
MA21:=EMA(CLOSE,21); 
STICKLINE(VAR1<MA21,h,l,0,0),Colorgreen; 
STICKLINE(VAR1<MA21,c,o,8,0),Color007700; 
STICKLINE(VAR1<MA21,c,o,7,0),Color008E00; 
STICKLINE(VAR1<MA21,c,o,6,0),Color009900; 
STICKLINE(VAR1<MA21,c,o,5,0),Color00A600; 
STICKLINE(VAR1<MA21,c,o,4,0),Color00B500; 
STICKLINE(VAR1<MA21,c,o,3,0),Color00C600; 
STICKLINE(VAR1<MA21,c,o,2,0),Color00D500; 
STICKLINE(VAR1<MA21,c,o,1,0),Color00E600; 
STICKLINE(VAR1>MA21,h,l,0,0),Color106fff; 
STICKLINE(VAR1>MA21,c,o,8,0),Color000084; 
STICKLINE(VAR1>MA21,c,o,7,0),Color000095; 
STICKLINE(VAR1>MA21,c,o,6,0),Color0000A2; 
STICKLINE(VAR1>MA21,c,o,5,0),Color0000B3; 
STICKLINE(VAR1>MA21,c,o,4,0),Color0000C8; 
STICKLINE(VAR1>MA21,c,o,3,0),Color0000D7; 
STICKLINE(VAR1>MA21,c,o,2,0),Color0000EA; 
STICKLINE(VAR1>MA21,c,o,1,0),Color0000FF; 
 
STICKLINE(VAR1<VAR2 AND VAR1>MA21,h,l,0,0),Colorff5d10; 
STICKLINE(VAR1<VAR2 AND VAR1>MA21,c,o,8,0),Colorff5d10; 
STICKLINE(VAR1<VAR2 AND VAR1>MA21,c,o,5,0),Colorff7710; 
STICKLINE(VAR1<VAR2 AND VAR1>MA21,c,o,2,0),Colorff9910; 
STICKLINE(VAR1>VAR2 AND VAR1<MA21,h,l,0,0),Colorff00ff; 
STICKLINE(VAR1>VAR2 AND VAR1<MA21,c,o,8,0),Color8E008E; 
STICKLINE(VAR1>VAR2 AND VAR1<MA21,c,o,7,0),Color9D009D; 
STICKLINE(VAR1>VAR2 AND VAR1<MA21,c,o,6,0),ColorB000B0; 
STICKLINE(VAR1>VAR2 AND VAR1<MA21,c,o,5,0),ColorC600C6; 
STICKLINE(VAR1>VAR2 AND VAR1<MA21,c,o,4,0),ColorD000D0; 
STICKLINE(VAR1>VAR2 AND VAR1<MA21,c,o,3,0),ColorE600E6; 
STICKLINE(VAR1>VAR2 AND VAR1<MA21,c,o,2,0),ColorF900F9; 
STICKLINE(VAR1>VAR2 AND VAR1<MA21,c,o,1,0),ColorFF09FF; 
 
MA2:=MA(CLOSE,10); 
MA34:=MA(CLOSE,34); 
VARA:=((AMOUNT)/(VOL))/(100); 
VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7); 
VARC:=((SUM(AMOUNT,7))/(VARA))/(100); 
VARD:=DMA(VARB,(VOL)/(VARC)); 
VARE:=((CLOSE-VARD)/(VARD))*(100); 
VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100); 
VARJ:=MA(VARE,20)+STD(VARE,20); 
BIAS18:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100); 
K:=SMA(VARF,3,1); 
顶:=(REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND (K>79); 
DRAWTEXT((REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND (K>79),h*1.02,'★风险'),Coloryellow; 
 |