KDJ_MACD表格21(60_年)4中长线
{建议盘后看看.}
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA: EMA(DIFF,9),colorffff33;
MACD : 2*(DIFF-DEA), COLORSTICK0;
{KDJ表格}
{5行K数据引用}{↑↓∧∨}
K60:="KD.K#MIN60";
KR :="KD.K#DAY";
KZ :="KD.K#WEEK";
KY :="KD.K#MONTH";
KN :="KD.K#YEAR";
{11行D数据引用}
D60:="KD.D#MIN60";
DR :="KD.D#DAY";
DZ :="KD.D#WEEK";
DY :="KD.D#MONTH";
DN :="KD.D#YEAR";
{17行J数据引用}
J60:="KD.J#MIN60";
JR :="KD.J#DAY";
JZ :="KD.J#WEEK";
JY :="KD.J#MONTH";
JN :="KD.J#YEAR";
{23行显示K↑↓用}
DJE:=K60[SYSPARAM(1)];DJE1:=K60[(SYSPARAM(1)- 1)];DJ5:=IF((DJE>DJE1),'↑','↓');
DJF:=KR[SYSPARAM(1)] ;DJF1:=KR[(SYSPARAM(1)- 1)] ;DJ6:=IF((DJF>DJF1),'↑','↓');
DJG:=KZ[SYSPARAM(1)] ;DJG1:=KZ[(SYSPARAM(1)- 1)] ;DJ7:=IF((DJG>DJG1),'↑','↓');
DJH:=KY[SYSPARAM(1)] ;DJH1:=KY[(SYSPARAM(1)- 1)] ;DJ8:=IF((DJH>DJH1),'↑','↓');
DJI:=KN[SYSPARAM(1)] ;DJI1:=KN[(SYSPARAM(1)- 1)] ;DJ9:=IF((DJI>DJI1),'↑','↓');
{29行显示D↑↓用}
DJE2:=D60[SYSPARAM(1)];DJEE:=D60[(SYSPARAM(1)- 1)];DJ5A:=IF((DJE2>DJEE),'↑','↓');
DJF2:=DR[SYSPARAM(1)] ;DJFF:=DR[(SYSPARAM(1)- 1)] ;DJ6A:=IF((DJF2>DJFF),'↑','↓');
DJG2:=DZ[SYSPARAM(1)] ;DJGG:=DZ[(SYSPARAM(1)- 1)] ;DJ7A:=IF((DJG2>DJGG),'↑','↓');
DJH2:=DY[SYSPARAM(1)] ;DJHH:=DY[(SYSPARAM(1)- 1)] ;DJ8A:=IF((DJH2>DJHH),'↑','↓');
DJI2:=DN[SYSPARAM(1)] ;DJII:=DN[(SYSPARAM(1)- 1)] ;DJ9A:=IF((DJI2>DJII),'↑','↓');
{35行显示J↑↓用}
DJE3:=J60[SYSPARAM(1)];DJEE3:=J60[(SYSPARAM(1)- 1)];DJ5A3:=IF((DJE3>DJEE3),'↑','↓');
DJF3:=JR[SYSPARAM(1)] ;DJFF3:=JR[(SYSPARAM(1)- 1)] ;DJ6A3:=IF((DJF3>DJFF3),'↑','↓');
DJG3:=JZ[SYSPARAM(1)] ;DJGG3:=JZ[(SYSPARAM(1)- 1)] ;DJ7A3:=IF((DJG3>DJGG3),'↑','↓');
DJH3:=JY[SYSPARAM(1)] ;DJHH3:=JY[(SYSPARAM(1)- 1)] ;DJ8A3:=IF((DJH3>DJHH3),'↑','↓');
DJI3:=JN[SYSPARAM(1)] ;DJII3:=JN[(SYSPARAM(1)- 1)] ;DJ9A3:=IF((DJI3>DJII3),'↑','↓');
{41行K上拐数据引用}
K上拐60:="KD.K上拐#MIN60";
K上拐R :="KD.K上拐#DAY";
K上拐Z :="KD.K上拐#WEEK";
K上拐Y :="KD.K上拐#MONTH";
K上拐N :="KD.K上拐#YEAR";
{47行K下拐数据引用}
K下拐60:="KD.K下拐#MIN60";
K下拐R :="KD.K下拐#DAY";
K下拐Z :="KD.K下拐#WEEK";
K下拐Y :="KD.K下拐#MONTH";
K下拐N :="KD.K下拐#YEAR";
{53行K上行数据引用}
K上行60:="KD.K上行#MIN60";
K上行R :="KD.K上行#DAY";
K上行Z :="KD.K上行#WEEK";
K上行Y :="KD.K上行#MONTH";
K上行N :="KD.K上行#YEAR";
{59行K下行数据引用}
K下行60:="KD.K下行#MIN60";
K下行R :="KD.K下行#DAY";
K下行Z :="KD.K下行#WEEK";
K下行Y :="KD.K下行#MONTH";
K下行N :="KD.K下行#YEAR";
{65行D上拐数据引用}
D上拐60:="KD.D上拐#MIN60";
D上拐R :="KD.D上拐#DAY";
D上拐Z :="KD.D上拐#WEEK";
D上拐Y :="KD.D上拐#MONTH";
D上拐N :="KD.D上拐#YEAR";
{71行D下拐数据引用}
D下拐60:="KD.D下拐#MIN60";
D下拐R :="KD.D下拐#DAY";
D下拐Z :="KD.D下拐#WEEK";
D下拐Y :="KD.D下拐#MONTH";
D下拐N :="KD.D下拐#YEAR";
{77行D上行数据引用}
D上行60:="KD.D上行#MIN60";
D上行R :="KD.D上行#DAY";
D上行Z :="KD.D上行#WEEK";
D上行Y :="KD.D上行#MONTH";
D上行N :="KD.D上行#YEAR";
{83行D下行数据引用}
D下行60:="KD.D下行#MIN60";
D下行R :="KD.D下行#DAY";
D下行Z :="KD.D下行#WEEK";
D下行Y :="KD.D下行#MONTH";
D下行N :="KD.D下行#YEAR";
{89行J上拐数据引用}
J上拐60:="KD.J上拐#MIN60";
J上拐R :="KD.J上拐#DAY";
J上拐Z :="KD.J上拐#WEEK";
J上拐Y :="KD.J上拐#MONTH";
J上拐N :="KD.J上拐#YEAR";
{95行J下拐数据引用}
J下拐60:="KD.J下拐#MIN60";
J下拐R :="KD.J下拐#DAY";
J下拐Z :="KD.J下拐#WEEK";
J下拐Y :="KD.J下拐#MONTH";
J下拐N :="KD.J下拐#YEAR";
{101行J上行数据引用}
J上行60:="KD.J上行#MIN60";
J上行R :="KD.J上行#DAY";
J上行Z :="KD.J上行#WEEK";
J上行Y :="KD.J上行#MONTH";
J上行N :="KD.J上行#YEAR";
{107行J下行数据引用}
J下行60:="KD.J下行#MIN60";
J下行R :="KD.J下行#DAY";
J下行Z :="KD.J下行#WEEK";
J下行Y :="KD.J下行#MONTH";
J下行N :="KD.J下行#YEAR";
{113行}{表框部份}
p:=SYSPARAM(1);
DRAWTEXTEX(c,0,135,0,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,20 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,40 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,60 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,80 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,100,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,120,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,140,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,130, 5,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130, 17 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130, 29 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130, 41 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130, 53 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130, 65 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130, 77 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130, 89 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,101 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,113 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,125 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,137 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,149 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130, 10,' 周期: 60分 日 周 月 年'),ColorDEDEDE;
DRAWTEXTEX(c,0,130, 30,' K:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130, 50,' D:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130, 70,' J:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130, 90,' K拐行:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,110,' D拐行:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,130,' J拐行:'),ColorDEDEDE;
{143行}
DRAWTEXTEX(c,0,30,30,' '+NUMTOSTR(K60[P],2)+DJ5),COLORYELLOW;
DRAWTEXTEX(c,0,30,30,' '+NUMTOSTR(KR[P],2)+DJ6),COLORYELLOW;
DRAWTEXTEX(c,0,30,30,' '+NUMTOSTR(KZ[P],2)+DJ7),COLORYELLOW;
DRAWTEXTEX(c,0,30,30,' '+NUMTOSTR(KY[P],2)+DJ8),COLORYELLOW;
DRAWTEXTEX(c,0,30,30,' '+NUMTOSTR(KN[P],2)+DJ9),COLORYELLOW;
{149行}
DRAWTEXTEX(c,0,30,50,' '+NUMTOSTR(D60[P],2)+DJ5A),COLORYELLOW;
DRAWTEXTEX(c,0,30,50,' '+NUMTOSTR(DR[P],2)+DJ6A),COLORYELLOW;
DRAWTEXTEX(c,0,30,50,' '+NUMTOSTR(DZ[P],2)+DJ7A),COLORYELLOW;
DRAWTEXTEX(c,0,30,50,' '+NUMTOSTR(DY[P],2)+DJ8A),COLORYELLOW;
DRAWTEXTEX(c,0,30,50,' '+NUMTOSTR(DN[P],2)+DJ9A),COLORYELLOW;
{155行}
DRAWTEXTEX(c,0,30,70,' '+NUMTOSTR(J60[P],2)+DJ5A3),COLORYELLOW;
DRAWTEXTEX(c,0,30,70,' '+NUMTOSTR(JR[P],2)+DJ6A3),COLORYELLOW;
DRAWTEXTEX(c,0,30,70,' '+NUMTOSTR(JZ[P],2)+DJ7A3),COLORYELLOW;
DRAWTEXTEX(c,0,30,70,' '+NUMTOSTR(JY[P],2)+DJ8A3),COLORYELLOW;
DRAWTEXTEX(c,0,30,70,' '+NUMTOSTR(JN[P],2)+DJ9A3),COLORYELLOW;
{161行显示K↑行}
DRAWTEXTEX(C AND K上行60[P],0,200,90,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行60[P],0,200,92,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行R[P],0,260,90,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行R[P],0,260,92,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行Z[P],0,320,90,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行Z[P],0,320,92,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行Y[P],0,380,90,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行Y[P],0,380,92,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行N[P],0,440,90,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行N[P],0,440,92,'↑'),COLORGREEN;
{172行显示K↓行}
DRAWTEXTEX(C AND K下行60[P],0,210,90,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行60[P],0,210,92,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行R[P],0,270,90,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行R[P],0,270,92,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行Z[P],0,330,90,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行Z[P],0,330,92,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行Y[P],0,390,90,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行Y[P],0,390,92,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行N[P],0,450,90,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行N[P],0,450,92,'↓'),COLORRED;
{183行显示K上拐∨}
DRAWTEXTEX(C AND K上拐60[P],0,225,90,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐60[P],0,225,92,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐R[P],0,285,90,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐R[P],0,285,92,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐Z[P],0,345,90,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐Z[P],0,345,92,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐Y[P],0,405,90,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐Y[P],0,405,92,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐N[P],0,465,90,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐N[P],0,465,92,'∨'),COLORGREEN;
{194行显示K下拐∧}
DRAWTEXTEX(C and K下拐60[P],0,240,90,'∧'),COLORRED;
DRAWTEXTEX(C and K下拐60[P],0,240,92,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐R[P],0,300,90,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐R[P],0,300,92,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐Z[P],0,360,90,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐Z[P],0,360,92,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐Y[P],0,420,90,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐Y[P],0,420,92,'∧'),COLORRED;
DRAWTEXTEX(C and K下拐N[P],0,480,90,'∧'),COLORRED;
DRAWTEXTEX(C and K下拐N[P],0,480,92,'∧'),COLORRED;
{205行显示D↑行}
DRAWTEXTEX(C AND D上行60[P],0,200,110,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行60[P],0,200,112,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行R[P],0,260,110,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行R[P],0,260,112,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行Z[P],0,320,110,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行Z[P],0,320,112,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行Y[P],0,380,110,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行Y[P],0,380,112,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行N[P],0,440,110,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行N[P],0,440,112,'↑'),COLORGREEN;
{216行显示D↓行}
DRAWTEXTEX(C AND D下行60[P],0,210,110,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行60[P],0,210,112,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行R[P],0,270,110,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行R[P],0,270,112,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行Z[P],0,330,110,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行Z[P],0,330,112,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行Y[P],0,390,110,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行Y[P],0,390,112,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行N[P],0,450,110,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行N[P],0,450,112,'↓'),COLORRED;
{227行显示D上拐∨}
DRAWTEXTEX(C AND D上拐60[P],0,225,110,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐60[P],0,225,112,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐R[P],0,285,110,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐R[P],0,285,112,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐Z[P],0,345,110,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐Z[P],0,345,112,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐Y[P],0,405,110,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐Y[P],0,405,112,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐N[P],0,465,110,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐N[P],0,465,112,'∨'),COLORGREEN;
{238行显示D下拐∧}
DRAWTEXTEX(C and D下拐60[P],0,240,110,'∧'),COLORRED;
DRAWTEXTEX(C and D下拐60[P],0,240,112,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐R[P],0,300,110,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐R[P],0,300,112,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐Z[P],0,360,110,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐Z[P],0,360,112,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐Y[P],0,420,110,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐Y[P],0,420,112,'∧'),COLORRED;
DRAWTEXTEX(C and D下拐N[P],0,480,110,'∧'),COLORRED;
DRAWTEXTEX(C and D下拐N[P],0,480,112,'∧'),COLORRED;
{249行显示J↑行}
DRAWTEXTEX(C AND J上行60[P],0,200,130,'↑'),COLORGREEN;
DRAWTEXTEX(C AND J上行60[P],0,200,132,'↑'),COLORGREEN;
DRAWTEXTEX(C AND J上行R[P],0,260,130,'↑'),COLORGREEN;
DRAWTEXTEX(C AND J上行R[P],0,260,132,'↑'),COLORGREEN;
DRAWTEXTEX(C AND J上行Z[P],0,320,130,'↑'),COLORGREEN;
DRAWTEXTEX(C AND J上行Z[P],0,320,132,'↑'),COLORGREEN;
DRAWTEXTEX(C AND J上行Y[P],0,380,130,'↑'),COLORGREEN;
DRAWTEXTEX(C AND J上行Y[P],0,380,132,'↑'),COLORGREEN;
DRAWTEXTEX(C AND J上行N[P],0,440,130,'↑'),COLORGREEN;
DRAWTEXTEX(C AND J上行N[P],0,440,132,'↑'),COLORGREEN;
{260行显示J↓行}
DRAWTEXTEX(C AND J下行60[P],0,210,130,'↓'),COLORRED;
DRAWTEXTEX(C AND J下行60[P],0,210,132,'↓'),COLORRED;
DRAWTEXTEX(C AND J下行R[P],0,270,130,'↓'),COLORRED;
DRAWTEXTEX(C AND J下行R[P],0,270,132,'↓'),COLORRED;
DRAWTEXTEX(C AND J下行Z[P],0,330,130,'↓'),COLORRED;
DRAWTEXTEX(C AND J下行Z[P],0,330,132,'↓'),COLORRED;
DRAWTEXTEX(C AND J下行Y[P],0,390,130,'↓'),COLORRED;
DRAWTEXTEX(C AND J下行Y[P],0,390,132,'↓'),COLORRED;
DRAWTEXTEX(C AND J下行N[P],0,450,130,'↓'),COLORRED;
DRAWTEXTEX(C AND J下行N[P],0,450,132,'↓'),COLORRED;
{271行显示J上拐∨}
DRAWTEXTEX(C AND J上拐60[P],0,225,130,'∨'),COLORGREEN;
DRAWTEXTEX(C AND J上拐60[P],0,225,132,'∨'),COLORGREEN;
DRAWTEXTEX(C AND J上拐R[P],0,285,130,'∨'),COLORGREEN;
DRAWTEXTEX(C AND J上拐R[P],0,285,132,'∨'),COLORGREEN;
DRAWTEXTEX(C AND J上拐Z[P],0,345,130,'∨'),COLORGREEN;
DRAWTEXTEX(C AND J上拐Z[P],0,345,132,'∨'),COLORGREEN;
DRAWTEXTEX(C AND J上拐Y[P],0,405,130,'∨'),COLORGREEN;
DRAWTEXTEX(C AND J上拐Y[P],0,405,132,'∨'),COLORGREEN;
DRAWTEXTEX(C AND J上拐N[P],0,465,130,'∨'),COLORGREEN;
DRAWTEXTEX(C AND J上拐N[P],0,465,132,'∨'),COLORGREEN;
{282行显示J下拐∧}
DRAWTEXTEX(C and J下拐60[P],0,240,130,'∧'),COLORRED;
DRAWTEXTEX(C and J下拐60[P],0,240,132,'∧'),COLORRED;
DRAWTEXTEX(C AND J下拐R[P],0,300,130,'∧'),COLORRED;
DRAWTEXTEX(C AND J下拐R[P],0,300,132,'∧'),COLORRED;
DRAWTEXTEX(C AND J下拐Z[P],0,360,130,'∧'),COLORRED;
DRAWTEXTEX(C AND J下拐Z[P],0,360,132,'∧'),COLORRED;
DRAWTEXTEX(C AND J下拐Y[P],0,420,130,'∧'),COLORRED;
DRAWTEXTEX(C AND J下拐Y[P],0,420,132,'∧'),COLORRED;
DRAWTEXTEX(C and J下拐N[P],0,480,130,'∧'),COLORRED;
DRAWTEXTEX(C and J下拐N[P],0,480,132,'∧'),COLORRED;
{------------------------------------------------------------------------------------------------------------------------------------------}
{MACD表格}
{295行DIFF数据引用}{↑↓∧∨}
DF60:="MACD1.DIFF#MIN60";
DFR :="MACD1.DIFF#DAY";
DFZ :="MACD1.DIFF#WEEK";
DFY :="MACD1.DIFF#MONTH";
DFN :="MACD1.DIFF#YEAR";
{301行DEA数据引用}
DE60:="MACD1.DEA#MIN60";
DER :="MACD1.DEA#DAY";
DEZ :="MACD1.DEA#WEEK";
DEY :="MACD1.DEA#MONTH";
DEN :="MACD1.DEA#YEAR";
{307行MACD数据引用}
MACD60:="MACD1.MACD#MIN60";
MACDR :="MACD1.MACD#DAY";
MACDZ :="MACD1.MACD#WEEK";
MACDY :="MACD1.MACD#MONTH";
MACDN :="MACD1.MACD#YEAR";
{313行显示DIFF↑↓用}
DJN:=DF60[SYSPARAM(1)];DJN1:=DF60[(SYSPARAM(1)- 1)];DJ15:=IF((DJN>DJN1),'↑','↓');
DJO:=DFR[SYSPARAM(1)] ;DJO1:=DFR[(SYSPARAM(1)- 1)] ;DJ16:=IF((DJO>DJO1),'↑','↓');
DJP:=DFZ[SYSPARAM(1)] ;DJP1:=DFZ[(SYSPARAM(1)- 1)] ;DJ17:=IF((DJP>DJP1),'↑','↓');
DJQ:=DFY[SYSPARAM(1)] ;DJQ1:=DFY[(SYSPARAM(1)- 1)] ;DJ18:=IF((DJQ>DJQ1),'↑','↓');
DJR:=DFN[SYSPARAM(1)] ;DJR1:=DFN[(SYSPARAM(1)- 1)] ;DJ19:=IF((DJR>DJR1),'↑','↓');
{319行显示DEA↑↓用}
DJ1N:=DE60[SYSPARAM(1)];DJ1N1:=DE60[(SYSPARAM(1)- 1)];DJ15A:=IF((DJ1N>DJ1N1),'↑','↓');
DJ1O:=DER[SYSPARAM(1)] ;DJ1O1:=DER[(SYSPARAM(1)- 1)] ;DJ16A:=IF((DJ1O>DJ1O1),'↑','↓');
DJ1P:=DEZ[SYSPARAM(1)] ;DJ1P1:=DEZ[(SYSPARAM(1)- 1)] ;DJ17A:=IF((DJ1P>DJ1P1),'↑','↓');
DJ1Q:=DEY[SYSPARAM(1)] ;DJ1Q1:=DEY[(SYSPARAM(1)- 1)] ;DJ18A:=IF((DJ1Q>DJ1Q1),'↑','↓');
DJ1R:=DEN[SYSPARAM(1)] ;DJ1R1:=DEN[(SYSPARAM(1)- 1)] ;DJ19A:=IF((DJ1R>DJ1R1),'↑','↓');
{325行显示MACD↑↓用}
DJ2N:=MACD60[SYSPARAM(1)];DJN2:=MACD60[(SYSPARAM(1)- 1)];DJ15B:=IF((DJ2N>DJN2),'↑','↓');
DJ2O:=MACDR[SYSPARAM(1)] ;DJO2:=MACDR[(SYSPARAM(1)- 1)] ;DJ16B:=IF((DJ2O>DJO2),'↑','↓');
DJ2P:=MACDZ[SYSPARAM(1)] ;DJP2:=MACDZ[(SYSPARAM(1)- 1)] ;DJ17B:=IF((DJ2P>DJP2),'↑','↓');
DJ2Q:=MACDY[SYSPARAM(1)] ;DJQ2:=MACDY[(SYSPARAM(1)- 1)] ;DJ18B:=IF((DJ2Q>DJQ2),'↑','↓');
DJ2R:=MACDN[SYSPARAM(1)] ;DJR2:=MACDN[(SYSPARAM(1)- 1)] ;DJ19B:=IF((DJ2R>DJR2),'↑','↓');
{331行DIFF上拐数据引用}
DF上拐60:="MACD1.DF上拐#MIN60";
DF上拐R :="MACD1.DF上拐#DAY";
DF上拐Z :="MACD1.DF上拐#WEEK";
DF上拐Y :="MACD1.DF上拐#MONTH";
DF上拐N :="MACD1.DF上拐#YEAR";
{337行DIFF下拐数据引用}
DF下拐60:="MACD1.DF下拐#MIN60";
DF下拐R :="MACD1.DF下拐#DAY";
DF下拐Z :="MACD1.DF下拐#WEEK";
DF下拐Y :="MACD1.DF下拐#MONTH";
DF下拐N :="MACD1.DF下拐#YEAR";
{343行DIFF上行数据引用}
DF上行60:="MACD1.DF上行#MIN60";
DF上行R :="MACD1.DF上行#DAY";
DF上行Z :="MACD1.DF上行#WEEK";
DF上行Y :="MACD1.DF上行#MONTH";
DF上行N :="MACD1.DF上行#YEAR";
{349行DIFF下行数据引用}
DF下行60:="MACD1.DF下行#MIN60";
DF下行R :="MACD1.DF下行#DAY";
DF下行Z :="MACD1.DF下行#WEEK";
DF下行Y :="MACD1.DF下行#MONTH";
DF下行N :="MACD1.DF下行#YEAR";
{355行DEA上拐数据引用}
DE上拐60:="MACD1.DE上拐#MIN60";
DE上拐R :="MACD1.DE上拐#DAY";
DE上拐Z :="MACD1.DE上拐#WEEK";
DE上拐Y :="MACD1.DE上拐#MONTH";
DE上拐N :="MACD1.DE上拐#YEAR";
{361行DEA下拐数据引用}
DE下拐60:="MACD1.DE下拐#MIN60";
DE下拐R :="MACD1.DE下拐#DAY";
DE下拐Z :="MACD1.DE下拐#WEEK";
DE下拐Y :="MACD1.DE下拐#MONTH";
DE下拐N :="MACD1.DE下拐#YEAR";
{367行DEA上行数据引用}
DE上行60:="MACD1.DE上行#MIN60";
DE上行R :="MACD1.DE上行#DAY";
DE上行Z :="MACD1.DE上行#WEEK";
DE上行Y :="MACD1.DE上行#MONTH";
DE上行N :="MACD1.DE上行#YEAR";
{373行DEA下行数据引用}
DE下行60:="MACD1.DE下行#MIN60";
DE下行R :="MACD1.DE下行#DAY";
DE下行Z :="MACD1.DE下行#WEEK";
DE下行Y :="MACD1.DE下行#MONTH";
DE下行N :="MACD1.DE下行#YEAR";
{379行MACD上拐数据引用}
MACD上拐60:="MACD1.MACD上拐#MIN60";
MACD上拐R :="MACD1.MACD上拐#DAY";
MACD上拐Z :="MACD1.MACD上拐#WEEK";
MACD上拐Y :="MACD1.MACD上拐#MONTH";
MACD上拐N :="MACD1.MACD上拐#YEAR";
{385行MACD下拐数据引用}
MACD下拐60:="MACD1.MACD下拐#MIN60";
MACD下拐R :="MACD1.MACD下拐#DAY";
MACD下拐Z :="MACD1.MACD下拐#WEEK";
MACD下拐Y :="MACD1.MACD下拐#MONTH";
MACD下拐N :="MACD1.MACD下拐#YEAR";
{391行MACD上行数据引用}
MACD上行60:="MACD1.MACD上行#MIN60";
MACD上行R :="MACD1.MACD上行#DAY";
MACD上行Z :="MACD1.MACD上行#WEEK";
MACD上行Y :="MACD1.MACD上行#MONTH";
MACD上行N :="MACD1.MACD上行#YEAR";
{397行MACD下行数据引用}
MACD下行60:="MACD1.MACD下行#MIN60";
MACD下行R :="MACD1.MACD下行#DAY";
MACD下行Z :="MACD1.MACD下行#WEEK";
MACD下行Y :="MACD1.MACD下行#MONTH";
MACD下行N :="MACD1.MACD下行#YEAR";
{403行}{表框部份}
p:=SYSPARAM(1);
DRAWTEXTEX(c,0,135,160 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,180 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,200 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,220 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,240 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,135,260 ,'──────────────────────────────'),Color00AAAA;
DRAWTEXTEX(c,0,130,149 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,161 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,173 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,185 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,197 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,209 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,221 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,233 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,245 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,254 ,'│ │ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,150,' DIFF:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,170,' DEA:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,190,'DIFF拐行:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,210,'DEA拐行:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,230,' MACD:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,250,'MACD拐行:'),ColorDEDEDE;
{427行}
DRAWTEXTEX(c,0,30,150,' '+NUMTOSTR(DF60[P],2)+DJ15),COLORYELLOW;
DRAWTEXTEX(c,0,30,150,' '+NUMTOSTR(DFR[P],2)+DJ16),COLORYELLOW;
DRAWTEXTEX(c,0,30,150,' '+NUMTOSTR(DFZ[P],2)+DJ17),COLORYELLOW;
DRAWTEXTEX(c,0,30,150,' '+NUMTOSTR(DFY[P],2)+DJ18),COLORYELLOW;
DRAWTEXTEX(c,0,30,150,' '+NUMTOSTR(DFN[P],2)+DJ19),COLORYELLOW;
{433行}
DRAWTEXTEX(c,0,30,170,' '+NUMTOSTR(DE60[P],2)+DJ15A),COLORYELLOW;
DRAWTEXTEX(c,0,30,170,' '+NUMTOSTR(DER[P],2)+DJ16A),COLORYELLOW;
DRAWTEXTEX(c,0,30,170,' '+NUMTOSTR(DEZ[P],2)+DJ17A),COLORYELLOW;
DRAWTEXTEX(c,0,30,170,' '+NUMTOSTR(DEY[P],2)+DJ18A),COLORYELLOW;
DRAWTEXTEX(c,0,30,170,' '+NUMTOSTR(DEN[P],2)+DJ19A),COLORYELLOW;
{439行}
DRAWTEXTEX(c,0,30,230,' '+NUMTOSTR(MACD60[P],2)+DJ15B),COLORYELLOW;
DRAWTEXTEX(c,0,30,230,' '+NUMTOSTR(MACDR[P],2)+DJ16B),COLORYELLOW;
DRAWTEXTEX(c,0,30,230,' '+NUMTOSTR(MACDZ[P],2)+DJ17B),COLORYELLOW;
DRAWTEXTEX(c,0,30,230,' '+NUMTOSTR(MACDY[P],2)+DJ18B),COLORYELLOW;
DRAWTEXTEX(c,0,30,230,' '+NUMTOSTR(MACDN[P],2)+DJ19B),COLORYELLOW;
{445行显示DIFF↑行}
DRAWTEXTEX(C AND DF上行60[P],0,200,190,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行60[P],0,200,192,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行R[P],0,260,190,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行R[P],0,260,192,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行Z[P],0,320,190,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行Z[P],0,320,192,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行Y[P],0,380,190,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行Y[P],0,380,192,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行N[P],0,440,190,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行N[P],0,440,192,'↑'),COLORGREEN;
{456行显示DIFF↓行}
DRAWTEXTEX(C AND DF下行60[P],0,210,190,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行60[P],0,210,192,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行R[P],0,270,190,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行R[P],0,270,192,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行Z[P],0,330,190,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行Z[P],0,330,192,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行Y[P],0,390,190,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行Y[P],0,390,192,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行N[P],0,450,190,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行N[P],0,450,192,'↓'),COLORRED;
{467行显示DIFF上拐∨}
DRAWTEXTEX(C AND DF上拐60[P],0,225,190,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐60[P],0,225,192,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐R[P],0,285,190,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐R[P],0,285,192,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐Z[P],0,345,190,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐Z[P],0,345,192,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐Y[P],0,405,190,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐Y[P],0,405,192,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐N[P],0,465,190,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐N[P],0,465,192,'∨'),COLORGREEN;
{478行显示DIFF下拐∧}
DRAWTEXTEX(C and DF下拐60[P],0,240,190,'∧'),COLORRED;
DRAWTEXTEX(C and DF下拐60[P],0,240,192,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐R[P],0,300,190,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐R[P],0,300,192,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐Z[P],0,360,190,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐Z[P],0,360,192,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐Y[P],0,420,190,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐Y[P],0,420,192,'∧'),COLORRED;
DRAWTEXTEX(C and DF下拐N[P],0,480,190,'∧'),COLORRED;
DRAWTEXTEX(C and DF下拐N[P],0,480,192,'∧'),COLORRED;{489行显示DEA↑行}
DRAWTEXTEX(C AND DE上行60[P],0,200,210,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行60[P],0,200,212,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行R[P],0,260,210,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行R[P],0,260,212,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行Z[P],0,320,210,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行Z[P],0,320,212,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行Y[P],0,380,210,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行Y[P],0,380,212,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行N[P],0,440,210,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行N[P],0,440,212,'↑'),COLORGREEN;
{500行显示DEA↓行}
DRAWTEXTEX(C AND DE下行60[P],0,210,210,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行60[P],0,210,212,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行R[P],0,270,210,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行R[P],0,270,212,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行Z[P],0,330,210,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行Z[P],0,330,212,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行Y[P],0,390,210,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行Y[P],0,390,212,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行N[P],0,450,210,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行N[P],0,450,212,'↓'),COLORRED;
{511行显示DEA上拐∨}
DRAWTEXTEX(C AND DE上拐60[P],0,225,210,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐60[P],0,225,212,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐R[P],0,285,210,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐R[P],0,285,212,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐Z[P],0,345,210,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐Z[P],0,345,212,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐Y[P],0,405,210,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐Y[P],0,405,212,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐N[P],0,465,210,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐N[P],0,465,212,'∨'),COLORGREEN;
{522行显示DEA下拐∧}
DRAWTEXTEX(C and DE下拐60[P],0,240,210,'∧'),COLORRED;
DRAWTEXTEX(C and DE下拐60[P],0,240,212,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐R[P],0,300,210,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐R[P],0,300,212,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐Z[P],0,360,210,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐Z[P],0,360,212,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐Y[P],0,420,210,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐Y[P],0,420,212,'∧'),COLORRED;
DRAWTEXTEX(C and DE下拐N[P],0,480,210,'∧'),COLORRED;
DRAWTEXTEX(C and DE下拐N[P],0,480,212,'∧'),COLORRED;
{533行显示MACD↑行}
DRAWTEXTEX(C AND MACD上行60[P],0,200,250,'↑'),COLORGREEN;
DRAWTEXTEX(C AND MACD上行60[P],0,200,252,'↑'),COLORGREEN;
DRAWTEXTEX(C AND MACD上行R[P],0,260,250,'↑'),COLORGREEN;
DRAWTEXTEX(C AND MACD上行R[P],0,260,252,'↑'),COLORGREEN;
DRAWTEXTEX(C AND MACD上行Z[P],0,320,250,'↑'),COLORGREEN;
DRAWTEXTEX(C AND MACD上行Z[P],0,320,252,'↑'),COLORGREEN;
DRAWTEXTEX(C AND MACD上行Y[P],0,380,250,'↑'),COLORGREEN;
DRAWTEXTEX(C AND MACD上行Y[P],0,380,252,'↑'),COLORGREEN;
DRAWTEXTEX(C AND MACD上行N[P],0,440,250,'↑'),COLORGREEN;
DRAWTEXTEX(C AND MACD上行N[P],0,440,252,'↑'),COLORGREEN;
{544行显示MACD↓行}
DRAWTEXTEX(C AND MACD下行60[P],0,210,250,'↓'),COLORRED;
DRAWTEXTEX(C AND MACD下行60[P],0,210,252,'↓'),COLORRED;
DRAWTEXTEX(C AND MACD下行R[P],0,270,250,'↓'),COLORRED;
DRAWTEXTEX(C AND MACD下行R[P],0,270,252,'↓'),COLORRED;
DRAWTEXTEX(C AND MACD下行Z[P],0,330,250,'↓'),COLORRED;
DRAWTEXTEX(C AND MACD下行Z[P],0,330,252,'↓'),COLORRED;
DRAWTEXTEX(C AND MACD下行Y[P],0,390,250,'↓'),COLORRED;
DRAWTEXTEX(C AND MACD下行Y[P],0,390,252,'↓'),COLORRED;
DRAWTEXTEX(C AND MACD下行N[P],0,450,250,'↓'),COLORRED;
DRAWTEXTEX(C AND MACD下行N[P],0,450,252,'↓'),COLORRED;
{555行显示MACD上拐∨}
DRAWTEXTEX(C AND MACD上拐60[P],0,225,250,'∨'),COLORGREEN;
DRAWTEXTEX(C AND MACD上拐60[P],0,225,252,'∨'),COLORGREEN;
DRAWTEXTEX(C AND MACD上拐R[P],0,285,250,'∨'),COLORGREEN;
DRAWTEXTEX(C AND MACD上拐R[P],0,285,252,'∨'),COLORGREEN;
DRAWTEXTEX(C AND MACD上拐Z[P],0,345,250,'∨'),COLORGREEN;
DRAWTEXTEX(C AND MACD上拐Z[P],0,345,252,'∨'),COLORGREEN;
DRAWTEXTEX(C AND MACD上拐Y[P],0,405,250,'∨'),COLORGREEN;
DRAWTEXTEX(C AND MACD上拐Y[P],0,405,252,'∨'),COLORGREEN;
DRAWTEXTEX(C AND MACD上拐N[P],0,465,250,'∨'),COLORGREEN;
DRAWTEXTEX(C AND MACD上拐N[P],0,465,252,'∨'),COLORGREEN;
{566行显示MACD下拐∧}
DRAWTEXTEX(C and MACD下拐60[P],0,240,250,'∧'),COLORRED;
DRAWTEXTEX(C and MACD下拐60[P],0,240,252,'∧'),COLORRED;
DRAWTEXTEX(C AND MACD下拐R[P],0,300,250,'∧'),COLORRED;
DRAWTEXTEX(C AND MACD下拐R[P],0,300,252,'∧'),COLORRED;
DRAWTEXTEX(C AND MACD下拐Z[P],0,360,250,'∧'),COLORRED;
DRAWTEXTEX(C AND MACD下拐Z[P],0,360,252,'∧'),COLORRED;
DRAWTEXTEX(C AND MACD下拐Y[P],0,420,250,'∧'),COLORRED;
DRAWTEXTEX(C AND MACD下拐Y[P],0,420,252,'∧'),COLORRED;
DRAWTEXTEX(C and MACD下拐N[P],0,480,250,'∧'),COLORRED;
DRAWTEXTEX(C and MACD下拐N[P],0,480,252,'∧'),COLORRED;
{577行}{通过图表找出重点关注时间周期区间}
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
