|
1、海風(fēng)2號(hào) MA5:MA(CLOSE,5),COLORFFFFFF,LINICK2; MA13:MA(CLOSE,13),COLOR00FF00; MA21:MA(CLOSE,21),COLOR00FFFF,LINICK2; MA34:MA(CLOSE,34),COLORFF00FF; {MA55:MA(CLOSE,55),COLOR0000FF;} {MA120:=MA(CLOSE,120),COLORFFFF00;} 天使:=EMA(C,2),COLOR000000; 魔鬼:=EMA(SLOPE(C,21)*20 C,42),COLOR000000; 買:=CROSS(天使,魔鬼); 賣:=CROSS(魔鬼,天使); DRAWICON(買,L*0.97,1); DRAWTEXT(買,L*0.95,'進(jìn)攻'),COLORYELLOW; DRAWICON(賣,H*1.03,2); DRAWTEXT(賣,H*1.05,'撤退'),COLORWHITE; STICKLINE(天使>=魔鬼,LOW,HIGH,0.01,0),COLOR0000DD; STICKLINE(天使>=魔鬼,CLOSE,OPEN,2,1),COLORRED; {STICKLINE(天使>=魔鬼,CLOSE,OPEN,3,0),COLOR0000CC; STICKLINE(天使>=魔鬼,CLOSE,OPEN,2,0),COLOR0000DD; STICKLINE(天使>=魔鬼,CLOSE,OPEN,1,0),COLOR0000FF;} {STICKLINE(天使<魔鬼,CLOSE,OPEN,1,0),COLOREEEE00; STICKLINE(天使<魔鬼,CLOSE,OPEN,2,0),COLORDDDD00; STICKLINE(天使<魔鬼,CLOSE,OPEN,3,0),COLORCCCC00;} STICKLINE(天使<魔鬼,LOW,HIGH,0.01,0),COLORFFDD00; STICKLINE(天使<魔鬼,CLOSE,OPEN,2,0),COLORFFFF00; STICKLINE(CROSS(天使,魔鬼),OPEN,CLOSE,2.5,0),COLORYELLOW; STICKLINE(CROSS(魔鬼,天使),OPEN,CLOSE,2.5,0),COLORWHITE; 2、益盟操盤手 VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))); VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))); VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)); DIR1:=ABS(CLOSE-REF(CLOSE,5)); VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5); ER1:=DIR1/VIR1; CS1:=ER1*(0.8-2/8) 2/8; CQ1:=CS1*CS1; AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE; DIR2:=ABS(CLOSE-REF(CLOSE,10)); VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10); ER2:=DIR2/VIR2; CS2:=ER2*(0.8-2/24) 2/24; CQ2:=CS2*CS2; AMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINICK2; AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINICK2; AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINICK2; STICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000; STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED; STICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000; STICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED; STICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000; DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7); DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH (HIGH*0.03)),8); PT:=REF(H,1)-REF(L,1); CDP:=(REF(H,1) REF(L,1) REF(C,1)*2)/4; AH:=CDP PT; AL:=CDP-PT; NH:=CDP*2-REF(L,1); NL:=CDP*2-REF(H,1); 強(qiáng):IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW; 阻:IF(NH>強(qiáng),(強(qiáng)-CDP)*0.618 CDP,NH)NODRAW,COLORCYAN; M:=IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL); 撐:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW; 底:IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL)NODRAW; 3、操盤手BS線 MA5:MA(C,5),COLORF00FF0; MA10:MA(C,10),COLORYELLOW; MA21:MA(C,21),COLORE66878; MA30:MA(C,30),COLORWHITE; MA120:MA(C,120),COLOR399C7F,POINTDOT; MA240:MA(C,240),COLOR000999,POINTDOT; X1:=(C L H)/3; X2:=EMA(X1,6); X3:=EMA(X2,5); DRAWICON(CROSS(X2,X3),L*0.98,7); DRAWICON(CROSS(X3,X2),H*1.02,8); STICKLINE(X2>=X3,LOW,HIGH,0.1,1),COLORRED; STICKLINE(X2>=X3,CLOSE,OPEN,2,2),COLORRED; STICKLINE(X2>=X3,CLOSE,OPEN,2,8),COLORBROWN; STICKLINE(X2<X3,LOW,HIGH,0.1,1),COLORGREEN; STICKLINE(X2<X3,CLOSE,OPEN,2,2),COLORGREEN; STICKLINE(CROSS(X2,X3),OPEN,CLOSE,2,1),COLORYELLOW; STICKLINE(CROSS(X3,X2),OPEN,CLOSE,2,1),COLORBLUE; 4、四方力道(主) V1:=DMA((((HIGH LOW) (CLOSE * 2)) / 4.15),0.9); HY1:=REF(EMA(V1,3),1); 實(shí)時(shí)線:MA(CLOSE,1),COLOR006400; 神秘線:HY1,COLOR400080; STICKLINE(C>HY1,LOW,HIGH,1,0),COLORRED; STICKLINE(C>HY1,CLOSE,OPEN,4.5,0),COLORRED; STICKLINE(C>HY1,CLOSE,OPEN,4,0),COLORRED; STICKLINE(C>HY1,CLOSE,OPEN,3,0),COLORRED; STICKLINE(C>HY1,CLOSE,OPEN,2,0),COLORRED; STICKLINE(C<=HY1,CLOSE,OPEN,4.5,0),COLORFF4242; STICKLINE(C<=HY1,CLOSE,OPEN,4,0),COLORFF4242; STICKLINE(C<=HY1,CLOSE,OPEN,3,0),COLORFF4242; STICKLINE(C<=HY1,CLOSE,OPEN,2,0),COLORFF4242; STICKLINE(C<=HY1,LOW,HIGH,1,0),COLORFF4242; DRAWTEXT(CROSS(CLOSE,HY1),LOW,'買點(diǎn)'),LINICK2,COLORYELLOW; DRAWTEXT(CROSS(HY1,CLOSE),HIGH*1.08,'賣點(diǎn)'),LINICK3,COLORWHITE; APP:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN)))); ZL:=IF((CLOSE > OPEN),(APP * (HIGH - LOW)),IF((CLOSE < OPEN),(APP * ((HIGH - OPEN) (CLOSE - LOW))),(VOL / 2))); SF:=IF((CLOSE > OPEN),(0 - (APP * ((HIGH - CLOSE) (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (APP * (HIGH - LOW))),(0 - (VOL / 2)))); 庫存能量:=MA((ZL SF),2); 庫存平均:=MA((ZL SF),5); DRAWTEXT(CROSS(庫存能量,庫存平均),L*0.97,''),COLORFF00FF,LINICK4; 5、上出下買 三背離 A:=MA(CLOSE,17) ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)); B:=MA(CLOSE,17) MA(CLOSE,17)-REF(MA(CLOSE,17),1); 分水嶺:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINICK2; PMA:=分水嶺; DD:=分水嶺<REF(分水嶺,1); IF(DD,分水嶺,DRAWNULL),COLOR00FF00,LINICK2; 操作線:分水嶺-(EMA(C,3)-分水嶺),COLOR00FFFF,LINICK2; S:=(PMA>操作線); IF(S,分水嶺,DRAWNULL),COLOR00FF00,POINTDOT,LINICK4; PM:MA(C,5),COLORFFFFCC,LINICK2; IF(PM>REF(PM,1),PM,DRAWNULL),COLORRED,LINICK2; IF(PM=REF(PM,1),PM,DRAWNULL),COLORRED; IF(PM<REF(PM,1),PM,DRAWNULL),COLORFF9900,LINICK2; DRAWICON(CROSS(分水嶺,操作線),分水嶺-0.1,1); A1:=BARSLAST(REF(CROSS('MACD.DIF','MACD.DEA'),1)); B1:=REF(C,A1 1)>C AND REF('MACD.DIF',A1 1)<'MACD.DIF' AND CROSS('MACD.DIF','MACD.DEA'); DRAWTEXT(B1>0,L-0.02,'★M'),COLOR00FFFF; A2:=BARSLAST(REF(CROSS('KDJ.K','KDJ.D'),1)); B2:=REF(C,A2 1)>C AND REF('KDJ.K',A2 1)<'KDJ.K' AND CROSS('KDJ.K','KDJ.D'); DRAWTEXT(B2,L-0.10,'◎K'),COLORFF00FF; A3:=BARSLAST(REF(CROSS('RSI.RSI1','RSI.RSI2'),1)); B3:=REF(C,A3 1)>C AND REF('RSI.RSI1',A3 1)<'RSI.RSI1' AND CROSS('RSI.RSI1','RSI.RSI2'); DRAWTEXT(B3>0,L-0.18,'◆R'),COLOR0000FF; C1:=BARSLAST(REF(CROSS('MACD.DEA','MACD.DIF'),1)); D1:=REF(C,C1 1)<C AND REF('MACD.DIF',C1 1)>'MACD.DIF' AND CROSS('MACD.DEA','MACD.DIF'); DRAWTEXT(D1>0,H 0.16,'★M'),COLOR00FF00; C2:=BARSLAST(REF(CROSS('KDJ.D','KDJ.K'),1)); D2:=REF(C,C2 1)<C AND REF('KDJ.K',C2 1)>'KDJ.K' AND CROSS('KDJ.D','KDJ.K'); DRAWTEXT(D2>0,H 0.08,'◎K'),COLORFFFFCC; C3:=BARSLAST(REF(CROSS('RSI.RSI2','RSI.RSI1'),1)); D3:=REF(C,C3 1)<C AND REF('RSI.RSI1',C3 1)>'RSI.RSI1' AND CROSS('RSI.RSI2','RSI.RSI1'); DRAWTEXT(D3>0,H 0.04,'◆R'),COLORFF9900; 6、變色KDJ RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:SMA(RSV,3,1),COLORWHITE; D:SMA(K,3,1),COLORYELLOW; J:3*K-2*D,COLORYELLOW; IF(K<REF(K,1),K,DRAWNULL),COLORGREEN,LINICK1; IF(D<REF(D,1),D,DRAWNULL),COLORGREEN,LINICK1; IF(J<REF(J,1),J,DRAWNULL),COLORFFFF00,LINICK1; IF(K>REF(K,1),K,DRAWNULL),COLORRED,LINICK1; IF(D>REF(D,1),D,DRAWNULL),COLORRED,LINICK1; IF(J>REF(J,1),J,DRAWNULL),COLORFF00FF,LINICK1; 7、變色RSI N:=3; N1:=5;N2:=10;N3:=20;N4:=1;M1:=7;M2:=2; LC :=REF(C,N4); RSI1:SMA(MAX(C-LC,0),N1,1)/SMA(ABS(C-LC),N1,1)*100,COLORRED,LINICK1; RSI2:SMA(MAX(C-LC,0),N2,1)/SMA(ABS(C-LC),N2,1)*100,COLOR0099FF; RSI3:SMA(MAX(C-LC,0),N3,1)/SMA(ABS(C-LC),N3,1)*100,COLORYELLOW,LINICK1; IF(RSI1<RSI2,RSI1,DRAWNULL),COLORAA8800,LINICK1; IF(RSI2>RSI1,RSI2,DRAWNULL),COLORAA8800,LINICK1; IF(RSI3>RSI2,RSI3,DRAWNULL)COLORAA8800,LINICK1; TY:=RSI1;{通用曲線值的引入} AA:=REF(TY,N)=HHV(TY,2*N 1); BB:=BACKSET(AA,N 1); CC:=FILTER(BB,N) AND TY=HHV(TY,N 1); DRAWICON(CC,TY*1.07,10); AA2:=REF(TY,N)=LLV(TY,2*N 1); BB2:=BACKSET(AA2,N 1); CC2:=FILTER(BB2,N) AND TY=LLV(TY,N 1); DRAWICON(CC2,TY*0.95,11); GG:=ISLASTBAR AND REF(CC,BARSLAST(CC)); HH:=BACKSET(GG,BARSLAST(CC) 1); II:=HH>REF(HH,1); JJ:=REF(BARSLAST(CC),1); KK:=BACKSET(II,JJ 2); LL:=KK>REF(KK,1); DRAWLINE(LL,TY,II,TY,1),COLORRED; CS:=(REF(TY,BARSLAST(II))-REF(TY,BARSLAST(LL)))/(BARSLAST(LL)-BARSLAST(II)); 阻力線:=REF(TY,BARSLAST(II)) BARSLAST(II)*CS; 阻力值:阻力線,LINICK0; DRAWICON(CROSS(TY,阻力線),阻力線*0.99,12); GG2:=ISLASTBAR AND REF(CC2,BARSLAST(CC2)); HH2:=BACKSET(GG2,BARSLAST(CC2) 1); II2:=HH2>REF(HH2,1); JJ2:=REF(BARSLAST(CC2),1); KK2:=BACKSET(II2,JJ2 2); LL2:=KK2>REF(KK2,1); DRAWLINE(LL2,TY,II2,TY,1),COLORGREEN; 8、變色MACD DIF1:=EMA(CLOSE,12) - EMA(CLOSE,26); DEA1:=EMA(DIF1,9); MACD1:=2*(DIF1-DEA1),STICK; MACD2:=EMA(MACD1,3); STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1,0),COLORRED; STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1,0),COLORGREEN; STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLORCBCBC0; STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE; DIF:DIF1,COLOR33FF33; DEA:DEA1,COLORYELLOW; MACD:MACD1,NODRAW,COLORMAGENTA; 強(qiáng):IF(DIF1>=DEA1,DIF1,DRAWNULL),COLORRED,LINICK2; |
|
|
