当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：另类的《黄金比例》，区间比 价格比 时间比（通达信公式 主图 源码 测试图）
软件名称：[B]另类的《黄金比例》，区间比 价格比 时间比（通达信公式 主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：12.0 KB
官方主页：Home Page
更新时间：2022-11-19 00:15:13
软件简介:
另类的《黄金比例》，区间比 价格比 时间比
HDAY:=150;LDAY:=150;
TCH:=CONST(FINDHIGH(H,0,HDAY*10,1));
GTT:=CONST(BARSLAST(TCH=H))+1;
SX跌H:=CONST(IF(GTT=1,H,REF(H,GTT-1)));
BCL:=CONST(FINDLOW(L,0,LDAY*10,1));
DTT:=CONST(BARSLAST(BCL=L))+1,COLORLIBLUE;
SX涨L:=CONST(IF(DTT=1,L,REF(L,DTT-1)));
{斐波那契 下跌周期}
DRAWTEXT(CURRBARSCOUNT=GTT,SX跌H*0.985,'下跌'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=GTT,SX跌H,SX涨L,0,0),COLORGREEN;
FB3:STICKLINE(CURRBARSCOUNT=GTT-2,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-2,SX跌H*0.9,'3'),COLOR00FF00;
FB5: STICKLINE(CURRBARSCOUNT=GTT-4,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-4,SX跌H*0.9,'5'),COLOR00FF00;
FB8: STICKLINE(CURRBARSCOUNT=GTT-7,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-7,SX跌H*0.9,'8'),COLOR00FF00;
FB13: STICKLINE(CURRBARSCOUNT=GTT-12,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-12,SX跌H*0.9,'13'),COLOR00FF00;
FB21: STICKLINE(CURRBARSCOUNT=GTT-20,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-20,SX跌H*0.9,'21'),COLOR00FF00;
FB34: STICKLINE(CURRBARSCOUNT=GTT-33,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-33,SX跌H*0.9,'34 '),COLOR00FF00;
FB55: STICKLINE(CURRBARSCOUNT=GTT-54,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-54,SX跌H*0.9,'55'),COLOR00FF00;
FB89: STICKLINE(CURRBARSCOUNT=GTT-88,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-88,SX跌H*0.9,'89'),COLOR00FF00;
FB144: STICKLINE(CURRBARSCOUNT=GTT-143,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-143,SX跌H*0.9,'144'),COLOR00FF00;
FB233: STICKLINE(CURRBARSCOUNT=GTT-232,SX跌H,MAX(C,O),0,-1),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=GTT-232,SX跌H*0.95,'233'),COLOR00FF00;
{斐波那契 上涨周期}
DRAWTEXT(CURRBARSCOUNT=DTT,SX涨L*1.03,'启动'),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=DTT,SX跌H,SX涨L,0,0),COLORRED;
STICKLINE(CURRBARSCOUNT=DTT-2,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-2,SX涨L*1.05,'3'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=DTT-4,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-4,SX涨L*1.05,'5'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=DTT-7,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-7,SX涨L*1.05,'8'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=DTT-12,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-12,SX涨L*1.05,'13'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=DTT-20,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-20,SX涨L*1.05.01,'21'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=DTT-33,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-33,SX涨L*1.05,'34'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=DTT-54,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-54,SX涨L*1.05,'55'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=DTT-88,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-88,SX涨L*1.05,'89'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=DTT-143,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-143,SX涨L*1.05,'144'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=DTT-232,MIN(C,O),SX涨L,0,-1),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=DTT-232,SX涨L*1.05,'233'),,COLOR0000FF;
{黄金分割}
日:=150;昨前:=3;
高1:=REF(HHV(H,日),昨前);
低1:=REF(LLV(L,日),昨前);
{分析家公式网WWW.70822.com}
H1:=低1*1.191;
H2:=低1*1.382;
H3:=低1*1.5;
H4:=低1*1.618;
H5:=低1*1.809;
DH1:STICKLINE(FILTER(BETWEEN(H1,H,L),DTT) AND CURRBARSCOUNT<DTT,H*1.07,L*0.93,0,-1),COLORYELLOW;
DH2:STICKLINE(FILTER(BETWEEN(H2,H,L),DTT) AND CURRBARSCOUNT<DTT,H*1.07,L*0.93,0,-1),COLORYELLOW;
DH3:STICKLINE(FILTER(BETWEEN(H3,H,L),DTT) AND CURRBARSCOUNT<DTT,H*1.07,L*0.93,0,-1),COLORYELLOW;
DH4:STICKLINE(FILTER(BETWEEN(H4,H,L),DTT) AND CURRBARSCOUNT<DTT,H*1.07,L*0.93,0,-1),COLORYELLOW;
DH5:STICKLINE(FILTER(BETWEEN(H5,H,L),DTT) AND CURRBARSCOUNT<DTT,H*1.07,L*0.93,0,-1),COLORYELLOW;
DRAWTEXT(DH1 AND CURRBARSCOUNT<DTT+1,L*0.93,'1.191'),COLORLIBLUE;
DRAWTEXT(DH2 AND CURRBARSCOUNT<DTT+1,L*0.93,'1.382'),COLORLIBLUE;
DRAWTEXT(DH3 AND CURRBARSCOUNT<DTT+1,L*0.93,'1.5'),COLORLIBLUE;
DRAWTEXT(DH4 AND CURRBARSCOUNT<DTT+1,L*0.93,'1.618'),COLORLIBLUE;
DRAWTEXT(DH5 AND CURRBARSCOUNT<DTT+1,L*0.93,'1.809'),COLORLIBLUE;
L1:=高1*0.191;
L2:=高1*0.382;
L3:=高1*0.5;
L4:=高1*0.618;
L5:=高1*0.809;
DL1:STICKLINE(FILTER(BETWEEN(L1,H,L),GTT+1) AND CURRBARSCOUNT<GTT+1,H*1.07,L*0.93,0,-1),COLORWHITE;
DL2:STICKLINE(FILTER(BETWEEN(L2,H,L),GTT+1) AND CURRBARSCOUNT<GTT+1,H*1.07,L*0.93,0,-1),COLORWHITE;
DL3:STICKLINE(FILTER(BETWEEN(L3,H,L),GTT+1) AND CURRBARSCOUNT<GTT+1,H*1.07,L*0.93,0,-1),COLORWHITE;
DL4:STICKLINE(FILTER(BETWEEN(L4,H,L),GTT+1) AND CURRBARSCOUNT<GTT+1,H*1.07,L*0.93,0,-1),COLORWHITE;
DL5:STICKLINE(FILTER(BETWEEN(L5,H,L),GTT+1) AND CURRBARSCOUNT<GTT+1,H*1.07,L*0.93,0,-1),COLORWHITE;
DRAWTEXT(DL1 AND CURRBARSCOUNT<GTT+1,H*1.07,'0.191'),COLORGREEN;
DRAWTEXT(DL2 AND CURRBARSCOUNT<GTT+1,H*1.07,'0.382'),COLORGREEN;
DRAWTEXT(DL3 AND CURRBARSCOUNT<GTT+1,H*1.07,'0.500'),COLORGREEN;
DRAWTEXT(DL4 AND CURRBARSCOUNT<GTT+1,H*1.07,'0.618'),COLORGREEN;
DRAWTEXT(DL5 AND CURRBARSCOUNT<GTT+1,H*1.07,'0.809'),COLORGREEN;
DRAWTEXT_FIX(1,0.5,0,0,STRCAT('定级日期：','')),COLORYELLOW,LINETHICK2;
DRAWTEXT_FIX(1,0.5,0.05,0,STRCAT('金马定级：','')),COLORYELLOW,LINETHICK2;
{黄金分割}
AH1:=高1-(高1-低1)*0.191;
AH2:=高1-(高1-低1)*0.382;
AH3:=高1-(高1-低1)*0.5;
AH4:=高1-(高1-低1)*0.618;
AH5:=高1-(高1-低1)*0.809;
ADH1:STICKLINE(FILTER(BETWEEN(AH1,H,L),GTT+1) AND (CURRBARSCOUNT<GTT+1),H*1.07,L*0.93,0,-1),COLORLIGREEN;
ADH2:STICKLINE(FILTER(BETWEEN(AH2,H,L),GTT+1) AND (CURRBARSCOUNT<GTT+1),H*1.07,L*0.93,0,-1),COLORLIGREEN;
ADH3:STICKLINE(FILTER(BETWEEN(AH3,H,L),GTT+1) AND (CURRBARSCOUNT<GTT+1),H*1.07,L*0.93,0,-1),COLORLIGREEN;
ADH4:STICKLINE(FILTER(BETWEEN(AH4,H,L),GTT+1) AND (CURRBARSCOUNT<GTT+1),H*1.07,L*0.93,0,-1),COLORLIGREEN;
ADH5:STICKLINE(FILTER(BETWEEN(AH5,H,L),GTT+1) AND (CURRBARSCOUNT<GTT+1),H*1.07,L*0.93,0,-1),COLORLIGREEN;
DRAWTEXT(ADH1 ,H*1.02,'0.809'),COLORYELLOW;
DRAWTEXT(ADH2 ,H*1.02,'0.618'),COLORYELLOW;
DRAWTEXT(ADH3 ,H*1.02,'0.500'),COLORYELLOW;
DRAWTEXT(ADH4 ,H*1.02,'0.382'),COLORYELLOW;
DRAWTEXT(ADH5 ,H*1.02,'0.191'),COLORYELLOW;
[url=http://www.70822.com/soft/sort013/sort05/down-165051.html]另类的《黄金比例》，区间比 价格比 时间比（通达信公式 主图 源码 测试图）[/url]