我的没有问题噢 源码:
DRAWTEXT_FIX(1,0.01,0.10,0,STRCAT('【个股标识】',EXTERNSTR(0,2021))),COLORCYAN;
DRAWTEXT_FIX(1,0.01,0.15,0,STRCAT('【标识内容】',EXTERNSTR(0,2022))),COLORCYAN;
DRAWTEXT_FIX(1,0.01,0.20,0,STRCAT('【1】',EXTERNSTR(0,2025))),COLORLIMAGENTA;
DRAWTEXT_FIX(1,0.01,0.25,0,STRCAT('【2】',EXTERNSTR(0,2026))),COLORCYAN;
DRAWTEXT_FIX(1,0.01,0.30,0,STRCAT('【3】',EXTERNSTR(0,2027))),COLORYELLOW;
DRAWTEXT_FIX(1,0.01,0.35,0,STRCAT('【4】',EXTERNSTR(0,2028))),COLORCYAN;
DRAWTEXT_FIX(1,0.01,0.40,0,STRCAT('【5】',EXTERNSTR(0,2029))),COLORBROWN;
DRAWTEXT_FIX(1,0.01,0.45,0,STRCAT('【6】',EXTERNSTR(0,2030))),COLORCYAN;
DRAWTEXT_FIX(1,0.01,0.50,0,STRCAT('【7】',EXTERNSTR(0,2031))),COLORWHITE;
DRAWTEXT_FIX(1,0.01,0.55,0,STRCAT('【8】',EXTERNSTR(0,2032))),COLORCYAN;
DRAWTEXT_FIX(1,0.01,0.60,0,STRCAT('【9】',EXTERNSTR(0,2033))),COLORMAGENTA;
DRAWTEXT_FIX(1,0.01,0.65,0,STRCAT('【10】',EXTERNSTR(0,2034))),COLORCYAN;
DRAWTEXT_FIX(1,0.01,0.70,0,STRCAT('【11】',EXTERNSTR(0,2035))),COLORCYAN;
DRAWTEXT_FIX(1,0.01,0.75,0,STRCAT('【12】',EXTERNSTR(0,2036))),COLORWHITE;
DRAWTEXT_FIX(1,0.01,0.80,0,STRCAT('【13】',EXTERNSTR(0,2037))),COLORCYAN;
DRAWTEXT_FIX(1,0.01,0.85,0,STRCAT('【14】',EXTERNSTR(0,2038))),COLORLIRED;
DRAWTEXT_FIX(1,0.01,0.90,0,STRCAT('【15】',EXTERNSTR(0,2040))),COLORCYAN;
{趋势彩带 N=10}
NN:=125;
最高:=CONST(HHV(H,NN));
最低:=CONST(LLV(L,NN));
RCC:=最高*0.9-(最高-最低);
RHL:=RCC;
HLMAX:=最高;
HLMIN:=最低;
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;
HLMN3:=(100-0)/2*1.3;
HLMN4:=(100-0)/1*1.3;
位1:=(40-HLMN3)*HLMN2/HLMN4+HLMN1;
位2:=(60-HLMN3)*HLMN2/HLMN4+HLMN1;
位A:=CONST(IF(REF(C,30)>HLMN1,位1,位2)),NODRAW;
JRH:=HHV(C,2);
JRL:=LLV(C,2);
MA3:=MA(CLOSE,3);
YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;
MA5:=MA(CLOSE,5),LINETHICK2;
MA13:=MA(CLOSE,13),LINETHICK2;
DRAWBAND(MA5,RGB(80,80,80),MA13,RGB(0,80,0));
GJ:=(C+H+L+O)/4;
日阻力:=L+(GJ-L)+(C-L),LINETHICK0;
日支撑:=L+(C-GJ),LINETHICK0;
日压:=REF(日阻力 , 1),NODRAW,COLOR00FF00;
日支:=REF(日支撑 , 1),NODRAW,COLORYELLOW;
STICKLINE(ISLASTBAR,日压,日压,30,1),LINETHICK2,COLOR00FF00;
STICKLINE(ISLASTBAR,日支,日支,30,1),LINETHICK2,COLORYELLOW;
中压:=XMA(GJ,20)*(1+80/1000),COLORGREEN,LINETHICK2;
中支:=XMA(GJ,32)*(1-100/1000),COLORMAGENTA,LINETHICK2;
幅度:=100*(中压-中支)/中支;
分水线:=(MA(CLOSE,3)+MA(CLOSE,7)+MA(CLOSE,13)+MA(CLOSE,18))/4;
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
RRRSV:=SMA(下档线,3,1);
KKK:=SMA(RRRSV,3,1);
DDD1:=((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));
压力:=IF(CROSS(D24,DDD1),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDD1)))),COLORFFFFFF;
决策:=IF(ISLASTBAR,压力,DRAWNULL),COLORMAGENTA;
STICKLINE(ISLASTBAR ,决策,决策,60,1),LINETHICK3,COLORMAGENTA;
底部:=LLV(HIGH,30),COLOR00FF00;
超跌:=IF(ISLASTBAR,底部,DRAWNULL),COLORRED;
STICKLINE(ISLASTBAR ,超跌,超跌,60,1),LINETHICK3,COLORRED;
ZF:=(EMA(SUM(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)),3),49) * 10)+EMA(C,20);
飞扬古:=(EMA(MA(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)),3),13) * 10000),LINETHICK0,COLORFFFFFF;
【康熙帝】:=EMA(ZF,34),LINETHICK2,COLOR00FFFF;
ZFF:=(EMA(SUM(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)),3),49) * 10000);
康熙帝:=EMA(ZFF,34),LINETHICK0,COLOR00FFFF;
{大1:=MA(ZFF,3);
旗1:=MA(大1,3);
展1:=MA(旗1,3);}
大:MA(ZF,3),COLOR66DDFF;
旗:MA(大,3),COLOR66CCFF;
展:MA(旗,3),COLOR66AAFF;
热:MA(展,3),COLOR9900FF;
血:MA(热,3),COLOR7700FF;
染:MA(血,3),COLOR0000FF;
IF(大<REF(大,1),大,DRAWNULL),COLORFFFCCC;
IF(旗<REF(旗,1),旗,DRAWNULL),COLORFFFBBB;
IF(展<REF(展,1),展,DRAWNULL),COLORFFF999;
IF(热<REF(热,1),热,DRAWNULL),COLORFFF888;
IF(血<REF(血,1),血,DRAWNULL),COLORFFF777;
IF(染<REF(染,1),染,DRAWNULL),COLORFFF555;
NOTEXT8:MA(EMA(CLOSE,60),1),LINETHICK1,COLORMAGENTA;
NOTEXT10:MA(EMA(CLOSE,60),5),LINETHICK1.8,COLORMAGENTA;
NOTEXT12:MA(EMA(CLOSE,60),9),LINETHICK1.4,COLORMAGENTA;
NOTEXT14:MA(EMA(CLOSE,60),13),LINETHICK2,COLORMAGENTA;
VAR3:=CLOSE=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR
C<REF(C,1) AND C<REF(C,2);
VAR4:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND
{涨停}
STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLORRED;
{跌停}
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
DRAWKLINE(H,O,L,C);
AA:=REF(H,N)=HHV(H,2*N+1); AA1:=REF(L,N)=LLV(L,2*N+1);
QY:=BACKSET(AA,N+1); QY1:=BACKSET(AA1,N+1);
CC:=FILTER(QY,N) AND H=HHV(H,N+1); CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);
DDD:=BARSLAST(CC); DD1:=BARSLAST(CC1);
GDTS:=IF(CC,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
GDCS1:=CONST(DINGBUTS); DDCS1:=CONST(DDTS1);
GDCS13:=CONST(REF(HIGH,GDCS1-1)); DDCS13:=CONST(REF(L,DDCS1-1));
DINGBUTS1:=REF(DINGBUTS,DDD+1); DDTS2:=REF(DDTS1,DD1+1);
GDCS2:=CONST(DINGBUTS1); DDCS2:=CONST(DDTS2);
M:=INTPART(3*N/5);
AAA:=REF(H,M)=HHV(H,2*M+1);
QYY:=BACKSET(AAA,M+1);
CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);
DDDD:=BARSLAST(CCC),NODRAW;
GDTSS:=IF(CCC,CURRBARSCOUNT,0);
DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);
GDCS11:=CONST(DINGBUTSS);
DINGBUTS11:=REF(DINGBUTSS,DDDD+1);
GDCS22:=CONST(DINGBUTS11);
AA11:=REF(L,M)=LLV(L,2*M+1);
QY11:=BACKSET(AA11,M+1);
CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);
DD11:=BARSLAST(CC11);
DDTSS:=IF(CC11,CURRBARSCOUNT,0);
DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);
DDCS11:=CONST(DDTS11);
DDTS22:=REF(DDTS11,DD11+1);
DDCS22:=CONST(DDTS22);
ZGD:=HHV(H,60)*1.01.00;
ZGD2:=CONST(ZGD);
高点:=CONST(HHV(H,100)),NODRAW;
低点:=CONST(LLV(L,100)),NODRAW;
高点压力M:=DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORRED,,DOTLINE;
低点支撑M:=DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORRED,,DOTLINE;
高点压力1:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,,DOTLINE;
低点支撑1:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,,DOTLINE;
IF(BETWEEN(高点压力M,高点,低点),高点压力M,DRAWNULL),COLORWHITE,DOTLINE;
IF(BETWEEN(低点支撑M,高点,低点),低点支撑M,DRAWNULL),COLORWHITE,,DOTLINE;
{T1:=CONST(IF(ISLASTBAR AND (红持股 OR REF(红持股,1)=1),1,0));
T2:=CONST(IF(ISLASTBAR AND (阴观望 OR REF(阴观望,1)=1),1,0));};
C21:=REF(C,1);
非ST涨停:=IF((C-C21)*100/C21>=(10-0.01*100/C21),1,0);
涨停Q:=非ST涨停;
NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1);
{DRAWNUMBER(非ST涨停,HIGH*1.04,NUMBER),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.60,0,0,'上市以来共涨停'),COLORLIRED;}
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.68,0,0,NUMBER),COLORLIRED;
{有庄}
VARTT1:=EMA(EMA(CLOSE,13),13);
JJ:=DYNAINFO(11);
VARTT2:=(EMA(CLOSE,8)-EMA(CLOSE,55))*10;
VARTT3:=EMA(VARTT2,3);
BTJ11:=(C-JJ)/JJ<-0.03;
BTJ3:=CROSS(VARTT2,VARTT3) AND VARTT2<-0.3;
BTJ811:=FILTER(BTJ11 AND BTJ3,13);
庄:= BTJ11 AND BTJ3;
DRAWTEXT(BTJ811,L/0.98,'↖有庄'),COLORWHITE;
{}
AX:=AMOUNT/V;BX:=L<AX*0.9; CX:=(C-REF(C,1))/REF(C,1)*100>1.2;
DZ:=L<MA(C,5)*0.921;EX:=V<MA(V,5)*1.5;
老鼠仓:=BX AND CX AND DZ AND EX,LINETHICK0;
DRAWTEXT(老鼠仓,(L*0.998),'↖老鼠仓'),COLOR40CCFF;
{九转序列}
XA1:=C>REF(C,4);
XA2:=BARSLASTCOUNT(XA1);
XA3:=REF(XA2,1)=8 AND XA2>REF(XA2,1);
XA4:=REF(BETWEEN(XA2,5,8),1) AND XA2<REF(XA2,1);
XA5:=ISLASTBAR AND BETWEEN(XA2,6,8);
XA6:=(BACKSET(XA3>0,9) OR BACKSET(XA4>0,XA2+1)*0 OR BACKSET(XA5>0,XA2))*XA2;
DRAWTEXT(XA6>0,H+H*0.05,VAR2STR(XA6,0)),COLORFF00FF;
DRAWTEXT(XA2=9,H+H*0.05,'9'),COLOR00FF00;
XXB1:=C<REF(C,4);
XXB2:=BARSLASTCOUNT(XXB1);
XB3:=REF(XXB2,1)=8 AND XXB2>REF(XXB2,1);
XB4:=REF(BETWEEN(XXB2,5,8),1) AND XXB2<REF(XXB2,1);
XB5:=ISLASTBAR AND BETWEEN(XXB2,6,8);
XB6:=(BACKSET(XB3>0,9) OR BACKSET(XB4>0,XXB2+1)*0 OR BACKSET(XB5>0,XXB2))*XXB2;
DRAWTEXT(XB6>0,L-L*0.02, VAR2STR(XB6,0)),COLOR00FF00;
DRAWTEXT(XXB2=9,L-L*0.02,'9'),COLORFF00FF;
{突破 主}
R1:=(C>REF(C,1)AND C>REF(C,2)); R2:=(REF(R1,1)AND C<=REF(C,1)AND C>=REF(C,2));
R3:=(REF(R2,1)AND C>=REF(C,1)AND C<=REF(C,2)); R4:=(REF(R3,1)AND C<=REF(C,1)AND C>=REF(C,2));
R5:=(REF(R4,1)AND C>=REF(C,1)AND C<=REF(C,2)); R6:=(REF(R5,1)AND C<=REF(C,1)AND C>=REF(C,2));
R7:=(REF(R6,1)AND C>=REF(C,1)AND C<=REF(C,2)); R8:=(REF(R7,1)AND C<=REF(C,1)AND C>=REF(C,2));
R9:=(REF(R8,1)AND C>=REF(C,1)AND C<=REF(C,2)); A1:=(REF(R9,1)AND C<=REF(C,1)AND C>=REF(C,2));
A2:=(REF(A1,1)AND C>=REF(C,1)AND C<=REF(C,2)); A3:=(REF(A2,1)AND C<=REF(C,1)AND C>=REF(C,2));
A4:=(C<REF(C,1)AND C<REF(C,2)); A5:=(REF(A4,1)AND C>=REF(C,1)AND C<=REF(C,2));
A6:=(REF(A5,1)AND C<=REF(C,1)AND C>=REF(C,2)); A7:=(REF(A6,1)AND C>=REF(C,1)AND C<=REF(C,2));
A8:=(REF(A7,1)AND C<=REF(C,1)AND C>=REF(C,2)); A9:=(REF(A8,1)AND C>=REF(C,1)AND C<=REF(C,2));
B1:=(REF(A9,1)AND C<=REF(C,1)AND C>=REF(C,2)); B2:=(REF(B1,1)AND C>=REF(C,1)AND C<=REF(C,2));
B3:=(REF(B2,1)AND C<=REF(C,1)AND C>=REF(C,2)); B4:=(REF(B3,1)AND C>=REF(C,1)AND C<=REF(C,2));
B5:=(REF(B4,1)AND C<=REF(C,1)AND C>=REF(C,2)); B6:=(REF(B5,1)AND C>=REF(C,1)AND C<=REF(C,2));
B7:=REF(A4 OR A5 OR A6 OR A7 OR A8 OR A9 OR B1 OR B2 OR B3 OR B4 OR B5 OR B6,1)AND R1;
B8:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR A1 OR A2 OR A3,1))AND A4);
T1:=HHV(C,4);
T2:=REF(C,1);
T3:=REF(C,2);
T4:=REF(C,3);
T5:=LLV(C,4);
STICKLINE(C>=OPEN,C,OPEN,3.2,0),COLOR0000AA;
STICKLINE(C>=OPEN,C,OPEN,2.2,0),COLOR0000CC;
STICKLINE(C>=OPEN,C,OPEN,1.0,0),COLOR0000EE;
STICKLINE(C>=OPEN,C,OPEN,0.1,0),COLORAA55FF;
STICKLINE(OPEN>=C,C,OPEN,3.2,0),COLOR009900;
STICKLINE(OPEN>=C,C,OPEN,1.5,0),COLOR00BB00;
STICKLINE(OPEN>=C,C,OPEN,0.6,0),COLOR00DD00;
STICKLINE(OPEN>=C,C,OPEN,0.1,0),COLOR00FF00;
Q:=C=T5 AND(T2<T3 OR T2<T4)OR T2=T5 AND C<T3 OR T3=T5 AND T2!=T1 AND C<T2 OR T4=T5 AND C<T2 AND C<T3; W:=O+C;
STICKLINE(Q,C,W/2,3.1,0),COLOR999999;
STICKLINE(Q,C,W/2,2,0),COLORBBBBBB;
STICKLINE(Q,C,W/2,1,0),COLORDDDDDD;
STICKLINE(Q,C,W/2,0.1,0),COLORFFFFFF;
SA:=T2=T5 AND C>=T3 OR T3=T5 AND T2<=T4 AND T3<REF(C,4)AND C>=T2;
STICKLINE(SA,O,W/2,3.1,0),COLOR999900;
STICKLINE(SA,O,W/2,2,0),COLORBBBB00;
STICKLINE(SA,O,W/2,1,0),COLORDDDD00;
STICKLINE(SA,O,W/2,0.1,0),COLORFFFF00;
STICKLINE(B7,REF(C,1),REF(C,2),3.2,0),COLOR335555;
STICKLINE(B7,REF(C,1),REF(C,2),2.5,0),COLOR338888;
STICKLINE(B7,REF(C,1),REF(C,2),1.5,0),COLOR33AAAA;
STICKLINE(B7,REF(C,1),REF(C,2),0.8,0),COLOR33CCCC;
STICKLINE(B7,REF(C,1),REF(C,2),0.1,0),COLOR33EEEE;
STICKLINE(B8,REF(C,1),REF(C,2),3.0,0),COLORAA0000;
STICKLINE(B8,REF(C,1),REF(C,2),2.0,0),COLORCC0000;
STICKLINE(B8,REF(C,1),REF(C,2),1.1,0),COLORFF4400;
STICKLINE(B8,REF(C,1),REF(C,2),0.2,0),COLORFF8800;
STICKLINE(B8,REF(C,1),REF(C,2),0.0,0),COLORFFCC00;
四:=SUMBARS(VOL,CAPITAL/4),NODRAW;
二:=SUMBARS(VOL,CAPITAL/2),NODRAW;
ZJ:=MA(C,二){中期成本均线};
XJ:=MA(C,四){近期成本均线};
T:=C>XJ;
P:=XJ>ZJ;
Z:=ZJ>Q;
I:=MAX(O,C);
STICKLINE(T AND P AND Z,I,W/2,3.1,0),COLOR880088;
STICKLINE(T AND P AND Z,I,W/2,2,0),COLORBB00BB;
STICKLINE(T AND P AND Z,I,W/2,1,0),COLORDD00DD;
STICKLINE(T AND P AND Z,I,W/2,0.1,0),COLORFF00FF;
STICKLINE(C=C,O+((C-O)/2),(O+(C-O)/2),3,0),COLOR00FFFF;{当日实体幅度的1/2};
再试一下 ,祝投资愉快!
|