当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：资金共振R主图+选股，需要L2支持
软件名称：[B]资金共振R主图+选股，需要L2支持[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：分享版
软件大小：16.0 KB
官方主页：Home Page
更新时间：2024-11-17 00:15:28
软件简介:
资金共振R
提供主图和选股指标，
附件里有完整的源码
主图源码
N1:=3;N2:=5;N3:=8;N4:=13;
RSV:=-(HHV(HIGH,N4)-CLOSE)/(HHV(HIGH,N4)-LLV(LOW,N4))*100;
LWR1:=SMA(RSV,N1,1);
LWR2:=SMA(LWR1,N1,1);
A1:=LWR1>LWR2;
Z1:=LWR1<LWR2;
RSV1:=(CLOSE-LLV(LOW,N3))/(HHV(HIGH,N3)-LLV(LOW,N3))*100;
K:=SMA(RSV1,N1,1);
DDU:=SMA(K,N1,1);
A2:=K>DDU;
Z2:=K<DDU;
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),N2,1))/(SMA(ABS(CLOSE-LC),N2,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),N4,1))/(SMA(ABS(CLOSE-LC),N4,1))*100;
A3:=RSI1>RSI2;
Z3:=RSI1<RSI2;
DIFF:=EMA(CLOSE,N3)-EMA(CLOSE,N4);
DEA:=EMA(DIFF,N2);
A4:=DIFF>DEA;
Z4:=DIFF<DEA;
BBI:=(MA(CLOSE,N1)+MA(CLOSE,N2)+MA(CLOSE,N3)+MA(CLOSE,N4))/4;
A5:=C>BBI;
Z5:=C<BBI;
MTM:=CLOSE-REF(CLOSE,1);
MMS:=100*EMA(EMA(MTM,N2),N1)/EMA(EMA(ABS(MTM),N2),N1);
MMM:=100*EMA(EMA(MTM,N4),N3)/EMA(EMA(ABS(MTM),N4),N3);
A6:=MMS>MMM;
Z6:=MMS<MMM;
WJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-WJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,WJ-MIN(C,O));
V5:=VOL/IF(H=L,4,H-L);
V6:=(V1*V5);
V7:=(V2*V5);
V8:=(V3*V5);
V9:=(V4*V5);
买盘:=(V9+V8);
卖盘:=(V6+V7);
买卖差:=买盘-卖盘;
DDX:=买卖差;
DX:=MA(买卖差,5)*20;
DDX1:=SMA(DX,3,1);
DDX2:=SMA(DDX1,3,1);
DDX3:=(5*DDX2+4*REF(DDX2,1)+3*REF(DDX2,2)+2*REF(DDX2,3)+REF(DDX2,4))/15;
A7:=DDX1>DDX2;
Z7:=DDX1<DDX2;
量:=V;
换手:=V/CAPITAL*100;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买盘1:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
卖盘1:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2));
DLX:=(买盘1-(-卖盘1))/量*换手;
DLX1:=SUM(DLX,6);
DLX2:=MA(DLX1,5);
A8:=DLX1>DLX2;
Z8:=DLX1<DLX2;
VARR1:=(2*CLOSE+HIGH+LOW)/4;
VARR2:=EMA(EMA(EMA(VARR1,4),4),4);
JE:=(VARR2-REF(VARR2,1))/REF(VARR2,1)*100;
DD:=MA(JE,3);
KK:=MA(JE,1);
A9:=KK>DD;
Z9:=KK<DD;
MTR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LDK :=REF(LOW,1)-LOW;
DMP:=SUM(IF(HD>0&&HD>LDK,HD,0),14);
DMM:=SUM(IF(LDK>0&&LDK>HD,LDK,0),14);
PDI:=DMP*100/MTR;
MDI:=DMM*100/MTR;
A10:=PDI>MDI;
Z10:=PDI<MDI;
T:=(A1 AND A2 AND A3 AND A4 AND A5 AND A6 AND A7 AND A8 AND A9 AND A10);
T1:=T AND REF(T,1)=0;
TT:=Z1 AND Z2 AND Z3 AND Z4 AND Z5 AND Z6 AND Z7 AND Z8 AND Z9 AND Z10;
TT1:=TT AND REF(TT,1)=0;
十指红柱:=IF(T1,10.4,DRAWNULL);
K1K:=IF(CLOSE>=REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW+CLOSE-REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW);
K2K:=IF(CLOSE<=REF(CLOSE,1),OPEN-LOW+HIGH-CLOSE+REF(CLOSE,1)-CLOSE,OPEN-LOW+HIGH-CLOSE);
DT:=VOL*K1K/(K1K+K2K);
KT:=VOL-DT;
买量:=SUM(DT,1);
卖量:=SUM(KT,1);
DDXX:=EMA(买量-卖量,5)*VOL/CAPITAL*100;
DDXX1:=SMA(DDXX,3,1);
DDXX2:=SMA(DDXX1,3,1);
DDXX3:=EMA(DDXX2,5);
大单净量:=DDXX>0 AND MA(V,5)>MA(MA(V,5),5) AND CROSS(DDXX1,DDXX2);
DIFFX:=( EMA(CLOSE,12) - EMA(CLOSE,26))*100;
DEAX:=EMA(DIFFX,9);
MACD:=2*(DIFFX-DEAX);
绿柱消失买入:=STICKLINE(DIFFX<0,0,DIFFX,2,0);
红柱消失卖出:=STICKLINE(DIFFX>=0,0,DIFFX,2,0);
顺势红柱:=IF(DIFFX>DEAX,DIFFX,DRAWNULL);
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
MAOBV:=MA(OBV,30);
KM:=OBV>MAOBV;
TTA1:=顺势红柱 AND 十指红柱 AND KM;
TTA2:=顺势红柱 AND 大单净量 AND 十指红柱 AND KM;
{STICKLINE(TTA1,H,L,0.1,0),COLORYELLOW;
STICKLINE(TTA1,O,C,3,1),LINETHICK2,COLORYELLOW;
DRAWTEXT(TTA1 OR TTA2,L*0.97,' 共振'),COLORRED;
DRAWICON(TTA1 OR TTA2,L*0.99,11);
分析家公式网HTTP://WWW.70822.COM
STICKLINE(TTA2,O,C,1,0),COLORYELLOW;
STICKLINE(TTA2,O,C,1.2,0),COLORYELLOW;}
X_1S:=POW(10,6)+241230-DATE;
X_2S:=IF(X_1S>0,1,0);
X_3S:=IF(X_1S>0,1,0);
X_4S:=HHV(CLOSE,10);
起爆线:EMA(X_4S,30),COLORMAGENTA,LINETHICK2;
IF(起爆线<=REF(起爆线,1),起爆线,DRAWNULL),COLORCYAN,LINETHICK2;
X_5S:=EMA(X_4S,120);
X_6S:=MA(CLOSE*VOL,20);
X_7S:=MA(CLOSE*VOL,60);
X_8S:=1000*(X_6S-REF(X_6S,1))/REF(X_6S,1)*2;
X_9S:=1000*(X_7S-REF(X_7S,1))/REF(X_7S,1)*2;
X_10S:=(X_8S-X_9S)*VOL*CLOSE/MA(REF(VOL*CLOSE,1),5);
X_11S:=LLV(LOW,200);
X_12S:=EMA((CLOSE-X_11S)/X_11S,30)*100+200;
X_13S:=FILTER(CLOSE>=REF(CLOSE,1)*1.05 AND X_10S>=X_12S/2 AND CLOSE>=OPEN AND (CROSS(CLOSE,起爆线) OR (CLOSE>起爆线 AND REF(LOW,1)<起爆线)),20);
X_14S:=SUMBARS(X_13S,1)*X_2S;
STICKLINE(X_13S,CLOSE,OPEN,2,0),COLORYELLOW;
STICKLINE(X_14S,REF(CLOSE,X_14S-1),REF(CLOSE,X_14S-1),2,0),COLORYELLOW;
STICKLINE(X_14S,REF(CLOSE,X_14S+1),REF(CLOSE,X_14S+1),2,0),COLORCYAN;
STICKLINE(X_13S,LOW-0.46,LOW-0.65,3.8,0),COLORCYAN;
STICKLINE(X_13S,LOW-0.44,LOW-0.65,3.6,0),COLORCYAN;
STICKLINE(X_13S,LOW-0.42,LOW-0.65,3.4,0),COLORCYAN;
STICKLINE(X_13S,LOW-0.4,LOW-0.65,3.2,0),COLOR444444;
STICKLINE(X_13S,LOW-0.38,LOW-0.65,3,0),COLOR555555;
STICKLINE(X_13S,LOW-0.36,LOW-0.65,2.8,0),COLOR666666;
STICKLINE(X_13S,LOW-0.34,LOW-0.65,2.6,0),COLOR777777;
STICKLINE(X_13S,LOW-0.32,LOW-0.65,2.4,0),COLOR888888;
STICKLINE(X_13S,LOW-0.3,LOW-0.65,2.2,0),COLOR999999;
STICKLINE(X_13S,LOW-0.28,LOW-0.55,2,0),COLOR003300;
STICKLINE(X_13S,LOW-0.26,LOW-0.55,1.8,0),COLOR004400;
STICKLINE(X_13S,LOW-0.24,LOW-0.55,1.6,0),COLOR005500;
STICKLINE(X_13S,LOW-0.22,LOW-0.55,1.4,0),COLOR006600;
STICKLINE(X_13S,LOW-0.2,LOW-0.55,1.2,0),COLOR007700;
STICKLINE(X_13S,LOW-0.18,LOW-0.55,1,0),COLOR008800;
STICKLINE(X_13S,LOW-0.16,LOW-0.55,0.8,0),COLOR009900;
STICKLINE(X_13S,LOW-0.14,LOW-0.55,0.6,0),COLOR00BB00;
STICKLINE(X_13S,LOW-0.12,LOW-0.55,0.4,0),COLOR00DD00;
STICKLINE(X_13S,LOW-0.1,LOW-0.55,0.2,0),COLORRED;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,2,0),COLORCYAN;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,1.8,0),COLORCYAN;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,1.6,0),COLOR000055;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,1.4,0),COLOR000066;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,1.2,0),COLOR000077;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,1,0),COLOR000088;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,0.8,0),COLOR000099;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,0.6,0),COLOR0000AA;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,0.4,0),COLOR0000CC;
STICKLINE(X_13S,LOW-0.48,LOW-0.3,0.2,0),COLOR0000EE;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,2,0),COLOR005566;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,1.8,0),COLOR006677;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,1.6,0),COLOR007788;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,1.4,0),COLOR008899;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,1.2,0),COLOR0099AA;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,1,0),COLOR00AABB;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,0.8,0),COLOR00BBCC;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,0.6,0),COLOR00CCDD;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,0.4,0),COLOR00DDEE;
STICKLINE(X_13S,LOW-0.38,LOW-0.3,0.2,0),COLOR00EEFF;
STICKLINE(X_13S,LOW-0.68,LOW-0.75,4,0),COLOR111188;
STICKLINE(X_13S,LOW-0.66,LOW-0.74,3.6,0),COLOR332299;
STICKLINE(X_13S,LOW-0.64,LOW-0.73,3.2,0),COLOR5533AA;
STICKLINE(X_13S,LOW-0.62,LOW-0.72,2.8,0),COLOR8844BB;
STICKLINE(X_13S,LOW-0.6,LOW-0.71,2.4,0),COLORAA55CC;
STICKLINE(X_13S,LOW-0.58,LOW-0.7,2,0),COLORCC66DD;
STICKLINE(X_13S,LOW-0.56,LOW-0.69,1.6,0),COLORYELLOW;
STICKLINE(X_13S,LOW-0.54,LOW-0.68,1.2,0),COLORYELLOW;
MM1:=TTA1 OR TTA2;
STICKLINE(TTA1 AND X_13S,H,L,0.1,0),COLORYELLOW;
STICKLINE(TTA1 AND X_13S,O,C,3,1),LINETHICK2,COLORYELLOW;
DRAWTEXT(MM1 AND X_13S,L*0.97,' 共振'),COLORRED;
DRAWICON(MM1 AND X_13S,L*0.99,11);
资金X向:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7);
LK1:=资金X向>=2;
主力净额:=(L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1))/10000.0;
成交额:=AMOUNT/10000;
主力占比:=主力净额*100/成交额;
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=-L2_AMO(0,3)/10000.0;
大S:=-L2_AMO(1,3)/10000.0;
中S:=-L2_AMO(2,3)/10000.0;
小S:=-L2_AMO(3,3)/10000.0;
主买净额:=(超B+大B+中B+小B)+(超S+大S+中S+小S);
主买占比:=主买.................省略
“多”字条件：
资金X向>=2；
(主力占比>=8 AND 主力净额>1500) OR (主买占比>=8 AND 主买净额>3000)；
活跃度>=6；
[url=http://www.70822.com/soft/sort013/sort05/down-175571.html]资金共振R主图+选股，需要L2支持[/url]