打开APP
userphoto
未登录

开通VIP,畅享免费电子书等14项超值服

开通VIP
大智慧量价增减指标公式程序源码编程思路破译及风险提示
userphoto

2023.01.02 天津

关注

编程思路破译

输出INPUT:K(3,0,50)

DRAWGBKLAST(日期>900101,STRIP(自定色,自定色,0))

0,COLORFF9900

JV赋值:(成交量(手)-1日前的成交量(手))/1日前的成交量(手)*100

JVH赋值:JV的K日累和的K日指数移动平均

PARTLINE(JVH,(JVH>1日前的JVH)-1,自定色,1,自定色 ),线宽为2,LAYER4

当满足条件数据位置状态=2时,在0位置书写文字,ALIGN0,COLOR00FFFF,线宽为2,LAYER0

X赋值:上次DISPSTATUS=1距今天数+1

AHX赋值:HHVALL(X日内JVH的最高值)

VERTLINE(JVH=AHX,4),COLOR00FFFF,LAYER0

当满足条件JV>0时,在JV和0位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR000055,LAYER7

当满足条件JV>0时,在JV和0位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR000077,LAYER7

当满足条件JV>0时,在JV和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR000099,LAYER7

当满足条件JV>0时,在JV和0位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0000CC,LAYER7

当满足条件JV>0时,在JV和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000FF,LAYER7

当满足条件JV<0时,在JV和0位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR005500,LAYER7

当满足条件JV<0时,在JV和0位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR007700,LAYER7

当满足条件JV<0时,在JV和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR009900,LAYER7

当满足条件JV<0时,在JV和0位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00CC00,LAYER7

HS赋值:成交量(手)/当前流通股本(手)*100

当满足条件JVANDHS>2时,在-10位置书写文字,ALIGN1,COLOR00FFFF,线宽为1,LAYER5

如果数据位置状态=2ANDC<200ANDHS,返回?,否则返回? THENDRAWTEXTABS(450,5, '■可视'+NUMTOSTRN(X,0)+'天累计换手 ' +NUMTOSTRN(HS的X日累和,1)+'%, 平均换手 ' +NUMTOSTRN(HS的X日累和/X,1)+'%: ' ),COLOR00FFFF,线宽为3

DRAWRECTABS(3,0 ,315 ,150 , 自定色),COLOR00FFFF,线宽为2,LAYER0

W1赋值:如果(成交量(手)-1日前的成交量(手))>0ANDABS(收盘价-1日前的收盘价)/1日前的收盘价*100<0.1,返回1,否则返回0

如果数据位置状态=2ANDC<200ANDW1,返回?,否则返回? THENDRAWTEXTABS(0,5,' ◢'+W1+'◣ '),COLOR0000FF,线宽为2,LAYER0

输出DRAWTEXTABS(0,5,' 【加仓】:-- 1.量增价平,转阳信号。'),COLOR0000FF,线宽为2,LAYER0

W2赋值:如果(成交量(手)-1日前的成交量(手))>0AND(收盘价-1日前的收盘价)>0,返回2,否则返回0

如果数据位置状态=2ANDC<200ANDW2,返回?,否则返回? THENDRAWTEXTABS(0,22,' ◢'+W2+'◣ '),COLOR0055FF,线宽为2,LAYER0

输出DRAWTEXTABS(0,22,' 【买入】:-- 2.量增价升,买入信号。'),COLOR0055FF,线宽为2,LAYER0

W3赋值:如果成交量(手)-1日前的成交量(手)的绝对值/1日前的成交量(手)*100<0.1AND(收盘价-1日前的收盘价)>0,返回3,否则返回0

如果数据位置状态=2ANDC<200ANDW3,返回?,否则返回? THENDRAWTEXTABS(0,39,' ◢'+W3+'◣ '),COLOR0077FF,线宽为2

输出DRAWTEXTABS(0,39,' 【加仓】:-- 3.量平价升,持续买入。'),COLOR0077FF,线宽为2,LAYER0

W4赋值:如果(成交量(手)-1日前的成交量(手))<0AND(收盘价-1日前的收盘价)>0,返回4,否则返回0

如果数据位置状态=2ANDC<200ANDW4,返回?,否则返回? THENDRAWTEXTABS(0,56,' ◢'+W4+'◣ '),COLOR0099FF,线宽为2

输出DRAWTEXTABS(0,56,' 【持有】:-- 4.量减价升,继续持有。'),COLOR0099FF,线宽为2,LAYER0

