 | |  |  |
飞狐KD_MACD表格全符号(30_周)14B源码公式：
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA : EMA(DIFF,9),colorffff33;
MACD : 2*(DIFF-DEA), COLORSTICK0;
{4行KD_表格数据引用}
K上拐30:="KD.K上拐#MIN30";K上拐60:="KD.K上拐#MIN60";K上拐R :="KD.K上拐#DAY";K上拐Z :="KD.K上拐#WEEK";
K下拐30:="KD.K下拐#MIN30";K下拐60:="KD.K下拐#MIN60";K下拐R :="KD.K下拐#DAY";K下拐Z :="KD.K下拐#WEEK";
K上行30:="KD.K上行#MIN30";K上行60:="KD.K上行#MIN60";K上行R :="KD.K上行#DAY";K上行Z :="KD.K上行#WEEK";
K下行30:="KD.K下行#MIN30";K下行60:="KD.K下行#MIN60";K下行R :="KD.K下行#DAY";K下行Z :="KD.K下行#WEEK";
D上拐30:="KD.D上拐#MIN30";D上拐60:="KD.D上拐#MIN60";D上拐R :="KD.D上拐#DAY";D上拐Z :="KD.D上拐#WEEK";
D下拐30:="KD.D下拐#MIN30";D下拐60:="KD.D下拐#MIN60";D下拐R :="KD.D下拐#DAY";D下拐Z :="KD.D下拐#WEEK";
D上行30:="KD.D上行#MIN30";D上行60:="KD.D上行#MIN60";D上行R :="KD.D上行#DAY";D上行Z :="KD.D上行#WEEK";
D下行30:="KD.D下行#MIN30";D下行60:="KD.D下行#MIN60";D下行R :="KD.D下行#DAY";D下行Z :="KD.D下行#WEEK";
{13行}{表框部份}
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,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,94 ,'│ │ │ │ │ │'),Color00AAAA;
DRAWTEXTEX(c,0,130,10,' 周期: 30分 60分 日 周'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,30,' K拐行:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,50,' D拐行:'),ColorDEDEDE;
{33行显示K↑行}
DRAWTEXTEX(C AND K上行30[P],0,200,30,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行30[P],0,200,32,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行60[P],0,260,30,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行60[P],0,260,32,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行R[P],0,320,30,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行R[P],0,320,32,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行Z[P],0,380,30,'↑'),COLORGREEN;
DRAWTEXTEX(C AND K上行Z[P],0,380,32,'↑'),COLORGREEN;
{42行显示K↓行}
DRAWTEXTEX(C AND K下行30[P],0,210,30,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行30[P],0,210,32,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行60[P],0,270,30,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行60[P],0,270,32,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行R[P],0,330,30,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行R[P],0,330,32,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行Z[P],0,390,30,'↓'),COLORRED;
DRAWTEXTEX(C AND K下行Z[P],0,390,32,'↓'),COLORRED;
{51行显示K上拐∨}
DRAWTEXTEX(C AND K上拐30[P],0,225,30,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐30[P],0,225,32,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐60[P],0,285,30,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐60[P],0,285,32,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐R[P],0,345,30,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐R[P],0,345,32,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐Z[P],0,405,30,'∨'),COLORGREEN;
DRAWTEXTEX(C AND K上拐Z[P],0,405,32,'∨'),COLORGREEN;
{60行显示K下拐∧}
DRAWTEXTEX(C AND K下拐30[P],0,240,30,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐30[P],0,240,32,'∧'),COLORRED;
DRAWTEXTEX(C and K下拐60[P],0,300,30,'∧'),COLORRED;
DRAWTEXTEX(C and K下拐60[P],0,300,32,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐R[P],0,360,30,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐R[P],0,360,32,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐Z[P],0,420,30,'∧'),COLORRED;
DRAWTEXTEX(C AND K下拐Z[P],0,420,32,'∧'),COLORRED;
{69行显示D↑行}
DRAWTEXTEX(C AND D上行30[P],0,200,50,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行30[P],0,200,52,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行60[P],0,260,50,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行60[P],0,260,52,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行R[P],0,320,50,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行R[P],0,320,52,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行Z[P],0,380,50,'↑'),COLORGREEN;
DRAWTEXTEX(C AND D上行Z[P],0,380,52,'↑'),COLORGREEN;
{78行显示D↓行}
DRAWTEXTEX(C AND D下行30[P],0,210,50,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行30[P],0,210,52,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行60[P],0,270,50,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行60[P],0,270,52,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行R[P],0,330,50,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行R[P],0,330,52,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行Z[P],0,390,50,'↓'),COLORRED;
DRAWTEXTEX(C AND D下行Z[P],0,390,52,'↓'),COLORRED;
{87行显示D上拐∨}
DRAWTEXTEX(C AND D上拐30[P],0,225,50,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐30[P],0,225,52,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐60[P],0,285,50,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐60[P],0,285,52,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐R[P],0,345,50,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐R[P],0,345,52,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐Z[P],0,405,50,'∨'),COLORGREEN;
DRAWTEXTEX(C AND D上拐Z[P],0,405,52,'∨'),COLORGREEN;
{96行显示D下拐∧}
DRAWTEXTEX(C AND D下拐30[P],0,240,50,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐30[P],0,240,52,'∧'),COLORRED;
DRAWTEXTEX(C and D下拐60[P],0,300,50,'∧'),COLORRED;
DRAWTEXTEX(C and D下拐60[P],0,300,52,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐R[P],0,360,50,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐R[P],0,360,52,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐Z[P],0,420,50,'∧'),COLORRED;
DRAWTEXTEX(C AND D下拐Z[P],0,420,52,'∧'),COLORRED;
{105行MACD表格数据引用}
DF上拐30:="MACD1.DF上拐#MIN30";DF上拐60:="MACD1.DF上拐#MIN60";DF上拐R :="MACD1.DF上拐#DAY";DF上拐Z :="MACD1.DF上拐#WEEK";
DF下拐30:="MACD1.DF下拐#MIN30";DF下拐60:="MACD1.DF下拐#MIN60";DF下拐R :="MACD1.DF下拐#DAY";DF下拐Z :="MACD1.DF下拐#WEEK";
DF上行30:="MACD1.DF上行#MIN30";DF上行60:="MACD1.DF上行#MIN60";DF上行R :="MACD1.DF上行#DAY";DF上行Z :="MACD1.DF上行#WEEK";
DF下行30:="MACD1.DF下行#MIN30";DF下行60:="MACD1.DF下行#MIN60";DF下行R :="MACD1.DF下行#DAY";DF下行Z :="MACD1.DF下行#WEEK";
DE上拐30:="MACD1.DE上拐#MIN30";DE上拐60:="MACD1.DE上拐#MIN60";DE上拐R :="MACD1.DE上拐#DAY";DE上拐Z :="MACD1.DE上拐#WEEK";
DE下拐30:="MACD1.DE下拐#MIN30";DE下拐60:="MACD1.DE下拐#MIN60";DE下拐R :="MACD1.DE下拐#DAY";DE下拐Z :="MACD1.DE下拐#WEEK";
DE上行30:="MACD1.DE上行#MIN30";DE上行60:="MACD1.DE上行#MIN60";DE上行R :="MACD1.DE上行#DAY";DE上行Z :="MACD1.DE上行#WEEK";
DE下行30:="MACD1.DE下行#MIN30";DE下行60:="MACD1.DE下行#MIN60";DE下行R :="MACD1.DE下行#DAY";DE下行Z :="MACD1.DE下行#WEEK";
{114行}
DRAWTEXTEX(c,0,130,70,' DIFF拐行:'),ColorDEDEDE;
DRAWTEXTEX(c,0,130,90,' DEA拐行:'),ColorDEDEDE;
{117行显示DIFF↑行}
DRAWTEXTEX(C AND DF上行30[P],0,200,70,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行30[P],0,200,72,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行60[P],0,260,70,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行60[P],0,260,72,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行R[P],0,320,70,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行R[P],0,320,72,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行Z[P],0,380,70,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DF上行Z[P],0,380,72,'↑'),COLORGREEN;
{126行显示DIFF↓行}
DRAWTEXTEX(C AND DF下行30[P],0,210,70,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行30[P],0,210,72,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行60[P],0,270,70,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行60[P],0,270,72,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行R[P],0,330,70,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行R[P],0,330,72,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行Z[P],0,390,70,'↓'),COLORRED;
DRAWTEXTEX(C AND DF下行Z[P],0,390,72,'↓'),COLORRED;
{135行显示DIFF上拐∨}
DRAWTEXTEX(C AND DF上拐30[P],0,225,70,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐30[P],0,225,72,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐60[P],0,285,70,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐60[P],0,285,72,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐R[P],0,345,70,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐R[P],0,345,72,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐Z[P],0,405,70,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DF上拐Z[P],0,405,72,'∨'),COLORGREEN;
{144行显示DIFF下拐∧}
DRAWTEXTEX(C AND DF下拐30[P],0,240,70,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐30[P],0,240,72,'∧'),COLORRED;
DRAWTEXTEX(C and DF下拐60[P],0,300,70,'∧'),COLORRED;
DRAWTEXTEX(C and DF下拐60[P],0,300,72,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐R[P],0,360,70,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐R[P],0,360,72,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐Z[P],0,420,70,'∧'),COLORRED;
DRAWTEXTEX(C AND DF下拐Z[P],0,420,72,'∧'),COLORRED;
{153行显示DEA↑行}
DRAWTEXTEX(C AND DE上行30[P],0,200,90,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行30[P],0,200,92,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行60[P],0,260,90,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行60[P],0,260,92,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行R[P],0,320,90,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行R[P],0,320,92,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行Z[P],0,380,90,'↑'),COLORGREEN;
DRAWTEXTEX(C AND DE上行Z[P],0,380,92,'↑'),COLORGREEN;
{162行显示DEA↓行}
DRAWTEXTEX(C AND DE下行30[P],0,210,90,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行30[P],0,210,92,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行60[P],0,270,90,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行60[P],0,270,92,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行R[P],0,330,90,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行R[P],0,330,92,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行Z[P],0,390,90,'↓'),COLORRED;
DRAWTEXTEX(C AND DE下行Z[P],0,390,92,'↓'),COLORRED;
{171行显示DEA上拐∨}
DRAWTEXTEX(C AND DE上拐30[P],0,225,90,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐30[P],0,225,92,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐60[P],0,285,90,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐60[P],0,285,92,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐R[P],0,345,90,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐R[P],0,345,92,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐Z[P],0,405,90,'∨'),COLORGREEN;
DRAWTEXTEX(C AND DE上拐Z[P],0,405,92,'∨'),COLORGREEN;
{180行显示DEA下拐∧}
DRAWTEXTEX(C AND DE下拐30[P],0,240,90,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐30[P],0,240,92,'∧'),COLORRED;
DRAWTEXTEX(C and DE下拐60[P],0,300,90,'∧'),COLORRED;
DRAWTEXTEX(C and DE下拐60[P],0,300,92,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐R[P],0,360,90,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐R[P],0,360,92,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐Z[P],0,420,90,'∧'),COLORRED;
DRAWTEXTEX(C AND DE下拐Z[P],0,420,92,'∧'),COLORRED; |
| |  | |  |
|
