金龙出海

买入：趋势线多头排列，主趋势线红色，k线系统变红；卖出：行情进入回调或者下跌阶段，股价跌破止损位或者支撑位，所有趋势线由上拐头向下，变成绿色，主趋势线由红色变为深绿色，表示趋势转变为下跌。

{金龙出海}

{======================================================}
范围高A:=REFDATE(HHV(H,120),DATE)*1.05;
范围低A:=REFDATE(LLV(L,120),DATE)*0.95;
MA5:=MA(C,5),COLORCYAN,LINETHICK2;
MA24:=MA(C,24),COLORGREEN,LINETHICK2;
MA72:=MA(C,72),COLORRED,LINETHICK2;
MA200:=IF((MA(C,200)<=范围高A AND MA(C,200)>=范围低A) OR C>=MA(C,200),MA(C,200),DRAWNULL),COLORBLUE,LINETHICK2;
{=======================仪表盘=========================}
主升浪:=ISLASTBAR AND MA5>MA24 AND MA24>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);
主浪回调:=ISLASTBAR AND MA24>MA5 AND MA5>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);
主浪深调:=ISLASTBAR AND MA24>MA72 AND MA72>MA5 AND MA5>IF(MA200=DRAWNULL,0,MA200);
初升浪:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MAX(MA24,MA72) AND MA5>MA24 AND MA24>MA72;
底部反弹:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA5>MA24;
探底阶段:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA24>MA5;
观望:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24>MA72 AND C<MA72,MA72>MA200 AND C<MA200);
有牛:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24<MA72 AND C>=MA72,MA72<MA200 AND C>=MA200);
放弃:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24<MA72 AND C<MA72,MA72<MA200 AND C<MA200);
DRAWGBK(显示仪表盘1=1 AND 主升浪=0 AND 主浪回调=0 AND 主浪深调=0 AND 初升浪=0 AND 底部反弹=0 AND 探底阶段=0 AND 观望=0 AND 有牛=0 AND 放弃=0,0,0,0,'观望',0)COLOR00BF00;
DRAWGBK(显示仪表盘1=1 AND 主升浪,0,0,0,'主升浪',0)COLORFF00FF;
DRAWGBK(显示仪表盘1=1 AND 主浪回调,0,0,0,'主浪回调',0)COLORFF8080;
DRAWGBK(显示仪表盘1=1 AND 主浪深调,0,0,0,'主浪深调',0)COLOR009500;
DRAWGBK(显示仪表盘1=1 AND 初升浪,0,0,0,'初升浪',0)COLOR00FFFF;
DRAWGBK(显示仪表盘1=1 AND 底部反弹,0,0,0,'底部反弹',0)COLORFFFF00;
DRAWGBK(显示仪表盘1=1 AND 探底阶段,0,0,0,'探底阶段',0);
DRAWGBK(显示仪表盘1=1 AND 观望,0,0,0,'观望',0)COLORFFFF00;
DRAWGBK(显示仪表盘1=1 AND 有牛,0,0,0,'有牛',0)COLOR00FFFF;
DRAWGBK(显示仪表盘1=1 AND 放弃,0,0,0,'放弃',0)COLOR00BF00;
引差:=REF(C,1)-LOW,LINETHICK1,NODRAW;
引跌幅:IF((REF(C,1)-LOW)/REF(C,1)*100>0,(REF(C,1)-LOW)/REF(C,1)*100,0),LINETHICK1,NODRAW;
三日均跌:MA(引跌幅,3),COLORWHITE,NODRAW;
今最高:HIGH,LINETHICK1,COLORRED,NODRAW;
今最低:LOW,LINETHICK1,COLORGREEN,NODRAW;
波段:EMA(C,5),COLORYELLOW,LINETHICK1;
红升1:IF(波段>REF(波段,1),波段,DRAWNULL),COLORRED,LINETHICK1;
绿降1:IF(波段<REF(波段,1),波段,DRAWNULL),COLORFFFF00,LINETHICK1,DOTLINE;
波段10日:EMA(C,10),COLORYELLOW,LINETHICK1;
红升2:IF(波段10日>REF(波段10日,1),波段10日,DRAWNULL),COLOR00FFFF,LINETHICK1;
绿降2:IF(波段10日<REF(波段10日,1),波段10日,DRAWNULL),COLORFFFF00,LINETHICK1,DOTLINE;
波段20日:EMA(C,20),COLORYELLOW,LINETHICK1;
红升3:IF(波段20日>REF(波段20日,1),波段20日,DRAWNULL),COLORFF00FF,LINETHICK1;
绿降3:IF(波段20日<REF(波段20日,1),波段20日,DRAWNULL),COLORFFFF00,LINETHICK1,DOTLINE;
操作30日均线:EMA(C,30),COLORYELLOW,LINETHICK4;
红升:IF(操作30日均线>REF(操作30日均线,1),操作30日均线,DRAWNULL),COLORRED,LINETHICK4;
绿降:IF(操作30日均线<REF(操作30日均线,1),操作30日均线,DRAWNULL),COLOR009300,LINETHICK4;
趋势55日线:EMA(C,55),COLORYELLOW,LINETHICK1,NODRAW;
红升4:IF(趋势55日线>REF(趋势55日线,1),趋势55日线,DRAWNULL),COLOR0080FF,LINETHICK1;
绿降4:IF(趋势55日线<REF(趋势55日线,1),趋势55日线,DRAWNULL),COLORFFFF00,DOTLINE,LINETHICK1;
半年线:EMA(C,120),COLORYELLOW,LINETHICK1,NODRAW;
半年红升:IF(半年线>REF(半年线,1),半年线,DRAWNULL),COLORFFFFFF,LINETHICK1;
半年绿降:IF(半年线<REF(半年线,1),半年线,DRAWNULL),COLORFFFF00,DOTLINE,LINETHICK1;
年线:EMA(C,250),COLORYELLOW,LINETHICK1,NODRAW;
年红升:IF(年线>REF(年线,1),年线,DRAWNULL),COLOR8000FF,LINETHICK1;
年绿降:IF(年线<REF(年线,1),年线,DRAWNULL),COLORFFFF00,DOTLINE,LINETHICK1;
日线锁定:=(PERIOD==5) AND (C>0) AND V>0; 
引力:=(MA(C,30)+MA(C,72))/2; 
下轨:=引力*0.73; 
下轨75:=引力*0.75; 
下轨71:=引力*0.71; 
下轨68:=引力*0.68; 
过滤周期:=1; 
VAR1:=EMA(EMA(CLOSE,9),9); 
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
资金:=EMA(EMA(CLOSE,8),8); 
资金抬轿:=(资金-REF(资金,1))/REF(资金,1)*1000; 
有庄控盘:=资金抬轿>0; 无庄控盘:=资金抬轿<=0; 买线:=EMA(C,3);
卖线:=EMA(SLOPE(C,22)*20+C,54); 
BU1:=CROSS(买线,卖线); 
SEL1:=CROSS(卖线,买线); 
BU2:=IFF(BU1 AND 有庄控盘,1,IFF(COUNT(BU1 AND 无庄控盘,BARSLAST(SEL1)+1)==1 AND CROSS(资金抬轿,0),1,0)); 
BU:=BU2 AND COUNT(BU2,BARSLAST(SEL1)+1)==1; 
SEL:=SEL1 AND COUNT(SEL1,BARSLAST(BU)+1)==1; 
BUNEW:=BU; 
止损条件:=CLOSE/REF(OPEN,BARSLAST(BU))<(1-7/100) AND COUNT(BU,BARSLAST(BU)+1)==1 AND COUNT(SEL,BARSLAST(BU)+1)==0; 
SELNEW:=IFF(止损条件 AND COUNT(止损条件,BARSLAST(BU)+1)==1,1,IFF(SEL AND COUNT(止损条件,BARSLAST(BU)+1)==0,1,0));
重新买入:=COUNT(止损条件,BARSLAST(BUNEW)+1)>=1 AND CROSS(C,0.965*REF(O,BARSLAST(BUNEW))); 
不在同一天1:=((重新买入 AND SELNEW)==0); BUNEW2:=((BUNEW AND COUNT(SELNEW,过滤周期)==0) OR 重新买入) AND 不在同一天1; 
二次止损:=(CLOSE/REF(OPEN,BARSLAST(重新买入))<(1-7/100) AND COUNT(重新买入,BARSLAST(重新买入)+1)==1 AND COUNT(SEL,BARSLAST(重
新买入)+1)==0); 
重新卖出:=(SEL AND COUNT(重新买入,BARSLAST(BUNEW2)+1)==1) OR (二次止损 AND SUM(二次止损,0)==1); 
不在同一天2:=((重新卖出 AND BUNEW2)==0); 
SELNEW2:=((SELNEW AND COUNT(SELNEW,BARSLAST(BUNEW2)+1)==1) OR 重新卖出) AND 不在同一天2; 
BUNEW3:=BUNEW2 AND COUNT(BUNEW2,BARSLAST(SELNEW2)+1)==1; 
SELNEW3:=SELNEW2 AND COUNT(SELNEW2,BARSLAST(BUNEW3)+1)==1; 
D:=BARSLAST(BUNEW3)+1>=1 AND COUNT(SELNEW3,BARSLAST(BUNEW3)+1)==0; 
K:=BARSLAST(SELNEW3)+1>=1 AND COUNT(BUNEW3,BARSLAST(SELNEW3)+1)==0; 
修正部分定位:=IFF(COUNT(SELNEW3,BARSCOUNT(C))==0 AND COUNT(BUNEW3,BARSCOUNT(C))==0,1,0); 
修正部分累计:=SUM(修正部分定位,1000)+1; 
精准修正累计:=IFF(修正部分累计==REF(修正部分累计,1) AND REF(修正部分累计,2)<修正部分累计,修正部分累计,0); 
上市修正B:=修正部分定位 AND CROSS(控盘,0);
上市修正S:=修正部分定位 AND CROSS(0,控盘) AND COUNT(上市修正B,BARSLAST(C>0))>=1;
上市D:=COUNT(上市修正B,BARSLAST(上市修正B)+1)==1 AND COUNT(上市修正S,BARSLAST(上市修正B)+1)==0 AND COUNT (SELNEW3,BARSCOUNT
(C))==0; 
上市K:=COUNT(上市修正S,BARSLAST(上市修正S)+1)==1 AND COUNT(上市修正B,BARSLAST(上市修正S)+1)==0 AND COUNT 
(BUNEW3,BARSCOUNT(C))==0; 
SSXZBZS:=COUNT(上市修正B,BARSCOUNT(C)); 
SSXZSZS:=COUNT(上市修正S,BARSCOUNT(C)); 
QB:=IFF(修正部分定位,上市修正B,BUNEW3); 
QS:=IFF(修正部分定位,上市修正S AND (SSXZBZS==SSXZSZS AND SSXZBZS>=0 AND COUNT(SELNEW3,BARSCOUNT(C))==1 AND COUNT
(BUNEW3,BARSCOUNT(C))==0)==0, SELNEW3 AND (SSXZBZS==SSXZSZS AND SSXZBZS>=0 AND COUNT(SELNEW3,BARSCOUNT(C))==1 AND COUNT
(BUNEW3,BARSCOUNT(C))==0)==0); 
K补:=(COUNT(上市修正B,BARSLAST(C>0))==0 AND COUNT(QB,BARSLAST(C>0))==0)==0;
定位B68:=QB AND COUNT(L<下轨68,10)>=1; 
定位B71:=QB AND COUNT(L<下轨71,10)>=1; 
定位B75:=QB AND COUNT(L<下轨75,10)>=1; 
定位68B:=EXIST(定位B68,BARSLAST(BUNEW)+1) AND 重新买入 AND QB; 
定位71B:=EXIST(定位B71,BARSLAST(BUNEW)+1) AND 重新买入 AND QB; 
定位75B:=EXIST(定位B75,BARSLAST(BUNEW)+1) AND 重新买入 AND QB; 
概率1:=IFF(定位B68,5,IFF(定位B71,4,IFF(定位B75,3,0))); 
概率2:=IFF(定位68B,5,IFF(定位71B,4,IFF(定位75B,3,0))); 
概率:=IFF(概率1>0,概率1,概率2); 
STICKLINE((D AND 日线锁定) OR (上市D AND 日线锁定),H,L,0.00,0),COLOR0000FF; 
STICKLINE((D AND 日线锁定) OR (上市D AND 日线锁定),C,O,3.00,0),COLOR0000FF; 
STICKLINE((K AND K补 AND 日线锁定) OR (上市K AND 日线锁定),H,L,0.00,0),COLORFFFF00; 
STICKLINE((K AND K补 AND 日线锁定) OR (上市K AND 日线锁定),C,O,3.00,0),COLORFFFF00; 
STICKLINE(C==O AND (D OR 上市D) AND 日线锁定,C,C,3,0),COLOR0000FF; 
STICKLINE(C==O AND (K AND K补) AND 日线锁定,C,C,3,0),COLORFFFF00; 
绘制多头:=(D AND 日线锁定) OR (上市D AND 日线锁定); 
绘制空头:=(K AND K补 AND 日线锁定) OR (上市K AND 日线锁定); 
代修复部分:=绘制多头==0 AND 绘制空头==0; 
B修:=BARSLAST(QB); 
S修:=BARSLAST(QS); 
补充绘制:=IFF(B修<S修 AND 代修复部分,1,IFF(B修>S修 AND 代修复部分,2,0));
STICKLINE(日线锁定 AND 补充绘制==1,H,L,0.00,0),COLOR0000FF; 
STICKLINE(日线锁定 AND 补充绘制==1,C,O,3.00,0),COLOR0000FF; 
STICKLINE(日线锁定 AND 补充绘制==2,H,L,0.00,0),COLORFFFF00; 
STICKLINE(日线锁定 AND 补充绘制==2,C,O,3,0),COLORFFFF00;
DRAWICON(QB AND 日线锁定,LOW,1); 
DRAWICON(QB AND 日线锁定,LOW*0.995,34); 
DRAWICON(QS AND 日线锁定,HIGH,2); 
DRAWICON(QS AND 日线锁定,HIGH*1.005,35); 
DRAWICON(概率==5 AND 日线锁定,L*0.97,14); 
DRAWICON(概率==4 AND 日线锁定,L*0.97,13); 
DRAWICON(概率==3 AND 日线锁定,L*0.97,11);
DRAWTEXT_FIX(ISLASTBAR,0.988,0.06,1,'★ 开盘价收盘价低于昨日的收盘价买，半仓操作，永不满仓。
★ '),COLOR00FFFF; 
CC:IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLOR000000,NODRAW;
止赢:1.05*CC,COLORMAGENTA,LINETHICK1;
DRAWTEXT(ISLASTBAR,止赢,'止赢'),LINETHICK1;
止损:0.97*CC,COLORYELLOW,LINETHICK1;
DRAWTEXT(ISLASTBAR,止损,'止损'),LINETHICK1;
V01:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20); 
V02:=(1-7/100)*(DMA(CLOSE,V01));
V03:=(1+7/100)*(DMA(CLOSE,V01));
V05:=MA((LOW+HIGH+CLOSE)/3,5);
支撑:REFDATE(V02,DATE),LINETHICK1,COLOR454545;
DRAWTEXT(ISLASTBAR,支撑,'支撑'),LINETHICK1;
阻力:REFDATE(V03,DATE),LINETHICK1,COLOR454545; 
DRAWTEXT(ISLASTBAR,阻力,'阻力'),LINETHICK1; 

ZT:=C/REF(C,1)>1.097;
XH:=FILTER(ZT,13);
BH:=BARSLAST(ZT);
CZ:=REF(H,BH)-REF(L,BH);
STICKLINE(ZT,REF(O,BH),REF(C,BH),5,0),COLORYELLOW;
DRAWTEXT(ZT,L*0.98,'★涨停'),COLOR4080FF;
 AAA:=CONST(HHV(H,50));PL5:=HHV(H,45); 
F:=100*(C-REF(C,1))/REF(C,1);
博尔:=IF(C<REF(O,1) AND F<0,1,0);
P1:=博尔;
量化:=IF(C<REF(O,2) AND F<0,1,0);
P2:=量化;
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,3,0),COLORFF09FF;