在下顎處標記“開多買” [文華財經]
-
咨詢內容：
?老師，在下面程序中，在K線位于下顎位置上方處標記“開多買”
主趨勢線:EMA(EMA(C,10),10),COLORRED,LINETHICK3;B:=主趨勢線>REF(主趨勢線,1);IF(B-1,主趨勢線,NULL),COLORBLUE,LINETHICK3;AA1:=EMA(C,5) > EMA(C,20);BB1:=EMA(C,5) < EMA(C,20);CC1:= EMA(C,5) > EMA(C,10);CC11:=EMA(C,5) < EMA(C,10);DD1:=CLOSE<OPEN;
AAA:=REFX1(HHV(C,90),10000);M1:MA(C,50);CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1;DRAWTEXT(CURRBARSCOUNT=80 ,AAA, '色K線做多,綠色K線做空，白色K線觀望。 ',COLORYELLOW;DRAWTEXT(BARSLASTCOUNT(AA1&&C>M1)=1,H,'';DRAWTEXT(BARSLASTCOUNT(BB1&&C<M1)=1,H,'';DRAWTEXT(BARSLASTCOUNT(BB1 AND CC1||AA1 AND CC11)=1,H,'望';BARSLASTCOUNT(BB1 AND CC1||AA1 AND CC11)=1,SOUND('';BARSLASTCOUNT(BB1&&C<M1)=1,SOUND('';BARSLASTCOUNT(AA1&&C>M1)=1,SOUND('';
AZ:=(3*C+L+O+H)/6;BZ:MA(C,50),COLOR00FF0F,LINETHICK2;PARTLINE1(BZ>REF(BZ,1),BZ),COLORFF0000,LINETHICK2;DZ:=MA(BZ,5),COLORFFFFFF,LINETHICK1;B1:=MA(C,1);B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1);SMA2:=MA(B2,3);停損下限:=IF(LLV(MA(B2,8),3)<B2,LLV(MA(B2,8),3),B2);SNAKEA:=HHV(MA(B2,1),13),COLORYELLOW;VAR1A:=(2*CLOSE+HIGH+LOW)/4;VAR2A:=MA(VAR1A,7);VAR3A:=VAR2A-MA(VAR1A,7/2)<0;VAR4A:=VAR2A-MA(VAR1A,7/2)>0;VAR5A:=BARSLAST(VAR3A);VAR6A:=0-BARSLAST(VAR4A);VAR7A:=IF(VAR3A<=0,VAR5A,VAR6A);VAR11A:=(CLOSE*2+HIGH+LOW)/4;VAR21A:=EMA(VAR11A,13)-EMA(VAR11A,34);VAR31A:=EMA(VAR21A,5);VAR2:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2)));VAR3:=((REF(VAR2,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VAR4:=((REF(VAR3,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VAR5:=((REF(VAR4,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VAR6:=((REF(VAR5,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VAR7:=((REF(VAR6,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VAR8:=((REF(VAR7,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VAR9:=((REF(VAR8,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VARA:=((REF(VAR9,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VARB:=((REF(VARA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VARC:=((REF(VARB,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VARD:=((REF(VARC,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VARE:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2)));VARF:=((REF(VARE,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VAR10:=((REF(VARF,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VAR11:=((REF(VAR10,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VAR12:=((REF(VAR11,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VAR13:=((REF(VAR12,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VAR14:=((REF(VAR13,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VAR15:=((REF(VAR14,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VAR16:=((REF(VAR15,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VAR17:=((REF(VAR16,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VAR18:=((REF(VAR17,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));VAR19:=((REF(VAR18,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));VAR1B:=(REF((((((((((((VARE OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18) OR VAR19),1) AND VAR2);STICKLINE1(VAR1B,O,O+(C-O)/3,3,0),COLORFFFF00;//CROSS(VAR1B,0.5),SOUND('';AA:=(REF((((((((((((VAR2 OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC) OR VARD),1) AND VARE);STICKLINE1(AA,O,O+(C-O)/3,3,0),COLORFF00FF;//CROSS(AA,0.5),SOUND('';A13:=EMA(CLOSE,55);A14:=MA(CLOSE,75);A15:=EMA(A14,3);A16:=EMA(A15,3);A17:=(HIGH + LOW) / 5;A18:=(MA(A17,4)) - (MA(A17,34));A19:=CROSS(A18,0);A20:=CROSS(0,A18);A21:=BARSLAST(A19);A22:=BARSLAST(A20);A23:=REF(A19,1);A24:=REF(A20,1);A25:=BARSLAST(A23);A26:=BARSLAST(A24);A27:=IF((A25 < A26),(REF((HHV(HIGH,2)),A25)),(REF((LLV(LOW,2)),A26)));A28:=(((REF(CLOSE,1)) <= (REF(A27,1))) AND (CLOSE > A27)) AND (A21 < A22);A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < A27)) AND (A22 < A21);A30:=A28 AND ((COUNT(A28,A21)) = 1);A31:=A29 AND ((COUNT(A29,A22)) = 1);A32:=A30 AND ((REF(BARSLAST(A31),1)) < (REF(BARSLAST(A30),1)));A33:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(A30),1)));VTX11:=(H+L)/2;上唇:=REF(SMA(VTX11,5,1),3),COLORGREEN;牙齒:=REF(SMA(VTX11,8,1),5),COLORRED;下顎:=REF(SMA(VTX11,13,1),8),COLORBLUE;
?
VTX1:=BACKSET(REF(CLOSE,2)=HHV(CLOSE,5),3);VTX2:=CROSS(VTX1,0.9);VTX3:=BACKSET(REF(CLOSE,2)=LLV(CLOSE,5),3);VTX4:=CROSS(VTX3,0.9);VTX6:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);VTX7:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);VTX8:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);VTX9:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);VTXA:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);VTXB:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);VA3:=1;MID:=VA3*(3*CLOSE+LOW+OPEN+HIGH)/6;操盤線:=VA3*(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,LINETHICK4;P5:=(EMA(CLOSE,3)+MA(CLOSE,3*2)+MA(CLOSE,3*3))/3;
操:=P5,LINETHICK2,COLOR00FF0F,PRECIS1;
斜率:ATAN((操/REF(操,1)-1)*100)*180/3.1416,NODRAW,COLORWHITE,PRECIS0;
TY:=C;
X:=8;
A1:=REF(TY,X)=HHV(TY,2*X+1);
B3:=FILTER(A1,X);
C1E:=BACKSET(B3,X+1);
HD:=FILTER(C1E,X);
A2:=REF(TY,X)=LLV(TY,2*X+1);
B4:=FILTER(A2,X);
C2:=BACKSET(B4,X+1);
LD:=FILTER(C2,X);
AQ:=REF(C,BARSLAST(HD)),COLORFFFFFF,LINETHICK3,PRECIS1;
BQ:=REF(C,BARSLAST(LD)),COLORFFFFFF,LINETHICK3,PRECIS1;
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD);
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
上:IF(T1,AQ,AQ),COLORGREEN,DOT,PRECIS0;
STICKLINE1(T1,AQ,AQ,7,0),COLORGREEN,PRECIS1;
下:IF(T2,BQ,BQ),COLORRED,DOT,PRECIS1;
STICKLINE1(T2,BQ,BQ,7,0),COLORRED,PRECIS1;
H>=上&&L<=上||H>=下&&L<=下,SOUND('';?
?來源:程序化99
-
文華技術人員：
?參考：
主趨勢線:EMA(EMA(C,10),10),COLORRED,LINETHICK3; B:=主趨勢線>REF(主趨勢線,1); IF(B-1,主趨勢線,NULL),COLORBLUE,LINETHICK3; AA1:=EMA(C,5) > EMA(C,20); BB1:=EMA(C,5) < EMA(C,20); CC1:= EMA(C,5) > EMA(C,10); CC11:=EMA(C,5) < EMA(C,10); DD1:=CLOSE<OPEN;
AAA:=REFX1(HHV(C,90),10000); M1:MA(C,50); CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1; DRAWTEXT(CURRBARSCOUNT=80 ,AAA, '紅色K線做多,綠色K線做空，白色K線觀望。 '),COLORYELLOW; DRAWTEXT(BARSLASTCOUNT(AA1&&C>M1)=1,H,'多'); DRAWTEXT(BARSLASTCOUNT(BB1&&C<M1)=1,H,'空'); DRAWTEXT(BARSLASTCOUNT(BB1 AND CC1||AA1 AND CC11)=1,H,'觀望'); BARSLASTCOUNT(BB1 AND CC1||AA1 AND CC11)=1,SOUND('A'); BARSLASTCOUNT(BB1&&C<M1)=1,SOUND('A'); BARSLASTCOUNT(AA1&&C>M1)=1,SOUND('A');
AZ:=(3*C+L+O+H)/6; BZ:MA(C,50),COLOR00FF0F,LINETHICK2; PARTLINE1(BZ>REF(BZ,1),BZ),COLORFF0000,LINETHICK2; DZ:=MA(BZ,5),COLORFFFFFF,LINETHICK1; B1:=MA(C,1); B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1); SMA2:=MA(B2,3); 停損下限:=IF(LLV(MA(B2,8),3)<B2,LLV(MA(B2,8),3),B2); SNAKEA:=HHV(MA(B2,1),13),COLORYELLOW; VAR1A:=(2*CLOSE+HIGH+LOW)/4; VAR2A:=MA(VAR1A,7); VAR3A:=VAR2A-MA(VAR1A,7/2)<0; VAR4A:=VAR2A-MA(VAR1A,7/2)>0; VAR5A:=BARSLAST(VAR3A); VAR6A:=0-BARSLAST(VAR4A); VAR7A:=IF(VAR3A<=0,VAR5A,VAR6A); VAR11A:=(CLOSE*2+HIGH+LOW)/4; VAR21A:=EMA(VAR11A,13)-EMA(VAR11A,34); VAR31A:=EMA(VAR21A,5); VAR2:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2))); VAR3:=((REF(VAR2,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR4:=((REF(VAR3,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR5:=((REF(VAR4,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR6:=((REF(VAR5,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR7:=((REF(VAR6,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR8:=((REF(VAR7,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR9:=((REF(VAR8,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VARA:=((REF(VAR9,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VARB:=((REF(VARA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VARC:=((REF(VARB,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VARD:=((REF(VARC,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VARE:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2))); VARF:=((REF(VARE,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR10:=((REF(VARF,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR11:=((REF(VAR10,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR12:=((REF(VAR11,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR13:=((REF(VAR12,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR14:=((REF(VAR13,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR15:=((REF(VAR14,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR16:=((REF(VAR15,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR17:=((REF(VAR16,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR18:=((REF(VAR17,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR19:=((REF(VAR18,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR1B:=(REF((((((((((((VARE OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18) OR VAR19),1) AND VAR2); STICKLINE1(VAR1B,O,O+(C-O)/3,3,0),COLORFFFF00; //CROSS(VAR1B,0.5),SOUND('A'); AA:=(REF((((((((((((VAR2 OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC) OR VARD),1) AND VARE); STICKLINE1(AA,O,O+(C-O)/3,3,0),COLORFF00FF; //CROSS(AA,0.5),SOUND('A'); A13:=EMA(CLOSE,55); A14:=MA(CLOSE,75); A15:=EMA(A14,3); A16:=EMA(A15,3); A17:=(HIGH + LOW) / 5; A18:=(MA(A17,4)) - (MA(A17,34)); A19:=CROSS(A18,0); A20:=CROSS(0,A18); A21:=BARSLAST(A19); A22:=BARSLAST(A20); A23:=REF(A19,1); A24:=REF(A20,1); A25:=BARSLAST(A23); A26:=BARSLAST(A24); A27:=IF((A25 < A26),(REF((HHV(HIGH,2)),A25)),(REF((LLV(LOW,2)),A26))); A28:=(((REF(CLOSE,1)) <= (REF(A27,1))) AND (CLOSE > A27)) AND (A21 < A22); A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < A27)) AND (A22 < A21); A30:=A28 AND ((COUNT(A28,A21)) = 1); A31:=A29 AND ((COUNT(A29,A22)) = 1); A32:=A30 AND ((REF(BARSLAST(A31),1)) < (REF(BARSLAST(A30),1))); A33:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(A30),1))); VTX11:=(H+L)/2; 上唇:=REF(SMA(VTX11,5,1),3),COLORGREEN; 牙齒:=REF(SMA(VTX11,8,1),5),COLORRED; 下顎:=REF(SMA(VTX11,13,1),8),COLORBLUE; DRAWTEXT(CROSS(C,下顎),H,'買開多');
VTX1:=BACKSET(REF(CLOSE,2)=HHV(CLOSE,5),3); VTX2:=CROSS(VTX1,0.9); VTX3:=BACKSET(REF(CLOSE,2)=LLV(CLOSE,5),3); VTX4:=CROSS(VTX3,0.9); VTX6:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3); VTX7:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3); VTX8:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1) AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3); VTX9:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3); VTXA:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3); VTXB:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1) AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3); VA3:=1; MID:=VA3*(3*CLOSE+LOW+OPEN+HIGH)/6; 操盤線:=VA3*(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,LINETHICK4; P5:=(EMA(CLOSE,3)+MA(CLOSE,3*2)+MA(CLOSE,3*3))/3;
操:=P5,LINETHICK2,COLOR00FF0F,PRECIS1;
斜率:ATAN((操/REF(操,1)-1)*100)*180/3.1416,NODRAW,COLORWHITE,PRECIS0;
TY:=C;
X:=8;
A1:=REF(TY,X)=HHV(TY,2*X+1);
B3:=FILTER(A1,X);
C1E:=BACKSET(B3,X+1);
HD:=FILTER(C1E,X);
A2:=REF(TY,X)=LLV(TY,2*X+1);
B4:=FILTER(A2,X);
C2:=BACKSET(B4,X+1);
LD:=FILTER(C2,X);
AQ:=REF(C,BARSLAST(HD)),COLORFFFFFF,LINETHICK3,PRECIS1;
BQ:=REF(C,BARSLAST(LD)),COLORFFFFFF,LINETHICK3,PRECIS1;
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD);
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
上:IF(T1,AQ,AQ),COLORGREEN,DOT,PRECIS0;
STICKLINE1(T1,AQ,AQ,7,0),COLORGREEN,PRECIS1;
下:IF(T2,BQ,BQ),COLORRED,DOT,PRECIS1;
STICKLINE1(T2,BQ,BQ,7,0),COLORRED,PRECIS1;
H>=上&&L<=上||H>=下&&L<=下,SOUND('B'); ?
有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號：cxh99cxh99 進行 有償收費 編寫！
(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)
相關文章
-
沒有相關內容