DRAWGBK(CLOSE>0,COLORRGB(3,16,105),COLORRGB(1,885,9920),1);zqmacd:=DATATYPE; rmacd:=OPENMINUTES(TIME); zsmacd:=ref(c,rmacd); zsrmacd:=DYNAINFO( 3); jmacd:=SUM(C*V,SUMBARS(VOL,CAPITAL))/SUM(V,SUMBARS(VOL,CAPITAL)); jjmacd:=SUM(C*V,0)/SUM(V,0); jjmacd1:=SUM(C*V,rmacd)/SUM(V,rmacd)LINETHICK0; jjamacd:=if(zqmacd=6,jjmacd,if(zqmacd=1,jjmacd1,jjmacd)); zsamacd:=if(zqmacd=6,zsrmacd,if(zqmacd=1,zsmacd,zsrmacd)); crmacd:=if(zqmacd=6,c>0,if(zqmacd=1,rmacd>1,c>0)); PARTLINE(crmacd,zsamacd),COLORGRAY,POINTDOT; dkmacd:=(SMA(C,2,1)-SMA(C,6,1))*2.1,LINETHICK0; FILLRGN(dkmacd>0 and jjamacd>0 ,zsamacd,ZSamacd+dkmacd),ColorD5D500; FILLRGN(dkmacd<=0 and jjamacd>0 ,zsamacd,ZSamacd+dkmacd),Color662C09;底部: COST(5),ColorB0B000;BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; DRAWICON(BBI<REF(BBI,1) AND ISLASTBAR,BBI,5),SHIFT1,ALIGN2; DRAWICON(BBI>REF(BBI,1) AND ISLASTBAR,BBI,4),SHIFT1,,ALIGN1; N1v:=SYSPARAM(3); Nv:=((N1v - SYSPARAM(2)) + 1); HH:=HHV(HIGH,Nv); LL:=LLV(LOW,Nv); 最高:HH[N1v],Color5E8D36; 最低:LL[N1v],Color1D460B; (最低 + ((最高 - 最低) * 0.191))POINTDOT,; (最低 + ((最高 - 最低) * 0.382)),POINTDOT,; (最低 + ((最高 - 最低) * 0.5)),POINTDOT,colorFF00FF; (最低 + ((最高 - 最低) * 0.618)),POINTDOT,; (最低 + ((最高 - 最低) * 0.809)),POINTDOT,; DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF(最低,BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),''),colorFFFF; DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.191)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),''),colorFFFF; DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.382)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),''),colorFFFF; DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.5)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),''),colorFFFF; DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.618)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),''),colorFFFF; DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.809)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),''),colorFFFF; DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 1)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),''),colorFFFF; cc12:hhv(c,12),LINEDOT,ColorFFFF00;VAR0a:=EMA(EMA(EMA(CLOSE,2),2),2); 生命线:(MA(VAR0a,13)*0.99),Color00FFFF,LINETHICK2;f:=(HHV(HIGH,144)-CLOSE)/(HHV(HIGH,144)-LLV(LOW,144))*100*(-1)+100; g:=f/233; a:=MA(g,9)*100; b:=CROSS(a,1.8); d:=b>0; DRAWICON(d,LOW,10); DRAWTEXT(d,LOW,' ')coloryellow; LC:=REF(CLOSE,1); RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; e:=CROSS(83,RSI); DRAWICON(e,HIGH,10); DRAWTEXT(e,HIGH,'逃顶') COLORff9966; ZC:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v)/100); 『重心』:IF(VOL>0,ZC,C),LINETHICK0,colorF80000;A:=『重心』; 多空线:=(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+14*ref(a,6) +13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12) +7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+ ref(a,20))/210; M5:EMA(多空线,5),LINETHICK0,Color000000; M13:EMA(多空线,13),COLORF800F8;M21:EMA(多空线,21),CIRCLEDOT,COLOR008800; X:『重心』>=M5,linethick0,colorblack;stickline(x,h,l,0,1),COLOR0000FF; stickline(x and c>=o,O,C,5,0),COLOR0000FF; stickline(x and c<o,O,C,5,1),COLOR0000FF; stickline(not(x),H,L,1,0),COLORFFBB00; stickline(not(x) and c<o,O,C,5,0),COLORFFBB00; stickline(not(x) and c>=o,O,C,5,1),COLORFFBB00;LL:=LLV(C,100); TJ:=IF((C-REF(C,1))/REF(C,1)>0.025,1,0); yl:=IF(C>REF(O,BARSLAST(TJ =1)),REF(O,BARSLAST(TJ =1)),0); FT:=BARSLAST(yl); YLX:=REF(yl,FT); bt:=IF(C<OPEN and ref(C,1)>ref(OPEN,1),ref(C,1),0); XFT:=BARSLAST(bt); XYLX:=REF(bt,XFT); 平台调下:=CROSS(XYLX,C); 平台突破:=CROSS(C,YLX); DRAWICON(平台突破,L,8),ALIGN0,PXdn10; DRAWICON(平台调下,H,9),ALIGN0,PXup2; VAR2:=REF(LOW,1); VAR3:=SMA(ABS(LOW-VAR2),13,1)/SMA(MAX(LOW-VAR2,0),13,1)*100; VAR4:=EMA(IF(CLOSE*1.2,VAR3*13,VAR3/13),13); VAR5:=LLV(LOW,34); VAR6:=HHV(VAR4,34); VAR7:=IF(LLV(LOW,56),1,0); VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7; 主力进场:=VAR8>REF(VAR8,1); 进场:=ref(进场,1); DRAWTEXT(进场 and 平台突破 ,L ,'进场'),ALIGN0,COLOR0000FF,PXdn10; //DRAWTEXT(进场 and 平台突破 ,L ,'场'),ALIGN0,COLOR0000FF,PXdn10;VAR1:=IF(DATE<=1081225,1,0);上市日期年:REF(YEAR,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF; 月:REF(MONTH,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF00FF; 日:REF(DAY,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFFFF; DRAWTEXT(SYSPARAM(2)=BARPOS,CLOSE,'证券代码:'+STKLABEL),ALIGN4,colorFF; DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,' 所属板块:'+BLKNAME+' 发行价'+NUMTOSTR(FINANCE(51),2)+'元'+' 发行量'+NUMTOSTR(FINANCE(52),2)+'万股'+'\n'+'总股本'+NUMTOSTR(FINANCE(1),0)+'万股'+' 流通A股'+NUMTOSTR(FINANCE(7),0)+'万股'+' 净资产'+NUMTOSTR(FINANCE(35),2)+'亿元'+' 每股收益'+NUMTOSTR(FINANCE(33),2)+'元'+' 每股未分配'+NUMTOSTR(FINANCE(32),2)+'元'+' 市盈率'+NUMTOSTR(DYNAINFO(39),2)+'%'+' 投资收益'+NUMTOSTR(FINANCE(24),2)+'元'+' 股东总数'+NUMTOSTR(FINANCE(50),0)+'户'), ALIGN4,Color713E2B; VAR4:=(LOW+HIGH+CLOSE)/3*VAR1; 操作:MA(VAR4,4),LINETHICK2,colorFFFFFF; 拉升:HHV(操作,13),LINETHICK2,colorFF;买卖:=LLV(操作,13); 底部支撑:=LLV(LOW,60)*1.02; 顶部:=HHV(HIGH,60)*0.98*VAR1; 现价:=MA(CLOSE,1);{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |