您当前的位置:股票 > 财经资讯 > 财经频道

智慧趋势吸庄指标公式,大智慧精确打击指标公式

2024-06-15 23:17:50 来源: 作者: admin888
分享到
关注牛市通网在线:
  • 扫描二维码

    关注√

    牛市通网微信

在线咨询:
  • 扫描或点击关注牛市通网在线客服

智慧趋势吸庄指标公式,大智慧精确打击指标公式

智慧趋势吸庄指标公式

{背景颜色}DRAWGBKLAST(CLOSE>0,STRIP(RGB(55,75,55),RGB(10,10,20),0));

DRAWRECTREL(0,10,200,1000,rgb(0,0,255)),layer0;

{公式程式}MA5:=MA(CLOSE,5);

MA10:=MA(CLOSE,10);

MA20:=MA(CLOSE,20);

A1:=IF(C>=MA5,1,-1);

A2:=IF(C>=MA10,1,-1);

A3:=IF(C>=MA20,1,-1);

A4:=IF(MA5>=REF(MA5,1),1,-1);

A5:=IF(MA10>=REF(MA10,1),1,-1);

A6:=IF(MA20>=REF(MA20,1),1,-1);

趋势:(A1+A2+A3+A4+A5+A6)/6*100,Color00FF00;

趋势1:ref(趋势,2),linethick0;

主升浪:趋势>=50,COLOR0000FF,POINTDOT,LINETHICK0;

↓:趋势<50,COLORFFFFFF,POINTDOT,LINETHICK0;

周期:IF(主升浪,BARSLAST(CROSS(主升浪,0.1))+1,0),COLORFF00FF,POINTDOT,LINETHICK0;

临界:IF(CROSS(98,趋势),1,0),COLOR00FF00,POINTDOT,LINETHICK0;

WKQY:=BARSLAST(CROSS(50,趋势))

挖坑:BETWEEN(趋势,-1,50) and WKQY,COLOR00FFFF,POINTDOT,LINETHICK0;

{以下设置副图显示方式}FILLRGN(50,趋势,主升浪,RGB(250,0,0)),LAYER7;

FILLRGN(50,趋势,挖坑,RGB(250,250,0)),LAYER7;

STICKLINE(主升浪,周期*0.8,周期*0.95,6,0),COLOR0000FF;

STICKLINE(主升浪,周期*1.05,周期*1.2,6,0),COLOR0000FF;

STICKLINE(主升浪 AND C

VERTLINE(CROSS(主升浪,0.1),2),COLOR0000FF;

DRAWTEXT(临界,100,'☆'),COLOR00FF00,ALIGN1;

0,COLORFFFFFF;50,COLOR00FFFF,DOTLINE;

{庄家克星 专吸庄血}N:=5;

VAR1:4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3.2,1),COLORYELLOW,LINETHICK0;

VAR2:8,COLORGREEN,LINETHICK0;

上升: IF(CROSS(VAR1,VAR2),100,0),STICK,COLORred,LINETHICK2;

低吸: IF(VAR1<=8,25,0),STICK,COLORffffff,LINETHICK2;

DRAWTEXT(CROSS(VAR1,VAR2),80,'上升'),COLORffffff;

VARO5:=LLV(LOW,27);

VARO6:=HHV(HIGH,34);

VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;

建仓区: IF((VARO7<10),80,100) ,COLOR00CCFF,LINETHICK1;

{当日及时行情}DRAWTEXTREL(5,70,'今 趋势线:'+NUMTOSTRN(趋势,0)),COLORffffff,linethick1,layer0;

DRAWTEXTREL(5,250,'日 主升浪:'+NUMTOSTRN(主升浪,0)),COLORYELLOW,linethick1,layer0;

DRAWTEXTREL(5,430,'行 挖 坑:'+NUMTOSTRN(挖坑,0)),COLORFFFFFF,linethick1,layer0;

DRAWTEXTREL(5,610,'情 临 界:'+NUMTOSTRN(临界,0)),COLORffffff,linethick1,layer0;

DRAWTEXTREL(5,790,'表 上 升:'+NUMTOSTRN(上升,0)),COLORyellow,linethick1,layer0;

DRAWTEXTABS(5,5,''),linethick1,COLOR00EEff;

QS0:=趋势>=50 and 趋势> REF(趋势,1);

QS1:=趋势>=50 and 趋势= REF(趋势,1);

