动态换手日周月表
{动态换手数据引用}
日换手:=VOL/CAPITAL*100;周换手:=SUM(VOL,5)/CAPITAL*100;月换手:=SUM(VOL,21)/CAPITAL*100; {3行显示换手↑↓用} DJA:=日换手[SYSPARAM(1)];DJA1:=日换手[(SYSPARAM(1)-1)];DJ1:=IF((DJA>DJA1),'↑','↓'); DJB:=周换手[SYSPARAM(1)];DJB1:=周换手[(SYSPARAM(1)-1)];DJ2:=IF((DJB>DJB1),'↑','↓'); DJC:=月换手[SYSPARAM(1)];DJC1:=月换手[(SYSPARAM(1)-1)];DJ3:=IF((DJC>DJC1),'↑','↓'); {7行图表部份} p:=SYSPARAM(1); DRAWTEXT(c>0 and BARSTATUS=2,-10,''),ColorFFFF00,LINETHICK1,ALIGN2; {表框下限}{48行} DRAWTEXT(c>0 and BARSTATUS=2, 60,'┏━━━┱────┬────┬────┐'),Color00AAAA,LINETHICK1,ALIGN2; DRAWTEXT(c>0 and BARSTATUS=2, 50,'┃ ┃ │ │ │'),Color00AAAA,LINETHICK1,ALIGN2; DRAWTEXT(c>0 and BARSTATUS=2, 40,'┠───╂────┼────┼────┤'),Color00AAAA,LINETHICK1,ALIGN2; DRAWTEXT(c>0 and BARSTATUS=2, 30,'┃ ┃ │ │ │'),Color00AAAA,LINETHICK1,ALIGN2; DRAWTEXT(c>0 and BARSTATUS=2, 20,'┗━━━┹────┴────┴────┘'),Color00AAAA,LINETHICK1,ALIGN2; {第15行} DRAWTEXT(c>0 and BARSTATUS=2,50,' 周期: 日换手率: 周换手率:月换手率: '),ColorDEDEDE,LINETHICK1,ALIGN2; DRAWTEXT(c>0 and BARSTATUS=2,30,' 值: '),ColorDEDEDE,LINETHICK1,ALIGN2; {18行} DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(日换手[P],2)+DJ1+' '),COLORWHITE,ALIGN2; DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(周换手[P],2)+DJ2+' '),COLORWHITE,ALIGN2; DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(月换手[P],2)+DJ3+' '),COLORWHITE,ALIGN2; {各动态周期换手一目了然,方便观察使用.} {} |
