趋势线涨跌一目了然副图指标公式源码[通达信公式]

相关标签:

原理解析：
F1赋值:收盘价25%的之字转向 价差25赋值:如果(F1>1日前的F1),返回-6,否则返回100,画黄色 当满足条件价差25>-80时,在价差25和0位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR663300,线宽为1 A1赋值:2日前的收盘价 A2赋值:收盘价-A1和0的较大值的7日[1日权重]移动平均/收盘价-A1的绝对值的7日[1日权重]移动平均*100 A3赋值:日期 <= 1070615 A4赋值:1日前的最低价 A5赋值:最低价-A4的绝对值的3日[1日权重]移动平均/最低价-A4和0的较大值的3日[1日权重]移动平均*100 A6赋值:如果收盘价*1.3,返回A5*10,否则返回A5/10的3日指数移动平均 A7赋值:29日内最低价的最低值 A8赋值:37日内A6的最高值 A9赋值:如果收盘价的90日简单移动平均,返回1,否则返回0 A10赋值:如果最低价<=A7,返回(A6+A8*2)/2,否则返回0的3日指数移动平均/1688*A9 A11赋值:如果A10>100,返回100,否则返回A10 当满足条件A11时,在0和A11位置之间画柱状线,宽度为4,1不为0则画空心柱. * A3,COLORF00FF0 CCT赋值:总量 AAA赋值: CCT=0的350日过滤 当满足条件AAA时,在10位置书写文字,COLORFF00FF VAR1赋值:((收盘价+最低价)/2-13日内最低价的最低值)/(13日内(最高价+收盘价)/2的最高值-13日内最低价的最低值)*100的3日指数移动平均的7日[1日权重]移动平均-(13) RSV赋值:((13日内最高价的最高值-收盘价)/(13日内最高价的最高值-13日内最低价的最低值)*100)-70 RSV1赋值:(收盘价-9日内最低价的最低值)/(9日内最高价的最高值-9日内最低价的最低值)*100 FATK赋值:RSV1的5日[1日权重]移动平均 输出趋势线:FATK的5日[1日权重]移动平均,线宽为2,COLOR00D300 输出紫快线:(7*(收盘价-13日内最低价的最低值)/(13日内最高价的最高值-13日内最低价的最低值)*30的4日[1日权重]移动平均-3*(收盘价-13日内最低价的最低值)/(13日内最高价的最高值-13日内最低价的最低值)*30的4日[1日权重]移动平均的3日[1日权重]移动平均-(收盘价-13日内最低价的最低值)/(13日内最高价的最高值-13日内最低价的最低值)*30的4日[1日权重]移动平均的3日[1日权重]移动平均的2日[1日权重]移动平均),线宽为2,COLORBB24DB 突破赋值:1日前的收盘价的13日指数移动平均画洋红色,NODRAW A1X赋值:(收盘价的13日指数移动平均-突破)/突破*100,NODRAW 输出出击:如果A1X>=0,返回上次A1X上穿0距今天数+1日前的收盘价的13日指数移动平均,否则返回无效数画黄色,NODRAW 输出休假:如果A1X<0,返回上次0上穿A1X距今天数+1日前的收盘价的13日指数移动平均,否则返回无效数画蓝色,NODRAW 输出持币:如果A1X<0,返回突破,否则返回无效数画绿色,NODRAW 输出主力:以收盘价计算的获利盘比例*100的5日指数移动平均,画红色,线宽为1 输出散户:(以收盘价*1.1计算的获利盘比例-以收盘价*0.9计算的获利盘比例)*100的5日指数移动平均,画黄色,NODRAW 输出吸筹:A11,画淡蓝色 输出获利盘%:以收盘价计算的获利盘比例*100,NODRAW,COLOR00FFFF 输出B13:当满足条件(收盘价3%的之字转向>1日前的收盘价3%的之字转向)AND(1日前的收盘价3%的之字转向<=2日前的收盘价3%的之字转向)AND(2日前的收盘价3%的之字转向<=3日前的收盘价3%的之字转向)时,在-2位置画1号图标 输出S13:当满足条件(收盘价3%的之字转向<1日前的收盘价3%的之字转向)AND(1日前的收盘价3%的之字转向>=2日前的收盘价3%的之字转向)AND(2日前的收盘价3%的之字转向>=3日前的收盘价3%的之字转向)时,在95位置画15号图标 输出B3红绿灯:当满足条件收盘价4%的之字转向上穿1日前的收盘价4%的之字转向时,在5位置书写文字,画绿色 输出B6:当满足条件收盘价8%的之字转向上穿1日前的收盘价8%的之字转向时,在10位置书写文字,画绿色 输出B9:当满足条件收盘价12%的之字转向上穿1日前的收盘价12%的之字转向时,在15位置书写文字,画绿色 输出B12:当满足条件收盘价16%的之字转向上穿1日前的收盘价16%的之字转向时,在20位置书写文字,画绿色 输出B15:当满足条件收盘价20%的之字转向上穿1日前的收盘价20%的之字转向时,在25位置书写文字,画绿色 输出S15:当满足条件1日前的收盘价20%的之字转向上穿收盘价20%的之字转向时,在67位置书写文字,画绿色 输出S12:当满足条件1日前的收盘价16%的之字转向上穿收盘价16%的之字转向时,在72位置书写文字,画绿色 输出S9:当满足条件1日前的收盘价12%的之字转向上穿收盘价12%的之字转向时,在77位置书写文字,画绿色 输出S6:当满足条件1日前的收盘价8%的之字转向上穿收盘价8%的之字转向时,在82位置书写文字,画绿色 输出S3:当满足条件1日前的收盘价4%的之字转向上穿收盘价4%的之字转向时,在88位置书写文字,画绿色 CA1赋值:如果趋势线>80ANDS13,返回1,否则返回0 CA2赋值:如果紫快线<6ANDA2<10ANDB13,返回1,否则返回0 DDA赋值:' 短跌' 当满足条件CA1时,在95位置书写文字,画绿色 DDB赋值:' 短涨' 当满足条件CA2时,在-2位置书写文字,画绿色 当满足条件出击ANDISLASTBAR时,在50位置书写文字,画红色 当满足条件休假ANDISLASTBAR时,在50位置书写文字,画黄色 当满足条件获利盘%>=98ANDISLASTBAR时,在70位置书写文字,画黄色 当满足条件吸筹>=18ANDISLASTBAR时,在70位置书写文字,画黄色 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色

 来源:程序化99（ WWW.CXH99.COM ）