QS2:=趋势>=50 and 趋势< REF(趋势,1);

QS3:=趋势< 50 and 趋势> REF(趋势,1);

QS4:=趋势< 50 and 趋势= REF(趋势,1);

QS5:=趋势< 50 and 趋势< REF(趋势,1);

IF BARSTATUS=2 AND QS0 THEN BEGIN

DRAWTEXTREL(25,70,' ● 势强 佳'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND QS1 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势强 佳'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND QS2 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势下 获利了结'),colorgreen,layer0;

ENDELSEIF BARSTATUS=2 AND QS3 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势上升 可进场'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND QS4 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势平 观望'),coloryellow,layer0;

ENDELSEIF BARSTATUS=2 AND QS5 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势下跌 不进场'),colorgreen,layer0;

ENDZSL1:=主升浪>=1 and REF(主升浪,1)>=1;

ZSL2:=主升浪>=1 and REF(主升浪,1)=0;

ZSL3:=主升浪=0 ;

IF BARSTATUS=2 AND ZSL1 THEN BEGINDRAWTEXTREL(25,250,' ● 来了 第 '+NUMTOSTRN(周期,0)+' 浪'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND ZSL2 THEN BEGIN

DRAWTEXTREL(25,250,' ● 来了 第 1 浪'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND ZSL3 THEN BEGIN

DRAWTEXTREL(25,250,' ● 走了 再等下一浪!'),colorgreen,layer0;

ENDWK1:=挖坑 >=1 ;

WK2:=挖坑 <1 ;

IF BARSTATUS=2 AND WK1 THEN BEGIN

DRAWTEXTREL(25,430,' ● 挖坑(黄色块)低吸 建议不进场'),colorgreen,layer0;

ENDELSEIF BARSTATUS=2 AND WK2 THEN BEGIN

DRAWTEXTREL(25,430,' ● 跟着主升浪走'),coloryellow,layer0;

END临界1:=临界 >=1;

临界2:=临界 <1;

IF BARSTATUS=2 AND 临界1 THEN BEGINDRAWTEXTREL(25,610,' ● 回涨可能碰到牛 建议不进场'),coloryellow,layer0;

ENDELSEIF BARSTATUS=2 AND 临界2 THEN BEGINDRAWTEXTREL(25,610,' ● 跟着主升浪走'),coloryellow,layer0;;

END;

SSH0:=上升=100;

SSH1:=上升=0;

IF BARSTATUS=2 AND SSH0 THEN BEGIN

DRAWTEXTREL(25,790,' ● 上升势强 可进场'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND SSH1 THEN BEGIN

DRAWTEXTREL(25,790,' ● 跟着主升浪走'),coloryellow,layer0;

END;

大智慧精确打击指标公式

{精确打击}DRAWTEXTREL(230,20,'● 也是应用在底部选股●'),COLORyellow,linethick2;

DRAWRECTREL(0,10,200,1000,rgb(0,0,255)),layer0;

n:=10;

f:=25;

Var1:=HHV(HIGH,9)-LLV(LOW,9);

Var2:=HHV(HIGH,9)-CLOSE;

Var3:=CLOSE-LLV(LOW,9);

Var4:=Var2/Var1*100-70;

Var5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;

Var6:=(high+low+open+close)/4;

Var7:=SMA(Var3/Var1*100,3,1);

Var8:=LLV(LOW,34);

Var9:=SMA(Var7,3,1)-SMA(Var4,9,1);

VarA:=IF(Var9>100,Var9-100,0);

VarB:=HHV(HIGH,34);

VarC:=EMA((Var6-Var8)/(VarB-Var8)*100,13);

VarD:=EMA(0.667*REF(VarC,1)+0.333*VarC,2);

VarE:=SMA(MAX(CLOSE-REF(CLOSE,1),0)/CLOSE,8,1)/SMA(ABS(INDEXC-REF(INDEXC,1))/INDEXC,8,1)*100-25;

VarF:=MA(VarE,3);

Var10:=REF(VarF,1);

生命线:EMA(VarD,N),colorFFAA00;

Var11:=(CLOSE-LLV(LOW,F))/(HHV(HIGH,F)-LLV(LOW,F))*100;

K:=SMA(Var11,3,1);

D:=SMA(K,3,1);

{买入信号}红灯亮买: STICKLINE(CROSS(VarC,VarD) AND VarC>VarD AND VarC<18,36,0,1,0),colorred;

见红:IF(VarC>18,0,IF(CROSS(VarC,VarD) AND VarC>VarD AND VarC<18,37,0)),COLOR3355FF;{灯塔脉冲}

fillrgn(0,25,CROSS(VarC,VarD) AND VarC>VarD AND VarC<18),color0000FF;{画红色灯桩}

PARTLINE(38,CROSS(VarC,VarD) AND VarC>VarD AND VarC<18),POINTDOT,LINETHICK7,color0000ff;{画浅蓝色灯辉}

PARTLINE(38,CROSS(VarC,VarD) AND VarC>VarD AND VarC<18),POINTDOT,LINETHICK4,colorffffff;{画白色灯芯}

DRAWTEXT(见红,50,'买'),colorffffff;

{卖出信号}浪尖: STICKLINE(CROSS(VarD,VarC) AND VarC60,90,100,12,1),colorblue;

DRAWTEXTABS(5,5,''),linethick1,COLOR00EEff;

IF(VarC<79,100,IF(CROSS(VarD,VarC) AND VarD>79 AND VarC>79,70,100)),COLOR00ff00;{灯塔脉冲}

卖: STICKLINE(FILTER(CROSS(VarD,VarC),10) AND VarD>79 AND VarC>79,100,95,4,0),colorgreen;{画绿色倒灯桩}

卖出:CROSS(VarD,VarC) AND VarC60,linethick0;

PARTLINE(68,CROSS(VarD,VarC) AND VarD>79 AND VarC>79),POINTDOT,LINETHICK7,color00ff00;{画绿色灯辉}

PARTLINE(68,CROSS(VarD,VarC) AND VarD>79 AND VarC>79),POINTDOT,LINETHICK4,colorffffff;{画白色灯芯}

DRAWTEXT(CROSS(VarD,VarC) AND VarC60,60,'卖'),colorgreen;

{多空信号}STICKLINE(VarC-VarD>0,VarC,VarD,8,1),COLOR0000FF;{

多头行情显出红柱状}STICKLINE(VarC-VarD<0,VarC,VarD,8,0),COLOR00FF00;{空头行情显出绿色柱状}

{建仓及底部信号}kar1:=3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)-2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

kar2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;

kar3:=SMA(SMA(kar2,3,1),3,1);

kar4:=EMA(kar3,5);

kar5:=LLV(LOW,26);

kar6:=HHV(HIGH,34);

kar7:=EMA((CLOSE-kar5)/(kar6-kar5)*4,4)*25;

kar8:=100-kar1;

kar9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

kar10:=SMA(kar9,3,1);

kar11:=SMA(kar10,3,1);

kar12:=EMA(3*kar10-2*kar11,3);

kar13:=(-1)*(EMA(kar8,1)-50)+50;

kar14:=EMA(100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)),6);

