DRAWGBK(C 0, RGB(180,170,170),RGB(183,164,165),0,'8',0);
ND1970:=(YEAR-1970)*365+INTPART((YEAR-1972)/4)-IF(INTPART(YEAR/4)=YEAR/4,1,0)+DAY+(MONTH-1)*30+IF(MONTH =8,INTPART(MONTH/2),INTPART((MONTH-7)/2)+4)-IF(MONTH 2 AND INTPART(YEAR/4)=YEAR/4,1,IF(MONTH 2 AND NOT(INTPART(YEAR/4)=YEAR/4),2,0));
C1:=C;{WWW.GOODGUPIAO.COM}
O1:=REF(O,BARSLAST(ND1970-REF(ND1970,1) WEEKDAY-REF(WEEKDAY,1)));
H1:=HHV(H,BARSLAST(ND1970-REF(ND1970,1) WEEKDAY-REF(WEEKDAY,1))+1);
L1:=LLV(L,BARSLAST(ND1970-REF(ND1970,1) WEEKDAY-REF(WEEKDAY,1))+1);
DRAWBAND(H1,RGB(220,220,220),L1,RGB(0,25,0));
DRAWBAND(C1,RGB(220,20,20),O1,RGB(0,25,0));
跟A7:=C-REF(C,1);
跟A8:=100*EMA(EMA(跟A7,5),5)/EMA(EMA(ABS(跟A7),5),5);
买:=LLV(跟A8,2)=LLV(跟A8,7) AND COUNT(跟A8 0,2) AND CROSS(跟A8,MA(跟A8,2));
跟庄买进:DRAWTEXT(FILTER(买=1,5),L*0.9999,'@买')COLORMAGENTA;
TA:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:=EMA(TA,13);
VAR8A:=REF(CLOSE,1)-REF(ATR,1);
起飞:HHV(VAR8A,13), COLORYELLOW,LINETHICK2;
DRAWTEXT(ISLASTBAR,起飞,' 起飞'), COLORWHITE;
买线:=EMA(CLOSE,2);
卖线:=EMA(SLOPE(CLOSE,32)*20+CLOSE,56),LINETHICK0;
BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);{WWW.GOODGUPIAO.COM}
DRAWTEXT (BU,LOW*0.989,'飞天'),COLORRED,LINETHICK3;
STICKLINE(买线 =卖线,LOW,HIGH,0,0),COLORRED;
STICKLINE(买线 =卖线,CLOSE,OPEN,3,0),COLOR0000AA;
STICKLINE(买线 =卖线,CLOSE,OPEN,2,0),COLOR0000CC;
STICKLINE(买线 卖线,CLOSE,OPEN,3,0),COLORAAAA00;
STICKLINE(买线 卖线,CLOSE,OPEN,2,0),COLORBBBB00;
STICKLINE(买线 卖线,LOW,HIGH,0,0),COLORFFFF00;
STICKLINE(CROSS(买线,卖线),OPEN,CLOSE,3,0),COLORFF00FF;
STICKLINE(CROSS(卖线,买线),OPEN,CLOSE,3,0),COLORBLUE;GOODGUPIAO:SMA(MAX(CLOSE-C,0),7,1)/SMA(ABS(CLOSE-C),7,1)*100,NODRAW;
飞天拉升选股公式源码
DRAWGBK(CURRBARSCOUNT=1, RGB(0,0,0),RGB(0,0,0),0,'1',0);
顶:90,COLORRED,LINETHICK1;
强:80,COLORRED,LINETHICK2;
弱:10,COLORGREEN,LINETHICK3;
DRAWTEXT(ISLASTBAR, 顶,' 顶'),COLORYELLOW;
DRAWTEXT(ISLASTBAR, 强,' 强'),COLORRED;
DRAWTEXT(ISLASTBAR, 弱,' 弱'),COLORGREEN;
VAR1:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR22:=SMA(VAR1,20,1);
VAR33:=SMA(VAR22,15,1);
VAR44:=(3*VAR22+2*VAR33)/4;
VAR55:= REF(VAR44,1);
RSA:SMA(MAX(VAR44-VAR55,0),2,1)/SMA(ABS(VAR44-VAR55),2,1)*100 ,COLORRED,NODRAW ,LINETHICK1;
RSB:MA(RSA,10),NODRAW;
拉升:IF(CROSS(RSA,RSB),20,0),STICK,COLORRED ,LINETHICK2,NODRAW;
落袋:IF(CROSS(RSB,90),20,0),STICK ,LINETHICK2,NODRAW;
DRAWTEXT(CROSS(RSA,RSB),10,'拉升'),COLORRED ;
DRAWTEXT(CROSS(RSB,90),15,'落袋'),COLORGREEN ;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9),COLORWHITE;
MACD:=(DIFF-DEA)*2;
A:STICKLINE(MACD =0 AND MACD =REF(MACD,1) AND REF(MACD,1) 0
AND MACD =0.01,90,MACD,1,1) ,COLORRED;
DRAWTEXT(A,90,' 飞天'),COLORYELLOW ;
启动线:=10*SUM(EMA((C+L)/2,2),5)/10.158,NODRAW;
平衡线:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,4),NODRAW;
平台线:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,10),NODRAW;
强弱线:=EMA(启动线,21);
VVAR1:=2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1;
VVAR2:=IF((EMA((C+L)/2,3)-VVAR1)*5 0,POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10);
VVAR3:=IF(VVAR2 0,VVAR2-0,0);
STICKLINE(VVAR3 0 AND REF(VVAR3,1)=0 AND (C+L)/2 MA((C+L)/2,8),0,25,1,0),COLORYELLOW;
DRAWTEXT(VVAR3 0 AND REF(VVAR3,1)=0 AND (C+L)/2 MA((C+L)/2,8),30,'动');
散户:= 100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60));
RSV:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100;
RSV1:=(C-MA(C,4))/MA(C,4)*100;
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);
VAR5:=LLV(LOW,30);
VAR6:=HHV(VAR4,30);
VAR7:=IF(MA(CLOSE,58),1,0);
VAR8:=EMA(IF(LOW =VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
VAR9:=IF(VAR8 100,100,VAR8);
K:=SMA(RSV,5,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
主力:=EMA(J,6),COLORYELLOW;
AA3:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
AA4:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
AA5:=SMA(AA4,13,8);
走势:=CEILING(SMA(AA5,13,8)),COLORRED,LINETHICK2;
AA6:=SMA(AA3,21,8);
{买观注: STICKLINE(走势-AA6 -65,0,7,15,2);}
{DRAWICON(FILTER(J REF(J,1)AND 走势 =REF(走势,1)AND 走势 25 ,5),走势,1);}
{卖观注: STICKLINE(走势-AA6 85,98,90,15,1),COLORFFFF00;}
{DRAWICON(FILTER(J REF(J,1)AND 走势 =REF(走势,1)AND J 85 ,5),J,2);}
吸:STICKLINE(VAR9 -120,50,50+(VAR9/2),3,1),COLORRED ;
CDMA:EMA(EMA(RSV1,7),7)*4,NODRAW,COLORWHITE;
STICKLINE(CDMA =0 AND CDMA =REF(CDMA,1),50,50+CDMA,3.3,0),COLORYELLOW ;{粉色拉升资金块}
短线:100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)),COLORWHITE ,NODRAW ;
{快线:(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,LINETHICK1,COLORWHITE ;}
散户线:散户,COLORGREEN , ;
主力线:主力,COLORMAGENTA,LINETHICK1 ;
拉升线:走势,COLORYELLOW,LINETHICK1;
DRAWTEXT(ISLASTBAR,散户线,' --空方线'),COLORGREEN;
DRAWTEXT(ISLASTBAR,主力线,' --主力线'),COLORMAGENTA ;
DRAWTEXT(ISLASTBAR,拉升线,' --拉升线'),COLORYELLOW;
走强线: 20,COLORCYAN ;
关注低买:IF(90 散户 AND CROSS(90,散户) ,98,0),COLORMAGENTA,STICK,NODRAW;
高抛低吸:IF(散户 10 AND CROSS(10,散户) ,20,0),COLORGREEN,STICK,NODRAW;
风险:COUNT( RSI.RSI1 (6,12,24) 80,3)=3 AND CROSS( RSI.RSI2 (6,12,24),79.5),NODRAW;
观注顶:(散户 8 AND 主力 90 AND 走势 90 AND CDMA =REF(CDMA,1)AND 散户线),COLORGREEN,NODRAW;
DRAWTEXT(观注顶,-1,'◆'),COLORGREEN;
DRAWTEXT(风险,100,' 风险'),COLOR00FFFF;
STICKLINE(关注低买,0,20,1,1),COLORMAGENTA ;
{STICKLINE(高抛低吸,0,100,0,-1),COLORGREEN;};
A77:=((CLOSE - (MA(CLOSE,13))) / (MA(CLOSE,13))) * -100;
A78:=((CLOSE - (LLV(LOW,13))) / ((HHV(HIGH,13)) - (LLV(LOW,13)))) * 100;
A79:=SMA(A78,3,2);
A80:=SMA(A79,3,2);
A81:=SMA(A80,5,1);
VAK1:=IF(YEAR =2038 AND MONTH =1,0,1);
VAK2:=REF(LOW,1)*VAK1;
VAK3:=SMA(ABS(LOW-VAK2),3,1)/SMA(MAX(LOW-VAK2,0),3,1)*100*VAK1;
VAK4:=EMA(IF(CLOSE*1.3,VAK3*10,VAK3/10),3)*VAK1;
VAK5:=LLV(LOW,30)*VAK1;
VAK6:=HHV(VAK4,30)*VAK1;
VAK7:=IF(MA(CLOSE,58),1,0)*VAK1;
VAK8:=EMA(IF(LOW =VAK5,(VAK4+VAK6*2)/2,0),3)/618*VAK7*VAK1;
吸筹:=IF(VAK8 100,100,VAK8)*VAK1;
跟庄吸:=IF(吸筹 REF(吸筹,1) AND (REF(吸筹,1) REF(吸筹,2) OR REF(吸筹,1)=100),1,0);
吸筹累计:=SUM(吸筹,60);
庄三吸:=COUNT(跟庄吸,30)=3 AND 跟庄吸=1 AND 吸筹累计
狠吸筹:=REF(吸筹,1)=100 AND 吸筹 REF(吸筹,1) AND 吸筹累计
狠吸筹2:=REF(吸筹,1) REF(吸筹,2) AND 90 REF(吸筹,1) AND 吸筹 REF(吸筹,1) AND 吸筹累计
跟庄买:STICKLINE(庄三吸=1 OR 狠吸筹=1 OR 狠吸筹2=1,0,30,1,1),COLORFFFFFF;
DRAWTEXT(跟庄买,40.4,'庄'),COLORFFFF00;
股价趋势: 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),LINETHICK0;
底部警戒: 10,COLORRED,LINETHICK0;
买入警戒:STICKLINE(股价趋势 =10,0,10,3,0),COLORMAGENTA ;
买入信号: STICKLINE(CROSS(股价趋势,底部警戒),0,30,1,1),COLORYELLOW ,LINETHICK2;
DRAWICON(CROSS(股价趋势,底部警戒),45,24);
N:=9;
M:=14;
N1:=6;
TYP := (HIGH + LOW + CLOSE)/3;
CC1:=(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M)),COLORFF00FF;
C1:=SMA(CC1,3,1);
C2:=SMA(C1,3,1);
C3:=3*C1-2*C2;
CB1:=EMA(C3,5);
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;
RSI:(RSI1-50)*5,LINETHICK2,COLOR0000FF,NODRAW;
R1:=SMA(RSI,3,1);
DD1:=SMA(R1,3,1);
J1:=3*R1-2*DD1;
RR1:=EMA(J1,5);
RR2:=REF(RR1,1);
RR:=RR1
RRSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
KKK:=SMA(RSV,3,1);
KK1:(K-50)*5,COLORFFFF00,NODRAW;
K2:=SMA(KK1,3,1);
D2:=SMA(K2,3,1);
J2:=3*K2-2*D2;
BB1:=EMA(J2,5);
买入:=RR AND NOT(REF(RR,1)) AND (RR1 -100 AND BB1 -100) AND CB1 -100;
DRAWICON(买入,40,9);
