| __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
 |