通达信大资金活动副图指标 开口越大越强势 源码 附图

N:=5;

P:=12;

GJ:=(C+H+L+O)/4;

BBI:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;

明日阻力:=L+(GJ-L)+(C-L);

明日支撑:=L+(C-GJ);

UPR:BBI+P*STD(BBI,N);

DWN:BBI-P*STD(BBI,N);

下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);

RRRSV:=SMA(下档线,3,1);

KKK:=SMA(RRRSV,3,1);

DDDDD:=((3 * RRRSV) - (2 * KKK));

JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);

RSV24:=SMA(JJ12,3,1);

K24:=SMA(RSV24,3,1);

D24:=((3 * RSV24) - (2 * K24));

VARQ3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;

VARQ4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;

VARQ5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;

VARQ6:=(VARQ3+VARQ4+VARQ5)/3;

VARQ7:=EMA(VARQ6,5);

压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;

底部:=LLV(HIGH,30),COLOR00FF00;

今日阻力:REF(明日阻力, 1),NODRAW;

今日支撑:REF(明日支撑, 1),NODRAW;

ZB:=EMA(EMA(VARQ3,5),5)*3, COLORSTICK;

VARQ8:=IF(VARQ6<=-20,10,0);

VARQ9:=HHV(VARQ8,10);

压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;

底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW;

高:=REF(HHV(H,80),3);

低:=REF(LLV(L,80),3);

VARQA:=IF(VARQ9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);

K:=EMA(VARQ7,5)*2, , COLORFF00FF;

D:=EMA(K,5), , COLORWHITE;

J:=K*3-D*2, ,COLORYELLOW;

H19:=高-(高-低)*0.191;

H38:=高-(高-低)*0.382;

H中:=高-(高-低)*0.5;

H61:=高-(高-低)*0.618;

H80:=高-(高-低)*0.809;

VARQB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;

HS:=VOL/CAPITAL*100, , COLORGREEN;

DRAWTEXT(VARQ8=10 AND FILTER(VARQ8=10,5),LOW*0.93,'接近底部') COLORMAGENTA;

顶点:REFDATE(高,DATE),POINTDOT,COLORWHITE;

疯牛198:REFDATE(H19,DATE),POINTDOT,COLORYELLOW;

突破382:REFDATE(H38,DATE),POINTDOT,COLORMAGENTA;

平衡50:REFDATE(H中,DATE),POINTDOT,COLORRED;

回落618:REFDATE(H61,DATE),POINTDOT,COLORGREEN;

安全809:REFDATE(H80,DATE),POINTDOT,COLORBLUE;

低点:REFDATE(低,DATE),POINTDOT,COLORWHITE;

DRAWTEXT(VARQA=20,LOW*0.95,'底部') COLORYELLOW;

DRAWTEXT(ISLASTBAR,顶点,'顶点'),COLORWHITE;

DRAWTEXT(ISLASTBAR,疯牛198,'疯牛'),COLORYELLOW;

DRAWTEXT(ISLASTBAR,突破382,'突破'),COLORMAGENTA;

DRAWTEXT(ISLASTBAR,平衡50,'平衡'),COLORRED;

DRAWTEXT(ISLASTBAR,回落618,'回落'),COLORMAGENTA;

VARQE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

VARQF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);

VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARQ10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

VARQ11:=VARQF<REF(VARQ10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);

DRAWTEXT(VARQ11 AND COUNT(VARQ11,30)=1,LOW*0.95,'大资金活动'),LINETHICK1,COLORFF00FF;

VARQ12:=(HIGH+LOW+CLOSE)/3;

VARQ13:=(VARQ12-MA(VARQ12,14))/(0.015*AVEDEV(VARQ12,14));

VARQ14:=(VARQ12-MA(VARQ12,70))/(0.015*AVEDEV(VARQ12,70));

VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);

VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13

OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;

VARQ15:=IF(VARQ13>=150 AND VARQ13<200 AND VARQ14>=150 AND VARQ14<200,10,0);

VARQ16:=IF(VARQ13<=-150 AND VARQ13>-200 AND VARQ14<=-150 AND VARQ14>-200,-10,VARQ15);

VARQ17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;

VARQ18:=100-ABS(VARQ17);

VARQ19:=IF(VARQ18<90,VARQ18,100);

DRAWICON(VAR19,L*0.98,1);

DRAWICON(CROSS(LLV(AMOUNT/V/100,3),L) AND V>REF(V,3) AND C<O,O*1.1,2);

MA6:EMA(C,6),LINETHICK2,COLORFFFF00;

MA18:EMA(C,18),LINETHICK2,COLOR00FF00;

DRAWBAND(MA6,RGB(155,50,50),MA18,RGB(0,100,50));

VARQ1A:=IF(VARQE>0,VARQE,0);

VARQ1B:=IF(VARQ14>=200 AND VARQ13>=150,15,IF(VARQ14<=-200 AND VARQ13<=-150,-15,VARQ16))+60;

