涨跌测幅

mjj

涨跌测幅
{上涨浪}
日期A:=1000000+年A*10000+月A*100+日A;
日期B:=1000000+年B*10000+月B*100+日B;
日期C:=1000000+年C*10000+月C*100+日C;
实虚顶:=IF(实虚顶=0,H,IF(实虚顶=1,MAX(C,O),IF(实虚顶=2,MIN(C,O),IF(实虚顶=3,L,L))));
实虚底:=IF(实虚底=0,L,IF(实虚底=1,MIN(C,O),IF(实虚底=2,MIN(C,O),IF(实虚底=3,L,L))));
{上涨浪}
B线1:=IF(DATE>=日期B,REFDATE(实虚顶,日期B),DRAWNULL),COLORYELLOW;
A线1:=IF(DATE>=日期A,REFDATE(实虚底,日期A),DRAWNULL),COLORYELLOW;
C线1:=IF(DATE>=日期C,REFDATE(实虚底,日期C),DRAWNULL),COLORCYAN;
{下跌浪}
A线2:=IF(DATE>=日期A,REFDATE(实虚顶,日期A),DRAWNULL),COLORYELLOW;
B线2:=IF(DATE>=日期B,REFDATE(实虚底,日期B),DRAWNULL),COLORYELLOW;
C线2:=IF(DATE>=日期C,REFDATE(实虚顶,日期C),DRAWNULL),COLORCYAN;
T12:=CONST(HHVBARS(C,ABS(日期B+日期C)));
{上涨浪-顶底}
天线涨:=IF(DATE>=日期A,CONST(IF(T12=0,REFDATE(REF(REFDATE(实虚顶,日期B),BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=REFDATE(实虚顶,日期B))+1))),DATE),REF(REFDATE(REF(REFDATE(实虚顶,日期B),BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=REFDATE(实虚顶,日期B))+1))),DATE),T12))),DRAWNULL),LINETHICK1,COLORYELLOW;
地线涨:=IF(DATE>=日期A,CONST(IF(T12=0,REFDATE(REF(REFDATE(实虚底,日期A),BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(L=REFDATE(实虚底,日期A))+1))),DATE),REF(REFDATE(REF(REFDATE(实虚底,日期A),BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(L=REFDATE(实虚底,日期A))+1))),DATE),T12))),DRAWNULL),LINETHICK1,COLORYELLOW;
{下跌浪-顶底}
天线跌:=IF(DATE>=日期A,CONST(IF(T12=0,REFDATE(REF(REFDATE(实虚顶,日期A),BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=REFDATE(实虚顶,日期A))+1))),DATE),REF(REFDATE(REF(REFDATE(实虚顶,日期A),BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=REFDATE(实虚顶,日期A))+1))),DATE),T12))),DRAWNULL),LINETHICK1,COLORYELLOW;
地线跌:=IF(DATE>=日期A,CONST(IF(T12=0,REFDATE(REF(REFDATE(实虚底,日期B),BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(L=REFDATE(实虚底,日期C))+1))),DATE),REF(REFDATE(REF(REFDATE(实虚底,日期B),BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(L=REFDATE(实虚底,日期C))+1))),DATE),T12))),DRAWNULL),LINETHICK1,COLORYELLOW;
{上涨浪}
距2涨:=IF(DATE>=日期A,CONST(IF(T12=0,REFDATE(实虚顶,日期B)*2-REFDATE(实虚底,日期A),REF(REFDATE(实虚顶,日期B)*2-REFDATE(实虚底,日期A),T12))),DRAWNULL),COLORLIGREEN,LINETHICK1;
距1涨:=IF(DATE>=日期A,CONST(IF(T12=0,REFDATE(实虚顶,日期B)*2-REFDATE(实虚底,日期C),REF(REFDATE(实虚顶,日期B)*2-REFDATE(实虚底,日期C),T12))),DRAWNULL),COLORLIGREEN,LINETHICK1;
等距涨:=IF(DATE>=日期A,CONST(IF(T12=0,REFDATE(实虚底,日期C)+(REFDATE(实虚顶,日期B)-REFDATE(实虚底,日期A))*1,REF(REFDATE(实虚底,日期C)+(REFDATE(实虚顶,日期B)-REFDATE(实虚底,日期A))*1,T12))),DRAWNULL),COLORLIGREEN,LINETHICK1;
{下跌浪}
距2跌:=IF(DATE>=日期A,CONST(IF(T12=0,2*REFDATE(实虚底,日期B)-REFDATE(实虚顶,日期A),REF(2*REFDATE(实虚底,日期B)-REFDATE(实虚顶,日期A),T12))),DRAWNULL),COLORLIGREEN,LINETHICK1;
距1跌:=IF(DATE>=日期A,CONST(IF(T12=0,2*REFDATE(实虚底,日期B)-REFDATE(实虚顶,日期C),REF(2*REFDATE(实虚底,日期B)-REFDATE(实虚顶,日期C),T12))),DRAWNULL),COLORLIGREEN,LINETHICK1;
等距跌:=IF(DATE>=日期A,CONST(IF(T12=0,REFDATE(实虚顶,日期C)-(REFDATE(实虚顶,日期A)-REFDATE(实虚底,日期B))*1,REF(REFDATE(实虚顶,日期C)-(REFDATE(实虚顶,日期A)-REFDATE(实虚底,日期B))*1,T12))),DRAWNULL),COLORLIGREEN,LINETHICK1;
A线:IF(文字显示=1,A线1,IF(文字显示=2,A线2,IF(文字显示=5,0,0))),COLORYELLOW;
B线:IF(文字显示=1,B线1,IF(文字显示=2,B线2,IF(文字显示=5,0,0))),COLORYELLOW;
C线:IF(文字显示=1,C线1,IF(文字显示=2,C线2,IF(文字显示=5,0,0))),COLORCYAN;
天线:IF(文字显示=1,天线涨,IF(文字显示=2,天线跌,IF(文字显示=5,0,0))),COLORYELLOW;
地线:IF(文字显示=1,地线涨,IF(文字显示=2,地线跌,IF(文字显示=5,0,0))),COLORYELLOW;
距2:IF(文字显示=1,距2涨,IF(文字显示=2,距2跌,IF(文字显示=5,0,0))),COLORLIGREEN,LINETHICK1;
距1:IF(文字显示=1,距1涨,IF(文字显示=2,距1跌,IF(文字显示=5,0,0))),COLORLIGREEN,LINETHICK1;
等距:IF(文字显示=1,等距涨,IF(文字显示=2,等距跌,IF(文字显示=5,0,0))),COLORLIGREEN,LINETHICK1;
DRAWTEXT(CURRBARSCOUNT-13,等距,VAR2STR(等距,2)),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT-13,距1,VAR2STR(距1,2)),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT-13,距2,VAR2STR(距2,2)),COLORYELLOW;
DRAWTEXT(DATE=日期B AND 文字显示=1,天线,'B'),COLORCYAN;
DRAWTEXT(DATE=日期A AND 文字显示=1,地线,'A'),COLORCYAN;
DRAWTEXT(DATE=日期C AND 文字显示=1,IF(DATE>=日期A,CONST(REF(实虚底,BARSLAST(DATE=日期C))),DRAWNULL)*0.999,'C'),COLORCYAN;
DRAWTEXT(DATE=日期A AND 文字显示=2,天线,'A'),COLORCYAN;
DRAWTEXT(DATE=日期B AND 文字显示=2,地线,'B'),COLORCYAN;
DRAWTEXT(DATE=日期C AND 文字显示=2,IF(DATE>=日期A,CONST(REF(实虚顶,BARSLAST(DATE=日期C))),DRAWNULL)*0.999,'C'),COLORCYAN;
收盘价:CONST(REF(C,0)),DOTLINE,COLORLIRED;
DRAWTEXT( CURRBARSCOUNT=1,C,VAR2STR(REF(C,0),2)),COLORWHITE;
STICKLINE(C/REF(C,1)<>1.05,(O+C)/2,(O+C)/2,2,0),COLORLIBLUE;
DRAWTEXT_FIX(ISLASTBAR,0.5,0,0,HYBLOCK);
请设置计算参数:
A线aram#1年 Param#2月 Param#3日
B线aram#4年 Param#5月 Param#6日
C线aram#7年 Param#8月 Param#9日
实虚顶Param#100虚顶 1实顶
实虚底Param#110虚底 1实底
涨跌 Param#121涨 2跌

cwyyx

谢谢楼主分享

zgk2000

开始就错误的

AD15147086

谢谢楼主分享,不过不能用!

szwzs

楼主把压箱底的镇宅之宝也拿了出来。

mjj

AD15147086 发表于 2020-1-9 09:07
谢谢楼主分享,不过不能用!

公式自动导入

qj28095

我昨天看见人家说想验证牛股加这个量学内部唯一交流每天免费分享涨停板Q-群-730729862 备注 448 我进入看了一下群里面分享个股还真的涨停

lh523

慢慢来，呵呵

很多股友都跟上了我上周五的垮周牛股和昨天牛股，弱势行情小赚即是大赚，逐步带领大家在股市上扭亏为盈，只要大家坚定的跟着我的操作，我会带领所有股友们实现总体获利，不求每一只个股都赚钱，但是一定带领大家做到10只赚8只，实现稳稳的幸福QQ:874233624

理智投资师2016

谢谢楼主分享

小小森林

楼主分享很好，但是有错误，不能用

醉亨人生

该附件无法读取

信天游2e

谢谢楼主分享