【资料名称】:压力与支撑 右边有与最高价差值和比值－（源码）介绍
【资料描述】:
压力与支撑 右边有与最高价差值和比值－（源码）
input:P1(5,0,999,1),p2(10,0,999,1),p3(20,0,999,1),p4(30,0,999,1),p5(60,0,999,1),p6(120,0,999,1),p7(250,0,999,1);
MA5:MA(CLOSE,P1);
MA10:MA(CLOSE,P2);
MA20:MA(CLOSE,P3);
MA30:MA(CLOSE,P4);
MA60:MA(CLOSE,P5);
MA120:MA(CLOSE,P6);
MA250:MA(CLOSE,P7);
partline(ma5,ma5>=ref(ma5,1),rgb(255,0,0)),linethick1;
partline(ma20,ma20>=ref(ma20,1),rgb(255,0,0)),linethick1;
partline(ma30,ma30>=ref(ma30,1),rgb(255,0,0)),linethick2;
V5:=MA(VOL,5);
V13:=MA(VOL,13);
VV:=V>V5 and V>V13 and V5>V13 and V>V5*1.1 and V5>V13*1.1;
Ss:=ma5>ref(ma5,1) and ma20>ref(ma20,1) and cross(ma5,ma20);
CC:=C>ma5 and c>ma10 and c>ma20 ;
Z，:=(c-ref(C,5))/ref(C,5)<0.04 and (c-ma5)/ma5>0 and (c-ma5)/ma5<0.04;
TP1:=Ss and CC and VV ;
TP:= FILTER( TP1 ,15);
STICKLINE(TP,C,O,4,0),Color00CCFF;
DRAWTEXT(TP,l*0.98,'可买了'),colorred;
买线:=ZIG(3,10);
卖线:=MA(买线,3);
BU:=cross(买线,卖线);
SEL:=cross(卖线,买线);
drawtext(bu,l*0.99,'买'),linethick1,color00aaff;
drawtext(sel,h*1.01,'卖'),linethick1,color00ff00;
{可调节KDJ：压力支撑线参数 n=1 100 9,m1=1 100 3,m2=1 100 3}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
RSV12:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K12:=SMA(RSV12,3,1);
D12:=SMA(K12,3,1);
J12:=3*K12-2*D12;
RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K24:=SMA(RSV24,3,1);
D24:=SMA(K24,3,1);
J24:=3*K24-2*D24;
压力位:IF(CROSS(j24,j),H,REF(H,BARSLAST(CROSS(j24,j)))),PRECIS2,coloryellow,LINETHICK3,pointdot;
支撑位:IF(CROSS(j,j24),L,REF(L,BARSLAST(CROSS(j,j24)))),PRECIS2,COLORred,LINETHICK3,pointdot;
{45度异动}
x1:=(C+L+H)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
ema8:=ema(c,8);
DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
ema8,'∠45上升'),coloryellow;
{可视范围内最高价减今日收盘绝对幅度}
Ao:hhvall(o),linethick0;
AC:hhvall(c),linethick0;
ah:=if(ao>=ac,ao,ac);
Z，jd:ah-c,linethick0;
Z，b:(ah-c)/c*100,linethick0;
NN:= DISPSTATUS=2;
DRAWTEXT(nn,ah*0.98,'与最高开收盘差值: '+NUMTOSTRN(Z，jd,2)+'元'),ALIGN2,Color00dd00,VALIGN0;
DRAWTEXT(nn,ah*0.95,'与最高开收盘比例: '+NUMTOSTRN(Z，b,2)+'%'),ALIGN2,Color00dd00,VALIGN0;
gd8451
【下载地址隐藏】： 点：回复可见地址 