源码：

F1:=ZIG(3,25);
价差25:=IF((F1> REF(F1,1)),-6,100),COLORYELLOW;
STICKLINE(价差25>-80 , 价差25,0 ,4,0),COLOR663300,LINETHICK1;A1:=REF(CLOSE,2);
A2:=SMA(MAX(CLOSE-A1,0),7,1)/SMA(ABS(CLOSE-A1),7,1)*100;
A3:=DATE <= 1070615;
A4:=REF(LOW,1);
A5:=SMA(ABS(LOW-A4),3,1)/SMA(MAX(LOW-A4,0),3,1)*100;
A6:=EMA(IF(CLOSE*1.3,A5*10,A5/10),3);
A7:=LLV(LOW,29);
A8:=HHV(A6,37);
A9:=IF(MA(CLOSE,90),1,0);
A10:=EMA(IF(LOW<=A7,(A6+A8*2)/2,0),3)/1688*A9;
A11:=IF(A10>100,100,A10);
STICKLINE(A11,0,A11,4,1) * A3,COLORF00FF0;CCT:=DYNAINFO(8);
AAA:= FILTER(CCT=0,350) ;
DRAWTEXT(AAA,10,'此股今日未开盘,不能分析'),COLORFF00FF;
VAR1:=SMA(EMA(((C+L)/2-LLV(L,13))/(HHV((H+C)/2,13)-LLV(L,13))*100,3),7,1)-(13);
RSV:=((HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100)-70;
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
FATK:=SMA(RSV1,5,1);
趋势线:SMA(FATK,5,1),LINETHICK2,COLOR00D300;
紫快线:(7*SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1),2,1)),LINETHICK2,COLORBB24DB;
突破:=REF(EMA(C,13),1)COLORMAGENTA,NODRAW;
A1X:=(EMA(C,13)-突破)/突破*100,NODRAW;
出击:IF(A1X>=0,REF(EMA(C,13),BARSLAST(CROSS(A1X,0))+1),DRAWNULL)COLORYELLOW,NODRAW;
休假:IF(A1X<0,REF(EMA(C,13),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORBLUE,NODRAW;
持币:IF(A1X<0,突破,DRAWNULL)COLORGREEN,NODRAW;主力:EMA(WINNER(C)*100,5),COLORRED,LINETHICK1;
散户:EMA((WINNER(C*1.1)-WINNER(C*0.9))*100,5),COLORYELLOW,NODRAW;
吸筹:A11,COLORLIBLUE;获利盘%:WINNER(CLOSE)*100,NODRAW,COLOR00FFFF;B13:DRAWICON((ZIG(3,3)>REF(ZIG(3,3),1)) AND (REF(ZIG(3,3),1)<=REF(ZIG(3,3),2)) AND (REF(ZIG(3,3),2)<=REF(ZIG(3,3),3)),-2,1) ;
S13:DRAWICON((ZIG(3,3)<REF(ZIG(3,3),1)) AND (REF(ZIG(3,3),1)>=REF(ZIG(3,3),2)) AND (REF(ZIG(3,3),2)>=REF(ZIG(3,3),3)),95,15);B3:DRAWTEXT(CROSS(ZIG(3,4),REF(ZIG(3,4),1)),5,'20'),COLORGREEN;
B6:DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),10,'40'),COLORGREEN;
B9:DRAWTEXT(CROSS(ZIG(3,12),REF(ZIG(3,12),1)),15,'60'),COLORGREEN;
B12:DRAWTEXT(CROSS(ZIG(3,16),REF(ZIG(3,16),1)),20,'80'),COLORGREEN;
B15:DRAWTEXT(CROSS(ZIG(3,20),REF(ZIG(3,20),1)),25,'100'),COLORGREEN;
S15:DRAWTEXT(CROSS(REF(ZIG(3,20),1),ZIG(3,20)),67,'-100'),COLORGREEN;
S12:DRAWTEXT(CROSS(REF(ZIG(3,16),1),ZIG(3,16)),72,'-80'),COLORGREEN;
S9:DRAWTEXT(CROSS(REF(ZIG(3,12),1),ZIG(3,12)),77,'-60'),COLORGREEN;
S6:DRAWTEXT(CROSS(REF(ZIG(3,8),1),ZIG(3,8)),82,'-40'),COLORGREEN;
S3:DRAWTEXT(CROSS(REF(ZIG(3,4),1),ZIG(3,4)),88,'-20'),COLORGREEN;
CA1:=IF( 趋势线>80 AND S13,1,0);
CA2:=IF( 紫快线<6 AND A2<10 AND B13,1,0);
DDA:=' 短跌';
DRAWTEXT(CA1,95,DDA),COLORGREEN;
DDB:=' 短涨';
DRAWTEXT(CA2,-2,DDB),COLORGREEN;DRAWTEXT(出击 AND ISLASTBAR,50,' 短线出击'),COLORRED;
DRAWTEXT(休假 AND ISLASTBAR,50,' 短线休假'),COLORYELLOW;
DRAWTEXT(获利盘%>=98 AND ISLASTBAR,70,' 获利想走'),COLORYELLOW;
DRAWTEXT(吸筹>=18 AND ISLASTBAR,70,' 适当吸筹'),COLORYELLOW;DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】