当前所在位置:首页 > 股票配资利息

,通达信非常好用的黄金分割指标公式(附源码破译和源码)

270

2024-12-04 【 字体:

 ,通达信非常好用的黄金分割指标公式(附源码破译和源码)

安阳股票配资炒股配资技巧

编程思路破译

N赋值:16

N1赋值:N*10

CY赋值:上次到最后交易的周期=N1距今天数

GD赋值:如果是否最后一个周期=1,返回CY日内最高价的最高值,否则返回0的最后一日取值设为常数

DD赋值:如果是否最后一个周期=1,返回CY日内最低价的最低值,否则返回0的最后一日取值设为常数

输出   预顶百分比%:(GD-收盘价)/收盘价*100,NODRAW

H5赋值:GD-(GD-DD)*0.191

H4赋值:GD-(GD-DD)*0.382

H3赋值:GD-(GD-DD)*0.5

H2赋值:GD-(GD-DD)*0.618

H1赋值:GD-(GD-DD)*0.809

DH5赋值:字符串相加

DH4赋值:字符串相加

DH3赋值:字符串相加

DH2赋值:字符串相加

DH1赋值:字符串相加

BASE赋值:字符串相加

%100赋值:字符串相加

   画带状线

      K线

   画带状线

   画带状线

   画带状线

   画带状线

   画带状线

   画带状线

   画带状线

   当满足条件到最后交易的周期=N1-1时,在H5位置书写文字,COLORAA99AA

   当满足条件到最后交易的周期=N1-1时,在H4位置书写文字,COLORAA99AA

   当满足条件到最后交易的周期=N1-1时,在H3位置书写文字,COLORAA99AA

   当满足条件到最后交易的周期=N1-1时,在H2位置书写文字,COLORAA99AA

   当满足条件到最后交易的周期=N1-1时,在H1位置书写文字,COLORAA99AA

   当满足条件到最后交易的周期=N1-1时,在DD位置书写文字,COLORAA99AA

   当满足条件到最后交易的周期=N1-1时,在GD位置书写文字,COLORAA99AA

输出   INPUT:K(1,1,3)

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

HH赋值:A日内最高价的最高值

LL赋值:A日内最低价的最低值

输出   上涨:首次若DISPSTATUS=2则将最近上次最低价=LL距今天数+1周期置为1距今天数,COLOR0000FF,线宽为0

输出   ↑空间%:(收盘价/上涨日前的最低价-1)*100,COLOR00FFFF,线宽为0

输出   最高%:(HHVALL(HH)/上涨日前的最低价-1)*100,COLORFF00FF,线宽为0

输出   下跌:首次若DISPSTATUS=2则将最近上次最高价=HH距今天数+1周期置为1距今天数,COLOR00FF00,线宽为0

输出   ↓空间%:(收盘价/下跌日前的最高价-1)*100,COLOR998888,线宽为0

输出   最低%:(LLVALL(LL)/下跌日前的最高价-1)*100,COLORFF0000,线宽为0

输出   高:下跌日前的最高价,COLOR0000FF,DOTLINE

