指标编写问答18 学习的宝藏

股友量

91.问:
     股价在年线以上运行是如何表示？
   答(ploop8 ):
     c>ma(c,250);

92.问:
     哪位高手有分析家的　散户线　的技术指标
   答(凤舞九洲):
{input:m(60,3,120),n(30,3,120);}
散户线: 100*(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M));
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
起动:EMA(j,6),COLORYELLOW;
操作指导线:60,COLORRED;
Var1:=IF(YEAR>=2038 AND MONTH>=1,0,1);
Var2:=REF(LOW,1)*Var1;
Var3:=SMA(ABS(LOW-Var2),3,1)/SMA(MAX(LOW-Var2,0),3,1)*100*Var1;
Var4:=EMA(IF(CLOSE*1.3,Var3*10,Var3/10),3)*Var1;
Var5:=LLV(LOW,30)*Var1;
Var6:=HHV(Var4,30)*Var1;
Var7:=IF(MA(CLOSE,58),1,0)*Var1;
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7*Var1;
Var9:=IF(Var8>100,100,Var8)*Var1;
吸筹:STICKLINE(Var9>-150,0,Var9,6,1)*Var1,colormagenta;

93.问:
     谁能帮我写一个在分析家主图上显示的.....＂ 每股收益、流通盘、市盈率″
   答(凤舞九洲):
解:='净资产='+NUMTOSTRN(FINANCE(35),2 )+' 收益='+ NUMTOSTRN(FINANCE(33),2)+' 公积金  ='+NUMTOSTRN(FINANCE(18),2)+' 换手率='+ NUMTOSTRN(100*VOL/CAPITAL,2)+'%';
盘:='总股本='+NUMTOSTRN(FINANCE(1) ,0 )+'万股'+' 流通A股='+ NUMTOSTRN(FINANCE(7),0)+'
万股'+' 总资产='+NUMTOSTRN(FINANCE(10),2)+'千元'+'　股东数='+PROFFIN(5061 ,0);  
if DISPSTATUS=2 then a:=BARPOS;
if DISPSTATUS=1 then b:=BARPOS;
d:=a-b;
e:=hhv(h,d);

DRAWTEXT(1, e*1.05,解),COLOR00FFFF,ALIGN2;
DRAWTEXT(1, e*1.035,盘),COLORFFFF00,ALIGN2;

94.问:
      怎样实现在K线主图上显示每个头部的最高价？
   答(馨芸):
      是这样吗?(飞狐)
drawnumber(h=sysparam(4),h,h,2);

95.问:
      上面可能是我没有表达清楚：是指每一次反弹（包括小反弹）所形成的头部的最高价都显示在主 图上（也就是说只要是头部，就显示它的最高价）。而现在所有软件的K线图上所显示的最高价 只是这一屏的，它是随着K线的放大与缩小而变化的。
   答(馨芸):
       要标出大小波的高低点值,就我所知只结构波浪有此能力,但这是未来的,请小心使用, 结构波浪  码如下(飞狐)
{n=3,1,100}
A1:=REF(HIGH,3)=HHV(HIGH,2*n+1);
B1:=FILTER(A1,3);
C1:=BACKSET(B1,3+1);
D1:=FILTER(C1,3);{高?}

A2:=REF(LOW,3)=LLV(LOW,2*n+1);
B2:=FILTER(A2,3);
C2:=BACKSET(B2,3+1);
D2:=FILTER(C2,3);{低?}

E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;
E2:=(HIGH+LOW)/2;{高低?出?在同一K?上?可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT(D1 AND E1<E2));
H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,2);
LD:=I1>REF(I1,1);{??后低?}
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,2);
HD:=I2>REF(I2,1);{??后高?}

DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1;
DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1;
J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1);
J2:=J1>REF(J1,1);
DRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST (LD),H,L),0),COLORWHITE,
              LINETHICK1;
drawnumber(hd,h*1.01,h,2);
drawnumber(ld,l*0.99,L,2);
stickline(hd,h,h,47,0),shift2,colorgreen;
stickline(ld,l,l,47,0),shift2,colorred;