P1赋值:3
P2赋值:6
P3赋值:18
P4赋值:250
DRAWGBKLAST(收盘价>收盘价的5日指数移动平均 ,STRIP(自定色,自定色,1))
DRAWGBKLAST(收盘价<=收盘价的5日指数移动平均,STRIP(自定色,自定色,1))
DRAWGBKLAST(收盘价<=收盘价的10日指数移动平均,STRIP(自定色,自定色,1))
DRAWGBKLAST(收盘价<=收盘价的20日指数移动平均,STRIP(自定色,自定色,1))
LL赋值:1日前的最低价
HH赋值:1日前的最高价
SQK赋值:最低价>HH
XQK赋值:最高价<LL
当满足条件SQK时,在最低价和HH位置之间画柱状线,宽度为4*5,1不为0则画空心柱.,画黄色
当满足条件XQK时,在最高价和LL位置之间画柱状线,宽度为4*5,2不为0则画空心柱.,画绿色
A10304赋值:3日前的最高价=2*3+1日内最高价的最高值
B10304赋值:A10304的3日过滤
C10304赋值:若B10304则将最近3+1周期置为1
D10304赋值:C10304的3日过滤
A20304赋值:3日前的最低价=2*3+1日内最低价的最低值
B20304赋值:A20304的3日过滤
C20304赋值:若B20304则将最近3+1周期置为1
D20304赋值:C20304的3日过滤
E10304赋值:(1日前的2*3日内最低价的最低值+1日前的2*3日内最高价的最高值)/2
E20304赋值:(最高价+最低价)/2
H10304赋值:(D10304 AND 取反) OR 数据位置状态=2 OR 收盘价的有效数据周期数=1
L10304赋值:(D20304 AND 取反)
X10304赋值:1日前的上次H10304距今天数+1
F10304赋值:若H10304ANDCOUNT(L10304,X10304)>0则将最近X10304日内如果L10304,返回最低价,否则返回10000距今天数周期置为1
G10304赋值:F10304>1日前的F10304
I10304赋值:若G10304则将最近2周期置为1
LD0304赋值:I10304>1日前的I10304
L20304赋值:LD0304 OR 数据位置状态=2 OR 收盘价的有效数据周期数=1
X20304赋值:1日前的上次L20304距今天数+1
F20304赋值:若L20304ANDCOUNT(H10304,X20304)>0则将最近X20304日内如果H10304,返回最高价,否则返回0距今天数周期置为1
G20304赋值:F20304>1日前的F20304
I20304赋值:若G20304则将最近2周期置为1
HD0304赋值:I20304>1日前的I20304
UU0304赋值:若数据位置状态=2则将最近上次LD0304距今天数+1周期置为1
VV0304赋值:UU0304>1日前的UU0304
UU20304赋值:若数据位置状态=2则将最近上次HD0304距今天数+1周期置为1
VV20304赋值:UU20304>1日前的UU20304
输出底:上次VV0304距今天数日前的最低价,画红色,线宽为1
输出顶:上次VV20304距今天数日前的最高价,画绿色,线宽为1
当满足条件VV0304时,在顶和底位置之间画柱状线,宽度为0,0不为0则画空心柱.,画红色,线宽为3
当满足条件VV20304时,在最高价位置画直线起点,当满足条件VV0304时,在最低价位置画直线终点,0表示是否延长.,画红色,线宽为3
当满足条件VV20304时,在最高价位置画直线起点,当满足条件VV0304时,在顶位置画直线终点,0表示是否延长.,画红色,线宽为3
当满足条件VV20304时,在顶和底位置之间画柱状线,宽度为0,0不为0则画空心柱.,画绿色,线宽为2
当满足条件VV0304时,在最低价位置画直线起点,当满足条件VV20304时,在最高价位置画直线终点,0表示是否延长.,画绿色,线宽为2
当满足条件VV0304时,在最低价位置画直线起点,当满足条件VV20304时,在底位置画直线终点,0表示是否延长.,画绿色,线宽为2
NN304赋值: DISPSTATUS=2
当满足条件NN304时,在底位置书写文字,ALIGN2,画红色,线宽为1,VALIGN0
当满足条件NN304时,在顶位置书写文字,ALIGN2,画绿色,线宽为1,VALIGN2
TY309赋值:收盘价
HD309赋值:若10日前的TY309=2*10+1日内TY309的最高值的10日过滤则将最近10+1周期置为1的10日过滤
LD309赋值:若10日前的TY309=2*10+1日内TY309的最低值的10日过滤则将最近10+1周期置为1的10日过滤
A309赋值:上次HD309距今天数日前的收盘价
B309赋值:上次LD309距今天数日前的收盘价
T1309赋值:上次HD309距今天数<上次LD309距今天数 AND 取反
T2309赋值:上次HD309距今天数>上次LD309距今天数 AND 取反
输出波浪顶:如果T1309,返回A309,否则返回A309,画青色,POINTDOT,线宽为2
输出波浪底:如果T2309,返回B309,否则返回B309,画洋红色,POINTDOT,线宽为2
A赋值:3日内(最低价+最高价+收盘价)/3的3日简单移动平均的最高值
B赋值:10日内(最低价+最高价+收盘价)/3的3日简单移动平均的最低值
当满足条件DISPSTATUS=2时,在A和A位置之间画柱状线,宽度为20,0不为0则画空心柱.,画黄色,线宽为1
当满足条件DISPSTATUS=2时,在A位置书写文字,画黄色
当满足条件DISPSTATUS=2时,在B和B位置之间画柱状线,宽度为20,0不为0则画空心柱.,画白色,线宽为1
当满足条件DISPSTATUS=2时,在B位置书写文字,画白色
K1赋值:上次DISPSTATUS=1距今天数+1日内最低价的最低值
AA1赋值:获利盘为95%的成本分布
AA2赋值:获利盘为5%的成本分布
LY赋值:(AA1-AA2)*100/(AA1+AA2)
N赋值:P1
A1赋值:N日前的最高价=2*N+1日内最高价的最高值
B1赋值:A1的N日过滤
C1赋值:若B1则将最近N+1周期置为1
D1赋值:C1的N日过滤
A2赋值:N日前的最低价=2*N+1日内最低价的最低值
B2赋值:A2的N日过滤
C2赋值:若B2则将最近N+1周期置为1
D2赋值:C2的N日过滤
E1赋值:(1日前的2*N日内最低价的最低值+1日前的2*N日内最高价的最高值)/2
E2赋值:(最高价+最低价)/2
H1赋值:(D1 AND 取反) OR DISPSTATUS=2 OR 收盘价的有效数据周期数=1
L1赋值:(D2 AND 取反)
H2赋值:D1 AND 取反
X1赋值:1日前的上次H1距今天数+1
F1赋值:若H1ANDCOUNT(L1,X1)>0则将最近X1日内如果L1,返回最低价,否则返回10000距今天数周期置为1
G1赋值:F1>1日前的F1
I1赋值:若G1则将最近2周期置为1
LD赋值:I1>1日前的I1
L2赋值:LD OR DISPSTATUS=2 OR 收盘价的有效数据周期数=1
X2赋值:1日前的上次L2距今天数+1
F2赋值:若L2ANDCOUNT(H2,X2)>0则将最近X2日内如果H2,返回最高价,否则返回0距今天数周期置为1
G2赋值:F2>1日前的F2
I2赋值:若G2则将最近2周期置为1
HD赋值:I2>1日前的I2
R1赋值:若DISPSTATUS=2则将最近上次HD距今天数+1周期置为1
S1赋值:R1>1日前的R1
T1赋值:若DISPSTATUS=2则将最近上次LD距今天数+1周期置为1
U1赋值:T1>1日前的T1
R2赋值:若S1则将最近1日前的上次HD距今天数+2周期置为1
S2赋值:R2>1日前的R2
T2赋值:若U1则将最近1日前的上次LD距今天数+2周期置为1
U2赋值:T2>1日前的T2
T3赋值:若U2则将最近1日前的上次LD距今天数+2周期置为1
U3赋值:T3>1日前的T3
T4赋值:若U3则将最近1日前的上次LD距今天数+2周期置为1
U4赋值:T4>1日前的T4
R3赋值:若S2则将最近1日前的上次HD距今天数+2周期置为1
S3赋值:R3>1日前的R3
R4赋值:若S3则将最近1日前的上次HD距今天数+2周期置为1
S4赋值:R4>1日前的R4
当满足条件S2时,在最高价位置画直线起点,当满足条件S1时,在最高价位置画直线终点,1表示是否延长.,COLOR80FFFF
当满足条件U2时,在最低价位置画直线起点,当满足条件U1时,在最低价位置画直线终点,1表示是否延长.,POINTDOT,COLOR00FFFF,线宽为1
当满足条件S3时,在最高价位置画直线起点,当满足条件S2时,在最高价位置画直线终点,1表示是否延长.,COLORFF8000
当满足条件U3时,在最低价位置画直线起点,当满足条件U2时,在最低价位置画直线终点,1表示是否延长.,POINTDOT,COLORFF8000
当满足条件S4时,在最高价位置画直线起点,当满足条件S3时,在最高价位置画直线终点,1表示是否延长.,COLOR0000FF
当满足条件U4时,在最低价位置画直线起点,当满足条件U3时,在最低价位置画直线终点,1表示是否延长.,POINTDOT,COLOR0000FF
当满足条件S2时,在最高价*1.02位置画9号图标
当满足条件S3时,在最高价*1.02位置画9号图标
当满足条件S2时,在最高价*1.035位置书写文字,画洋红色,线宽为2
当满足条件S1时,在最高价*1.035位置书写文字,画洋红色,线宽为2
当满足条件S3时,在最高价*1.035位置书写文字,画洋红色,线宽为2
当满足条件U1时,在最低价*0.98位置画10号图标
当满足条件U2时,在最低价*0.98位置画10号图标
当满足条件U3时,在最低价*0.98位置画10号图标
当满足条件U4时,在最低价*0.98位置画10号图标
当满足条件U1时,在最低价*0.96位置书写文字,画青色,线宽为2
当满足条件U2时,在最低价*0.96位置书写文字,画青色,线宽为2
当满足条件U3时,在最低价*0.96位置书写文字,画青色,线宽为2
当满足条件U4时,在最低价*0.96位置书写文字,画青色,线宽为2
DRAWTEXTABS(20,5,'所属板块:'+BKNAME),画黄色
流通盘大小赋值:FINANCE2(37)/1000000*100
DRAWTEXTABS(20,25,'上市日期:'+STR(FINANCE2(2))+'日'),画黄色
DRAWTEXTABS(180,25,'总股本:'+NUMTOSTR(FINANCE2(35)/10000 )+'亿'),画黄色
DRAWTEXTABS(320,25,'流通股:'+ NUMTOSTR(当前流通股本(手)/1000000)+'亿'),画黄色
DRAWTEXTABS(460,25,'限售A股:'+ NUMTOSTR(FINANCE2(41)/10000)+'亿'),画黄色
每股收益赋值:FINANCE2(3)
每股市盈率赋值:市盈(动)
每股净资产赋值:FINANCE2(4)
销售毛利率赋值:FINANCE2(12)
主营收入同比赋值:FINANCE2(11)
净利润同比增长赋值:FINANCE2(10)
每股公积金赋值:FINANCE2(7)
每股未分配赋值:FINANCE2(8)
DRAWTEXTABS(20,45,'销售毛利率:'+NUMTOSTRN(销售毛利率,2)+'%'),画绿色
DRAWTEXTABS(20,65,'主营收入同比增长:'+NUMTOSTRN(主营收入同比,2)+'%'),画绿色
DRAWTEXTABS(20,85,'净利润同比增长:'+NUMTOSTRN(净利润同比增长,2)+'%'),画绿色
DRAWTEXTABS(20,105,'每股公积金:'+NUMTOSTRN(每股公积金,2)+'元'),画绿色
DRAWTEXTABS(180,45,'每股收益:'+NUMTOSTRN(每股收益,2)+ '元'),画红色
DRAWTEXTABS(180,65,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),画红色
DRAWTEXTABS(180,85,'每股净资产:'+NUMTOSTRN(每股净资产,2)+'元'),画红色
DRAWTEXTABS(180,105,'每股未分配:'+NUMTOSTRN(每股未分配,2)+'元'),画红色
N1赋值:上次收盘价上穿收盘价的60日简单移动平均距今天数
N2赋值:上次收盘价的60日简单移动平均上穿收盘价距今天数
建仓成本赋值:MAXCYC
日换手率赋值:(成交量(手)*100/当前流通股本(手))
5日换手率赋值:日换手率的5日累和
5日均量赋值:市盈(静)
压力位赋值:以成交量(手)/(100*FINANCE2(37))为权重成交额(元)/(100*成交量(手))的动态移动平均*1.12
强股排序赋值:如果N1<N2,返回N1+1,否则返回0
输出DRAWTEXTABS(320,45,'日换手率:'+NUMTOSTRN(日换手率,3)),COLORF200F2
输出DRAWTEXTABS(460,45,'5日换手率:'+NUMTOSTRN(5日换手率,3)),COLORF200F2
输出DRAWTEXTABS(320,65,'5日均量:'+NUMTOSTRN(5日均量,0)+'手'),COLORF200F2
输出DRAWTEXTABS(460,65,'平均成本:'+NUMTOSTRN(建仓成本,2)+'元'),COLORF200F2
输出DRAWTEXTABS(320,85,'股价上穿60均线:'+NUMTOSTRN(强股排序,0)+'天'),COLORF200F2
输出DRAWTEXTABS(460,85,'心理成本压力:'+NUMTOSTRN(压力位,2)+'元'),COLORF200F2
DRAWTEXTABS(320,105,'上涨家数:'+NUMTOSTRN(大盘的上涨家数,0)),COLORF200F2
DRAWTEXTABS(460,105,'下跌家数:'+NUMTOSTRN(大盘的下跌家数,0)),COLORF200F2
DRAWTEXTABS(5,260,'【红三角】〓回调企稳形态【突破红三角后的回踩为 假摔】〓'),画红色,线宽为2
DRAWTEXTABS(5,285,'【红三角】〓回调企稳形态【画完介入&突破介入】〓'),画红色,线宽为2
DRAWTEXTABS(5,310,'【绿三角】〓突破前高形态【画完出局】〓'),画绿色,线宽为2
DRAWTEXTABS(5,335,'【绿三角】〓突破前高形态【未突破绿三角顶端的回调为 真摔】〓'),画绿色,线宽为2
ST赋值:STRFIND(品种名称,'ST',1)
ZF赋值:(收盘价-1日前的收盘价)/1日前的收盘价*100
涨停赋值:如果ST>0,返回ZF>=4.94,否则返回ZF>=9.88
跌停赋值:如果ST>0,返回ZF<=-4.94,否则返回ZF<=-9.88
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为15,0不为0则画空心柱.,COLOR004444
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为13,0不为0则画空心柱.,COLOR004444
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为11,0不为0则画空心柱.,COLOR004444
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLOR004444
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLOR005555
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR006666
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR007777
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR009999
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00BBBB
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00DDDD
当满足条件涨停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00FFFF
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为15,0不为0则画空心柱.,COLOR333333
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为13,0不为0则画空心柱.,COLOR333333
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为11,0不为0则画空心柱.,COLOR333333
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLOR333333
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLOR444444
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR555555
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR777777
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR999999
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORBBBBBB
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORDDDDDD
当满足条件跌停>=1时,在开盘价和收盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFFFFFF
三连阴赋值: 统计3日中满足收盘价<=开盘价的天数>2 AND 1日前的收盘价<2日前的收盘价
二缩量赋值:成交量(手)<=1日前的成交量(手) AND 1日前的成交量(手)<2日前的成交量(手)
三阴赋值:1日前的ALL(收盘价<1日前的收盘价,2)ANDALL(收阴线,2) AND 收盘价-开盘价的绝对值/开盘价<0.03AND (收盘价-1日前的收盘价)/收盘价*100的7日累和<-8 AND 二缩量 AND 如果收阳线,返回收盘价/开盘价<1日前的开盘价/收盘价,否则返回开盘价/收盘价<1日前的开盘价/收盘价ANDREF(开盘价/收盘价<1日前的开盘价/收盘价,1)
当满足条件三阴时,在最高价*1.01位置书写文字,COLOR00DDDD
RC1赋值:1日前的收盘价
比前跌率赋值:(RC1-收盘价)*100/RC1
长上影赋值:(最高价-收盘价和开盘价的较大值)/(最高价-最低价)>=0.618
不大跌赋值: 比前跌率<=2
长阴短柱赋值:比前跌率>=4 AND 成交量(手)<30日内成交量(手)的最高值/1.9
长腿赋值:(收盘价和开盘价的较小值-最低价)/(最高价-最低价)>=0.382
点左峰赋值:1
XG1赋值: 2日前的长上影AND不大跌>0AND 1日前的长阴短柱>0AND 长腿 AND 点左峰
三长假跌赋值: 统计3日中满足XG1的天数
当满足条件三长假跌时,在最低价*0.99位置书写文字,COLORF00FF0
长阴短柱赋值:收盘价/1日前的收盘价<0.95 AND 成交量(手)<30日内成交量(手)的最高值/1.9
当满足条件长阴短柱时,在最低价*0.99位置书写文字
假阴真阳赋值:成交量(手)>1日前的成交量(手)*1.5 AND 开盘价>1日前的收盘价 AND 收阴线AND 收盘价>1日前的收盘价
当满足条件假阴真阳时,在最低价*0.99位置书写文字
假阳真阴赋值:收阳线AND 收盘价<1日前的收盘价
当满足条件假阳真阴时,在最高价*1.01位置书写文字
程序源码
P1:=3;
P2:=6;
P3:=18;
P4:=250;
DRAWGBKLAST(C>EMA(C,5) ,STRIP(RGB(0,0,80),RGB(80,0,0),1));
DRAWGBKLAST(C<=EMA(C,5),STRIP(RGB(0,0,80),RGB(40,40,0),1));
DRAWGBKLAST(C<=EMA(C,10),STRIP(RGB(0,0,180),RGB(0,80,0),1));
DRAWGBKLAST(C<=EMA(C,20),STRIP(RGB(0,0,80),RGB(0,0,0),1));
{缺口}
LL:=REF(L,1);
HH:=REF(H,1);
SQK:=L>HH;
XQK:=H<LL;
{DRAWTEXT(SQK,L*0.92,' 上跳'),COLORYELLOW;
DRAWTEXT(XQK,H*1.08,' 逃命'),COLORGREEN;}
STICKLINE(SQK,L,HH,4*5,1),COLORYELLOW;
STICKLINE(XQK,H,LL,4*5,2),COLORGREEN;
{红绿三角【副图】}
A10304:=REF(HIGH,3)=HHV(HIGH,2*3+1);
B10304:=FILTER(A10304,3);
C10304:=BACKSET(B10304,3+1);
D10304:=FILTER(C10304,3);{高点}
A20304:=REF(LOW,3)=LLV(LOW,2*3+1);
B20304:=FILTER(A20304,3);
C20304:=BACKSET(B20304,3+1);
D20304:=FILTER(C20304,3);{低点}
E10304:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;
E20304:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}
H10304:=(D10304 AND NOT(D20304 AND E10304>=E20304)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
L10304:=(D20304 AND NOT(D10304 AND E10304=E20304));
X10304:=REF(BARSLAST(H10304),1)+1;
F10304:=BACKSET(H10304 AND COUNT(L10304,X10304)>0,LLVBARS(IF(L10304,LOW,10000),X10304));
G10304:=F10304>REF(F10304,1);
I10304:=BACKSET(G10304,2);
LD0304:=I10304>REF(I10304,1);{过滤后低点}
L20304:=LD0304 OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
X20304:=REF(BARSLAST(L20304),1)+1;
F20304:=BACKSET(L20304 AND COUNT(H10304,X20304)>0,HHVBARS(IF(H10304,HIGH,0),X20304));
G20304:=F20304>REF(F20304,1);
I20304:=BACKSET(G20304,2);
HD0304:=I20304>REF(I20304,1);{过滤后高点}
UU0304:=BACKSET(BARSTATUS=2,BARSLAST(LD0304)+1);
VV0304:=UU0304>REF(UU0304,1);
UU20304:=BACKSET(BARSTATUS=2,BARSLAST(HD0304)+1);
VV20304:=UU20304>REF(UU20304,1);
{以下语句为三角形部分}
底:REF(L,BARSLAST(VV0304)),COLORRED,LINETHICK1;
顶:REF(H,BARSLAST(VV20304)),COLORGREEN,LINETHICK1;
{下跌三角形:红色三角形画完介入}
STICKLINE(VV0304,顶,底,0,0),COLORRED,LINETHICK3;
DRAWLINE(VV20304,H,VV0304,L,0),COLORRED,LINETHICK3;{斜}
DRAWLINE(VV20304,H,VV0304,顶,0),COLORRED,LINETHICK3;
{上涨三角形:绿色三角形画完出局}
STICKLINE(VV20304 ,顶,底,0,0),COLORGREEN,LINETHICK2;
DRAWLINE(VV0304,L,VV20304,H,0),COLORGREEN,LINETHICK2;{斜}
DRAWLINE(VV0304,L,VV20304,底,0),COLORGREEN,LINETHICK2;
{文字}
NN304:= DISPSTATUS=2;
DRAWTEXT(NN304,底,'底: '+NUMTOSTRN(底,2)+'元 '),ALIGN2,COLORRED,LINETHICK1,VALIGN0;
DRAWTEXT(NN304,顶,'顶: '+NUMTOSTRN(顶,2)+'元 '),ALIGN2,COLORGREEN,LINETHICK1,VALIGN2;
{箱体}
TY309:=C;
HD309:=FILTER(BACKSET(FILTER(REF(TY309,10)=HHV(TY309,2*10+1),10),10+1),10);
LD309:=FILTER(BACKSET(FILTER(REF(TY309,10)=LLV(TY309,2*10+1),10),10+1),10);
A309:=REF(C,BARSLAST(HD309));
B309:=REF(C,BARSLAST(LD309));
T1309:=BARSLAST(HD309)<BARSLAST(LD309) AND NOT(HD309) ;
T2309:=BARSLAST(HD309)>BARSLAST(LD309) AND NOT(LD309);
波浪顶:IF(T1309,A309,A309),COLORCYAN,POINTDOT,LINETHICK2;
波浪底:IF(T2309,B309,B309),COLORMAGENTA,POINTDOT,LINETHICK2;
A:=HHV(MA((L+H+C)/3,3),3);
B:=LLV(MA((L+H+C)/3,3),10);
STICKLINE(DISPSTATUS=2,A,A,20,0),COLORYELLOW,LINETHICK1;{小箱体--上沿}
DRAWTEXT(DISPSTATUS=2 ,A,NUMTOSTRN(A,3)),COLORYELLOW;
STICKLINE(DISPSTATUS=2,B,B,20,0),COLORWHITE,LINETHICK1;{小箱体--下沿}
DRAWTEXT(DISPSTATUS=2,B,NUMTOSTRN(B,3)),COLORWHITE;
K1:=LLV(L,BARSLAST(DISPSTATUS=1)+1);
AA1:=COST(95);
AA2:=COST(5);
LY:=(AA1-AA2)*100/(AA1+AA2);
N:=P1;{原码 N:=3;}
A1:=REF(H,N)=HHV(H,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);{高点}
A2:=REF(L,N)=LLV(L,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);{低点}
E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2;
E2:=(H+L)/2;{高低点出现在同一K线上时可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR DISPSTATUS=2 OR BARSCOUNT(C)=1;
L1:=(D2 AND NOT(D1 AND E1<E2));
H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1));
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,2);
LD:=I1>REF(I1,1);{过滤后低点}
L2:=LD OR DISPSTATUS=2 OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2));
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,2);
HD:=I2>REF(I2,1);{过滤后高点}
R1:=BACKSET(DISPSTATUS=2,BARSLAST(HD)+1); S1:=R1>REF(R1,1); {前一高}
T1:=BACKSET(DISPSTATUS=2,BARSLAST(LD)+1); U1:=T1>REF(T1,1); {前一低}
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2); S2:=R2>REF(R2,1); {前二高}
T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2); U2:=T2>REF(T2,1); {前二低}
T3:=BACKSET(U2,REF(BARSLAST(LD),1)+2); U3:=T3>REF(T3,1); {前三低}
T4:=BACKSET(U3,REF(BARSLAST(LD),1)+2); U4:=T4>REF(T4,1); {前四低}
R3:=BACKSET(S2,REF(BARSLAST(HD),1)+2); S3:=R3>REF(R3,1); {前三高}
R4:=BACKSET(S3,REF(BARSLAST(HD),1)+2); S4:=R4>REF(R4,1); {前四高}
DRAWLINE(S2,H,S1,H,1),COLOR80FFFF; {★压力1:}
DRAWLINE(U2,L,U1,L,1),POINTDOT,COLOR00FFFF,LINETHICK1;{★支撑1:}
DRAWLINE(S3,H,S2,H,1),COLORFF8000; {★压力2:}
DRAWLINE(U3,L,U2,L,1),POINTDOT,COLORFF8000;{★支撑2:}
DRAWLINE(S4,H,S3,H,1),COLOR0000FF;{★压力3:}
DRAWLINE(U4,L,U3,L,1),POINTDOT,COLOR0000FF;{★支撑3:};
DRAWICON(S2,H*1.02,9);{高点红电池}
DRAWICON(S3,H*1.02,9);
DRAWTEXT(S2,H*1.035,NUMTOSTRN(H,2)),COLORMAGENTA,LINETHICK2;{高价点位}
DRAWTEXT(S1,H*1.035,NUMTOSTRN(H,2)),COLORMAGENTA,LINETHICK2;{高价点位}
DRAWTEXT(S3,H*1.035,NUMTOSTRN(H,2)),COLORMAGENTA,LINETHICK2;{高价点位}
DRAWICON(U1,L*0.98,10); {低点小红旗}
DRAWICON(U2,L*0.98,10);{低点小红旗}
DRAWICON(U3,L*0.98,10);{低点小红旗}
DRAWICON(U4,L*0.98,10);{低点小红旗}
DRAWTEXT(U1,L*0.96,NUMTOSTRN(L,2)),COLORCYAN,LINETHICK2;{低价点位}
DRAWTEXT(U2,L*0.96,NUMTOSTRN(L,2)),COLORCYAN,LINETHICK2;{低价点位}
DRAWTEXT(U3,L*0.96,NUMTOSTRN(L,2)),COLORCYAN,LINETHICK2;{低价点位}
DRAWTEXT(U4,L*0.96,NUMTOSTRN(L,2)),COLORCYAN,LINETHICK2;{低价点位}
{K线变色}
{STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF00FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLORFF44FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLORFF88FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLORFFAAFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF;};
{基本面}
DRAWTEXTABS(20,5,'所属板块:'+BKNAME),COLORYELLOW;
流通盘大小:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(20,25,'上市日期:'+STR(FINANCE2(2))+'日'),COLORYELLOW;
DRAWTEXTABS(180,25,'总股本:'+NUMTOSTR(FINANCE2(35)/10000 )+'亿'),COLORYELLOW;
DRAWTEXTABS(320,25,'流通股:'+ NUMTOSTR(CAPITAL/1000000)+'亿'),COLORYELLOW;
DRAWTEXTABS(460,25,'限售A股:'+ NUMTOSTR(FINANCE2(41)/10000)+'亿'),COLORYELLOW;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股净资产:=FINANCE2(4);
销售毛利率:=FINANCE2(12);
主营收入同比:=FINANCE2(11);
净利润同比增长:=FINANCE2(10);
每股公积金:=FINANCE2(7);
每股未分配:=FINANCE2(8);
DRAWTEXTABS(20,45,'销售毛利率:'+NUMTOSTRN(销售毛利率,2)+'%'),COLORGREEN;
DRAWTEXTABS(20,65,'主营收入同比增长:'+NUMTOSTRN(主营收入同比,2)+'%'),COLORGREEN;
DRAWTEXTABS(20,85,'净利润同比增长:'+NUMTOSTRN(净利润同比增长,2)+'%'),COLORGREEN;
DRAWTEXTABS(20,105,'每股公积金:'+NUMTOSTRN(每股公积金,2)+'元'),COLORGREEN;
DRAWTEXTABS(180,45,'每股收益:'+NUMTOSTRN(每股收益,2)+ '元'),COLORRED;
DRAWTEXTABS(180,65,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),COLORRED;
DRAWTEXTABS(180,85,'每股净资产:'+NUMTOSTRN(每股净资产,2)+'元'),COLORRED;
DRAWTEXTABS(180,105,'每股未分配:'+NUMTOSTRN(每股未分配,2)+'元'),COLORRED;
N1:=BARSLAST(CROSS(C,MA(C,60)));
N2:=BARSLAST(CROSS(MA(C,60),C));
建仓成本:=MAXCYC;
日换手率:=(VOL*100/CAPITAL);;
5日换手率:=SUM(日换手率,5);;
5日均量:=DYNAINFO(38);
压力位:=DMA(AMOUNT/(100*VOL),VOL/(100*FINANCE2(37)))*1.12;
强股排序:=IF(N1<N2,N1+1,0);
DRAWTEXTABS(320,45,'日换手率:'+NUMTOSTRN(日换手率,3)),COLORF200F2;
DRAWTEXTABS(460,45,'5日换手率:'+NUMTOSTRN(5日换手率,3)),COLORF200F2;
DRAWTEXTABS(320,65,'5日均量:'+NUMTOSTRN(5日均量,0)+'手'),COLORF200F2;
DRAWTEXTABS(460,65,'平均成本:'+NUMTOSTRN(建仓成本,2)+'元'),COLORF200F2;
DRAWTEXTABS(320,85,'股价上穿60均线:'+NUMTOSTRN(强股排序,0)+'天'),COLORF200F2;
DRAWTEXTABS(460,85,'心理成本压力:'+NUMTOSTRN(压力位,2)+'元'),COLORF200F2;
DRAWTEXTABS(320,105,'上涨家数:'+NUMTOSTRN(INDEXADV,0)),COLORF200F2;
DRAWTEXTABS(460,105,'下跌家数:'+NUMTOSTRN(INDEXDEC,0)),COLORF200F2;
DRAWTEXTABS(5,260,'【红三角】〓回调企稳形态【突破红三角后的回踩为 假摔】〓'),COLORRED,LINETHICK2;
DRAWTEXTABS(5,285,'【红三角】〓回调企稳形态【画完介入&突破介入】〓'),COLORRED,LINETHICK2;
DRAWTEXTABS(5,310,'【绿三角】〓突破前高形态【画完出局】〓'),COLORGREEN,LINETHICK2;
DRAWTEXTABS(5,335,'【绿三角】〓突破前高形态【未突破绿三角顶端的回调为 真摔】〓'),COLORGREEN,LINETHICK2;
ST:=STRFIND(STKNAME,'ST',1);
ZF:=(C-REF(C,1))/REF(C,1)*100;
涨停:=IF(ST>0,ZF>=4.94,ZF>=9.88);
跌停:=IF(ST>0,ZF<=-4.94,ZF<=-9.88);
{涨停金柱}
STICKLINE(涨停>=1,O,C,15,0),COLOR004444;
STICKLINE(涨停>=1,O,C,13,0),COLOR004444;
STICKLINE(涨停>=1,O,C,11,0),COLOR004444;
STICKLINE(涨停>=1,O,C,10,0),COLOR004444;
STICKLINE(涨停>=1,O,C,7,0),COLOR005555;
STICKLINE(涨停>=1,O,C,6,0),COLOR006666;
STICKLINE(涨停>=1,O,C,5,0),COLOR007777;
STICKLINE(涨停>=1,O,C,4,0),COLOR009999;
STICKLINE(涨停>=1,O,C,3,0),COLOR00BBBB;
STICKLINE(涨停>=1,O,C,2,0),COLOR00DDDD;
STICKLINE(涨停>=1,O,C,1,0),COLOR00FFFF;
{DRAWTEXT(涨停>0,L*1.01,'↖涨停'),COLOR00FFFF;}
{跌停银柱}
STICKLINE(跌停>=1,O,C,15,0),COLOR333333;
STICKLINE(跌停>=1,O,C,13,0),COLOR333333;
STICKLINE(跌停>=1,O,C,11,0),COLOR333333;
STICKLINE(跌停>=1,O,C,10,0),COLOR333333;
STICKLINE(跌停>=1,O,C,7,0),COLOR444444;
STICKLINE(跌停>=1,O,C,6,0),COLOR555555;
STICKLINE(跌停>=1,O,C,5,0),COLOR777777;
STICKLINE(跌停>=1,O,C,4,0),COLOR999999;
STICKLINE(跌停>=1,O,C,3,0),COLORBBBBBB;
STICKLINE(跌停>=1,O,C,2,0),COLORDDDDDD;
STICKLINE(跌停>=1,O,C,1,0),COLORFFFFFF;
{DRAWTEXT(跌停>0,H*1.01,'↙跌停'),COLORFFFFFF;};
{LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'底背离'), COLORD8BFD8;
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'顶背离'),COLOR00FFFF;}
三连阴:={COUNT(C<REF(C,1),3)>2 AND} COUNT(C<=O,3)>2 AND REF(C,1)<REF(C,2);
二缩量:=VOL<=REF(VOL,1) AND REF(VOL,1)<REF(VOL,2);
三阴:=REF(ALL(C<REF(C,1),2)AND ALL(C<O,2),1) AND ABS(C-O)/O<0.03
AND SUM((C-REF(C,1))/C*100,7)<-8 AND 二缩量 AND IF(C>O,C/O<REF(O/C,1),O/C<REF(O/C,1))AND
REF(O/C<REF(O/C,1),1);
DRAWTEXT(三阴,H*1.01,'三阴'),COLOR00DDDD;
{三长假跌}
RC1:=REF(C,1);
比前跌率:=(RC1-C)*100/RC1;
长上影:=(H-MAX(C,O))/(H-L)>=0.618;{这个可自调0.5-0.66}
不大跌:= 比前跌率<=2;{这个可自调0.5-3}
长阴短柱:=比前跌率>=4 AND V<HHV(V,30)/1.9;
长腿:=(MIN(C,O)-L)/(H-L)>=0.382;{这个可自调0.3-0.66}
点左峰:=1;{暂时不考虑}
XG1:= REF(长上影 AND 不大跌,2)>0
AND REF(长阴短柱,1)>0
AND 长腿 AND 点左峰;
三长假跌:= COUNT(XG1,3);{3天内出现信号选出,这个3可往大调,如果选不出};
DRAWTEXT(三长假跌,L*0.99,'三长'),COLORF00FF0;
长阴短柱:=C/REF(C,1)<0.95 AND V<HHV(V,30)/1.9;
DRAWTEXT(长阴短柱,L*0.99,'长阴短');
假阴真阳:=V>REF(V,1)*1.5 AND O>REF(C,1) AND C<O AND C>REF(C,1);
DRAWTEXT(假阴真阳,L*0.99,'假阴真阳');
假阳真阴:=C>O AND C<REF(C,1);
DRAWTEXT(假阳真阴,H*1.01,'假阳真阴');
该公式包含未来函数:BACKSET
未发现:WINNER...
未发现:LWINNER...
未发现:PWINNER...
该公式包含未来函数:COST
该公式包含未来函数:CAPITAL
该公式包含未来函数:DYNAINFO
该公式包含未来函数:FINANCE
未发现:XMA...
未发现:#MONTH...
未发现:#WEEK...
未发现:#YEAR...
未发现:DHIGH...
未发现:DOPEN...
未发现:DLOW...
未发现:DCLOSE...
未发现:DVOL...
未发现:BARSNEXT...
未发现:REFX...
未发现:REFXV...
该公式包含未来函数:DRAWLINE
联系客服