【图】看筹及筹变（原码）

HS:=SUMBARS(VOL,CAPITAL);{换手周期}
JIA:=AMOUNT/VOL/100;{真实价格}
HSG:=HHV(JIA,HS);{最高交易价}
HSD:=LLV(JIA,HS);{最低交易价}
AL:=sum(amount*amount/vol/100,hs)/sum(amount,hs);{周期成本}

GT:=1-WINNER(HSG);{高台}
GJ:=WINNER(HSG)-WINNER(JIA);{高价}
GC:=WINNER(HSG)-WINNER(AL);{高成}
CJ:=WINNER(AL)-WINNER(JIA);{成价}
JW:=WINNER(JIA)-WINNER(HSD);{价稳}
CW:=WINNER(AL)-WINNER(HSD);{成稳}
WZ:=WINNER(HSD);{稳赚}

RGT:=1-1*WINNER(REFX(HSG,1));
RGJ:=WINNER(REFX(HSG,1))-WINNER(REFX(JIA,1));
RGC:=WINNER(REFX(HSG,1))-WINNER(REFX(AL,1));
RCJ:=WINNER(REFX(AL,1))-WINNER(REFX(JIA,1));
RJW:=WINNER(REFX(JIA,1))-WINNER(REFX(HSD,1));
RCW:=WINNER(REFX(AL,1))-WINNER(REFX(HSD,1));
RWZ:=WINNER(REFX(HSD,1));

GTC:=GT-REF(RGT,1);
GJC:=GJ-REF(RGJ,1);
GCC:=GC-REF(RGC,1);
CJC:=CJ-REF(RCJ,1);
JWC:=JW-REF(RJW,1);
CWC:=CW-REF(RCW,1);
WZC:=WZ-REF(RWZ,1);

GTCB:=ABS(GTC/REF(GTC,1));
GJCB:=ABS(GJC/REF(GJC,1));
GCCB:=ABS(GCC/REF(GCC,1));
CJCB:=ABS(CJC/REF(CJC,1));
JWCB:=ABS(JWC/REF(JWC,1));
CWCB:=ABS(CWC/REF(CWC,1));
WZCB:=ABS(WZC/REF(WZC,1));

高台:GTCB*100;高价:GJCB*100;高成:GCCB*100;成价:CJCB*100;价稳:JWCB*100;成稳:CWCB*100;稳赚:WZCB*100;股票论坛 www.55188.com