以下是通达信思考付图源码
通达信公式 思考付图
V8:=((600 * (EMA(C,30) - EMA(L,30))) / EMA(L,30));
V9:=EMA(V8,7);
VC:=((((2 * C) + H) + L) / 4);
VD:=LLV(L,34);
VE:=HHV(H,34);
VF:=LLV(L,21);
V10:=HHV(H,21);
V11:=EMA((((VC - VF) / (V10 - VD)) * 100),5);
V12:=EMA((((VC - VD) / (VE - VD)) * 100),8);
V13:=EMA(V12,5);
CPX:=EMA(CLOSE,1);
CPX2:=EMA(CLOSE,2);
HLX:=EMA(CLOSE,21);
开仓选择启动点:0,NODRAW,COLORCYAN;
红多绿空蓝变盘:0,LINETHICK3,COLORFF5500;
能量是持仓条件:IF((V12 > V13),(V12 - V13),(-1 * (V13 - V12))),NODRAW,COLORYELLOW;
DIF:EMA(CLOSE,7) - EMA(CLOSE,19),COLORMAGENTA;
DEA:EMA(DIF,9),COLORGREEN;
注意彩柱色变:2 * (DIF - DEA),COLORSTICK,COLORDDDDDD;
STICKLINE((((注意彩柱色变 < REF(注意彩柱色变,1)) AND (注意彩柱色变 > 0))),0,注意彩柱色变,0.5,0),COLOR666666;
STICKLINE((((注意彩柱色变 < REF(注意彩柱色变,1)) AND (注意彩柱色变 < 0))),0,注意彩柱色变,0.5,0),COLOR004400;
STICKLINE((((注意彩柱色变 > REF(注意彩柱色变,1)) AND (注意彩柱色变 < 0))),0,注意彩柱色变,0.5,0),COLOR440044;
STICKLINE((((注意彩柱色变 > REF(注意彩柱色变,1)) AND (注意彩柱色变 > 0))),0,注意彩柱色变,0.5,0),COLOR000044;
IF((((DIF > DEA) OR (能量是持仓条件 > 0)) AND (CPX > HLX)),0,DRAWNULL),LINETHICK3,COLOR0000BB;
IF((((DIF < DEA) OR (能量是持仓条件 < 0)) AND (CPX < HLX)),0,DRAWNULL),LINETHICK3,COLOR00BB00;
IF((V12 > V13),DIF,DRAWNULL),LINETHICK2,COLOR00DDDD;
HD:=FILTER(BACKSET(FILTER((REF(H,13) = HHV(H,((2 * 13) + 1))),13),(13 + 1)),13);
LD:=FILTER(BACKSET(FILTER((REF(L,13) = LLV(L,((2 * 13) + 1))),13),(13 + 1)),13);
DRAWICON(LD,0,13);
DRAWICON(HD,0,14);
