股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 通达信一线趋势主图指标公式源码


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 7 天前

{指标介绍:
1、每日5个点预警,当日涨停概率大,预警后观察回调较大的票考虑买入。
2、底部挖坑启动,首阳最佳。
3、上涨远离20日线回调卖出。
4、蓝钻和红钻均为入场信号,红色强悍,志在高远,蓝色较弱,见高止盈。
5、红钻出票较少,蓝钻出票较多!}

GUP1:=IF(CURRBARSCOUNT=1,vol*240/FROMOPEN,VOL);
GUP2:=GUP1*10000/FINANCE(7);
GUP3:=IF(CURRBARSCOUNT=1,REF(CLOSE,1)*1.1,DRAWNULL);
GUP4:=IF(CURRBARSCOUNT=1,REF(CLOSE,1)*0.9,DRAWNULL);
GUP5:=CONST(BARSLAST(GUP2=HHV(GUP2,180)));
GUP6:=IF(CURRBARSCOUNT<=GUP5+1,CONST(REF((CLOSE+OPEN+HIGH+LOW)/4,GUP5)),DRAWNULL);
GUP7:=GUP6;
GUP8:=MA(CLOSE,5);
GUP9:=MA(CLOSE,6);
GUP10:=MA(CLOSE,7);
GUP11:=MA(CLOSE,8);
GUP12:=MA(CLOSE,9);
GUP13:=MA(CLOSE,10);
GUP14:=MA(CLOSE,11);
GUP15:=MA(CLOSE,12);
GUP16:=MA(CLOSE,13);
GUP17:=MA(CLOSE,14);
GUP18:=MA(CLOSE,15);
GUP19:=MA(CLOSE,16);
GUP20:=MA(CLOSE,17);
GUP21:=MA(CLOSE,18);
GUP22:=MA(CLOSE,19);
GUP23:=MA(CLOSE,20);
GUP24:=MA(CLOSE,21);
GUP25:=MA(CLOSE,22);
GUP26:=MA(CLOSE,23);
GUP27:=MA(CLOSE,24);
GUP28:=MA(CLOSE,25);
GUP29:=MA(CLOSE,26);
GUP30:=MA(CLOSE,27);
GUP31:=MA(CLOSE,28);
GUP32:=MA(CLOSE,29);
GUP33:=MA(CLOSE,30);
GUP34:=MA(CLOSE,31);
GUP35:=MAX(MAX(MAX(MAX(GUP8,GUP9),GUP10),GUP11),GUP12);
GUP36:=MAX(MAX(MAX(MAX(GUP13,GUP14),GUP15),GUP16),GUP17);
GUP37:=MAX(MAX(MAX(MAX(GUP18,GUP19),GUP20),GUP21),GUP22);
GUP38:=MAX(MAX(MAX(MAX(MAX(GUP23,GUP24),GUP25),GUP26),GUP27),GUP28);
GUP39:=MAX(MAX(MAX(MAX(MAX(GUP29,GUP30),GUP31),GUP32),GUP33),GUP34);
GUP40:=MAX(MAX(MAX(MAX(GUP35,GUP36),GUP37),GUP38),GUP39);
GUP41:=IF(GUP40=GUP8,5,IF(GUP40=GUP9,6,IF(GUP40=GUP10,7,IF(GUP40=GUP11,8,IF(GUP40=GUP12,9,IF(GUP40=GUP13,10,IF(GUP40=GUP14,11,IF(GUP40=GUP15,12,IF(GUP40=GUP16,13,IF(GUP40=GUP17,14,IF(GUP40=GUP18,15,IF(GUP40=GUP19,16,IF(GUP40=GUP20,17,IF(GUP40=GUP21,18,IF(GUP40=GUP22,19,IF(GUP40=GUP23,20,IF(GUP40=GUP24,21,IF(GUP40=GUP25,22,IF(GUP40=GUP26,23,IF(GUP40=GUP27,24,IF(GUP40=GUP28,25,DRAWNULL)))))))))))))))))))));
GUP42:=IF(GUP40=MA(CLOSE,GUP41),GUP41,IF(GUP40=GUP29,26,IF(GUP40=GUP30,27,IF(GUP40=GUP31,28,IF(GUP40=GUP32,29,IF(GUP40=GUP33,30,IF(GUP40=GUP34,31,32)))))));
GUP43:=IF(BARSCOUNT(CLOSE)>=31,(GUP40*3+MA(CLOSE,31))/4,MAX(MA(CLOSE,5),MA(CLOSE,BARSCOUNT(CLOSE))));
GUP44:=GUP1=HHV(GUP1,GUP42);
GUP45:=OPEN/CLOSE=HHV(OPEN/CLOSE,GUP42) AND CLOSE<OPEN;
GUP46:=CLOSE/OPEN=HHV(CLOSE/OPEN,GUP42);
GUP47:=GUP46 AND GUP44;
涨%:ROUND(INDEXADV/(INDEXADV+INDEXDEC)*100),NODRAW,COLORRED;
流通市值:FINANCE(40)/100000000,NODRAW,COLORRED;
STICKLINE(CURRBARSCOUNT=1,GUP3,MAX(OPEN,CLOSE),(-1),(-1)),COLORGRAY;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE(CURRBARSCOUNT=1,GUP4,MIN(OPEN,CLOSE),(-1),(-1)),COLORBLUE;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
多空线:GUP7,COLORYELLOW;
DRAWTEXT(ISLASTBAR,GUP7,4),COLORYELLOW;
变线:GUP43,COLORWHITE;
STICKLINE(GUP45,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(GUP46,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(GUP47,OPEN,CLOSE,2,0),COLORYELLOW;
GUP48:=GUP45 AND GUP1>MA(GUP1,GUP42) AND CLOSE>变线*1.05 AND GUP1>MA(GUP1,5) AND CLOSE<OPEN AND CLOSE<REF(CLOSE,1) AND HIGH/变线=HHV(HIGH/变线,5);
GUP49:=REF(HHV((HIGH+CLOSE+LOW+HIGH)/4,7),BARSLAST(crOSS(GUP13,GUP8)));
GUP50:=REF(LLV(MIN(OPEN,CLOSE),10),BARSLAST(CROSS(GUP8,GUP13)));
GUP51:=REF(HHV(MAX(CLOSE,OPEN),7),BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5))));
GUP52:=REF(LLV(MIN(CLOSE,OPEN),10),BARSLAST(CROSS(MA(CLOSE,5),MA(CLOSE,10))));
GUP53:=IF(CLOSE>500,GUP51,GUP49);
GUP54:=IF(CLOSE>500,GUP52,GUP50);
GUP55:=EVERY(CLOSE/REF(CLOSE,1)>INDEXC/REF(INDEXC,1),5) OR COUNT(CLOSE/REF(CLOSE,1)>INDEXC/REF(INDEXC,1),9)=8;
GUP56:=COUNT(GUP55,2) AND DYNAINFO(4)>0 AND IF(CLOSE<OPEN,GUP1<REF(VOL,1),1);
GUP57:=REF(MIN(REF(LOW,BARSLAST(GUP44)),REF(HIGH,BARSLAST(GUP44)+1)),1);
GUP58:=MAX(MAX(HHV((HIGH+CLOSE)/2,5),变线+MA(HIGH-变线,GUP42)),IF(变线>REF(变线,1),变线*1.03,变线));
GUP59:=IF(CLOSE<GUP49,MIN(GUP49,GUP58),GUP58);
GUP60:=Abs(LOW-OPEN)<ABS(OPEN-CLOSE) AND CLOSE/REF(CLOSE,1)>1.033 AND REF(CLOSE,1)/REF(CLOSE,2)<1.093 AND REF(CLOSE,2)/REF(CLOSE,3)<1.093 AND REF(CLOSE,3)/REF(CLOSE,4)<1.093 AND REF(CLOSE,4)/REF(CLOSE,5)<1.093 AND REF(CLOSE,5)/REF(CLOSE,6)<1.093 AND NOT(CLOSE=OPEN AND CLOSE/REF(CLOSE,1)>1.033);
GUP61:=ABS(LOW-OPEN)<ABS(OPEN-CLOSE) AND CLOSE/REF(CLOSE,1)>1.093 AND REF(CLOSE,1)/REF(CLOSE,2)<1.093 AND REF(CLOSE,2)/REF(CLOSE,3)<1.093 AND REF(CLOSE,3)/REF(CLOSE,4)<1.093 AND REF(CLOSE,4)/REF(CLOSE,5)<1.093 AND REF(CLOSE,5)/REF(CLOSE,6)<1.093 AND NOT(CLOSE=OPEN AND CLOSE/REF(CLOSE,1)>1.033);
GUP62:=CLOSE/REF(CLOSE,1)>1.033 AND VOL<REF(VOL,1) AND REF(CLOSE,1)/REF(CLOSE,2)<1.093 AND COUNT(CLOSE/REF(CLOSE,1)>1.093,20)<3;
GUP63:=GUP60 OR GUP62 AND COUNT(CLOSE/REF(CLOSE,1)>1.05,10)<=4;
GUP64:=GUP61 OR GUP62 AND COUNT(CLOSE/REF(CLOSE,1)>1.05,10)<=4;
GUP65:=CLOSE-REF(CLOSE,1);
GUP66:=100*EMA(EMA(GUP65,9),9)/EMA(EMA(ABS(GUP65),9),9);
GUP67:=MA(GUP66,5);
GUP68:=GUP66<0 AND GUP67<0;
GUP69:=MA(CLOSE,10);
GUP70:=MA(CLOSE,54);
GUP71:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
GUP72:=FILTER(GUP71,10);
GUP73:=BARSLAST(GUP72);
GUP74:=REF(HIGH,GUP73+2);
GUP75:=REF(HIGH,GUP73+1);
GUP76:=REF(HIGH,GUP73);
GUP77:=MAX(GUP74,GUP75);
GUP78:=MAX(GUP77,GUP76);
GUP79:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
GUP80:=GUP73<150;
GUP81:=(OPEN-GUP78)/GUP78*100<30;
GUP82:=(CLOSE-LLV(LOW,GUP73))/LLV(LOW,GUP73)*100<50;
GUP83:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100<30;
GUP84:=VOL/MA(VOL,5)<3.5;
GUP85:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100<80;
GUP86:=GUP79 AND GUP80 AND GUP81 AND GUP82 AND GUP83 AND GUP84 AND GUP85;
GUP87:=FILTER(GUP86,15);
GUP88:=(CLOSE-GUP70)/GUP70<0.1;
GUP89:=(CLOSE-GUP69)/GUP69<0.3;
GUP90:=(GUP88=1 AND GUP89=1)*0.2;
GUP91:=(GUP90=0 AND REF(GUP90,1)=0.2 AND REF(COUNT(GUP90=0.2,10)=10,1)=1)*(-0.1);
GUP92:=GUP91=(-0.1);
GUP93:=GUP87 OR GUP92;
GUP94:=CLOSE/REF(CLOSE,1)>1.033 AND CLOSE/OPEN>1.033;
GUP95:=VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2);
GUP96:=GUP93 AND CLOSE/REF(CLOSE,1)>1.033 AND GUP95 AND GUP94;
GUP97:=GUP68 AND GUP96 AND GUP63,COLORBLUE;
GUP98:=GUP68 AND GUP96 AND GUP64,COLORRED;
VAR16:=REF(GUP59,1);
VAR18:=变线>GUP53 AND COUNT(CLOSE>变线,5);
STICKLINE(GUP48,OPEN,CLOSE,2,0),COLORBLUE;
箱顶:IF(GUP53=CONST(GUP53),CONST(GUP53),DRAWNULL),COLORBROWN,LINETHICK3;
箱底:IF(GUP54=CONST(GUP54),GUP54,DRAWNULL),COLORBLUE,LINETHICK3;
DRAWTEXT(ISLASTBAR,GUP53,5),COLORBROWN;
DRAWTEXT(ISLASTBAR,GUP54,6),COLORBLUE;
STICKLINE(GUP56,GUP7,GUP7,5,0),COLORMAGENTA;
止赢:IF(CURRBARSCOUNT<=5,CONST(VAR16),DRAWNULL),DOTLINE,COLORMAGENTA;
DRAWTEXT(ISLASTBAR,VAR16,7),COLORMAGENTA;
预埋:IF(ISLASTBAR,GUP59,DRAWNULL),NODRAW,COLORMAGENTA;
止损:IF(GUP57=CONST(GUP57),GUP57,IF(ISLASTBAR,GUP57,DRAWNULL)),DOTLINE,COLORGREEN;
DRAWTEXT(ISLASTBAR,止损,8),COLORGREEN;
IF(VAR18,变线,DRAWNULL),COLOR0045FF;
IF(变线<GUP54,变线,DRAWNULL),COLORCYAN;
DRAWICON(GUP97,L,24);
DRAWICON(GUP98,L,25);





回复

举报

QQ|

GMT+8, 2024-11-27 15:21

快速回复 返回顶部 返回列表