在节日来临之际,转{朋友--请喝酒} ------原码 DRAWGBK(1, COLORRGB(100,50,0), COLORRGB(100,100,0),0); {朋友--请喝酒} x1:=(C-LLV(L,125))/(HHV(H,125)-LLV(L,125))*100; x2:=SMA(x1,72,1); x3:=SMA(x2,34,1); x4:=3*x2-2*x3; x5:=(x4-ref(x4,1))>=0; x6:=(MA(C,5)-REF(MA(C,5),1))>=0; x7:=(MA(C,10)-REF(MA(C,10),1))>=0; x8:=(2*C+H+L)/4; x9:=EMA((x8-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,13)-50; x10:=EMA(0.618*REF(x9,1)+0.382*x9,3); x11:=IF(x9>=x10 AND x6 AND x7 AND x5 AND x10<0,1,0); AA:= x11 AND COUNT(x11,5)=1; DRAWTEXT(RANGE(BARPOS,SYSPARAM(1)-118,SYSPARAM(1)+1)&&FILTER(AA,5),68,'朋友请→'),ALIGN2,COLORMAGENTA;//显示文字 {啤酒瓶画图源码} STICKLINE(AA,0,30,40,1),coloryellow; STICKLINE(AA,16,29,38,0),colorgreen; STICKLINE(AA,1,14,38,0),colorgreen; STICKLINE(AA,15,15,40,1),coloryellow; STICKLINE(AA,30,50,10,0),coloryellow; STICKLINE(AA,53,55,10,1),colorred; STICKLINE(AA,57,59,10,1),colorred; STICKLINE(AA,61,63,10,1),colorred; STICKLINE(AA,65,67,10,1),colorred; STICKLINE(AA,69,75,12,0),colorffcccc; {线} x1:=EMA(((2*C+H+L)/4-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,13)-21; x2:=EMA(0.618*REF(x1,1)+0.382*x1,3); PARTLINE(RANGE(BARPOS,SYSPARAM(1)-100,SYSPARAM(1)+1)&&x1>x2 AND x1>=ref(x1,1),x1),COLORRED; PARTLINE(RANGE(BARPOS,SYSPARAM(1)-100,SYSPARAM(1)+1)&&x1>x2 AND x1< ref(x1,1),x1),COLORWHITE; PARTLINE(RANGE(BARPOS,SYSPARAM(1)-100,SYSPARAM(1)+1)&&x1>=x2,x2),COLORMAGENTA; PARTLINE(RANGE(BARPOS,SYSPARAM(1)-100,SYSPARAM(1)+1)&&x1<x2,x2),COLORcyan; 图片附件: xfPT0S0tx+u6yA==_kHcTkmvrSGae.gif (2005-12-24 13:14, 24.74 K) 在节日来临之际,转{朋友--请喝酒} ------原码股票论坛 www.55188.com |
|