输出   低:上涨日前的最低价,COLOR00FF00,DOTLINE

   VERTLINE(上涨=0,4),COLOR0000FF

   VERTLINE(下跌=0,3),COLOR00FF00

      当满足条件上涨=0AND最高%>10时,在LL*1.1位置书写文字,画黄色

   当满足条件上涨=0AND最高%>10时,在LL*1.15位置书写文字,COLORFFFFFF

   当满足条件上涨=0AND最高%>20时,在LL*1.2位置书写文字,COLOR00FF00

   当满足条件上涨=0AND最高%>25时,在LL*1.25位置书写文字,COLORFF00FF

   当满足条件上涨=0AND最高%>30时,在LL*1.3位置书写文字,COLOR0000FF

   当满足条件上涨=0AND最高%>40时,在LL*1.4位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>50时,在LL*1.5位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>60时,在LL*1.6位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>70时,在LL*1.7位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>80时,在LL*1.8位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>90时,在LL*1.9位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>100时,在LL*2位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>125时,在LL*2.25位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>150时,在LL*2.5位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>180时,在LL*2.8位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>200时,在LL*3位置书写文字,COLOR00FFFF

   当满足条件上涨=0AND最高%>250时,在LL*3.5位置书写文字,COLOR00FFFF

   当满足条件下跌=0AND最低%<-10时,在HH*0.9位置书写文字,画黄色

   当满足条件下跌=0AND最低%<-15时,在HH*0.85位置书写文字,COLORFFFFFF

   当满足条件下跌=0AND最低%<-20时,在HH*0.8位置书写文字,COLOR00FF00

   当满足条件下跌=0AND最低%<-25时,在HH*0.75位置书写文字,COLORFF00FF

   当满足条件下跌=0AND最低%<-30时,在HH*0.7位置书写文字,COLORFF0000

   当满足条件下跌=0AND最低%<-40时,在HH*0.6位置书写文字,COLORFFFFFF

   当满足条件下跌=0AND最低%<-50时,在HH*0.5位置书写文字,COLORFFFFFF

   当满足条件下跌=0AND最低%<-60时,在HH*0.4位置书写文字,COLORFFFFFF

   当满足条件下跌=0AND最低%<-70时,在HH*0.3位置书写文字,COLORFFFFFF

   当满足条件下跌=0AND最低%<-80时,在HH*0.2位置书写文字,COLORFFFFFF

   当满足条件下跌=0AND最低%<-90时,在HH*0.1位置书写文字,COLORFFFFFF

   当满足条件上涨=2时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=4时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=7时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=12时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=20时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=33时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=54时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=88时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=143时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=179时,在最低价位置书写文字,COLOR00FFFF

   当满足条件上涨=249时,在最低价位置书写文字,COLOR00FFFF

   当满足条件下跌=2时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=4时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=7时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=12时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=20时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=33时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=54时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=88时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=143时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=179时,在最低价位置书写文字,COLOR00FF00

   当满足条件下跌=249时,在最低价位置书写文字,COLOR00FF00

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

AA赋值:DISPSTATUS=2

HH1赋值:T日内最高价的最高值

LL1赋值:T日内最低价的最低值

HL赋值:HH1-LL1

WH赋值:T日内最高价距今天数

WL赋值:T日内最低价距今天数

KK赋值:WH-WL

MHL赋值:HH-HL*0.5

HL191赋值:(HH1-LL1)*0.191

HL382赋值:(HH1-LL1)*0.382

HL618赋值:(HH1-LL1)*0.618

HL809赋值:(HH1-LL1)*0.809

A1赋值:HH1-HL191

A2赋值:HH1-HL382

A3赋值:HH1-HL618

A4赋值:HH1-HL809

A1赋值:LL1+HL191

A2赋值:LL1+HL382

A3赋值:LL1+HL618

A4赋值:LL1+HL809

HL125赋值:(HH1-LL1)*0.125

HL250赋值:(HH1-LL1)*0.25

HL375赋值:(HH1-LL1)*0.375

HL625赋值:(HH1-LL1)*0.625

HL750赋值:(HH1-LL1)*0.75

HL875赋值:(HH1-LL1)*0.875

B1赋值:HH1-HL125

B2赋值:HH1-HL250

B3赋值:HH1-HL375

B4赋值:HH1-HL625

B5赋值:HH1-HL750

B6赋值:HH1-HL875

B1赋值:LL1+HL125

B2赋值:LL1+HL250

B3赋值:LL1+HL375

B4赋值:LL1+HL625

B5赋值:LL1+HL750

B6赋值:LL1+HL875

   END   END   当满足条件AAANDK不等于3时,在HH1位置书写文字,ALIGN2,画绿色

   当满足条件AAANDK不等于3时,在LL1位置书写文字,ALIGN2,VALIGN2,画绿色

   当满足条件AAANDK不等于3时,在MHL位置书写文字,ALIGN2,COLORC0C0C0

   当满足条件AAANDK=1时,在A1位置书写文字,ALIGN2,COLORC0C0C0

   当满足条件AAANDK=1时,在A2位置书写文字,ALIGN2,COLORC0C0C0

   当满足条件AAANDK=1时,在A3位置书写文字,ALIGN2,COLORC0C0C0

   当满足条件AAANDK=1时,在A4位置书写文字,ALIGN2,COLORC0C0C0

   当满足条件AAANDK不等于3时,在HH1位置书写文字,ALIGN2,画红色,线宽为7

   当满足条件AAANDK不等于3时,在LL1位置书写文字,ALIGN2,画红色,线宽为7

   当满足条件AAANDK不等于3时,在MHL位置书写文字,ALIGN2,COLORFF0000,线宽为7

   当满足条件AAANDK=1时,在A1位置书写文字,ALIGN2,COLOR208FFF,线宽为0

   当满足条件AAANDK=1时,在A2位置书写文字,ALIGN2,COLOR208FFF,线宽为0

   当满足条件AAANDK=1时,在A3位置书写文字,ALIGN2,COLOR208FFF,线宽为0

   当满足条件AAANDK=1时,在A4位置书写文字,ALIGN2,COLOR208FFF,线宽为0

