指标编写问答9学习的宝藏
41.问:如果是每20天的最低点，该怎样表示呢？
答(知无不言):
t:=not(MOD(BARPOS,20));
t1:=BARSLAST(t)+1;
llv(l,t1)PRECISION2;
VERTLINE(t);
42.问:
重心:SUM(AMOUNT,1)*0.01/SUM(VOL,1),LINETHICK0,colorwhite;
a:=backset(islastbar,1);
关注STICKLINE(a>0,重心,重心,8,1),colormagenta,SHIFT1;
请帮助在关注的这根K线上方写上字和显示数值.并可以随光标显示左边每根K线的数值.
答(知无不言):
是否如此？
重心:SUM(AMOUNT,1)*0.01/SUM(VOL,1),LINETHICK0,colorwhite;
a:=backset(islastbar,1);
STICKLINE(a>0,重心,重心,8,1),colormagenta,SHIFT1;
关注:SYSPARAM(1)LINETHICK0;
DRAWNUMBER(a>0,重心*1.01,关注,2)align1,SHIFT1;
DRAWTEXT(a>0,重心*1.02,'关注')align1,SHIFT1;
43.问:
如何才能让分析家网络版能出现换手率呢？
答(知无不言):
上传“分析家财务数据压缩包”
在工具——数据管理——财务数据 里引入就可以了。
以后可到( www.fxj.com.cn )中下载更新财务数据
44.问:
均线经过一段时间下跌后,趋势开始走平,公式该怎样写???/
MA30=ref(ma30,1)这个可能性极少,
MA30<REF(MA30,1)*1.001 这个出现又太多,
想了很久,还没想出,
答(大庆老杨):
MA30>=REF(MA30,1)*0.99 AND MA30<=REF(MA30,1)*1.02;
答(知无不言):
INPUT:n(30,1,100);
ma30<ref(ma30,n)and ma30>ref(ma30,1) and ref(ma30,1)<ref(ma30,2);
45.问:
上式我想再写一句 "价跌月线平,底部已探明"
答(知无不言):
“均线经过一段时间下跌后,趋势开始走平”与"价跌月线平,底部已探明" 是两个不同的条件。
INPUT:n(30,1,100);
ma30<ref(ma30,n)and ma30>ref(ma30,1) and ref(ma30,1)<ref(ma30,2);
是满足“均线经过一段时间下跌后,趋势开始走平”的条件。
46.问:
写一飞狐指标W%R
1，W%R介于0-100%之间
2，设一条“超卖线”，价格进入８０％——１００％之间。
3，设一条“超买线”，价格进入２０％——０％之间。
4，设一条“中轴线”。
答(了无痕):
是这样吧........
{W%RN=14}
趋势线:100*(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N));
超买线:20,COLORGREEN;
超卖线:80,COLORRED;
中轴线:50,COLORGRAY
答(股市浪子):
INPUT:N1(10,2,200),N2(20,5,200),N3(30,10,200);
WR1:-100*(HHV(HIGH,N1)-CLOSE)/(HHV(HIGH,N1)-LLV(LOW,N1));
WR2:-100*(HHV(HIGH,N2)-CLOSE)/(HHV(HIGH,N2)-LLV(LOW,N2));
WR3:-100*(HHV(HIGH,N3)-CLOSE)/(HHV(HIGH,N3)-LLV(LOW,N3));
超买线:-20,LINEDOT,COLOR669900;
超卖线:-80,LINEDOT,COLOR003399;
中轴线:-50,LINEDOT,COLORGRAY;
答(吴畅):
比较一下操盘手软件龙腾四海.
N=8
龙腾四海:100-100*(HHV(HIGH,5*N)-CLOSE)/(HHV(HIGH,5*N)-LLV(LOW,5*N));
天际线:80,COLORRED,POINTDOT;
天海线:50,COLORYELLOW,POINTDOT;
海面线:20,COLORGREEN,POINTDOT;
47.问:
F:=100*(C-REF(C,1))/REF(C,1);
今小昨:=IF(C<REF(O,1) AND F<0,1,0);
P1:=今小昨;
今小前:=IF(C<REF(O,2) AND F<0,1,0);
P2:=今小前;
P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1;
当这P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1;条件成立
然后明天收阳不。收阳就关注不收阳就不关注！怎么写啊？
答(了无痕):
看看是否符合要求？........
F:=100*(C-REF(C,1))/REF(C,1);
今小昨:=IF(C<REF(O,1) AND F<0,1,0);
P1:=今小昨;
今小前:=IF(C<REF(O,2) AND F<0,1,0);
P2:=今小前;
TX:P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1;
今日收阳:(BARSLAST(TX)=1 AND C>O)*1.5,LINETHICK2,colorred;
48.问:
包括非交易日在内（即停牌日），10日线怎么写
答(骑兵00):
INPUT:N(10);
rq:=date;
for i=n to datacount do begin
for j=i downto 1 do begin
x:=i-j;
if datediff(rq,rq)>=n then
break;
end;
end;
自然日:datediff(ref(rq,x),rq),LINETHICK0;
交易日:x+1,LINETHICK0;
均线:ma(c,交易日);
49.问:
LC := REF(CLOSE,1);
RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*2.5;
(FILLRGN(rsi3<1.25,rsi3,1.25)),colorblue;
(FILLRGN(rsi3>=1.25,rsi3,1.25)),colorred;
请帮助改成柱状和线显示.柱状的颜色可以自己定义的
答(lhl311):
LC := REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*2.5;
RSI2:SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*2.5;
RSI3:SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*2.5;
(FILLRGN(rsi3<1.25,rsi3,1.25)),colorblue;
(FILLRGN(rsi3>=1.25,rsi3,1.25)),colorred;
STICKLINE(rsi3<1.25,rsi3,1.25,8,0),color00ff00;
STICKLINE(rsi3>1.25,rsi3,1.25,8,0),colorff00ff;
50.问:
mid:=(open+Close)/2; {均价}
hsl:=if(capital=0,VOL/sum(VOL,100),VOL/capital);{换手率}
if capital=0 then begin
hsl:=VOL/sum(VOL,100);
a:=setlbound(hsl,1);
for i=1 to min(100-1,datacount) do hsl:=0;
end;
ljhs3:=hsl;
cyc3:=mid;
dd:=mid*(barpos<100);
for i=lbound(hsl)+1 to datacount do begin
ljhs3:=ljhs3*(1-hsl)*(34-1)/34+hsl;
cyc3:(mid*hsl+cyc3*ljhs3*(1-hsl)*(34-1)/34)/ljhs3+dd;
end;
答(馨芸):
可以这样代入原公式
mid:=( "1a0001$open"+"1a0001$CLOSE")/2; {均价}
vola:= "1a0001$vol";
VOL - - - >vola
但是指数无capital值,所这公式无法适用于指数
答(懒汉):
这样或许好些
mid:=(o+C)/2; {均价}
t:=if(BARPOS<100,BARPOS,100);
hsl:=if(capital=0,V/sum(V,t),V/capital);{换手率}
if capital=0 then begin
hsl:=V/sum(V,t);
for i=1 to min(100-1,SYSPARAM(3)) do hsl:=0;
end;
ljhs3:=hsl;
cyc3:=mid;
dd:=mid*(barpos<2);
for i=2 to datacount do begin
ljhs3:=ljhs3*(1-hsl)*(34-1)/34+hsl;
cyc3:(mid*hsl+cyc3*ljhs3*(1-hsl)*(34-1)/34)/ljhs3+d;
end;
另建公式
STKINDI('1A0001','cyc.cyc3',0,6);
:):):):):):) 谢谢分享辛苦了
谢谢楼主分享！
页:
[1]