没想到,有这么多人看帖子。现在我将源码发上来。
bars:=BARSCOUNT(CLOSE);
VAR1:=IF(bars<240,bars,240);
年认同价:=MA(C,var1);
价格中枢:=(SUM(年认同价,0)/BARPOS);
//价格中枢:=(SUM(年认同价,0)/(BARSSINCE(年认同价>0)+239))(原公式)
价格中枢;
G0:价格中枢*0.8;
G1:价格中枢*1.2;
毛利润率:=ZYYWLR/ZYYWSR;
收益价值:年认同价+MGSY,colorred;
成长价值:年认同价*(1+毛利润率),coloryellow;
A:=(3*C+L+O+H)/6;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210;
工作线:EMA(CLOSE,17),colorcyan;
认同线:EMA(X,13),colormagenta;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,3,1),colorred;
STICKLINE(OPEN>CLOSE,CLOSE,OPEN,3,0 ),colorFFFF50;
STICKLINE(CLOSE>=OPEN,CLOSE,HIGH,0 ,0 ),colorred;
STICKLINE(CLOSE>=OPEN,OPEN,LOW,0 ,0),colorred;
STICKLINE(OPEN>CLOSE,CLOSE,LOW,0 ,0 ),colorFFFF50;
STICKLINE(OPEN>CLOSE,OPEN,HIGH,0 ,0 ),colorFFFF50;
AA:=CLOSE/REF(CLOSE,1)>=1.09;
STICKLINE(AA,OPEN,CLOSE,2,0),coloryellow;
STICKLINE(AA,LOW,HIGH,0.5 ,0 ),coloryellow;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
m:=CROSS(84,RSI);
STICKLINE(m,OPEN,CLOSE,8,0),colorgreen;
STICKLINE(m,LOW,HIGH,0.5 ,0 ),colorgreen;
ab:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
MAi:=CROSS(ab,0);
STICKLINE(MAi,OPEN,CLOSE,8,0),colormagenta;
STICKLINE(MAi,LOW,HIGH,0.5 ,0 ),colormagenta;
[ 本帖最后由 pixcn007 于 2008-2-10 01:28 编辑 ]