HH赋值:如果日期位于1150601和1150630之间,返回最高价,否则返回-999

T赋值:历史HH距今天数

TT赋值:上次最低价=T+1日内最低价的最低值距今天数

T1赋值:上次到最后交易的周期=TT的最后一日取值设为常数+1距今天数

XL赋值:下次T1=0距今天数日后的收盘价和开盘价的较小值

输出   高位价:当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在HH位置画直线起点,当满足条件是否最后一个周期时,在T日前的HH位置画直线终点,0表示是否延长.,画黄色

输出   NOTEXT1:当满足条件到最后交易的周期=T的最后一日取值设为常数-3时,在XL*1.08位置画直线起点,当满足条件是否最后一个周期时,在T日前的XL*1.08位置画直线终点,0表示是否延长.,DOTLINE,画绿色

输出   NOTEXT2:当满足条件到最后交易的周期=T的最后一日取值设为常数-3时,在XL*1.21位置画直线起点,当满足条件是否最后一个周期时,在T日前的XL*1.21位置画直线终点,0表示是否延长.,DOTLINE,画红色

输出   NOTEXT3:当满足条件到最后交易的周期=T的最后一日取值设为常数-3时,在XL*1.34位置画直线起点,当满足条件是否最后一个周期时,在T日前的XL*1.34位置画直线终点,0表示是否延长.,DOTLINE,画蓝色

输出   NOTEXT4:当满足条件到最后交易的周期=T的最后一日取值设为常数-3时,在XL*1.55位置画直线起点,当满足条件是否最后一个周期时,在T日前的XL*1.55位置画直线终点,0表示是否延长.,DOTLINE,画白色

输出   NOTEXT5:当满足条件到最后交易的周期=T的最后一日取值设为常数-3时,在XL*1.89位置画直线起点,当满足条件是否最后一个周期时,在T日前的XL*1.89位置画直线终点,0表示是否延长.,DOTLINE,画棕色

输出   NOTEXT6:当满足条件到最后交易的周期=T的最后一日取值设为常数-3时,在XL*2.44位置画直线起点,当满足条件是否最后一个周期时,在T日前的XL*2.44位置画直线终点,0表示是否延长.,DOTLINE,画洋红色

   当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在XL*1.03位置书写文字,画绿色

   当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在XL*1.21位置书写文字,画红色

   当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在XL*1.34位置书写文字,画蓝色

   当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在XL*1.55位置书写文字,画白色

   当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在XL*1.89位置书写文字,画棕色

   当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在XL*2.44位置书写文字,画洋红色

程序源码

