根据日期选择任意高低点区间百分比线预期支撑与压力（源码 主图 贴图）介绍
根据日期选择任意高低点区间百分比线预期支撑与压力（源码 主图 贴图）
百分比线是利用百分比率的原理进行的分析,可使股价前一次的涨跌过程更加直观。百分比线是将上一次行情中重要的高点和低点之间的涨跌幅按1/8、2/8、1/3、3/8、4/8、5/8、2/3、6/8、7/8、8/8的比率生成百分比线。在各比率中,4/8最为重要,1/3、3/8及5/8、2/3四条距离较近的比率也十分重要,往往起到重要的支撑与压力位作用。实际上,上述5条百分比线的位置与黄金分割线的位置基本上是相互重合或接近的.
朋友们可跟【黄金分割线】比较看看参照使用。里边又加了一条可调任意均价线方便使用。
如图
有的朋友出现问题您换一下，使用最新版本！！这回放个导入的公式文件。导入即可【黄金分割与百分比两个公式在一起】
{INPUT:RQ1(1990,3000,2010),RQ2(1,12,1),RQ3(1,31,1),RQA(1990,3000,2010),RQB(1,12,1),RQC(1,31,1),XG(0,3,0),HF(0,1,0),GF(0,5,0),P(0,255,0);}
RQG:=(RQ1-1900)*10000+RQ2*100+RQ3;
AH:=REF(H,BARSLAST(DATE<=RQG )),NODRAW;
高价:IF(DATE>=RQG AND XG>=1,AH,DRAWNULL),COLOR00FFFF;{时间定位画直线};
RQD:=(RQA-1900)*10000+RQB*100+RQC;{
DRAWTEXT(ISLASTBAR,AH,'【创与2011/02/18の草根】'),COLOR0000FF;}
DJ:=REF(L,BARSLAST(DATE<=RQD )),NODRAW;{求某一日期的最低价}
低价:IF(DATE>=RQD AND XG>=1,DJ,DRAWNULL),COLORFFFF00;{时间定位画直线};
FU:=C-低价;
低到当前幅度:FU/低价*100,NODRAW,COLOR00FFFF;
FUGA:=高价-低价;
高到低价幅度%:FUGA/高价*100,NODRAW,COLOR00FFFF;
低价A:IF(DATE>=RQD AND GF>=1,DJ*1.03,DRAWNULL),COLOR999999;
低价B:IF(DATE>=RQD AND GF>=1,DJ*1.05,DRAWNULL),COLOR999999;
低价C:IF(DATE>=RQD AND GF>=2,DJ*1.08,DRAWNULL),COLOR999999;
低价D:IF(DATE>=RQD AND GF>=2,DJ*1.13,DRAWNULL),COLOR999999;
低价E:IF(DATE>=RQD AND GF>=3,DJ*1.18,DRAWNULL),COLOR999999;
低价F:IF(DATE>=RQD AND GF>=3,DJ*1.25,DRAWNULL),COLOR999999;
低价G:IF(DATE>=RQD AND GF>=4,DJ*1.34,DRAWNULL),COLOR999999;{
低价H:IF(DATE>=RQD AND GF>=4,DJ*1.37,DRAWNULL),COLOR999999;}
DRAWTEXT(ISLASTBAR AND GF>=1,DJ*1.03,'3％'),COLOR208FFF;
DRAWTEXT(ISLASTBAR AND GF>=1,DJ*1.05,'5％'),COLOR208FFF;
DRAWTEXT(DATE<=RQD AND GF>=2,低价C,'8％'),COLOR208FFF;
DRAWTEXT(DATE<=RQD AND GF>=2,低价D,'13％'),COLOR208FFF;
DRAWTEXT(DATE<=RQD AND GF>=3,低价E,'18％'),COLOR208FFF;
DRAWTEXT(DATE<=RQD AND GF>=3,低价F,'25％'),COLOR208FFF;
DRAWTEXT(DATE<=RQD AND GF>=3,低价G,'34％'),COLOR208FFF;{
DRAWTEXT(DATE<=RQD AND GF>=3,低价H,'37％'),COLOR208FFF;
STICKLINE(DATE<=RQG,低价,高价,0,0),COLOR00FF00;{↓垂直线}
STICKLINE(DATE<=RQD,高价,低价,0,0),COLORFF00FF;{↑垂直线}
{百分比1//8 2/8 3/8 1/2 5/8 6/8 7/8}
Q1:=(低价+(高价 - DJ) * 0.125)/高价;
Q2:=(低价+(高价 - DJ) * 0.25)/高价;
Q3:=(低价+(高价 - DJ) * 0.375)/高价;
Q4:=(低价+(高价 - DJ) * 0.50)/高价;
Q5:=(低价+(高价 - DJ) * 0.625)/高价;
Q6:=(低价+(高价 - DJ) * 0.75)/高价;
Q7:=(低价+(高价 - DJ) * 0.875)/高价;
ZH:=IF(HF,DATE<=RQG,DATE<=RQD),NODRAW;
DRAWTEXT(ZH,高价*Q1,'→1/8'),COLORDDAAAA;
DRAWTEXT(ZH,高价*Q2,'→2/8'),COLORDDAAAA;
DRAWTEXT(ZH,高价*Q3,'→3/8'),COLORDDAAAA;
DRAWTEXT(ZH,高价*Q4,'→1/2'),COLORDDAAAA;
DRAWTEXT(ZH,高价*Q5,'→5/8'),COLORDDAAAA;
DRAWTEXT(ZH,高价*Q6,'→6/8'),COLORDDAAAA;
DRAWTEXT(ZH,高价*Q7,'→7/8'),COLORDDAAAA;
DRAWNUMBER(ZH,高价*Q1*1.008,高价*Q1),COLORFFAAFF;
DRAWNUMBER(ZH,高价*Q2*1.008,高价*Q2),COLORFFAAFF;
DRAWNUMBER(ZH,高价*Q3*1.008,高价*Q3),COLORFFAAFF;
DRAWNUMBER(ZH,高价*Q4*1.008,高价*Q4),COLORFFAAFF;
DRAWNUMBER(ZH,高价*Q5*1.008,高价*Q5),COLORFFAAFF;
DRAWNUMBER(ZH,高价*Q6*1.008,高价*Q6),COLORFFAAFF;
DRAWNUMBER(ZH,高价*Q7*1.008,高价*Q7),COLORFFAAFF;
高价A:IF(DATE>=RQD AND XG>=2,AH*Q1,DRAWNULL),COLOR774477,DOTLINE;{时间定位画直线};
高价B:IF(DATE>=RQD AND XG>=2,AH*Q2,DRAWNULL),COLOR774477,DOTLINE;
高价C:IF(DATE>=RQD AND XG>=2,AH*Q3,DRAWNULL),COLOR774477,DOTLINE;
高价D:IF(DATE>=RQD AND XG>=2,AH*Q4,DRAWNULL),COLOR774477,DOTLINE;
高价E:IF(DATE>=RQD AND XG>=2,AH*Q5,DRAWNULL),COLOR774477,DOTLINE;
高价F:IF(DATE>=RQD AND XG>=2,AH*Q6,DRAWNULL),COLOR774477,DOTLINE;
高价G:IF(DATE>=RQD AND XG>=2,AH*Q7,DRAWNULL),COLOR774477,DOTLINE;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
GB:IF(RSI1>76,H*1.001,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORFFFF00;
GBB:IF(RSI1>80,H*1.002,DRAWNULL),CROSSDOT,LINETHICK3,COLOR0000FF;
AS:=(O+H+L+C)/4;
SY:EMA(AS,P),LINETHICK2,COLORCCAACC;
DRAWNUMBER(ISLASTBAR AND SY,SY*1.005,SY);
BL:EMA(AS,17),LINETHICK2,COLORFF6000;
DRAWNUMBER(ISLASTBAR AND BL,BL*1.005,BL);
XGM:=CROSS(C,BL);
DRAWICON(XGM,BL,9);
IF(BL>REF(BL,1),BL,DRAWNULL),LINETHICK2,COLORYELLOW;
{请设置计算参数:
高时间定位: PARAM#0 (调整年度)
高时间定位: PARAM#1 (调整月份)
高时间定位: PARAM#2 (调整日期)
低时间定位: PARAM#3 (调整年度)
低时间定位: PARAM#4 (调整月份)
低时间定位: PARAM#5 (调整日期)
调整数值1--3: PARAM#6 (用于显示高低点黄金分割线)
调整数值0--1: PARAM#7 (调整前后低点转换显示数值)
调整数值0--5: PARAM#8 (显示百分比涨幅度线)
调整数值1-255: PARAM#9 (显示任意均价线)};
gd12386
