|
DIFF1:= EMA(C,3) - EMA(C,13); DEA1 := EMA(DIFF1,9); MACD1:= 2*(DIFF1-DEA1)*10; DIFF2:= EMA(C,5) - EMA(C,26); DEA2 := EMA(DIFF2,9); MACD2:= 2*(DIFF2-DEA2)*10; DIFF3:= EMA(C,7) - EMA(C,89); DEA3 := EMA(DIFF3,21); MACD3:= 2*(DIFF3-DEA3)*10; STICKLINE(C>0,0,10,6,0),COLORE5C3EA; STICKLINE(C>0,0,-5,6,0),COLORF6B06C; STICKLINE(MACD3>=0,0,MACD3,5,0),COLOR009E3A; STICKLINE(MACD3<0,0,-MACD3,5,0),COLOR646464; STICKLINE(MACD2>=0,0,MACD2,5,0),COLOR007D19; STICKLINE(MACD2<0,0,-MACD2,5,0),COLOR555555; STICKLINE(MACD1>=0,0,MACD1,5,0),COLOR006400; STICKLINE(MACD1<0,0,-MACD1,5,0),COLOR414141; STICKLINE(MACD3,0,-ABS(MACD3)*0.6,5,0),COLOR232323; STICKLINE(MACD1,0,-ABS(MACD1)*0.6,5,0),COLOR0F0F0F; X1:=MA(LLV(C,8)*1.1,13); X2:=MA(HHV(C,21)*0.9,13); X3:=MA(LLV(INDEXC,8)*1.1,13); X4:=MA(HHV(INDEXC,21)*0.9,13); 資金進出:3*(MA(C,1)-(X1+X2)/2-(X1+X2)/2*((X3+X4)/2-EMA(INDEXC,3))/((X3+X4)/2)),COLORSTICK; 紅持:=(SMA(CLOSE,2,1)-EMA(LLV((CLOSE+LOW)/2,10),21))/MA(LLV((CLOSE+LOW)/2,10),21)*25,COLORRED; 白減:=(SMA(CLOSE,4,1)-EMA(LLV((CLOSE+LOW)/2,10),21))/MA(LLV((CLOSE+LOW)/2,10),21)*25,COLORFFFFFF; STICKLINE(紅持<白減,紅持,白減,3,0),COLORWHITE; STICKLINE(紅持>白減,紅持,白減,3,0),COLORRED; 逃跑專用 LL:=REF(CLOSE,1); MM:=SMA(MAX(CLOSE-LL,0),6,1)/SMA(ABS(CLOSE-LL),6,1)*100; 出: IF(CROSS(80,MM),60,100),COLORFFDDEE; DRAWTEXT(CROSS(80,MM),60,'賣 '),COLORFFDDEE; VAR17:=CROSS(82,SMA(MAX(C-(REF(C,1)),0),6,1)/SMA(ABS(C-(REF(C,1))),6,1)*100); 頂部:IF(VAR17,80,100),COLORRED; DRAWTEXT(VAR17,70,'頂'),COLORRED; VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70; VAR2:=SMA(VAR1,9,1)+100; VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; VAR4:=SMA(VAR3,3,1); VAR5:=SMA(VAR4,3,1)+100; VAR6:=VAR5-VAR2; 逃頂趨勢線: IF(VAR6>100,VAR6-100,0),COLORBROWN,LINETHICK2; 買:=MA(CLOSE,1); 賣:=(LOW+HIGH+CLOSE)/3; 奇:= MA(賣,5); 準:= HHV(奇,10); 急賣奇準:IF(HHV((買<準),5),100,50),COLORFF6699; 短賣奇準:IF(HHV((買<準),10),100,50),COLORGREEN; V1:=LLV(LOW,10); V2:=HHV(H,25); 價位線:=EMA((C-V1)/(V2-V1)*4,4); {DRAWTEXT(CROSS(價位線,0.3),-0.5,'●'),COLORYELLOW;} 金牌賣:IF(CROSS(3.5,價位線),45,0),STICK,LINETHICK3,COLORYELLOW; VAR02:=REF(LOW,1); VAR03:=SMA(ABS(LOW-VAR02),3,1)/SMA(MAX(LOW-VAR02,0),3,1)*100; VAR04:=EMA(IF(CLOSE*1.2,VAR03*10,VAR03/10),3); VAR05:=LLV(LOW,38); VAR06:=HHV(VAR04,38); VAR07:=IF(LLV(LOW,90),1,0); VAR08:=EMA(IF(LOW<=VAR05,(VAR04+VAR06*2)/2,0),3)/618*VAR07; 賣出線:= 99; 階段賣:= 90; 趨勢:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),COLORRED; 賣出警戒: IF(趨勢>=90,85,100),COLORFF00FF,LINETHICK2; DIF1:=EMA(CLOSE,12) - EMA(CLOSE,26); DEA1:=EMA(DIF1,9); MACD1:=2*(DIF1-DEA1),STICK; MACD2:=EMA(MACD1,3); A2:=BARSLAST(REF(CROSS(DEA1,DIF1),1)); M頂背離:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF1,A2+1)>DIF1 AND CROSS(DEA1,DIF1),COLORWHITE; DRAWTEXT(M頂背離,35,'M頂背離'),COLORWHITE; STICKLINE(M頂背離,35,0,0,1),COLORWHITE; 二次死叉:=COUNT(CROSS(DEA1,DIF1),20)=2 AND CROSS(DEA1,DIF1); STICKLINE(二次死叉,100,0,0,1),COLORRED; RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; K:=SMA(RSV,3,1),COLORFFFFFF; D:=SMA(K,3,1),COLOR00FFFF; J:=3*K-2*D,COLORFF00FF; C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)); K頂背離:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)> "KDJ.K" AND CROSS("KDJ.D","KDJ.K"); DRAWTEXT(K頂背離,25,'K頂背離'),COLORRED; STICKLINE(K頂背離,25,0,0,1),COLORRED; LC := REF(CLOSE,1); RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100,COLORWHITE; RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100,COLORYELLOW; RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100,COLORFF00FF; C03:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)); R頂背離:=REF(C,C03+1)<C AND REF("RSI.RSI1",C03+1)> "RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1"); DRAWTEXT(R頂背離,15,'R頂背離'),COLORFF6600; STICKLINE(R頂背離,15,0,0,1),COLORFF6600; |
|
|
