{二龙聚首三分主图源码如下}
N:=34;
M1:=3;
M2:=3;
DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);
DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);
DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);
Z111:=STRCAT(HYBLOCK,'----');
Z211:=STRCAT(Z111,FGBLOCK);
Z311:=STRCAT(Z211,DYBLOCK);
Z411:=STRCAT(Z311,'----');
DRAWTEXT_FIX(1,0.00,0.00,0,'【主题概念】')COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.09,0.00,0,STRCAT(Z411,GNBLOCK)),COLORCYAN;
NW1:=CLOSE/REF(CLOSE,1)>1.03;
NW2:=EMA(CLOSE,9);
NW3:=EMA(NW2*1.13,5);
NW4:=CLOSE>=OPEN;
NW5:=EMA(NW2*1.12,5);
NW6:=EMA(NW2*1.11,5);
NW7:=CROSS(CLOSE,NW6);
NW8:=CROSS(CLOSE,NW3);
NW9:=CROSS(CLOSE,NW5);
NW10:=(NW8 OR NW9 OR NW7 AND NW4 AND NW1);
NW11:=HHV(HHV(LOW,14),60);
NW12:=HHV(MA((L+H+C)/3,8),60),COLORFF00FF;
NW13:=EMA(EMA(NW12,14)+2*STD(NW11,14),4),COLORAAAAAA;
NW14:=C>NW12 AND C>NW13 AND NW10;
纲一:EMA(EMA(NW11,16)-2*STD(NW11,16),3),COLORAAAAAA;
纲二:EMA(EMA(NW11,14)+2*STD(NW11,14),8),COLORAAAAAA;
STICKLINE(纲一>0 ,纲一 ,纲二 ,0 ,0 ),COLOR555555;
DRAWTEXT_FIX(CLOSE>0,0,0.06,0,'【仓位管理】')COLORYELLOW;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
持仓段:=D>LLV(D,2);
STICKLINE(持仓段=1 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORRED;
STICKLINE(持仓段=1 AND CLOSE>=OPEN,CLOSE,HIGH,0,1),COLORRED;
STICKLINE(持仓段=1 AND CLOSE>=OPEN,LOW,OPEN,0,1),COLORRED;
STICKLINE(持仓段=1 AND CLOSE<=OPEN,OPEN,CLOSE,3,0),COLORRED;
STICKLINE(持仓段=1 AND CLOSE<=OPEN,HIGH,LOW,0,0),COLORRED;
STICKLINE(持仓段=1 AND K< REF(K,1) AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLOR3399CC;
STICKLINE(持仓段=1 AND K< REF(K,1) AND CLOSE>=OPEN,CLOSE,HIGH,0,1),COLOR3399CC;
STICKLINE(持仓段=1 AND K< REF(K,1) AND CLOSE>=OPEN,LOW,OPEN,0,1),COLOR3399CC;
STICKLINE(持仓段=1 AND K< REF(K,1) AND CLOSE<=OPEN,OPEN,CLOSE,3,0),COLOR3399CC;
STICKLINE(持仓段=1 AND K< REF(K,1) AND CLOSE<=OPEN,HIGH,LOW,0,0),COLOR3399CC;
STICKLINE(持仓段=0 AND CLOSE>=OPEN,CLOSE,OPEN,3,1),COLORCYAN;
STICKLINE(持仓段=0 AND CLOSE>=OPEN,CLOSE,HIGH,0,1),COLORCYAN;
STICKLINE(持仓段=0 AND CLOSE>=OPEN,LOW,OPEN,0,1),COLORCYAN;
STICKLINE(持仓段=0 AND CLOSE<=OPEN,CLOSE,OPEN,3,0),COLORCYAN;
STICKLINE(持仓段=0 AND CLOSE<=OPEN,HIGH,LOW,0,0),COLORCYAN;
NGH:= C< 纲一;
STICKLINE(NGH,O,C,3,0),COLORFF9900;
STICKLINE(NGH,L,H,0,0),COLORFF9900;
BK:=IF(INBLOCK('科创板'),0.2,IF(INBLOCK('创业板'),0.2,IF(INBLOCK('ST板块'),0.05,0.1)));
XA_1:=IF(DATE<=1200823,1,1);
STICKLINE((C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H) AND XA_1=1,O,C,2.7,0),COLORRED;
STICKLINE((C<=DTPRICE(REF(CLOSE,1),0.1) AND C=L) AND XA_1=1,O,C,2.7,0),COLORBLUE;
STICKLINE((C>=ZTPRICE(REF(C,1),BK) AND C=H),O,C,1,0),COLORYELLOW;
STICKLINE((C<=DTPRICE(REF(C,1),BK) AND C=L),O,C,1,0),COLORBLUE;
STICKLINE((H>=ZTPRICE(REF(C,1),BK) AND C< H) OR (H>=ZTPRICE(REF(CLOSE,1),0.1) AND C< H AND XA_1=1),H,MAX(C,O),0.2,0),COLORMAGENTA;
STICKLINE((L<=DTPRICE(REF(C,1),BK) AND C>L) OR (L<=DTPRICE(REF(CLOSE,1),0.1) AND C>L AND XA_1=1),L,MIN(C,O),0.2,0),COLORBLUE;
{控盘程度副图源码如下}
DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);
DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);
DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);
VAR1:=90+(100-90)/2;
VAR2:=(100-90)/2;
VAR3:=COST(VAR1);
VAR4:=COST(VAR2);
VAR5:=(VAR3-VAR4)/(VAR3+VAR4)*100/2;
VAR6:=MA(VAR5,3);
VAR7:=IF(VAR6>REF(VAR6,3) AND MA(C,20)>REF(MA(C,20),3),1,0);
STICKLINE(VAR7>0,0,-VAR6,2.1,0),COLOR0064FF;
STICKLINE(VAR7>0,0,-VAR6,1.5,0),COLOR0093FF;
STICKLINE(VAR7>0,0,-VAR6,0.9,0),COLOR00C2FF;
STICKLINE(VAR7>0,0,-VAR6,0.3,0),COLORYELLOW;
VAR8:=(-IF(VAR6>REF(VAR6,3) AND MA(C,20)>REF(MA(C,20),3),1,0))*100;
VAR9:=EMA(EMA(C,9),9);
VAR10:=(VAR9-REF(VAR9,1))/REF(VAR9,1)*500;
STICKLINE(VAR10< 0,VAR10,0,3,0),COLOR008000;
VAR11:=CROSS(VAR10,0);
STICKLINE(VAR10>REF(VAR10,1) AND VAR10>0,VAR10,0,3,0),COLORRED;
机构控盘:IF(VAR10>REF(VAR10,1) AND VAR10>0,VAR10,0),NODRAW,COLORRED;
VAR12:=100*WINNER(C*0.95);
STICKLINE(VAR12>50 AND COST(85)>10,VAR10,0,3,0),COLORMAGENTA;
机构高度控盘:IF(VAR12>50 AND COST(85)>20,VAR10,0),NODRAW,COLORMAGENTA;
STICKLINE(VAR10,VAR10,0,3,0),NODRAW,COLORYELLOW;
VAR13:=IF(VAR10,VAR10,0);
机构撤退:IF(VAR10< 0,VAR10,0),NODRAW,COLORGREEN;
机构试盘:IF(VAR11,666,0),NODRAW,COLORYELLOW;
STICKLINE(机构试盘>0,0,3,1,0),COLORYELLOW;
DRAWICON(机构试盘>0,0.1,9);
散户活跃:机构控盘=0 AND 机构撤退=0 AND 机构高度控盘=0,NODRAW;
STICKLINE(散户活跃=1,(-0.3),2,3,0),COLORBLUE;
VAR14:=FINANCE(42);
VAR15:=DATETODAY(CONST(DATE));
VAR16:=VAR15-VAR14;
VAR17:=DAYTODATE(VAR16)+19000000;
VAR18:=STRCAT(1475,CON2STR(VAR17,0));
VAR19:=STRCAT(1476,CON2STR(FINANCE(42),0));
VAR20:=STRCAT(VAR19,48);
VAR21:=STRCAT(1477,CON2STR(TOTALBARSCOUNT,0));
VAR22:=STRCAT(VAR21,1478);
VAR23:=EMA(C,1);
VAR24:=VAR23/REF(VAR23,1)>=1.095;
VAR25:=COUNT(VAR24,BARSSINCE(VAR24)+1);
VAR26:=STRCAT(1479,CON2STR(CONST(BARSLAST(VAR24)),0));
VAR27:=STRCAT(VAR26,1480);
VAR28:=STRCAT(1481,CON2STR(VAR25,0));
VAR29:=STRCAT(VAR28,1482);
VAR30:=STRCAT(VAR20,VAR29);
VAR31:=STRCAT(VAR30,VAR27);
VAR32:=STRCAT(1483,VAR31);
VAR33:=IF(CODELIKE(1169),0,1);
VAR34:=VOL/CAPITAL*100;
VAR35:=(H+L+C)/3;
VAR36:=VOL/IF(H=L,4,H-L);
VAR37:=IF(CAPITAL=0,VAR36*(VAR35-MIN(C,OPEN)),VAR36*IF(H=L,1,MIN(OPEN,C)-L));
VAR38:=IF(CAPITAL=0,VAR36*(MIN(OPEN,C)-L),VAR36*IF(H=L,1,VAR35-MIN(C,OPEN)));
VAR39:=IF(CAPITAL=0,VAR36*(H-MAX(OPEN,C)),VAR36*IF(H=L,1,H-MAX(OPEN,C)));
VAR40:=IF(CAPITAL=0,VAR36*(MAX(C,OPEN)-VAR35),VAR36*IF(H=L,1,MAX(C,OPEN)-VAR35));
VAR41:=(VAR37+VAR38-(VAR39+VAR40))/IF(CAPITAL=0,10000,10000);
VAR42:=SMA(IF(C>=REF(C,1),VAR41,(-VAR41)/100),2,1);
VAR43:=SMA(VAR42*120/FROMOPEN*5,2,1);
VAR44:=SMA(VAR43,5,1);
VAR45:=SMA(VAR44,5,1);
VAR46:=CURRBARSCOUNT=1 AND C< REF(C,1);
VAR47:=REF(VAR42,1)-VAR46;
VAR48:=VAR42*1.01-REF(VAR42,1);
VAR49:=REF(VAR42*1.01,1)-REF(VAR42,2);
VAR50:=VAR48>3*ABS(VAR49);
VAR51:=EMA(VAR42,15);
VAR52:=COST(85);
VAR53:=COST(15);
VAR54:=VAR52-VAR53;
VAR55:=(VAR52+VAR53)/2;
VAR56:=VAR54/VAR55*100< 30;
VAR57:=HHV(H,250);
VAR58:=LLV( L,250);
VAR59:=VAR57-VAR58;
VAR60:=VAR55-VAR58;
VAR61:=VAR55< VAR59*4+VAR58;
VAR62:=VAR56 AND VAR61;
VAR63:=C/REF(C,1)>1.04;
VAR64:=EMA(100*(C-LLV(L,30))/(HHV(H,30)-LLV(L,30)),3);
VAR65:=VAR64>=75 AND C>0 AND C>OPEN;
VAR66:=FILTER(VAR65 AND VAR62 AND VAR60 AND WINNER(C)>=0.9 AND VAR63 AND C/REF(C,1)>1.092 AND C=H AND C< 40 AND VAR33 AND VAR34< 20,10);
VAR67:=(2*C+H+L)/4;
VAR68:=LLV(L,5);
VAR69:=HHV(H,5);
VAR70:=EMA((VAR67-VAR68)/(VAR69-VAR68)*100,5);
VAR71:=MA(VAR70,2);
VAR72:=REF(C,1)/REF(C,2)< 0.95;
VAR73:=VAR71< 20 AND VAR72 AND C>L AND OPEN>L;
VAR74:=C/REF(C,3)< 0.95;
VAR75:=REF(VAR74,1)=1 AND C/REF(C,1)>1.025;
VAR76:=VOL>REF(HHV(VOL,10),1) AND NOT(OPEN=C) AND H/C< 1.0007;
VAR77:=REF(EVERY(MA(C,5),3),3)>1.8;
VAR78:=COUNT(VAR73=1,3)>0 AND REF(C,1)< REF(C,2);
VAR79:=VOL/REF(VOL,1)>1.7 AND REF(OPEN,1)< 100;
跟庄乾坤:VAR75 AND VAR76 AND VAR77 AND VAR78 AND VAR79;
DRAWTEXT(跟庄乾坤,10,16712),COLORMAGENTA;
STICKLINE(跟庄乾坤,14,12,3.5,0),COLORRED;
STICKLINE(跟庄乾坤,15,14.9,1.7,0),COLORRED;
STICKLINE(跟庄乾坤,20.110001,9.6,0.1,0),COLORRED;
STICKLINE(跟庄乾坤,19.16,9.2,0.3,0),COLORRED;
STICKLINE(VAR66,14,12,3.5,0),COLORA8A8A8;
STICKLINE(VAR66,15,14.9,1.7,0),COLORA8A8A8;
STICKLINE(VAR66,14.9,14.8,1.9,0),COLORA8A8A8;
STICKLINE(VAR66,14.8,14.7,2.1,0),COLORA8A8A8;
STICKLINE(VAR66,14.7,14.6,2.3,0),COLORA8A8A8;
STICKLINE(VAR66,14.6,14.5,2.5,0),COLORA8A8A8;
STICKLINE(VAR66,14.5,14.4,2.7,0),COLORA8A8A8;
STICKLINE(VAR66,14.4,14.3,2.9,0),COLORA8A8A8;
STICKLINE(VAR66,14.3,14.2,3.1,0),COLORA8A8A8;
STICKLINE(VAR66,14.2,14.1,3.3,0),COLORA8A8A8;
STICKLINE(VAR66,14.1,14,3.5,0),COLORA8A8A8;
STICKLINE(VAR66,20.110001,9.6,0.1,0),COLORWHITE;
STICKLINE(VAR66,19.16,9.2,0.3,0),COLORWHITE;
STICKLINE(VAR66,19.120001,8.8,0.6,0),COLORWHITE;
STICKLINE(VAR66,18.799999,18.4,0.9,0),COLORWHITE;
STICKLINE(VAR66,18.4,18,1.2,0),COLORWHITE;
STICKLINE(VAR66,18,15,1.4,0),COLORWHITE;
STICKLINE(VAR66,17.4,17,0.6,0),COLORRED;
STICKLINE(VAR66,16.5,16.4,1.5,0),COLORBLUE;
STICKLINE(VAR66,15.1,14.9,1.5,0),COLORBLUE;
STICKLINE(VAR66,14.9,12.5,1.5,0),COLORWHITE;
STICKLINE(VAR66,12.5,12,1.3,0),COLORRED;
STICKLINE(VAR66,12,11.3,1,0),COLORRED;
STICKLINE(VAR66,11.3,10.7,0.7,0),COLORRED;
STICKLINE(VAR66,10.77,10.1,0.3,0),COLORRED;
STICKLINE(VAR66,12.48,12.18,1,0),COLORYELLOW;
STICKLINE(VAR66,12.18,11.88,0.5,0),COLORYELLOW;
STICKLINE(VAR66,11.88,11.58,0.1,0),COLORYELLOW;
STICKLINE(VAR66,16,15.5,0.5,0),COLORRED;
VAR80:=MA(C,5);
VAR81:=MA(C,144);
VAR82:=(H-VAR80)/VAR80*100;
VAR83:=(H-VAR80)/VAR80*100>=20 AND H>C;
VAR84:=VAR82>=15 AND VAR82< 20 AND H>C;
VAR85:=FILTER(VAR84,12);
STICKLINE(VAR83,0,5.8,0,0),COLORGREEN;
STICKLINE(VAR83,5,6,3,0),COLORGREEN;
DRAWICON(VAR83,6,9);
VAR86:=(C-REF(C,1))/REF(C,1)*100;
VAR87:=IF(NAMELIKE(251) OR NAMELIKE(1486),0.05,0.1);
VAR88:=C/REF(C,1)-1>=VAR87-0.01/REF(C,1) AND C=H;
VAR89:=BARSLASTCOUNT(VAR88);
VAR90:=REF(VAR89,1);
VAR91:=REF(VAR88,1) OR REF(VAR88,2);
VAR92:=VOL>=REF(VOL,1)*1.2 AND C>REF(C,1) AND OPEN>REF(C,1);
VAR93:=(C-REF(C,3))/REF(C,3)*100< 20 AND (HHV(H,5)-LLV(L,5))/REF(OPEN,5)< 0.45 AND (HHV(H,9)-LLV(L,9))/REF(OPEN,9)< 0.43 AND (HHV(H,12)-LLV(L,12))/REF(OPEN,12)< 0.52 AND (HHV(H,10)-LLV(L,10))/REF(OPEN,10)< 0.52;
VAR94:=C>=HHV(MAX(C,OPEN),20) AND (C-REF(C,12))/REF(C,12)*100< 30 AND (C-REF(C,13))/REF(C,13)*100< 25;
VAR95:=VOL>=REF(HHV(VOL,70),70);
VAR96:=H>=HHV(MAX(C,OPEN),60) AND (C-REF(C,70))/REF(C,70)*100< 150 AND SUM(VOL/CAPITAL*100,12)< 150;
VAR97:=VAR92 AND VAR93 AND VAR96 AND VAR95;
STICKLINE(VAR97,0,1,2,0),COLORGREEN;
{二龙买点副图源码如下}
DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);
DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);
DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);
天天:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1) -2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27) -LLV(LOW,27))*100,5,1),3,1);
富贵:IF(CROSS(天天,2),-20,DRAWNULL),CROSSDOT,LINETHICK6,COLORFF33FF;
开花:IF(CROSS(天天,2),-20,DRAWNULL),POINTDOT,LINETHICK4,COLOR00CCFF;
RRR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(CLOSE,9))*100;
RRR2:=SMA(RRR1,3,1)/2*1.1;
地: SMA(RRR2,3,1)-41;
RRR3:=(CLOSE-LLV(CLOSE,9))/(HHV(HIGH,9)-LLV(CLOSE,9))*100;
RRR4:=(SMA(RRR3,3,1)/2+40)*1.1;
天: SMA(RRR4,3,1)-34;
相交: 8.18;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100;
蛮准:CROSS(RSI,11)*80,COLORRED;
RRR1A:=3;
RRR2A:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
启动: IF(CROSS(RRR2A,RRR1A),100,0);
捕食: IF(RRR2A<=3,25,0);
补仓: IF(RRR2A< 5,45,0)COLORYELLOW;
短买: IF(RRR2A< 7,65,0)COLORGREEN;
{二龙底部选股副图源码如下}
DIF:=(CLOSE-SMA(CLOSE,13,1))/SMA(CLOSE,13,1)*(-100);
DEA:=REF(DIF,1)>13 AND REF(DIF,1)/DIF>1.23 AND CLOSE/REF(CLOSE,1)>1.03;
KOV1:=IF(DEA AND REF(CLOSE,1)<=COST(5),28,0);
KOV2:=IF(DEA AND REF(CLOSE,1)<=COST(5),18,0);
QL1:=IF(DEA AND REF(CLOSE,1)<=COST(5),1,0);
N1:=9;
Q:=20;
VAR1:=(CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100;
MX1:=SMA(VAR1,10,1);
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
K1:=SMA(RSV,3,1);
D1:=SMA(K1,3,1);
VAR2:=(HIGH+LOW+OPEN+2*CLOSE)/5;
VAR3:=REF(VAR2,1);
VAR4:=SMA(MAX(VAR2-VAR3,0),10,1)/SMA(ABS(VAR2-VAR3),10,1)*100;
DD1:=IF(COUNT(VAR4< 20,5)>=1 AND COUNT(VAR2=LLV(VAR2,5),10)>=1 AND CLOSE>OPEN AND CLOSE>REF(OPEN,1) AND VOL>1.5*MA(VOL,5),60,0);
MAV:=(2*C+H+L)/4;
VAR5:=LLV(LOW,34);
VAR6:=HHV(HIGH,34);
SK1:=EMA((MAV-VAR5)/(VAR6-VAR5)*100,13);
SD1:=EMA(0.667*REF(SK1,1)+0.333*SK1,2);
VAR7:=SMA(MAX(CLOSE-REF(CLOSE,1),0),7,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
WTBFW:=IF(REF(VAR7,1)< 20 AND (C/REF(C,1)-1)*100>9 AND C=H,85,0);
VAR11:=(HIGH+LOW+OPEN+2*CLOSE)/5;
VAR12:=REF(VAR11,1);
VAR13:=SMA(MAX(VAR11-VAR12,0),10,1)/SMA(ABS(VAR11-VAR12),10,1)*100;
VAR14:=REVERSE(VAR13)+100;
DBBY:=IF(COUNT(VAR13<=14,2),30,0);
MJ1:=IF(CROSS(VAR13,DBBY) AND VOL>1.5*MA(VOL,5),60,0);
擒庄:=QL1 AND DBBY;
擒庄2:=QL1 AND DD1;
A1:=((MA(C,60)-L)/MA(C,20))*200;
B1:=((MA(C,60)-L)/MA(C,60))*200;
C1:=((MA(C,30)-L)/MA(C,60))*200;
M1:=REF(CLOSE,1);
M2:=SMA(MAX(CLOSE-M1,0),7,1)/SMA(ABS(CLOSE-M1),7,1)*100;
G1:=FILTER(REF(M2,1)< 20 AND M2>REF(M2,1),5);
TU:=C/MA(C,40)< 0.74;
PER1:=5;
MMA:=EMA(C,PER1);
SMMA:=EMA(MMA,PER1);
IMPETMMA:=MMA - REF(MMA,1);
IMPETSMMA:=SMMA - REF(SMMA,1);
DIVMA:= ABS(MMA - SMMA);
TDJ:=(H-L)/REF(C,1)>0.05;
AVERIMPET:= (IMPETMMA+IMPETSMMA)/2;
TDF:= POW(DIVMA,1)*POW(AVERIMPET,3);
NTDF:=TDF/HHV(ABS(TDF),PER1*3);
YUL:=COUNT(TDJ,5)>1;
QD1:=TU AND TDJ AND YUL;
QD2:=CROSS(NTDF,-0.9);
BD1:=FILTER((G1 AND C1>20 OR C>REF(C,1)) AND REF(QD1,1),10);
XX1:=FILTER(REF(QD1,1) AND (QD2 OR C>REF(C,1)) AND "MACD.MACD">-1.5,10);
YD1:=COUNT(XX1,13)>=1 AND BD1;
有龙1:=DBBY AND DD1;
有龙2:=DBBY AND YD1;
Z_1:=VOL/CAPITAL*100< 11 OR REF(VOL/CAPITAL*100,1)>6 AND VOL/CAPITAL*100/REF(VOL/CAPITAL*100,1)< 1.99 OR VOL/CAPITAL< REF(HHV(VOL/CAPITAL,90),1);
Z_2:=CLOSE/REF(CLOSE,1)>1.03 AND CLOSE/HHV(HIGH,34)< 1 AND NOT(CLOSE< OPEN);
Z_3:=MAX(FORCAST(COST(24)/LOW,3),SMA(COST(24)/LOW,3,1))>1.3;
ZDD:=Z_1 AND Z_2 AND Z_3 ;
VAR1G:=(((CLOSE/MA(CLOSE,40))*100)< 78);
VAR2G:=(((CLOSE/MA(CLOSE,60))*100)< 74);
VAR3G:=(HIGH>(LOW*1.051));
VAR4G:=(VAR3G AND (COUNT(VAR3G,5) > 1));
VARAA:=IF((VAR4G AND (VAR1G OR VAR2G)),2,0);
VARBB:=C/REF(C,25)<=1.1;
VARCC:=(SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100)< 15;
CPX:=SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1);
VARV5:=SMA(CPX,2,1);
CPXCD:=CPX>REF(CPX,1) AND REF(CPX,1)< REF(CPX,2) AND CPX< 23;
JPD:=VARAA AND VARBB AND VARCC AND CPXCD;
DAD:=ZDD OR JPD;
二龙:=DBBY AND DAD;
起来:(擒庄 OR 擒庄2 OR 有龙1 OR 有龙1 OR 有龙2 OR 二龙) AND C>O;
DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);
DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);
DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);
NOTEXT顶部标线:120,COLORBROWN;
NOTEXT底部标线:-80,COLORBROWN;
力度平衡点:40,COLORBROWN,LINETHICK2;
LDA1:=FORCAST(FORCAST(SMA(MAX(CLOSE-REF(CLOSE,1),0),9,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),9,1)*100,3),18);
LDA2:=LDA1>REF(LDA1,1) AND LDA1>40;
LDA3:=LDA1<=REF(LDA1,1) AND LDA1>40;
LDA4:=LDA1>REF(LDA1,1) AND LDA1<=40;
LDA5:=LDA1<=REF(LDA1,1) AND LDA1<=40;
STICKLINE(LDA2,40,LDA1,3,0),COLORFF00FF;
STICKLINE(LDA3,40,LDA1,3,0),COLORBROWN;
STICKLINE(LDA4,40,LDA1,3,0),COLORRED;
STICKLINE(LDA5,40,LDA1,3,0),COLORWHITE;
趋势平衡线:MA(SMA(MAX(CLOSE-REF(CLOSE,1),0),9,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),9,1)*100,26),COLORBLUE,LINETHICK2;
力度强弱:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) * 100);
STICKLINE(力度强弱>=20,8,10,3,0),COLORFF00FF;
STICKLINE(力度强弱>=0 AND 力度强弱< 20 AND 力度强弱>6,8,10,3,0),COLORYELLOW;
BD1:=(3*CLOSE+LOW+OPEN+HIGH)/6;
BD2:=(20*BD1+19*REF(BD1,1)+18*REF(BD1,2)+17*REF(BD1,3)+16*REF(BD1,4)+15*REF(BD1,5)+ 14*REF(BD1,6)+13*REF(BD1,7)+12*REF(BD1,8)+11*REF(BD1,9)+10*REF(BD1,10)+9*REF(BD1,11)+ 8*REF(BD1,12)+7*REF(BD1,13)+6*REF(BD1,14)+5*REF(BD1,15)+4*REF(BD1,16)+3*REF(BD1,17)+ 2*REF(BD1,18)+REF(BD1,20))/210;
BD3:=MA(BD2,6);
BD4:=V*100/CAPITAL;
BD5:=MA(BD4,5);
BD6:=MA(BD4,55);
BD7:=(BD5-BD6);
BD8:=(C-BD2);
BD9:=BD7+BD8;
BD10:=EMA(V,5);
BD11:=EMA(V,50);
OBV:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE< REF(CLOSE,1),-VOL,0)),0);
BD12:=EMA(OBV,5);
BD13:=EMA(OBV,50);
BD14:=(BD10-BD11)*0.00001;
BD15:=(BD12-BD13)*0.000001;
BD16:=BD14+BD15;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
DKX:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+ 16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+ 13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+ 10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+ 7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+ 4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
BD17:=MA(DKX,6);
BD18:=(DKX-BD17)*1.2;
BD19:=(C*2+H+L)/4*10;
BD20:=EMA(BD19,6)-EMA(BD19,55);
BD21:=EMA(BD20,6);
BD22:=(BD20-BD21)*0.06;
BD23:=BD18+BD22;
BD24:=MA(C,5)>REF(MA(C,5),1);
BD25:=EMA(C,12)>REF(EMA(C,12),1);
BD26:=MA(C,20)>REF(MA(C,20),1);
BD27:=MA(C,30)>REF(MA(C,30),1);
BD28:=MA(C,60)>REF(MA(C,60),1);
BD29:=MA(C,120)>REF(MA(C,120),1);
BD30:=MA(C,250)>REF(MA(C,250),1);
BD31:=BD25 + BD26 + BD27 + BD28;
BD32:=C>BD2 AND BD9>0 AND BD16>0 AND BD23>0;
BD33:=C<=BD2 OR BD9<=0 OR BD16<=0 OR BD23<=0;
力度波动A:=BD31=4 AND BD32;
力度波动B:=BD31=3 AND BD32;
力度波动C:=BD31< 3 OR BD33;
STICKLINE(力度波动A,-2,0,3,0),COLORFF00FF;
STICKLINE(力度波动B,-2,0,3,0),COLORYELLOW;
BD34:=C>MA(C,3) AND BD24 AND BD25 AND BD26 AND BD27 AND BD28;
一帆风顺:BD34 AND (COUNT(BD34,5)=2) AND REF(NOT(BD34),1),COLORGREEN,NODRAW;
DRAWTEXT(一帆风顺,38,'↖★'),COLORGREEN;
STICKLINE(一帆风顺,40,LDA1,2.06,0),COLORGREEN;
BD35:=C>MA(C,5) AND BD24 AND BD25 AND BD26 AND BD27 AND BD28 AND BD29;
BD36:=COUNT(BD35,5)=2 OR COUNT(BD35,5)=3 OR COUNT(BD35,5)=4 OR COUNT(BD35,9)=2;
二龙戏珠:BD35 AND BD36 AND REF(BD35=0,1) AND BD32,COLORYELLOW,NODRAW;
DRAWTEXT(二龙戏珠,35,'↖★★'),COLORYELLOW;
STICKLINE(二龙戏珠,40,LDA1,1.36,0),COLORYELLOW;
三阳开泰:BD32 AND (REF(BD32=0,1) OR REF(BD32=1,1)) AND BD35 AND REF(BD35=0,1),COLORRED,NODRAW;
DRAWTEXT(三阳开泰,32,'↖★★★'),COLORRED;
STICKLINE(三阳开泰,40,LDA1,0.56,0),COLORRED;
破界线1:=EMA(C,21)*4;
封印1:=EMA(HY_INDEXC,144)/MA(C,144);
临界线:=EMA(HY_INDEXC/封印1,21)*4;
STICKLINE(破界线1>临界线,-12,-10,3,0),COLORYELLOW;
破除临界点:=CROSS(破界线1,临界线) AND 破界线1>REF(破界线1,1);
DRAWTEXT(破除临界点,-15,'↖越过临界');
破界线2:=EMA(C,21)*4;
封印2:=EMA(INDEXC,144)/MA(C,144);
结界线:=EMA(INDEXC/封印2,21)*4;
STICKLINE(破界线2>结界线,-22,-20,3,0),,COLORYELLOW;
破除结界点:=CROSS(破界线2,结界线) AND 破界线2>REF(破界线2,1);
DRAWTEXT(破除结界点,-25,'↖冲破结界');
DRAWTEXT(ISLASTBAR,40,' 平衡')COLORGREEN;
DRAWTEXT(ISLASTBAR,10,' 强弱')COLOR0000FF;
DRAWTEXT(ISLASTBAR,0,' 波动')COLORFF00FF;
DRAWTEXT(ISLASTBAR,-10,' 临界')COLOR4080FF;
DRAWTEXT(ISLASTBAR,-20,' 结界')COLOR00FFFF;