全仓:(CROSS(kar4,10) AND kar4>10),coloryellow;

底部:STICKLINE(CROSS(kar4,10) AND kar4>10,50,0,4,0),color00ff00;

建仓: IF((kar7<10),18,0), colorcc00ff;

连续建仓:IF(建仓,BARSLAST(CROSS(建仓,0.1))+1,0),COLORFF00FF,POINTDOT,LINETHICK0;

DRAWTEXT(建仓,10,'建'),colorffffff;

DRAWTEXT(CROSS(kar4,10) AND kar4>10,65,'●全仓'),colorred;

{当日及时行情}DRAWTEXTREL(5,70,'今 建仓区:'+NUMTOSTRN(建仓,0)),COLORffffff,linethick1,layer0;

DRAWTEXTREL(5,310,'日 买 入:'+NUMTOSTRN(见红,0)),COLORffffff,linethick1,layer0;

DRAWTEXTREL(5,550,'行 全仓区:'+NUMTOSTRN(全仓,0)),COLORFFFFFF,linethick1,layer0;

DRAWTEXTREL(5,790,'情 卖 出:'+NUMTOSTRN(卖出,0)),COLORffffff,linethick1,layer0;

JCA1:=建仓=18 and REF(建仓,1)=18;

JCA2:=建仓=18 and REF(建仓,1)=0;

JCA3:=建仓=0 AND 全仓=0;

JCA4:=建仓=0 AND 全仓=1;

IF BARSTATUS=2 AND JCA1 THEN BEGIN