W5赋值:如果(成交量(手)-1日前的成交量(手))<0ANDABS(收盘价-1日前的收盘价)/1日前的收盘价*100<0.1,返回5,否则返回0

如果数据位置状态=2ANDC<200ANDW5,返回?,否则返回? THENDRAWTEXTABS(0,76,' ◢'+W5+'◣ '),COLOR00FF00,线宽为2,LAYER0

输出DRAWTEXTABS(0,76,' 【警戒】:-- 5.量减价平,警戒信号。'),COLOR00FF00,线宽为2,LAYER0

W6赋值:如果(成交量(手)-1日前的成交量(手))<0AND(收盘价-1日前的收盘价)<0,返回6,否则返回0

如果数据位置状态=2ANDC<200ANDW6,返回?,否则返回? THENDRAWTEXTABS(0,93,' ◢'+W6+'◣ '),COLORFFDD00,线宽为2,LAYER0

输出DRAWTEXTABS(0,93,' 【卖出】:-- 6.量减价跌,卖出信号。'),COLORFFDD00,线宽为2,LAYER0

W7赋值:如果成交量(手)-1日前的成交量(手)的绝对值/1日前的成交量(手)*100<0.1AND(收盘价-1日前的收盘价)>0,返回7,否则返回0

如果数据位置状态=2ANDC<200ANDW7,返回?,否则返回? THENDRAWTEXTABS(0,110,' ◢'+W7+'◣ '),COLORFFCC00,线宽为2,LAYER0

输出DRAWTEXTABS(0,110,' 【卖出】:-- 7.量平价跌,继续卖出。'),COLORFFCC00,线宽为2,LAYER0

W8赋值:如果(成交量(手)-1日前的成交量(手))>0AND(收盘价-1日前的收盘价)<0,返回8,否则返回0

如果数据位置状态=2ANDC<200ANDW8,返回?,否则返回? THENDRAWTEXTABS(0,127,' ◢'+W8+'◣ '),COLORFF9900,线宽为2,LAYER0

输出DRAWTEXTABS(0,127,' 【观望】:-- 8.量增价跌,弃卖观望。'),COLORFF9900,线宽为2,LAYER0

程序源码

INPUT:K(3,0,50);

DRAWGBKLAST(DATE>900101,STRIP(RGB(40,0,40),RGB(0,0,0),0));0,COLORFF9900;

JV:=(V-REF(V,1))/REF(V,1)*100;

JVH:=EMA(SUM(JV,K),K);

PARTLINE(JVH,(JVH>REF(JVH,1))-1,RGB(0,255,0),1,RGB(255,0,0) ),LINETHICK2,LAYER4;

DRAWTEXT(BARSTATUS=2,0,' 换手:'),ALIGN0,COLOR00FFFF,LINETHICK2,LAYER0;

X:=BARSLAST(DISPSTATUS=1)+1;

AHX:=HHVALL(HHV(JVH,X));

VERTLINE(JVH=AHX,4),COLOR00FFFF,LAYER0;

STICKLINE(JV>0,JV,0,5,0),COLOR000055,LAYER7;

STICKLINE(JV>0,JV,0,4,0),COLOR000077,LAYER7;

STICKLINE(JV>0,JV,0,3,0),COLOR000099,LAYER7;

STICKLINE(JV>0,JV,0,2,0),COLOR0000CC,LAYER7;

STICKLINE(JV>0,JV,0,1,0),COLOR0000FF,LAYER7;

STICKLINE(JV<0,JV,0,5,0),COLOR005500,LAYER7;

STICKLINE(JV<0,JV,0,4,0),COLOR007700,LAYER7;

STICKLINE(JV<0,JV,0,3,0),COLOR009900,LAYER7;

STICKLINE(JV<0,JV,0,2,0),COLOR00CC00,LAYER7;

HS:=VOL/CAPITAL*100;

DRAWTEXT(JV AND HS>2 ,-10,''+NUMTOSTRN(HS,0)+'' ),ALIGN1,COLOR00FFFF,LINETHICK1,LAYER5;

IF (BARSTATUS=2 AND C<200 AND HS) THEN

DRAWTEXTABS(450,5, '■可视'+NUMTOSTRN(X,0)+'天累计换手 ' +NUMTOSTRN(SUM(HS,X),1)+'%, 平均换手 ' +NUMTOSTRN(SUM(HS,X)/X,1)+'%: ' ),COLOR00FFFF,LINETHICK3;

DRAWRECTABS(3,0 ,315 ,150 , RGB(0,0,80)),COLOR00FFFF,LINETHICK2,LAYER0;

