以下是通达信天上掉馅饼源码
{私募操盘}
VAR1:=IF(YEAR=2013 AND MONTH=9,0,1); VAR2:=REF(LOW,1)*VAR1;VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100*VAR1;
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3)*VAR1; VAR5:=LLV(LOW,30)*VAR1;
VAR6:=HHV(VAR4,30)*VAR1;
VAR7:=IF(MA(CLOSE,58),1,0)*VAR1;
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7*VAR1;
吸筹:IF(VAR8>100,100,VAR8)*VAR1,COLOREEDDFF;庄家吸筹:STICKLINE(吸筹*VAR1>-150,0,吸筹,8,0),COLORRED;
VARE:=REF(LOW,1)*0.9*VAR1;
VARF:=LOW*0.9;
VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;
VAR11:=EMA(VAR10,30);
VAR12:=CLOSE-REF(CLOSE,1);
VAR13:=MAX(VAR12,0);
VAR14:=ABS(VAR12);
VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100;
VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100;
VAR17:=BARSCOUNT(CLOSE);
VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100;
VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
VAR1D:=SMA(VAR1C,4,1);
VAR1E:=SMA(VAR1D,3,1);
VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100*VAR1;
VAR20:=VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50;
STICKLINE(VAR20,0,50,3,0),COLORFF00FF,LINETHICK3 ;
DRAWTEXT(CROSS(VAR20,0.5) AND COUNT(VAR20=1,10)=1,80,'天上掉馅饼'),COLORYELLOW,LINETHICK2;
RSV:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100)*VAR1;
K:=SMA(RSV,4,1);
D:=SMA(K,4,1);
TX:=HHV(D,144);
DX:=LLV(D,135);
DXZ:=LLV(D,255);
DX1:=LLV(D,55);DXX1:=LLV(D,98); 私募:DXX1*VAR1,COLORRED; 建仓:DX*VAR1,COLORFF00FF;
主仓:DXZ*VAR1,COLORWHITE;
STICKLINE((K>=D),D,REF(D,1),6,0),COLOR0000FF;
STICKLINE((K<D),D,REF(D,1),6,0),COLORFFF000;
趋势1:K,COLORFFFFFF;
趋势2:D,COLOR0000FF;
风险:=TX;
短线D:=IF(CROSS(K,DX) AND CROSS(K,DX1),30,0)*VAR1;
娃哈哈:=DRAWICON((短线D>0),REF(D,1),1);
STICKLINE((K<D),K,D,1,0),COLOR00FF00;
STICKLINE((K>D),D,K,1,0),COLORFF00FF;
DRAWTEXT(CROSS(K,D) AND (K<30),D,'●'),COLOR00FFFF;
DRAWTEXT(CROSS(K,D) AND (K<20),建仓,'买点'),COLOR00FFFF;
SG:=EMA(HHV(HIGH,1),8); X1:=EMA(CLOSE,8);
X30:=((X1 < REF(X1,1)) AND (CLOSE < X1));
SV:=(CLOSE-LLV(LOW,120))/(HHV(HIGH,120)-LLV(LOW,120))*100*VAR1;
SV1:=(CLOSE-LLV(LOW,52))/(HHV(HIGH,52)-LLV(LOW,52))*100;
SV2:=(CLOSE-LLV(LOW,108))/(HHV(HIGH,108)-LLV(LOW,108))*100;
K1:=SMA(SV2,15,1);
D1:=SMA(K1,15,1);
K2:=SMA(SV,2,1);
K3:=(SMA(SV,3,1))*1.2*VAR1;
R1:=100-K3;
日顶:IF(R1+80.5>100,100,R1+80.5),COLORAAAA00,LINETHICK2;
平衡:(TX+DX)/(2),COLORYELLOW; VARR1:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;
大底: STICKLINE(VARR1<-20 AND FILTER(VARR1> REF(VARR1,1),5),VARR1+85,0,7,0), COLORYELLOW; AR5:=LLV(LOW,75);
AR6:=HHV(HIGH,75);
AR7:=(AR6-AR5)/100;
AR8:=SMA((CLOSE-AR5)/AR7,20,1);
VARA:=3*AR8-2*SMA(AR8,15,1);
背离: (100-VARA),COLOR0099FF,LINETHICK2;左峰高:=HHV(H,10);
出击:STICKLINE(CROSS(C,REF(左峰高,10/2)) AND C>REF(左峰高,10/2)AND VOL/REF(VOL,1)>=1.9,0,60,6,0),COLORBLUE;VVARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VVAR12:=(HIGH+LOW+CLOSE)/3;
VVAR13:=(VVAR12-MA(VVAR12,14))/(0.015*AVEDEV(VVAR12,14));
VVAR14:=(VVAR12-MA(VVAR12,70))/(0.015*AVEDEV(VVAR12,70));
VVAR15:=IF(VVAR13>=150 AND VVAR13<200 AND VVAR14>=150 AND VVAR14<200,10,0);
VVAR16:=IF(VVAR13<=-150 AND VVAR13>-200 AND VVAR14<=-150 AND VVAR14>-200,-10,VVAR15);
VVAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VVAR18:=100-ABS(VVAR17);
VVAR19:=IF(VVAR18<90,VVAR18,100);
VVAR1A:=IF(VVARE>0,VVARE,0);
VVAR1B:=IF(VVAR14>=200 AND VVAR13>=150,15,IF(VVAR14<=-200 AND VVAR13<=-150,-15,VVAR16))+60;
VVAR1C:=VVAR1A>48 AND VVAR1B>60 AND VVAR19<100;
DRAWTEXT(VVAR1C AND COUNT(VVAR1C,30)=1 AND VOL<REF(VOL,1),85,'洗盘'),LINETHICK1,COLORFFCC66;
STICKLINE(VVAR1C AND COUNT(VVAR1C,30)=1 AND VOL<REF(VOL,1),0,100,5,0),COLORFF00FF;