N:=16;

   N1:=N*10;

   CY:=BARSLAST(CURRBARSCOUNT=N1);

   GD:=CONST(IF(ISLASTBAR=1,HHV(H,CY),0));

   DD:=CONST(IF(ISLASTBAR=1,LLV(L,CY),0));

   预顶百分比%:(GD-C)/C*100,NODRAW;

   H5:=GD-(GD-DD)*0.191;

   H4:=GD-(GD-DD)*0.382;

   H3:=GD-(GD-DD)*0.5;

   H2:=GD-(GD-DD)*0.618;

   H1:=GD-(GD-DD)*0.809;

   DH5:=STRCAT(STRCAT('80.9%',CON2STR(H5,3)),'');

   DH4:=STRCAT(STRCAT('61.8%',CON2STR(H4,3)),'');

   DH3:=STRCAT(STRCAT('50.0%',CON2STR(H3,3)),'');

   DH2:=STRCAT(STRCAT('38.2%',CON2STR(H2,3)),'');

   DH1:=STRCAT(STRCAT('19.1%',CON2STR(H1,3)),'');

   BASE:=STRCAT(STRCAT('BASE',CON2STR(DD,3)),'随浪飞扬');

   %100:=STRCAT(STRCAT('100%',CON2STR(GD,3)),'');

   DRAWBAND(IF(CURRBARSCOUNT<=1,DD,DRAWNULL),

   RGB(16,36,46),IF(CURRBARSCOUNT<=N1,DD,DRAWNULL)-(H4-H3)/2,RGB(0,0,0));

   {DRAWBAND(IF(CURRBARSCOUNT<=N1,GD,DRAWNULL)+(H4-H3)/2,

   RGB(16,36,46),IF(CURRBARSCOUNT<=N1,DD,DRAWNULL)-(H4-H3)/2,RGB(0,0,0));}{背景}

   DRAWKLINE(H,O,L,C);

   DRAWBAND(IF(CURRBARSCOUNT<=N1,H1,DRAWNULL),RGB(200,0,200),H1,RGB(0,0,0));

   DRAWBAND(IF(CURRBARSCOUNT<=N1,H2,DRAWNULL),RGB(200,0,200),H2,RGB(0,0,0));

   DRAWBAND(IF(CURRBARSCOUNT<=N1,H3,DRAWNULL),RGB(200,0,200),H3,RGB(0,0,0));

   DRAWBAND(IF(CURRBARSCOUNT<=N1,H4,DRAWNULL),RGB(200,0,200),H4,RGB(0,0,0));

   DRAWBAND(IF(CURRBARSCOUNT<=N1,H5,DRAWNULL),RGB(200,0,200),H5,RGB(0,0,0));

   DRAWBAND(IF(CURRBARSCOUNT<=N1,GD,DRAWNULL),RGB(200,0,200),GD,RGB(0,0,0));

   DRAWBAND(IF(CURRBARSCOUNT<=N1,DD,DRAWNULL),RGB(200,0,200),DD,RGB(0,0,0));

   DRAWTEXT(CURRBARSCOUNT=N1-1,H5,DH5),COLORAA99AA;

   DRAWTEXT(CURRBARSCOUNT=N1-1,H4,DH4),COLORAA99AA;

   DRAWTEXT(CURRBARSCOUNT=N1-1,H3,DH3),COLORAA99AA;

   DRAWTEXT(CURRBARSCOUNT=N1-1,H2,DH2),COLORAA99AA;

   DRAWTEXT(CURRBARSCOUNT=N1-1,H1,DH1),COLORAA99AA;

   DRAWTEXT(CURRBARSCOUNT=N1-1,DD,BASE),COLORAA99AA;

   DRAWTEXT(CURRBARSCOUNT=N1-1,GD,%100),COLORAA99AA;

   INPUT:K(1,1,3);

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

   HH:=HHV(H,A);

   LL:=LLV(L,A);

   上涨:BARSSINCE(BACKSET(DISPSTATUS=2,BARSLAST(L=LL)+1)),COLOR0000FF,LINETHICK0;

   ↑空间%:(C/REF(L,上涨)-1)*100,COLOR00FFFF,LINETHICK0;

   最高%:(HHVALL(HH)/REF(L,上涨)-1)*100,COLORFF00FF,LINETHICK0;

   下跌:BARSSINCE(BACKSET(DISPSTATUS=2,BARSLAST(H=HH)+1)),COLOR00FF00,LINETHICK0;

   ↓空间%:(C/REF(H,下跌)-1)*100,COLOR998888,LINETHICK0;

   最低%:(LLVALL(LL)/REF(H,下跌)-1)*100,COLORFF0000,LINETHICK0;

   高:REF(H,下跌),COLOR0000FF,DOTLINE;

   低:REF(L,上涨),COLOR00FF00,DOTLINE;

   VERTLINE(上涨=0,4),COLOR0000FF;

   VERTLINE(下跌=0,3),COLOR00FF00;

   {DRAWTEXT(上涨=0,HHVALL(HH)*0.99,'-最高'),COLOR0000FF;

   DRAWTEXT(下跌=0,LLVALL(LL)*1.01,'-最低'),COLOR00FF00;}

   DRAWTEXT(上涨=0AND最高%>10,LL*1.1,'-10%'),COLORYELLOW;

   DRAWTEXT(上涨=0AND最高%>10,LL*1.15,'-15%'),COLORFFFFFF;

   DRAWTEXT(上涨=0AND最高%>20,LL*1.2,'-20%'),COLOR00FF00;

   DRAWTEXT(上涨=0AND最高%>25,LL*1.25,'-25%'),COLORFF00FF;

   DRAWTEXT(上涨=0AND最高%>30,LL*1.3,'-30%'),COLOR0000FF;

   DRAWTEXT(上涨=0AND最高%>40,LL*1.4,'-40%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>50,LL*1.5,'-50%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>60,LL*1.6,'-60%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>70,LL*1.7,'-70%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>80,LL*1.8,'-80%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>90,LL*1.9,'-90%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>100,LL*2,'-100%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>125,LL*2.25,'-125%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>150,LL*2.5,'-150%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>180,LL*2.8,'-180%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>200,LL*3,'-200%'),COLOR00FFFF;

   DRAWTEXT(上涨=0AND最高%>250,LL*3.5,'-250%'),COLOR00FFFF;

   DRAWTEXT(下跌=0AND最低%<-10,HH*0.9,'-10%'),COLORYELLOW;

   DRAWTEXT(下跌=0AND最低%<-15,HH*0.85,'-15%'),COLORFFFFFF;

   DRAWTEXT(下跌=0AND最低%<-20,HH*0.8,'-20%'),COLOR00FF00;

   DRAWTEXT(下跌=0AND最低%<-25,HH*0.75,'-25%'),COLORFF00FF;

   DRAWTEXT(下跌=0AND最低%<-30,HH*0.7,'-30%'),COLORFF0000;

   DRAWTEXT(下跌=0AND最低%<-40,HH*0.6,'-40%'),COLORFFFFFF;

   DRAWTEXT(下跌=0AND最低%<-50,HH*0.5,'-50%'),COLORFFFFFF;

   DRAWTEXT(下跌=0AND最低%<-60,HH*0.4,'-60%'),COLORFFFFFF;

   DRAWTEXT(下跌=0AND最低%<-70,HH*0.3,'-70%'),COLORFFFFFF;

   DRAWTEXT(下跌=0AND最低%<-80,HH*0.2,'-80%'),COLORFFFFFF;

   DRAWTEXT(下跌=0AND最低%<-90,HH*0.1,'-90%'),COLORFFFFFF;

   DRAWTEXT(上涨=2,L,'3天'),COLOR00FFFF;

   DRAWTEXT(上涨=4,L,'5天'),COLOR00FFFF;

   DRAWTEXT(上涨=7,L,'8天'),COLOR00FFFF;

   DRAWTEXT(上涨=12,L,'13天'),COLOR00FFFF;

   DRAWTEXT(上涨=20,L,'21天'),COLOR00FFFF;

   DRAWTEXT(上涨=33,L,'34天'),COLOR00FFFF;

   DRAWTEXT(上涨=54,L,'55天'),COLOR00FFFF;

   DRAWTEXT(上涨=88,L,'89天'),COLOR00FFFF;

   DRAWTEXT(上涨=143,L,'144天'),COLOR00FFFF;

   DRAWTEXT(上涨=179,L,'180天'),COLOR00FFFF;

   DRAWTEXT(上涨=249,L,'250天'),COLOR00FFFF;

   DRAWTEXT(下跌=2,L,'-3天'),COLOR00FF00;

   DRAWTEXT(下跌=4,L,'-5天'),COLOR00FF00;

   DRAWTEXT(下跌=7,L,'-8天'),COLOR00FF00;

   DRAWTEXT(下跌=12,L,'-13天'),COLOR00FF00;

   DRAWTEXT(下跌=20,L,'-21天'),COLOR00FF00;

   DRAWTEXT(下跌=33,L,'-34天'),COLOR00FF00;

   DRAWTEXT(下跌=54,L,'-55天'),COLOR00FF00;

   DRAWTEXT(下跌=88,L,'-89天'),COLOR00FF00;

   DRAWTEXT(下跌=143,L,'-144天'),COLOR00FF00;

   DRAWTEXT(下跌=179,L,'-180天'),COLOR00FF00;

   DRAWTEXT(下跌=249,L,'-250天'),COLOR00FF00;

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

   AA:=DISPSTATUS=2;

   HH1:=HHV(H,T);

   LL1:=LLV(L,T);

   HL:=HH1-LL1;

   WH:=HHVBARS(H,T);

   WL:=LLVBARS(L,T);

   KK:=WH-WL;

   MHL:=HH-HL*0.5;

   IFK=1THENBEGIN

   HL191:=(HH1-LL1)*0.191;

   HL382:=(HH1-LL1)*0.382;

   HL618:=(HH1-LL1)*0.618;

   HL809:=(HH1-LL1)*0.809;

   IFKK<0THENBEGIN

   A1:=HH1-HL191;

   A2:=HH1-HL382;

   A3:=HH1-HL618;

   A4:=HH1-HL809;

   ENDELSEBEGIN

   A1:=LL1+HL191;

   A2:=LL1+HL382;

   A3:=LL1+HL618;

   A4:=LL1+HL809;

   END

   END

   IFK=1THENBEGIN

   HL125:=(HH1-LL1)*0.125;

   HL250:=(HH1-LL1)*0.25;

   HL375:=(HH1-LL1)*0.375;

   HL625:=(HH1-LL1)*0.625;

   HL750:=(HH1-LL1)*0.75;

   HL875:=(HH1-LL1)*0.875;

   IFKK<0THENBEGIN

   B1:=HH1-HL125;

   B2:=HH1-HL250;

   B3:=HH1-HL375;

   B4:=HH1-HL625;

   B5:=HH1-HL750;

   B6:=HH1-HL875;

   ENDELSEBEGIN

   B1:=LL1+HL125;

   B2:=LL1+HL250;

   B3:=LL1+HL375;

   B4:=LL1+HL625;

   B5:=LL1+HL750;

   B6:=LL1+HL875;

   END

   END

   DRAWTEXT(AAANDK<>3,HH1,'最高价:'+HH1),ALIGN2,COLORGREEN;

   DRAWTEXT(AAANDK<>3,LL1,'最低价:'+LL1),ALIGN2,VALIGN2,COLORGREEN;

   DRAWTEXT(AAANDK<>3,MHL,'50%:'+MHL),ALIGN2,COLORC0C0C0;

   DRAWTEXT(AAANDK=1,A1,'0.191:'+NUMTOSTRN(A1,2)),ALIGN2,COLORC0C0C0;

   DRAWTEXT(AAANDK=1,A2,'0.382:'+NUMTOSTRN(A2,2)),ALIGN2,COLORC0C0C0;

   DRAWTEXT(AAANDK=1,A3,'0.618:'+NUMTOSTRN(A3,2)),ALIGN2,COLORC0C0C0;

   DRAWTEXT(AAANDK=1,A4,'0.809:'+NUMTOSTRN(A4,2)),ALIGN2,COLORC0C0C0;

   DRAWTEXT(AAANDK<>3,HH1,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,COLORRED,LINETHICK7;

   DRAWTEXT(AAANDK<>3,LL1,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,COLORRED,LINETHICK7;

   DRAWTEXT(AAANDK<>3,MHL,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,COLORFF0000,LINETHICK7;

   DRAWTEXT(AAANDK=1,A1,'㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣'),ALIGN2,COLOR208FFF,LINETHICK0;

   DRAWTEXT(AAANDK=1,A2,'㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣'),ALIGN2,COLOR208FFF,LINETHICK0;

   DRAWTEXT(AAANDK=1,A3,'㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣'),ALIGN2,COLOR208FFF,LINETHICK0;

   DRAWTEXT(AAANDK=1,A4,'㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣'),ALIGN2,COLOR208FFF,LINETHICK0;

   HH:=IF(BETWEEN(DATE,1150601,1150630),H,-999);

   T:=HHVBARS(HH,0);

   TT:=BARSLAST(L=LLV(L,T+1));

   T1:=BARSLAST(CURRBARSCOUNT=CONST(TT)+1);

   XL:=REFX(MIN(C,O),BARSNEXT(T1=0));

   高位价:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,HH,ISLASTBAR,REF(HH,T),0),COLORYELLOW;

   NOTEXT1:DRAWLINE(CURRBARSCOUNT=CONST(T)-3,XL*1.08,ISLASTBAR,REF(XL*1.08,T),0),DOTLINE,COLORGREEN;

   NOTEXT2:DRAWLINE(CURRBARSCOUNT=CONST(T)-3,XL*1.21,ISLASTBAR,REF(XL*1.21,T),0),DOTLINE,COLORRED;

   NOTEXT3:DRAWLINE(CURRBARSCOUNT=CONST(T)-3,XL*1.34,ISLASTBAR,REF(XL*1.34,T),0),DOTLINE,COLORBLUE;

   NOTEXT4:DRAWLINE(CURRBARSCOUNT=CONST(T)-3,XL*1.55,ISLASTBAR,REF(XL*1.55,T),0),DOTLINE,COLORWHITE;

   NOTEXT5:DRAWLINE(CURRBARSCOUNT=CONST(T)-3,XL*1.89,ISLASTBAR,REF(XL*1.89,T),0),DOTLINE,COLORBROWN;

   NOTEXT6:DRAWLINE(CURRBARSCOUNT=CONST(T)-3,XL*2.44,ISLASTBAR,REF(XL*2.44,T),0),DOTLINE,COLORMAGENTA;

   DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,XL*1.03,VARCAT(VARCAT('涨8%价:',VAR2STR(XL*1.08,2)),'元')),COLORGREEN;

   DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,XL*1.21,VARCAT(VARCAT('涨21%价:',VAR2STR(XL*1.21,2)),'元')),COLORRED;

   DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,XL*1.34,VARCAT(VARCAT('涨34%价:',VAR2STR(XL*1.34,2)),'元')),COLORBLUE;

   DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,XL*1.55,VARCAT(VARCAT('涨55%价:',VAR2STR(XL*1.55,2)),'元')),COLORWHITE;

   DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,XL*1.89,VARCAT(VARCAT('涨89%价:',VAR2STR(XL*1.89,2)),'元')),COLORBROWN;

   DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,XL*2.44,VARCAT(VARCAT('涨144%价:',VAR2STR(XL*2.44,2)),'元')),COLORMAGENTA;