DRAWTEXTREL(25,70,' ● 数一数 第 '+NUMTOSTRN(连续建仓,0)+' 次'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND JCA2 THEN BEGINDRAWTEXTREL(25,70,' ● 来了 第 1 次'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND JCA3 THEN BEGIN

DRAWTEXTREL(25,70,' ● 空等待!'),colorgreen,layer0;

ENDELSEIF BARSTATUS=2 AND JCA4 THEN BEGIN

DRAWTEXTREL(25,70,' ● 机会来了!'),colorRED,layer0;

ENDMR1:=见红=37;

MR2:=见红=0 AND 全仓=0;

MR3:=见红=0 AND 全仓=1;

IF BARSTATUS=2 AND MR1 THEN BEGIN

DRAWTEXTREL(25,310,' ● 买入 !'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND MR2 THEN BEGIN

DRAWTEXTREL(25,310,' ● 等无人!'),colorgreen,layer0;

ENDELSEIF BARSTATUS=2 AND MR3 THEN BEGIN

DRAWTEXTREL(25,310,' ● 机会来了!'),colorRED,layer0;

ENDQCA1:=全仓=1 ;

QCA2:=全仓=0;

IF BARSTATUS=2 AND QCA1 THEN BEGIN

DRAWTEXTREL(25,550,' ● 买错也要买!'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND QCA2 THEN BEGINDRAWTEXTREL(25,550,' ● 等不到 烦人啊!'),colorgreen,layer0;

END;

MCH1:=卖出=1;

MCH2:=卖出=0;

IF BARSTATUS=2 AND MCH1 THEN BEGIN

DRAWTEXTREL(25,790,' ● 儿子说要玩具'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND MCH2 THEN BEGINDRAWTEXTREL(25,790,' ● 今天不卖酒!'),colorgreen,layer0;

END;

牛市通网是一个牛股推荐网与低风险投资知识网,可以在线联系客服领取牛股。牛市通网从权威的投资专家、金融分析师等投资信息中挑选优质的文章进行发布。牛市通网主要为投资者提供股票知识、股票观点、股票分析和明智金融投资讨论等信息。

责任编辑:admin888 标签:智慧趋势吸庄指标公式,大智慧精确打击指标公式
广告

热门搜索

相关文章

广告
牛市通网 |财经频道

智慧趋势吸庄指标公式,大智慧精确打击指标公式

admin888

|

智慧趋势吸庄指标公式,大智慧精确打击指标公式

智慧趋势吸庄指标公式

{背景颜色}DRAWGBKLAST(CLOSE>0,STRIP(RGB(55,75,55),RGB(10,10,20),0));

DRAWRECTREL(0,10,200,1000,rgb(0,0,255)),layer0;

{公式程式}MA5:=MA(CLOSE,5);

MA10:=MA(CLOSE,10);

MA20:=MA(CLOSE,20);

A1:=IF(C>=MA5,1,-1);

A2:=IF(C>=MA10,1,-1);

A3:=IF(C>=MA20,1,-1);

A4:=IF(MA5>=REF(MA5,1),1,-1);

A5:=IF(MA10>=REF(MA10,1),1,-1);

A6:=IF(MA20>=REF(MA20,1),1,-1);

趋势:(A1+A2+A3+A4+A5+A6)/6*100,Color00FF00;

趋势1:ref(趋势,2),linethick0;

主升浪:趋势>=50,COLOR0000FF,POINTDOT,LINETHICK0;

↓:趋势<50,COLORFFFFFF,POINTDOT,LINETHICK0;

周期:IF(主升浪,BARSLAST(CROSS(主升浪,0.1))+1,0),COLORFF00FF,POINTDOT,LINETHICK0;

临界:IF(CROSS(98,趋势),1,0),COLOR00FF00,POINTDOT,LINETHICK0;

WKQY:=BARSLAST(CROSS(50,趋势))

挖坑:BETWEEN(趋势,-1,50) and WKQY,COLOR00FFFF,POINTDOT,LINETHICK0;

{以下设置副图显示方式}FILLRGN(50,趋势,主升浪,RGB(250,0,0)),LAYER7;

FILLRGN(50,趋势,挖坑,RGB(250,250,0)),LAYER7;

STICKLINE(主升浪,周期*0.8,周期*0.95,6,0),COLOR0000FF;

STICKLINE(主升浪,周期*1.05,周期*1.2,6,0),COLOR0000FF;

STICKLINE(主升浪 AND C

VERTLINE(CROSS(主升浪,0.1),2),COLOR0000FF;

DRAWTEXT(临界,100,'☆'),COLOR00FF00,ALIGN1;

0,COLORFFFFFF;50,COLOR00FFFF,DOTLINE;

{庄家克星 专吸庄血}N:=5;

VAR1:4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3.2,1),COLORYELLOW,LINETHICK0;

VAR2:8,COLORGREEN,LINETHICK0;

上升: IF(CROSS(VAR1,VAR2),100,0),STICK,COLORred,LINETHICK2;

低吸: IF(VAR1<=8,25,0),STICK,COLORffffff,LINETHICK2;

DRAWTEXT(CROSS(VAR1,VAR2),80,'上升'),COLORffffff;

VARO5:=LLV(LOW,27);

VARO6:=HHV(HIGH,34);

VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;

建仓区: IF((VARO7<10),80,100) ,COLOR00CCFF,LINETHICK1;

{当日及时行情}DRAWTEXTREL(5,70,'今 趋势线:'+NUMTOSTRN(趋势,0)),COLORffffff,linethick1,layer0;

DRAWTEXTREL(5,250,'日 主升浪:'+NUMTOSTRN(主升浪,0)),COLORYELLOW,linethick1,layer0;

DRAWTEXTREL(5,430,'行 挖 坑:'+NUMTOSTRN(挖坑,0)),COLORFFFFFF,linethick1,layer0;

DRAWTEXTREL(5,610,'情 临 界:'+NUMTOSTRN(临界,0)),COLORffffff,linethick1,layer0;

DRAWTEXTREL(5,790,'表 上 升:'+NUMTOSTRN(上升,0)),COLORyellow,linethick1,layer0;

DRAWTEXTABS(5,5,''),linethick1,COLOR00EEff;

QS0:=趋势>=50 and 趋势> REF(趋势,1);

QS1:=趋势>=50 and 趋势= REF(趋势,1);

QS2:=趋势>=50 and 趋势< REF(趋势,1);

QS3:=趋势< 50 and 趋势> REF(趋势,1);

QS4:=趋势< 50 and 趋势= REF(趋势,1);

QS5:=趋势< 50 and 趋势< REF(趋势,1);

IF BARSTATUS=2 AND QS0 THEN BEGIN

DRAWTEXTREL(25,70,' ● 势强 佳'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND QS1 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势强 佳'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND QS2 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势下 获利了结'),colorgreen,layer0;

ENDELSEIF BARSTATUS=2 AND QS3 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势上升 可进场'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND QS4 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势平 观望'),coloryellow,layer0;

ENDELSEIF BARSTATUS=2 AND QS5 THEN BEGIN

DRAWTEXTREL(25,70,' ● 趋势下跌 不进场'),colorgreen,layer0;

ENDZSL1:=主升浪>=1 and REF(主升浪,1)>=1;

ZSL2:=主升浪>=1 and REF(主升浪,1)=0;

ZSL3:=主升浪=0 ;

IF BARSTATUS=2 AND ZSL1 THEN BEGINDRAWTEXTREL(25,250,' ● 来了 第 '+NUMTOSTRN(周期,0)+' 浪'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND ZSL2 THEN BEGIN

DRAWTEXTREL(25,250,' ● 来了 第 1 浪'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND ZSL3 THEN BEGIN

DRAWTEXTREL(25,250,' ● 走了 再等下一浪!'),colorgreen,layer0;

ENDWK1:=挖坑 >=1 ;

WK2:=挖坑 <1 ;

IF BARSTATUS=2 AND WK1 THEN BEGIN

DRAWTEXTREL(25,430,' ● 挖坑(黄色块)低吸 建议不进场'),colorgreen,layer0;

ENDELSEIF BARSTATUS=2 AND WK2 THEN BEGIN

DRAWTEXTREL(25,430,' ● 跟着主升浪走'),coloryellow,layer0;

END临界1:=临界 >=1;

临界2:=临界 <1;

IF BARSTATUS=2 AND 临界1 THEN BEGINDRAWTEXTREL(25,610,' ● 回涨可能碰到牛 建议不进场'),coloryellow,layer0;

ENDELSEIF BARSTATUS=2 AND 临界2 THEN BEGINDRAWTEXTREL(25,610,' ● 跟着主升浪走'),coloryellow,layer0;;

END;

SSH0:=上升=100;

SSH1:=上升=0;

IF BARSTATUS=2 AND SSH0 THEN BEGIN

DRAWTEXTREL(25,790,' ● 上升势强 可进场'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND SSH1 THEN BEGIN

DRAWTEXTREL(25,790,' ● 跟着主升浪走'),coloryellow,layer0;

END;

大智慧精确打击指标公式

{精确打击}DRAWTEXTREL(230,20,'● 也是应用在底部选股●'),COLORyellow,linethick2;

DRAWRECTREL(0,10,200,1000,rgb(0,0,255)),layer0;

n:=10;

f:=25;

Var1:=HHV(HIGH,9)-LLV(LOW,9);

Var2:=HHV(HIGH,9)-CLOSE;

Var3:=CLOSE-LLV(LOW,9);

Var4:=Var2/Var1*100-70;

Var5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;

Var6:=(high+low+open+close)/4;

Var7:=SMA(Var3/Var1*100,3,1);

Var8:=LLV(LOW,34);

Var9:=SMA(Var7,3,1)-SMA(Var4,9,1);

VarA:=IF(Var9>100,Var9-100,0);

VarB:=HHV(HIGH,34);

VarC:=EMA((Var6-Var8)/(VarB-Var8)*100,13);

VarD:=EMA(0.667*REF(VarC,1)+0.333*VarC,2);

VarE:=SMA(MAX(CLOSE-REF(CLOSE,1),0)/CLOSE,8,1)/SMA(ABS(INDEXC-REF(INDEXC,1))/INDEXC,8,1)*100-25;

VarF:=MA(VarE,3);

Var10:=REF(VarF,1);

生命线:EMA(VarD,N),colorFFAA00;

Var11:=(CLOSE-LLV(LOW,F))/(HHV(HIGH,F)-LLV(LOW,F))*100;

K:=SMA(Var11,3,1);

D:=SMA(K,3,1);

{买入信号}红灯亮买: STICKLINE(CROSS(VarC,VarD) AND VarC>VarD AND VarC<18,36,0,1,0),colorred;

见红:IF(VarC>18,0,IF(CROSS(VarC,VarD) AND VarC>VarD AND VarC<18,37,0)),COLOR3355FF;{灯塔脉冲}

fillrgn(0,25,CROSS(VarC,VarD) AND VarC>VarD AND VarC<18),color0000FF;{画红色灯桩}

PARTLINE(38,CROSS(VarC,VarD) AND VarC>VarD AND VarC<18),POINTDOT,LINETHICK7,color0000ff;{画浅蓝色灯辉}

PARTLINE(38,CROSS(VarC,VarD) AND VarC>VarD AND VarC<18),POINTDOT,LINETHICK4,colorffffff;{画白色灯芯}

DRAWTEXT(见红,50,'买'),colorffffff;

{卖出信号}浪尖: STICKLINE(CROSS(VarD,VarC) AND VarC60,90,100,12,1),colorblue;

DRAWTEXTABS(5,5,''),linethick1,COLOR00EEff;

IF(VarC<79,100,IF(CROSS(VarD,VarC) AND VarD>79 AND VarC>79,70,100)),COLOR00ff00;{灯塔脉冲}

卖: STICKLINE(FILTER(CROSS(VarD,VarC),10) AND VarD>79 AND VarC>79,100,95,4,0),colorgreen;{画绿色倒灯桩}

卖出:CROSS(VarD,VarC) AND VarC60,linethick0;

PARTLINE(68,CROSS(VarD,VarC) AND VarD>79 AND VarC>79),POINTDOT,LINETHICK7,color00ff00;{画绿色灯辉}

PARTLINE(68,CROSS(VarD,VarC) AND VarD>79 AND VarC>79),POINTDOT,LINETHICK4,colorffffff;{画白色灯芯}

DRAWTEXT(CROSS(VarD,VarC) AND VarC60,60,'卖'),colorgreen;

{多空信号}STICKLINE(VarC-VarD>0,VarC,VarD,8,1),COLOR0000FF;{

多头行情显出红柱状}STICKLINE(VarC-VarD<0,VarC,VarD,8,0),COLOR00FF00;{空头行情显出绿色柱状}

{建仓及底部信号}kar1:=3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)-2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

kar2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;

kar3:=SMA(SMA(kar2,3,1),3,1);

kar4:=EMA(kar3,5);

kar5:=LLV(LOW,26);

kar6:=HHV(HIGH,34);

kar7:=EMA((CLOSE-kar5)/(kar6-kar5)*4,4)*25;

kar8:=100-kar1;

kar9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

kar10:=SMA(kar9,3,1);

kar11:=SMA(kar10,3,1);

kar12:=EMA(3*kar10-2*kar11,3);

kar13:=(-1)*(EMA(kar8,1)-50)+50;

kar14:=EMA(100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)),6);

全仓:(CROSS(kar4,10) AND kar4>10),coloryellow;

底部:STICKLINE(CROSS(kar4,10) AND kar4>10,50,0,4,0),color00ff00;

建仓: IF((kar7<10),18,0), colorcc00ff;

连续建仓:IF(建仓,BARSLAST(CROSS(建仓,0.1))+1,0),COLORFF00FF,POINTDOT,LINETHICK0;

DRAWTEXT(建仓,10,'建'),colorffffff;

DRAWTEXT(CROSS(kar4,10) AND kar4>10,65,'●全仓'),colorred;

{当日及时行情}DRAWTEXTREL(5,70,'今 建仓区:'+NUMTOSTRN(建仓,0)),COLORffffff,linethick1,layer0;

DRAWTEXTREL(5,310,'日 买 入:'+NUMTOSTRN(见红,0)),COLORffffff,linethick1,layer0;

DRAWTEXTREL(5,550,'行 全仓区:'+NUMTOSTRN(全仓,0)),COLORFFFFFF,linethick1,layer0;

DRAWTEXTREL(5,790,'情 卖 出:'+NUMTOSTRN(卖出,0)),COLORffffff,linethick1,layer0;

JCA1:=建仓=18 and REF(建仓,1)=18;

JCA2:=建仓=18 and REF(建仓,1)=0;

JCA3:=建仓=0 AND 全仓=0;

JCA4:=建仓=0 AND 全仓=1;

IF BARSTATUS=2 AND JCA1 THEN BEGIN

DRAWTEXTREL(25,70,' ● 数一数 第 '+NUMTOSTRN(连续建仓,0)+' 次'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND JCA2 THEN BEGINDRAWTEXTREL(25,70,' ● 来了 第 1 次'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND JCA3 THEN BEGIN

DRAWTEXTREL(25,70,' ● 空等待!'),colorgreen,layer0;

ENDELSEIF BARSTATUS=2 AND JCA4 THEN BEGIN

DRAWTEXTREL(25,70,' ● 机会来了!'),colorRED,layer0;

ENDMR1:=见红=37;

MR2:=见红=0 AND 全仓=0;

MR3:=见红=0 AND 全仓=1;

IF BARSTATUS=2 AND MR1 THEN BEGIN

DRAWTEXTREL(25,310,' ● 买入 !'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND MR2 THEN BEGIN

DRAWTEXTREL(25,310,' ● 等无人!'),colorgreen,layer0;

ENDELSEIF BARSTATUS=2 AND MR3 THEN BEGIN

DRAWTEXTREL(25,310,' ● 机会来了!'),colorRED,layer0;

ENDQCA1:=全仓=1 ;

QCA2:=全仓=0;

IF BARSTATUS=2 AND QCA1 THEN BEGIN

DRAWTEXTREL(25,550,' ● 买错也要买!'),colorRED,layer0;

ENDELSEIF BARSTATUS=2 AND QCA2 THEN BEGINDRAWTEXTREL(25,550,' ● 等不到 烦人啊!'),colorgreen,layer0;

END;

MCH1:=卖出=1;

MCH2:=卖出=0;

IF BARSTATUS=2 AND MCH1 THEN BEGIN

DRAWTEXTREL(25,790,' ● 儿子说要玩具'),colorred,layer0;

ENDELSEIF BARSTATUS=2 AND MCH2 THEN BEGINDRAWTEXTREL(25,790,' ● 今天不卖酒!'),colorgreen,layer0;

END;

牛市通网是一个牛股推荐网与低风险投资知识网,可以在线联系客服领取牛股。牛市通网从权威的投资专家、金融分析师等投资信息中挑选优质的文章进行发布。牛市通网主要为投资者提供股票知识、股票观点、股票分析和明智金融投资讨论等信息。


财经频道