N1:=STRCAT(CON2STR(YEAR,0),' 年 '); Y1:=STRCAT(CON2STR(MONTH,0),' 月 '); R:=STRCAT(CON2STR(DAY,0),' 日 '); SJ:=STRCAT(STRCAT(N1,Y1), R); DRAWTEXT_FIX(C>0,0.8,0.28,0,SJ),COLORYELLOW; MA5:MA(C,5); MA8:MA(C,8); MA10:MA(C,10); MA20:MA(C,20); MA30:MA(C,30); MA60:MA(C,60); MA120:MA(C,120); MA250:MA(C,250); {成交量RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; TYP:=(HIGH+LOW+CLOSE)/3; CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)); DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIF,9); MACD:=(DIF-DEA)*2; 何氏抄底:=REF(J,1)<10 AND REF(MACD,1)<REF(MACD,2) AND MACD>REF(MACD,1) AND MACD<0 AND CCI>REF(CCI,1) AND (REF(CCI,2)<-100 OR REF(CCI,3)<-100); {DRAWTEXT(何氏抄底,L*0.999,'↖日金叉:=CROSS(日DIF,日DEA); 周金叉:=CROSS(周DIF,周DEA); 月金叉:=CROSS(月DIF,月DEA); 金叉共振:=IF(CROSS(周DIF,周DEA),MACD+0.1,0),COLORWHITE,LINETHICK2; 共振:=IF((日DIF>日DEA AND 周DIF>周DEA AND 月金叉) OR ( 周DIF>周DEA AND 月DIF>月DEA AND 日金叉) AND C/REF(C,1)>1.08 OR (月DIF>月DEA AND 日DIF>日DEA AND 周金叉) OR (日金叉 AND 周金叉 AND 月金叉),MACD+0.2,0),COLORF00FF0,LINETHICK3; STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,3.2,0),COLOR0077FF; STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,2.5,0),COLOR0099FF; STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,1.9,0),COLOR00BBFF; STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,1.2,0),COLOR00DDFF; STICKLINE(金叉共振 AND C/REF(C,1)>1.05,O,REF(C,1)*1.05,0.3,0),COLOR00FFFF; STICKLINE(共振 AND C/REF(C,1)>1.08,C,REF(C,1)*1.05,3,0),COLOR000099; STICKLINE(共振 AND C/REF(C,1)>1.08,C,REF(C,1)*1.05,2.2,0),COLOR0000CC; STICKLINE(共振 AND C/REF(C,1)>1.08,C,REF(C,1)*1.05,1.5,0),COLOR0000FF; STICKLINE(共振 AND C/REF(C,1)>1.08,C,REF(C,1)*1.05,0.5,0),COLORCC66FF; STICKLINE(共振 AND C/REF(C,1)>1.08,REF(C,1)*1.05,C,0.5,0),COLORYELLOW; DRAWTEXT(共振 AND C/REF(C,1)>1.08,REF(C,1)*1.058,'↖起爆捉妖'),COLORYELLOW; DRAWTEXT(金叉共振 AND C/REF(C,1)>1.05,REF(C,1)*1.028,'↖妖股初現(xiàn)'),COLORRED; 每股凈資產(chǎn):FINANCE(34),NODRAW,COLORRED; 每股公積金:FINANCE(18),NODRAW,COLORGREEN; 未分配利潤(rùn):FINANCE(32),NODRAW,COLORMAGENTA; {題材數(shù)據(jù)} DRAWTEXT_FIX(ISLASTBAR,0,0,0,CODE),COLORGREEN; DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,STKNAME),COLORMAGENTA; DRAWTEXT_FIX(ISLASTBAR,0.2,0,0,HYBLOCK),COLORCYAN; DRAWTEXT_FIX(ISLASTBAR,0.3,0,0,DYBLOCK),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0.4,0,0,GNBLOCK),COLORGREEN; DRAWTEXT_FIX(ISLASTBAR,0,0.1,0,FGBLOCK),COLORWHITE; {現(xiàn)價(jià)游標(biāo)} 現(xiàn)價(jià):=CONST(C),COLORCYAN,DOTLINE; DRAWTEXT_FIX(1,0.6,0.02,0,'【名稱】'),COLORGREEN; DRAWTEXT_FIX(1,0.675,0.02,0,STKNAME),COLORYELLOW; DRAWTEXT_FIX(1,0.6,0.07,0,'【代碼】'),COLORGREEN; DRAWTEXT_FIX(1,0.675,0.07,0,CODE),COLOR0080FF; DRAWTEXT_FIX(1,0.6,0.12,0,'【現(xiàn)價(jià)】'),COLORGREEN; DRAWNUMBER_FIX(1,0.675,0.12,0,現(xiàn)價(jià)),COLORCYAN; DRAWTEXT_FIX(1,0.6,0.17,0,'【均價(jià)】'),COLORGREEN; DRAWNUMBER_FIX(1,0.675,0.17,0,DYNAINFO(11)),COLORWHITE; |
|