该公式包含未来函数:BACKSET未发现:WINNER...未发现:LWINNER...未发现:PWINNER...未发现:COST...未发现:CAPITAL...未发现:DYNAINFO...未发现:FINANCE...未发现:XMA...未发现:#MONTH...未发现:#WEEK...未发现:#YEAR...未发现:DHIGH...未发现:DOPEN...未发现:DLOW...未发现:DCLOSE...未发现:DVOL...该公式包含未来函数:BARSNEXT该公式包含未来函数:REFX未发现:REFXV...该公式包含未来函数:DRAWLINE

注:

       馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。

       发文不易,如获益,欢迎赞赏,赞赏必复!

本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。

阅读全文
相关推荐

最专业的股票配资 ,深圳:切实把发展成果体现在实实在在的指标数据上

最专业的股票配资 ,深圳:切实把发展成果体现在实实在在的指标数据上
最专业的股票配资 ,深圳:切实把发展成果体现在实实在在的指标数据上 ...

股票融资配资:探索融资配资的方式

股票融资配资:探索融资配资的方式
股票融资配资是指投资者通过借贷资金来进行股票交易的一种方式。融资配资的方式可以通...

,通达信非常好用的黄金分割指标公式(附源码破译和源码)

,通达信非常好用的黄金分割指标公式(附源码破译和源码)
 ,通达信非常好用的黄金分割指标公式(附源码破译和源码)安阳股票配资炒股配资技...