W1:=IF((V-REF(V,1))>0 AND ABS(C-REF(C,1))/REF(C,1)*100<0.1,1,0);

IF (BARSTATUS=2 AND C<200 AND W1) THEN

DRAWTEXTABS(0,5,' ◢'+W1+'◣ '),COLOR0000FF,LINETHICK2,LAYER0;

DRAWTEXTABS(0,5,' 【加仓】:-- 1.量增价平,转阳信号。'),COLOR0000FF,LINETHICK2,LAYER0;

W2:=IF((V-REF(V,1))>0 AND (C-REF(C,1))>0,2,0);

IF (BARSTATUS=2 AND C<200 AND W2) THEN

DRAWTEXTABS(0,22,' ◢'+W2+'◣ '),COLOR0055FF,LINETHICK2,LAYER0;

DRAWTEXTABS(0,22,' 【买入】:-- 2.量增价升,买入信号。'),COLOR0055FF,LINETHICK2,LAYER0;

W3:=IF(ABS(V-REF(V,1))/REF(V,1)*100<0.1 AND (C-REF(C,1))>0,3,0);

IF (BARSTATUS=2 AND C<200 AND W3) THEN

DRAWTEXTABS(0,39,' ◢'+W3+'◣ '),COLOR0077FF,LINETHICK2;

DRAWTEXTABS(0,39,' 【加仓】:-- 3.量平价升,持续买入。'),COLOR0077FF,LINETHICK2,LAYER0;

W4:=IF((V-REF(V,1))<0 AND (C-REF(C,1))>0,4,0);

IF (BARSTATUS=2 AND C<200 AND W4) THEN

DRAWTEXTABS(0,56,' ◢'+W4+'◣ '),COLOR0099FF,LINETHICK2;

DRAWTEXTABS(0,56,' 【持有】:-- 4.量减价升,继续持有。'),COLOR0099FF,LINETHICK2,LAYER0;

W5:=IF((V-REF(V,1))<0 AND ABS(C-REF(C,1))/REF(C,1)*100<0.1,5,0);

IF (BARSTATUS=2 AND C<200 AND W5) THEN

DRAWTEXTABS(0,76,' ◢'+W5+'◣ '),COLOR00FF00,LINETHICK2,LAYER0;

DRAWTEXTABS(0,76,' 【警戒】:-- 5.量减价平,警戒信号。'),COLOR00FF00,LINETHICK2,LAYER0;

W6:=IF((V-REF(V,1))<0 AND (C-REF(C,1))<0,6,0);

IF (BARSTATUS=2 AND C<200 AND W6) THEN

DRAWTEXTABS(0,93,' ◢'+W6+'◣ '),COLORFFDD00,LINETHICK2,LAYER0;

DRAWTEXTABS(0,93,' 【卖出】:-- 6.量减价跌,卖出信号。'),COLORFFDD00,LINETHICK2,LAYER0;

W7:=IF(ABS(V-REF(V,1))/REF(V,1)*100<0.1 AND (C-REF(C,1))>0,7,0);

IF (BARSTATUS=2 AND C<200 AND W7) THEN

DRAWTEXTABS(0,110,' ◢'+W7+'◣ '),COLORFFCC00,LINETHICK2,LAYER0;

DRAWTEXTABS(0,110,' 【卖出】:-- 7.量平价跌,继续卖出。'),COLORFFCC00,LINETHICK2,LAYER0;

W8:=IF((V-REF(V,1))>0 AND (C-REF(C,1))<0,8,0);

IF (BARSTATUS=2 AND C<200 AND W8) THEN

DRAWTEXTABS(0,127,' ◢'+W8+'◣ '),COLORFF9900,LINETHICK2,LAYER0;

DRAWTEXTABS(0,127,' 【观望】:-- 8.量增价跌,弃卖观望。'),COLORFF9900,LINETHICK2,LAYER0;

风险提示

该公式包含未来函数:CAPITAL

本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报
打开APP,阅读全文并永久保存 查看更多类似文章
猜你喜欢
类似文章
【热】打开小程序,算一算2024你的财运
量价增减
主力净买入
通达信主图指标短线无敌(附源码)
一浪起点是最低点吗?一浪起点是否是最低点?
加到任意主图
分时超赢A-(分时主图.叠加超赢) - 指标公式 - 创幻论坛 - 中国最好的股票论坛
更多类似文章 >>
生活服务
热点新闻
分享 收藏 导长图 关注 下载文章
绑定账号成功
后续可登录账号畅享VIP特权!
如果VIP功能使用有故障,
可点击这里联系客服!

联系客服