KD表格基础图表 [color=#999999 !important][color=rgb(153, 153, 153) !important][复制链接] | KD表格基础图表
{K数据引用}
K01:="KDJ.K#MIN1" ;
K05:="KDJ.K#MIN5" ;
K15:="KDJ.K#MIN15";
K30:="KDJ.K#MIN30";
K60:="KDJ.K#MIN60";
RK :="KDJ.K#DAY" ;
ZK :="KDJ.K#WEEK" ;
YK :="KDJ.K#MONTH";
{10行D数据引用}
D01:="KDJ.D#MIN1" ;
D05:="KDJ.D#MIN5" ;
D15:="KDJ.D#MIN15";
D30:="KDJ.D#MIN30";
D60:="KDJ.D#MIN60";
RD :="KDJ.D#DAY" ;
ZD :="KDJ.D#WEEK" ;
YD :="KDJ.D#MONTH";
{19行}{表框部份}
p:=SYSPARAM(1);
DRAWTEXTEX(c,0,155,0 ,'────────────────────────────────'),Color00AAAA{,ALIGN1};
DRAWTEXTEX(c,0,155,20,'────────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,155,40,'────────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,155,60,'────────────────────────────────'),Color00AAAA;
{25行}
DRAWTEXTEX(c,0,150,5 ,'│ │ │ │ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,150,17,'│ │ │ │ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,150,29,'│ │ │ │ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,150,41,'│ │ │ │ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,150,53,'│ │ │ │ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,150,10,' 周期: 1 5 15 30 60 日 周 月 '),ColorDEDEDE;
DRAWTEXTEX(c,0,150,30,' K:'),ColorDEDEDE;
DRAWTEXTEX(c,0,150,50,' D:'),ColorDEDEDE;
{35行}
DRAWTEXTEX(c,0,150,30,' '+NUMTOSTR(K01[P],2)),COLORWHITE;
DRAWTEXTEX(c,0,150,30,' '+NUMTOSTR(K05[P],2)),COLORWHITE;
DRAWTEXTEX(c,0,150,30,' '+NUMTOSTR(K15[P],2)),COLORWHITE;
DRAWTEXTEX(c,0,150,30,' '+NUMTOSTR(K30[P],2)),COLORYELLOW;
DRAWTEXTEX(c,0,150,30,' '+NUMTOSTR(K60[P],2)),COLORYELLOW;
DRAWTEXTEX(c,0,150,30,' '+NUMTOSTR(RK[P],2)),COLORYELLOW;
DRAWTEXTEX(c,0,150,30,' '+NUMTOSTR(ZK[P],2)),COLORYELLOW;
DRAWTEXTEX(c,0,150,30,' '+NUMTOSTR(YK[P],2)),COLORWHITE;
DRAWTEXTEX(c,0,150,50,' '+NUMTOSTR(D01[P],2)),COLORWHITE;
DRAWTEXTEX(c,0,150,50,' '+NUMTOSTR(D05[P],2)),COLORWHITE;
DRAWTEXTEX(c,0,150,50,' '+NUMTOSTR(D15[P],2)),COLORWHITE;
DRAWTEXTEX(c,0,150,50,' '+NUMTOSTR(D30[P],2)),COLORYELLOW;
DRAWTEXTEX(c,0,150,50,' '+NUMTOSTR(D60[P],2)),COLORYELLOW;
DRAWTEXTEX(c,0,150,50,' '+NUMTOSTR(RD[P],2)),COLORYELLOW;
DRAWTEXTEX(c,0,150,50,' '+NUMTOSTR(ZD[P],2)),COLORYELLOW;
DRAWTEXTEX(c,0,150,50,' '+NUMTOSTR(YD[P],2)),COLORWHITE;
{}
|