|
先建立一個(gè)引用公式： {分時(shí)引用} 昨總額:REF(AMOUNT/1000000,1),NODRAW; 昨總:REF(V,1),NODRAW; 黃金買點(diǎn):=EMA((O+H+L)/3,4)COLORWHITE,NODRAW; 黃金賣點(diǎn):=EMA(C+(H-L)*0.618,3)COLORYELLOW,NODRAW; 預(yù)測(cè)明日賣點(diǎn):黃金賣點(diǎn)+(黃金賣點(diǎn)-黃金買點(diǎn))*0.618,NODRAW,COLORWHITE; 預(yù)測(cè)明日買點(diǎn):EMA((O+H+L)/3,4)+((H+L)/2-REF((O+H+L)/3,3))/4,NODRAW; 今賣:MA(REF(預(yù)測(cè)明日賣點(diǎn),1),1)*1,COLORLIMAGENTA,NODRAW; 今買:REF(預(yù)測(cè)明日買點(diǎn),1),COLORLIMAGENTA,NODRAW; DD1:=EMA((O+H+L)/3,4)COLORWHITE,NODRAW; DD2:=EMA(C+(H-L)*0.618,3)COLORYELLOW,NODRAW; 密碼1:DD2+(DD2-DD1)*0.618,NODRAW,COLORWHITE; 密碼2:EMA((O+H+L)/3,4)+((H+L)/2-REF((O+H+L)/3,3))/4,NODRAW; 密碼3:MA(REF(密碼1,1),1)*1,COLORLIMAGENTA,NODRAW; 密碼4:REF(密碼2,1),COLORLIMAGENTA,NODRAW; ZS:DYNAINFO(3); 上漲家數(shù):INDEXADV,NODRAW; 下跌家數(shù):INDEXDEC,NODRAW; {【分時(shí)密碼公式】} DRAWGBK(C>0, RGB(0,10,10),RGB(88,0,0),0,'11',0); {E5:=EMA(C,5); E13:=EMA(C,13); DRAWBAND(E5,RGB(200,0,0),E13,RGB(0,200,0)); DRAWKLINE(H,O,L,C);}; DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIF,9); MACD:=(DIF-DEA)*2,COLORSTICK; K1:=IF(PERIOD=0 ,"分時(shí)引用.密碼3#DAY",DRAWNULL); D1:=IF(PERIOD=0 ,"分時(shí)引用.密碼1#DAY",DRAWNULL); F1:=IF(PERIOD=0 ,"分時(shí)引用.密碼4#DAY",DRAWNULL); J1:=IF(PERIOD=0 ,"分時(shí)引用.密碼2#DAY",DRAWNULL); 昨收:=IF(PERIOD=0 ,"分時(shí)引用.ZS#DAY",DRAWNULL); RCC:=昨收; 突破:=REF(EMA(C,14),1); A1X:=(EMA(C,10)-突破)/突破*100; 多方:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),DRAWNULL); 空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL); STICKLINE(A1X>=0,多方,突破,10,0),COLOR000099; STICKLINE(A1X<0,空方,突破,10,0),COLOR00CC66; STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),RCC*1,MACD*5+RCC*1,0,0),COLOR992299,LINETHICK3; STICKLINE(MACD>=0 AND MACD< REF(MACD,1),RCC*1,MACD*5+RCC*1,0,0),COLOR774422,LINETHICK3; STICKLINE(MACD<0 AND MACD>=REF(MACD,1),RCC*1,MACD*5+RCC*1,0,0),COLOR064499,LINETHICK3; STICKLINE(MACD<0 AND MACD< REF(MACD,1),RCC*1,MACD*5+RCC*1,0,0),COLOR774422,LINETHICK3; IF(PERIOD=0 ,C,DRAWNULL)LINETHICK1,COLORCCCCCC; 分時(shí)均價(jià)線:SUM(C*V,240)/SUM(V,240),COLORYELLOW; MD:=EMA(C,1)-EMA(C,5); 分時(shí)線:CLOSE,COLORCYAN,LINETHICK2; 上升:IF(CLOSE>=REF(CLOSE,1),CLOSE,DRAWNULL),COLOR0000C6,LINETHICK2; 
|
|
|