VARQ1C:=VARQ1A>48 AND VARQ1B>60 AND VARQ19<100;

WWWGUPANGCOM:=(((CLOSE -LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))* 100);

中:STICKLINE(MA6<MA18 AND MA6>REF(MA6,1) AND MA18<=REF(MA18,1),MA6,MA18,0.3,0),COLORCYAN;

长:STICKLINE(MA6>MA18 AND MA6>REF(MA6,1) AND MA18<=REF(MA18,1),MA6,MA18,0.3,0),COLORMAGENTA;

线:STICKLINE(MA6<MA18 AND MA6<REF(MA6,1) AND MA18>=REF(MA18,1),MA6,MA18,0.3,0),COLORBLUE;

买进:=CROSS(MA6,MA18) AND MA18>=REF(MA18,1);

DRAWICON(买进,L*0.95,9);

DRAWTEXT(CROSS(85,RSI),(HIGH * 1.02),'落袋'),COLORCYAN;

DRAWTEXT(VARQ1C AND COUNT(VARQ1C,30)=1,LOW*0.95,'大资金进入') COLORWHITE;

原理解析：
N赋值:5
P赋值:12
GJ赋值:(C+H+L+O)/4
输出BBI:(收盘价的3日简单移动平均+收盘价的6日简单移动平均+收盘价的12日简单移动平均+收盘价的24日简单移动平均)/4
明日阻力赋值:L+(GJ-L)+(C-L)
明日支撑赋值:L+(C-GJ)
UPR:BBI+P*BBI的N估算标准差
DW输出N:BBI-P*BBI的N估算标准差
下档线赋值:(((收盘价 - 13日内最低价最低值) / (13日内最高价最高值 - 13日内最低价最低值)) * 100)
下档线的3日[1日权重]移动平均
RRRSV的3日[1日权重]移动平均
DDDDD赋值:((3 * RRRSV) - (2 * KKK))
JJ12赋值:(((收盘价 - 55日内最低价最低值) / (55日内最高价最高值 - 55日内最低价最低值)) * 100)
JJ12的3日[1日权重]移动平均
RSV24的3日[1日权重]移动平均
D24赋值:((3 * RSV24) - (2 * K24))
VARQ3赋值:(收盘价-收盘价的6日简单移动平均)/收盘价的6日简单移动平均*100
VARQ4赋值:(收盘价-收盘价的24日简单移动平均)/收盘价的24日简单移动平均*100
VARQ5赋值:(收盘价-收盘价的32日简单移动平均)/收盘价的32日简单移动平均*100
VARQ6赋值:(VARQ3+VARQ4+VARQ5)/3
VARQ7赋值:VARQ6的5日指数移动平均
压力2赋值:IF(D24上穿DDDDD,最高价,REF(最高价,上次D24上穿DDDDD距今天数)),COLORFFFFFF
底部赋值:30日内最高价最低值,COLOR00FF00
输出今日阻力: 1日前的明日阻力,NODRAW
输出今日支撑: 1日前的明日支撑,NODRAW
ZB赋值:VARQ3的5日指数移动平均,5)*3, COLORSTICK
如果VARQ6<=-20返回10否则返回0
VARQ9赋值:10日内VARQ8最高值
如果ISLASTBAR返回压力2否则返回DRAWNULL
如果ISLASTBAR返回底部否则返回DRAWNULL
高赋值:REF(80日内H最高值,3)
低赋值:REF(80日内L最低值,3)
VARQA赋值:IF(VARQ9 AND CROSS(收盘价的3日简单移动平均,收盘价的5日简单移动平均),20,0)
K赋值:VARQ7的5日指数移动平均*2, , COLORFF00FF
D赋值:K的5日指数移动平均, , 画白色
J赋值:K*3-D*2, ,画黄色
H19赋值:高-(高-低)*0.191
H38赋值:高-(高-低)*0.382
H中赋值:高-(高-低)*0.5
H61赋值:高-(高-低)*0.618
H80赋值:高-(高-低)*0.809
VARQB赋值:BETWEEN(收盘价,收盘价的3日简单移动平均,收盘价的5日简单移动平均) AND J>10
HS赋值:成交量/CAPITAL*100, , COLORGREEN
DRAWTEXT(VARQ8=10 AND VARQ8=10的5过滤,最低价*0.93,'接近底部') COLORMAGENTA
输出顶点:REFDATE(高,DATE),POINTDOT,画白色
输出疯牛198:REFDATE(H19,DATE),POINTDOT,画黄色
输出突破382:REFDATE(H38,DATE),POINTDOT,COLORMAGENTA
输出平衡50:REFDATE(H中,DATE),POINTDOT,COLORRED
输出回落618:REFDATE(H61,DATE),POINTDOT,COLORGREEN
输出安全809:REFDATE(H80,DATE),POINTDOT, 画蓝色
低点:REFDATE(低,DATE),POINTDOT,画白色
当满足条件VARQA=20时,在最低价*0.95和'底部'位置书写文字
当满足条件ISLASTBAR时,在顶点和'顶点'位置书写文字
当满足条件ISLASTBAR时,在疯牛198和'疯牛'位置书写文字
当满足条件ISLASTBAR时,在突破382和'突破'位置书写文字
当满足条件ISLASTBAR时,在平衡50和'平衡'位置书写文字
当满足条件ISLASTBAR时,在回落618和'回落'位置书写文字
VARQE赋值:MA(100*(收盘价-34日内收盘价最低值)/(34日内最高价最高值-34日内最低价最低值),5)-20
VARQF赋值:100-3*SMA((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1)+2*SMA(SMA((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1),15,1)
VAR1赋值:收盘价>1日前的收盘价 AND 收盘价>2日前的收盘价
VAR2赋值:1日前的VAR1 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VAR3赋值:1日前的VAR2 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VAR4赋值:1日前的VAR3 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VAR5赋值:1日前的VAR4 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VAR6赋值:1日前的VAR5 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VAR7赋值:1日前的VAR6 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VAR8赋值:1日前的VAR7 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VAR9赋值:1日前的VAR8 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARQ10赋值:100-3*SMA((OPEN-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1)+2*SMA(SMA((OPEN-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1),15,1)
VARQ11赋值:VARQF<1日前的VARQ10 AND 成交量>1日前的成交量 AND 收盘价>1日前的收盘价
DRAWTEXT(VARQ11 AND 统计30日满足VARQ11的天数=1,最低价*0.95,'大资金活动'),LINETHICK1,COLORFF00FF
VARQ12赋值:(最高价+最低价+收盘价)/3
VARQ13赋值:(VARQ12-VARQ12的14日简单移动平均)/(0.015*AVEDEV(VARQ12,14))
VARQ14赋值:(VARQ12-VARQ12的70日简单移动平均)/(0.015*AVEDEV(VARQ12,70))
VARA赋值:1日前的VAR9 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARB赋值:1日前的VARA AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARC赋值:1日前的VARB AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARD赋值:收盘价<1日前的收盘价 AND 收盘价<2日前的收盘价
VARE赋值:1日前的VARD AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARF赋值:1日前的VARE AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VAR10:=1日前的VARF AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VAR11:=1日前的VAR10 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VAR12:=1日前的VAR11 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VAR13:=1日前的VAR12 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VAR14:=1日前的VAR13 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VAR15:=1日前的VAR14 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VAR16:=1日前的VAR15 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VAR17:=1日前的VAR16 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VAR18:=1日前的VAR17 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VAR19:=1日前的VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13
OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18 AND VAR1
如果VARQ13>=150 AND VARQ13<200 AND VARQ14>=150 AND VARQ14<200返回10否则返回0
如果VARQ13<=-150 AND VARQ13>-200 AND VARQ14<=-150 AND VARQ14>-200返回-10否则返回VARQ15
VARQ17赋值:(收盘价-收盘价的13日简单移动平均)/收盘价的13日简单移动平均*100
VARQ18赋值:100-VARQ17的绝对值
如果VARQ18<90返回VARQ18否则返回100
当满足条件VAR19时,在L*0.98和1之间画图标
DRAWICON(CROSS(3日内AMOUNT/V/100最低值,L) AND V>3日前的V AND C 输出MA6:C的6日指数移动平均,LINETHICK2,COLORFFFF00
输出MA18:C的18日指数移动平均,LINETHICK2,COLOR00FF00
DRAWBAND(MA6,RGB(155,50,50),MA18,RGB(0,100,50))
如果VARQE>0返回VARQE否则返回0
VARQ1B赋值:IF(VARQ14>=200 AND VARQ13>=150,15,IF(VARQ14<=-200 AND VARQ13<=-150,-15,VARQ16))+60
VARQ1C赋值:VARQ1A>48 AND VARQ1B>60 AND VARQ19<100
WWWGUPANGCOM:=(((收盘价 -9日内最低价最低值)/(9日内最高价最高值-9日内最低价最低值))* 100)
输出中:STICKLINE(MA61日前的MA6 AND MA18<=1日前的MA18,MA6,MA18,0.3,0),COLORCYAN
输出长:STICKLINE(MA6>MA18 AND MA6>1日前的MA6 AND MA18<=1日前的MA18,MA6,MA18,0.3,0),COLORMAGENTA
输出线:STICKLINE(MA6=1日前的MA18,MA6,MA18,0.3,0), 画蓝色
买进赋值:MA6上穿MA18 AND MA18>=1日前的MA18
当满足条件买进时,在L*0.95和9之间画图标
DRAWTEXT(85上穿RSI,(最高价 * 1.02),'落袋'),COLORCYAN
DRAWTEXT(VARQ1C AND 统计30日满足VARQ1C的天数=1,最低价*0.95,'大资金进入') 画白色