p:=if(SYSPARAM(1)<datacount-t-n3,SYSPARAM(1),datacount-t-n3);
Ax:=p=BARPOS;
Ay:=refx(forcast(c,t),t)-refx(slope(c,t),t)*t;
Bx:=ref(Ax,t);
By:=forcast(c,t);
中:LINEVALUE(Ax,Ay,Bx,By,0,0);
js:=hhv(h-中,t+1);
jq:=hhv(中-L,t+1);
上:LINEVALUE(Ax,Ay+js[p+t],Bx,By+js[p+t],0,0);
下:LINEVALUE(Ax,Ay-jq[p+t],Bx,By-jq[p+t],0,0);
STICKLINE(Ax or Bx,上,下,0.01,0)COLORGRAY,POINTDOT;v1:=splitdata(1);
v2:=splitdata(2);
v3:=splitdata(3);
v4:=splitdata(4);
jj:=FINANCE(51);//STRTONUM(F10TEXT(F10FIND('发 行 价 :',F10FIND('七、公司概况',1))+11,0));
cap:=c;
jj[1]:=jj;
for i=2 to datacount do
jj[i]:=(jj[i-1]+v2[i]*v3[i]/10)/(1+(v1[i]+v2[i])/10)-v4[i]/10;
原始发行价:jj[2],LINETHICK0;
动态发行价:jj,LINETHICK0;
DRAWNUMBER(jj<>ref(jj,1)or refx(jj<>ref(jj,1),3),jj,jj,3)ALIGN2;
STRTONUM(STRRIGHT(F10TEXT(F10FIND('总户数',500),73),8)-'-')+2000000,COLORblue,LINETHICK0;
前:STRTONUM(STRRIGHT(F10TEXT(F10FIND('股/户',500),80),6)),COLORblue,LINETHICK0;
新:CEILING(FINANCE(7)/FINANCE(50)*10000),COLORGREEN,LINETHICK0;
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
Y:=EMA(CLOSE,10);
LL:=REF(CLOSE,2);
MM:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
DB:=IF(((MM < REF(MM,1)) AND (MM > 79)),MM,0);
DRAWTEXT(CROSS(Y,X),(LOW * 0.985),'▲')colorred,LINETHICK2;
DRAWTEXT(CROSS(X,Y),(HIGH * 1.015),'◆'),LINETHICK2,colorFF6699;
Var111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
Var112:=CROSS(Var111,0.9);
Var113:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
Var114:=CROSS(Var113,0.9);
STICKLINE(Var112,HIGH,HIGH*1.01,5,0),Color00E40E;
STICKLINE(Var114,LOW,LOW*0.99,5,0),Color00E40E;
Var115:=IF(Var112,HIGH,IF(Var114,LOW,0));
POLYLINE(Var115,Var115),Colorblue;
Var116:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);
Var117:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);
Var118:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)
AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);
Var119:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);
VarA:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);
VarB:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)
AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);
坚定: STICKLINE(CROSS(Var116,0.9),HIGH,HIGH*1.01,5,0),Color0000FF;
STICKLINE(CROSS(Var119,0.9),LOW,LOW*0.99,5,0),Color0000FF;
犹豫: STICKLINE(CROSS(Var117,0.9),HIGH,HIGH*1.01,5,0),Color00E5E9;
STICKLINE(CROSS(VarA,0.9),LOW,LOW*0.99,5,0),Color00E5E9;
等待: STICKLINE(CROSS(Var118,0.9),HIGH,HIGH*1.01,5,0),ColorFF4100;
STICKLINE(CROSS(VarB,0.9),LOW,LOW*0.99,5,0),ColorFF4100;
压力: REF(HIGH,BARSLAST(Var112)), POINTDOT,ColorEA91B5;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var112)),REF(HIGH,BARSLAST(Var112)),5,0),ColorEA91B5;
支撑: REF(LOW,BARSLAST(Var114)), POINTDOT,Color3791B5;
STICKLINE(CLOSE,REF(LOW,BARSLAST(Var114)),REF(LOW,BARSLAST(Var114)),5,0),Color3791B5;
a2:=ZIG(2,N1);D1:=A2-REF(A2,1); D2:=CROSS(D1,0);
DRAWICON(REFX(D2,1),l*0.98,8); A4:=BARSLAST(D2)-1;
aa4:=(a4=32 or a4=53 or a4=11 or a4=19 or a4=87 or a4=142 or a4=231);
STICKLINE(aa4,h*1.02,h*1.023,6,0),COLORYELLOW;
DRAWNUMBER(aa4,h*1.04,a4+2,0),COLORblue;
a11:=ZIG(1,n2); D3:=A11-REF(A11,1); D4:=CROSS(0,D3);
A5:=BARSLAST(D4)-1; DRAWICON(REFX(D4,1),H*1.02,9);
aa5:=(a5=32 or a5=53 or a5=11 or a5=19 or a5=87 or a5=142 or a5=231);
STICKLINE(aa5,l*0.98,l*0.983,6,0),COLORCYAN;
DRAWNUMBER(aa5 ,L*0.97,a5+2,0),COLORCYAN;
DRAWNUMBER(ISLASTBAR,hhv(h,10)*1.02,a4+2,0),COLORblue,shift1;
DRAWNUMBER(ISLASTBAR,llv(l,10)*0.99,a5+2,0),COLORCYAN,shift1;
DRAWTEXT(ISLASTBAR,hhv(h,10)*1.02,'天'),COLORYELLOW,shift5;
DRAWTEXT(ISLASTBAR,llv(l,10)*0.99,'天'),COLORCYAN,shift5;INPUT:k(9,2,99);
w:=barslast(hour<ref(hour,1));
VERTLINE(w=0)COLORBROWN,POINTDOT;
ws:=barslast(c>ref(c,1));
wx:=barslast(c<ref(c,1));
sv:=sum(if(ws<wx,v,-v),K);
动量:sv,linethick0;
p:=SYSPARAM(3)-SYSPARAM(2);
q:=SYSPARAM(3);
kh:=hhv(h,p);
kL:=LLv(L,p);
vh:=hhv(sv,p);
vL:=LLv(sv,p);
b:=(kh-kL)/(vh-vL)/2;
y:=(kh+kL+(vh+vL)*b)/2;
PARTLINE(1,y[q]);
STICKLINE(sv>0,y[q],sv*b[q]+y[q],0.1,0)COLORMAGENTA;
STICKLINE(sv<0,y[q],sv*b[q]+y[q],0.1,0)COLORGREEN;
当前:=c,COLORWHITE;
平均13:sma(c,13,1)COLORRED;
日均价:sum(c,w+1)/(w+1),COLORYELLOW,LINETHICK2;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