什么叫配资炒股 ,商务 外资企业注销及资金汇出流程、资料、操作要点解析

什么叫配资炒股 ,商务  外资企业注销及资金汇出流程、资料、操作要点解析
什么叫配资炒股 ,商务 外资企业注销及资金汇出流程、资料、操作要点解析图片关...

,科技龙头股年报预告 收藏研究!

,科技龙头股年报预告 收藏研究!
 ,科技龙头股年报预告 收藏研究!配资炒股配资优秀股票配资风险有多大TCL科技...

股票配资宝 ,美股指微幅涨跌,财报传利好、Arm一度涨超60%,英伟达创历史新高后曾转跌

股票配资宝 ,美股指微幅涨跌,财报传利好、Arm一度涨超60%,英伟达创历史新高后曾转跌
股票配资宝 ,美股指微幅涨跌,财报传利好、Arm一度涨超60%,英伟达创历史新...

,明晟公布季度指数评审结果 对A股占比几乎没影响

,明晟公布季度指数评审结果 对A股占比几乎没影响
 ,明晟公布季度指数评审结果 对A股占比几乎没影响  近日,明晟指数(MSCI...

武汉股票配资 ,高股息,不止是银行、电力

武汉股票配资 ,高股息,不止是银行、电力
武汉股票配资 ,高股息,不止是银行、电力提及分红,大部分投资者马上想到银行、电...

安全可靠的股票配资平台,让投资更安心

安全可靠的股票配资平台,让投资更安心
title===>安全可靠的股票配资平台,让投资更安心[field]body==...

,昆山出现大量工厂迁离,避免重走东莞老路,是当务之急

,昆山出现大量工厂迁离,避免重走东莞老路,是当务之急
 ,昆山出现大量工厂迁离,避免重走东莞老路,是当务之急昆山出现大量工厂迁离,避...