__ZBT
_COMM
_PAR
_VAR
_ZB CYQK_CLOSE, TAO
_LOCAL
_RES ZGZJ, SHZJ, NZQK
_DEF 0.000
_CODE
ZGZJ=CYQK_CLOSE;
SHZJ=TAO;
IF CROSSUP(ZGZJ,SHZJ)
THEN NZQK=1;
ELSE NZQK=0;
ENDIF;
CURVELINE(ZGZJ,clrRed,2);
CURVELINE(SHZJ,clrSky,2);
COLUMN(cltSuspend,70,50,clrYellow,NZQK=0);
TITLE("[机构资金活跃度:",ZGZJ,"]",clrRed,
"[散户资金活跃度:",SHZJ,"]",clrSky,
"[牛转乾坤:",NZQK,"]",clrYellow);
__END |