KK:=1;
C1:=REF(CLOSE,1);
C2:=HHV(C1,2);
C3:=LLV(C1,1);
ET:=HHV(C1,2);
ET1:=REF(ET,1);
XB:=LLV(C1,1);
XB1:=REF(XB,1);
M:=BARSLAST(CLOSE<XB AND C1>=XB1);
M1:=REF(M,1);
N9:=BARSLAST(CLOSE>ET AND C1<=ET1);
N1:=REF(N9,1);
M2:=(BARSLAST(M-N9>0 AND M1<=N1))+1;
N2:=(BARSLAST(N9-M>0 AND N1<=M1))+1;
ET2:=HHV(ET,M2);
XB2:=LLV(XB,N2);
A:=IF(M-N9>0 AND M1<=N1,1,IF(N9-M>0 AND N1<=M1,0,2));
H1:=IF(M-N9>0,CLOSE,ET2);
H2:=IF(A=1,CLOSE,C2);
H3:=IF(M-N9<0,CLOSE,XB2);
H4:=IF(A=1,CLOSE,XB2);
明关键价位:IF(M-N9>0 AND KK OR A=1 AND KK,CLOSE,H3),LINETHICK0,colorFF00FF;
C1:=IF(KK,FORCAST(WINNER(CLOSE)*100,3),0);
H1:=IF(KK,FORCAST(WINNER(HIGH)*100,3),0);
L1:=IF(KK,FORCAST(WINNER(LOW)*100,3),0);
O1:=IF(KK,FORCAST(WINNER(OPEN)*100,3),0);
AA1:=IF(REF(L1,1)>50,(100-H1)*0.7,100-L1);
STICKLINE(C1>=O1 AND KK,C1,O1,6,0.2),colorFF;
STICKLINE(C1>=O1 AND KK,L1,H1,0.2,0.2),colorFF;
STICKLINE(C1<O1 AND KK,C1,O1,6,0.2),colorFFFF00;
STICKLINE(C1<O1 AND KK,L1,H1,0.2,0.2),colorFFFF00;
A2:=EMA((EMA(C1,1)+EMA(C1,3)+EMA(C1,5))/3,3);
A3:=EMA((EMA(C1,3)+EMA(C1,5)+EMA(C1,7))/3,3);
A4:=EMA((EMA(C1,5)+EMA(C1,7)+EMA(C1,9))/3,3);
A5:=EMA((EMA(C1,7)+EMA(C1,9)+EMA(C1,11))/3,3);
A6:=EMA((EMA(C1,9)+EMA(C1,11)+EMA(C1,13))/3,3);
A7:=EMA((EMA(C1,11)+EMA(C1,13)+EMA(C1,15))/3,3);
A8:=EMA((EMA(C1,13)+EMA(C1,15)+EMA(C1,17))/3,3);
A9:=EMA((EMA(C1,15)+EMA(C1,17)+EMA(C1,19))/3,3);
A10:=EMA((EMA(C1,17)+EMA(C1,19)+EMA(C1,21))/3,3);
A11:=EMA((EMA(C1,19)+EMA(C1,21)+EMA(C1,23))/3,3);
C11:=EMA((EMA(C1,21)+EMA(C1,23)+EMA(C1,25))/3,3);
PARTLINE(1,A2),color1010FF;
PARTLINE(1,A3),color1020FF;
PARTLINE(1,A4),color1030FF;
PARTLINE(1,A5),color1040FF;
PARTLINE(1,A6),color1050FF;
PARTLINE(1,A7),color1060FF;
PARTLINE(1,A8),color1070FF;
PARTLINE(1,A9),color1080FF;
PARTLINE(1,A10),color1090FF;
PARTLINE(1,A11),colorFFFF;
PARTLINE(1,C11),color10E0FF;
A2:=REF(H1,3)=HHV(H1,2*3+1);
D1:=FILTER(A2,3);
D2:=BACKSET(D1,3+1);
E1:=FILTER(D2,3);
A3:=REF(L1,3)=LLV(L1,2*3+1);
E2:=FILTER(A3,3);
C2:=BACKSET(E2,3+1);
H11:=FILTER(C2,3);
L11:=(REF(LLV(L1,2*3),1)+REF(HHV(H1,2*3),1))/2;
X1:=(H1+L1)/2;
F1:=E1 AND NOT(H11 AND L11>=X1) OR ISLASTBAR OR BARSCOUNT(D2)=1;
G1:=H11 AND NOT(E1 AND L11<X1);
H2:=E1 AND NOT(H11 AND L11>=X1);
I1:=REF(BARSLAST(F1),1)+1;
LD:=BACKSET(F1 AND COUNT(G1,I1)>0,LLVBARS(IF(G1,LOW,10000),I1));
L2:=LD>REF(LD,1);
X2:=BACKSET(L2,2);
F2:=X2>REF(X2,1);
G2:=F2 OR ISLASTBAR OR BARSCOUNT(C1)=1;
I2:=REF(BARSLAST(G2),1)+1;
HD:=BACKSET(G2 AND COUNT(H2,I2)>0,HHVBARS(IF(H2,HIGH,0),I2));
J1:=HD>REF(HD,1);
J2:=BACKSET(J1,2);
B3:=J2>REF(J2,1);
D3:=BACKSET(ISLASTBAR,MIN(BARSLAST(B3),BARSLAST(F2))+1);
E3:=D3>REF(D3,1);
A4:=HIGH<REF(HIGH,REF(BARSLAST(B3),1)+1);
HH:=REF(HIGH,REF(BARSLAST(B3),1)+1)>REF(HIGH,REF(BARSLAST(B3),1)+2+REF(BARSLAST(B3),REF(BARSLAST(B3),1)+2));
B4:=A4 AND HH AND B3;
D4:=BACKSET(B4,REF(BARSLAST(B3),1)+2);
E4:=D4>REF(D4,1);
A5:=LOW>REF(LOW,REF(BARSLAST(F2),1)+1);
LL:=REF(LOW,REF(BARSLAST(F2),1)+1)<REF(LOW,REF(BARSLAST(F2),1)+2+REF(BARSLAST(F2),REF(BARSLAST(F2),1)+2));
X3:=A5 AND LL AND F2;
F3:=BACKSET(X3,REF(BARSLAST(F2),1)+2);
G3:=F3>REF(F3,1);
H3:=E4 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
I3:=REF(BARSLAST(H3),1)+1;
LZ:=BACKSET(H3 AND COUNT(G3,I3)>0,LLVBARS(IF(G3,LOW,POW(10,20)),I3));
L4:=LZ>REF(LZ,1);
X4:=BACKSET(L4,2);
F4:=X4>REF(X4,1);
G4:=F4 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
I4:=REF(BARSLAST(G4),1)+1;
HZ:=BACKSET(G4 AND COUNT(E4,I4)>0,HHVBARS(IF(E4,HIGH,-POW(10,20)),I4));
K1:=HZ>REF(HZ,1);
K2:=BACKSET(K1,2);
UU:=K2>REF(K2,1);
VV:=BACKSET(ISLASTBAR,MIN(BARSLAST(UU),BARSLAST(F4))+1);
WW:=VV>REF(VV,1);
XX:=BACKSET(ISLASTBAR,BARSLAST(F2)+1);
UU2:=XX>REF(XX,1);
VV2:=BACKSET(UU2,REF(BARSLAST(F2),1)+2);
WW2:=VV2>REF(VV2,1);
DRAWLINE(WW2,L1,UU2,L1,1),POINTDOT,LINETHICK1,colorFFFFFF;
XX2:=BACKSET(ISLASTBAR,BARSLAST(B3)+1);
GDSTAR:=XX2>REF(XX2,1);
GDW1:=BACKSET(GDSTAR,REF(BARSLAST(B3),1)+2);
GDW2:=GDW1>REF(GDW1,1);
DRAWLINE(GDW2,H1,GDSTAR,H1,1),POINTDOT,LINETHICK1,colorFFFFFF;
GDW3:=F10FIND('┃股东户数',1);
GDW4:=F10FIND('┃04-09-30',GDW3);
GDTX1:=F10FIND('┃04-06-30',GDW4);
GDTX2:=F10FIND('┃04-03-31',GDTX1);
GDTX3:=F10FIND('┃03-12-31',GDTX2);
GDTX4:=F10TEXT(GDW4+10,8);
GD1:=F10TEXT(GDTX1+10,8);
GD2:=F10TEXT(GDTX2+10,8);
GD3:=F10TEXT(GDTX3+10,8);
GD4:=STRTONUM(GDTX4);
P1:=STRTONUM(GD1);
MGSYTX:=STRTONUM(GD2);
MGTX1:=STRTONUM(GD3);
WX:=F10FIND('合计│',1);
TT:=F10TEXT(WX,0);
大额成交:=LTRIM(STRMID(TT,43,0));
占流通股比:=F10FIND('占流通股比例:',1);
增减:=F10TEXT(占流通股比,0);
VV2:=LTRIM(STRMID(增减,15,10));
股东人数增减:=F10FIND('成交量:',1);
股东人数增减比例:=F10TEXT(股东人数增减,0);
基金持仓:=LTRIM(STRMID(股东人数增减比例,8,10));
VARQS108:=STRTONUM(基金持仓);
VARQS109:=STRTONUM(VV2);
VARQS110:=IF(GD4>1,P1-GD4,IF(P1>1,MGSYTX-P1,MGTX1-MGSYTX));
VARQS111:=REVERSE(VARQS110);
VARQS112:=(IF(VARQS111<1 AND GD4>1,-VARQS111/P1,0))*(100);
VARQS113:=STRTONUM(大额成交);
EXPLAIN(1=1,'============================');
EXPLAINEX(KK,'每股收益率:',FINANCE(33),3,0),colorFFFF;
EXPLAINEX(KK,'每股公积金:',FINANCE(18),3,0),colorFFFF00;
EXPLAINEX(KK,'未分配利润:',FINANCE(32),3,0),colorFFFFFF;
EXPLAINEX(KK,'每股净资产:',FINANCE(34),3,0),colorFF00FF;
EXPLAIN(1=1,'============================');
EXPLAINEX(KK,'十大股东占流通股比例%: ',VARQS109,2,0),colorFF;
EXPLAIN(1=1,'============================');
EXPLAINEX(KK,'基金持仓比例%:',VARQS113,2,0),colorFF00;
EXPLAIN(1=1,'============================');
EXPLAINEX(KK,'股东人数增减(户):',VARQS111,2,0),colorFFFF;
EXPLAIN(1=1,'============================');
EXPLAINEX(KK,'股东人数增减比例%:',VARQS112,2,0),colorFFFF00;
EXPLAIN(1=1,'============================');
EXPLAIN(1,F10TEXT(F10FIND('记录',1),20)),colorFF;
EXPLAINEX(KK,'最新大单成交(万股):',VARQS108,2,0),colorFF00;
EXPLAIN(1=1,'============================');
EXPLAIN(KK,F10TEXT(F10FIND('各家评论',1),500)),colorFF00FF; |