|
{三線開花} input:n(5); DRAWGBK(CLOSE>0, COLORRGB(60,15,35) ,COLORRGB(50,50,90),1); bb:=ref(date,BARSCOUNT(c)-1); SS:=if(bb>1000000,bb+1000000,bb); DRAWTEXT(sysparam(2)=BARPOS,c,' 上市'),COLORRED,ALIGN5; drawnumber(sysparam(2)=barpos,l,SS,0),shift5,align5,COLORYELLOW; DRAWTEXT(sysparam(2)=BARPOS,c,'證券代碼:'+STKLABEL),ALIGN4,COLORGREEN; STICKLINE(C>O OR (C=O AND C>REF(C,1)),H,L,0.1,0),COLORRED; STICKLINE(C>O OR (C=O AND C>REF(C,1)),O,C,7,1),COLORRED; STICKLINE(C<O OR (C=O AND C<=REF(C,1)),H,L,0.1,0),COLORCYAN; STICKLINE(C<O OR (C=O AND C<=REF(C,1)),O,C,7,0),COLORCYAN; 線1:(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,25))/3,SHIFT5,COLORGREEN; 線2:(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,20)+MA(CLOSE,30)+MA(CLOSE,60)+MA(CLOSE,120))/6,SHIFT5,COLORGREEN; 線3:(MA(CLOSE,20)+MA(CLOSE,60)+MA(CLOSE,120))/3,SHIFT5,COLORGREEN,linethick2; 線4:=(MA(CLOSE,13)+MA(CLOSE,34)+MA(CLOSE,55))/3,SHIFT5; Stickline(線1>線4,線1,線4,0.1,1),ColorFF0080; Stickline(線1<線4,線1,線4,0.1,1),COLORGREEN; DRAWICON(CROSS(線1,線4),線1,1); PARTLINE(線1>線2,線3),COLORRED,linethick2; PARTLINE(線1>線2,線1),COLORRED; PARTLINE(線2>線3,線2),COLORRED; STICKLINE(C>=O,H,L,0,0),COLORYELLOW; STICKLINE(C>=O,C,O,8,0),COLORYELLOW; STICKLINE(C<=O,C,O,8,0),COLORCYAN; STICKLINE(C<=O,H,L,0,0),COLORCYAN; VarA:=EMA(C,4); VarB:=REF(VarA,5/2+1); VarC:=(EMA(C,60)+EMA(C,90))/2; STICKLINE(C>VarB AND C>=VarC,O,C,8,0),COLORYELLOW; 敏感:(3*(O+H+L+C))/12.05,SHIFT5,COLORWHITE,LINETHICK2; 實戰(zhàn):EMA(CLOSE,4),SHIFT5,COLORRED,LINETHICK2; EC:=EMA(CLOSE,7); 支撐:EMA(EC,2),SHIFT5,COLORGREEN; HH:=HHV(H,120); LL:=LLV(L,120); 壓力:(HH-LL)*0.618+LL,SHIFT5,COLORYELLOW; 高:HHV(MA((LOW+HIGH+CLOSE+OPEN)/4.02,3),30),SHIFT5,COLOR9966FF,LINETHICK1; 低:LL,SHIFT5,COLORAAEE00,LINETHICK1; EL1:=EMA(LOW,6); EL2:=EMA(EMA(LOW,34)*1,02)-0.16; DRAWICON(CROSS(EL1,EL2),EL1,10); V1:=REF(C,1); V2:=SMA(MAX(C-V1,0),6,1)/SMA(ABS(C-V1),6,1)*100; DRAWICON(IF(CROSS(81,V2),1,0),h*1.01,11); Var1:=SYSPARAM(3)-SYSPARAM(2)+1; Var2:=SYSPARAM(3)-BARPOS; Var3:=HHV(HIGH,Var1); Var4:=LLV(LOW,VaR1); Var5:=REFX(Var3,Var2); //主圖最高價 Var5:IF(SYSPARAM(3)<>SYSPARAM(1),SYSPARAM(6),Var5),COLOR0000FF; Var6:REFX(Var4,Var2),COLOR0000FF; //主圖最低價 黃191: (Var5-Var6)*0.191+Var6,COLOR0000FF,POINTDOT; 黃382: (Var5-Var6)*0.382+Var6,COLOR0000FF,POINTDOT; 黃500: (Var5-Var6)*0.500+Var6,COLOR0000FF; 黃618: (Var5-Var6)*0.618+Var6,COLOR0000FF,POINTDOT; 黃809: (Var5-Var6)*0.809+Var6,COLOR0000FF,POINTDOT; DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.0381+Var6,'最低價('+NUMTOSTR(Var6,2)+')'),COLOR00FF00; DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.191+Var6,'黃金0.191('+NUMTOSTR(黃191,2)+')'),COLOR00FF00; DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.382+Var6,'黃金0.382('+NUMTOSTR(黃382,2)+')'),COLOR00FF00; DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.500+Var6,'黃金分割中軸('+NUMTOSTR(黃500,2)+')'),COLOR00FF00; DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.618+Var6,'黃金0.618('+NUMTOSTR(黃618,2)+')'),COLOR00FF00; DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.809+Var6,'黃金0.809('+NUMTOSTR(黃809,2)+')'),COLOR00FF00; DRAWTEXT(SYSPARAM(2)=BARPOS,(Var5-Var6)*0.981+Var6,'最高價('+NUMTOSTR(Var5,2)+')'),COLOR00FF00; ZF:=(c/ref(c,4)-1)*100; s:='z:'+NUMTOSTR(ZF[SYSPARAM(1)],2); DRAWTEXT(BARPOS=SYSPARAM(1),h,s) ALIGN4; |
|
|
