波神八線公式代碼源碼[通達信公式]
相關標簽: 波神八線制作步驟 、 波浪理論口訣 、 波神八線 、 波神規律是騙局嗎 、 波浪理論42口訣圖解 、 波神規律軟件多少錢 、 波神規律教程 、
?
?
原理解析：
?
源碼：
?
DRAWGBK(O>C,RGB(57,35,146),RGB(0,0,0),0,'1',0);
AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8);
BA:=EMA(AB,5);
A1{高}:=REFDATE(REF(HHV(H,96),5),DATE);
B1{低}:=REFDATE(REF(LLV(L,96),5),DATE);
箱頂:IF(AB>0 AND AB-BA<=0,A1,A1),COLORGREEN,DOTLINE;
箱底:IF(AB>0 AND AB-BA<=0,B1,B1),COLORRED,DOTLINE;
費氏數:=HHV(H,20);
成立距今:=BARSLAST(費氏數);
H天數:STICKLINE(成立距今=6 OR 成立距今=8 OR 成立距今=12 OR 成立距今=14
OR 成立距今=15 OR 成立距今=18 OR 成立距今=19 OR 成立距今=20 OR 成立距今=21
OR 成立距今=23 OR 成立距今=28 OR 成立距今=31 ,箱頂,箱底,0,0),COLORYELLOW;
DRAWTEXT(ISLASTBAR,箱頂,' 箱頂'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,箱底,' 箱底'),COLORYELLOW;
C極點精準線:CONST(REF(C,0)),COLOR7777FF;
K:=BARSLAST(CURRBARSCOUNT=60);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0)),NODRAW;
DDA:=CONST(IF(ISLASTBAR=1,LLV(L,K),0)),NODRAW;
KJ:=GD-DDA;
DIF:=EMA(CLOSE,9)-EMA(CLOSE,21);
吸:XLPL.NOTEXT吸,NODRAW;
拉:XLPL.NOTEXT拉,NODRAW;
派:XLPL.NOTEXT派,NODRAW;
落:XLPL.NOTEXT落,NODRAW;
AAW:=IF(吸!=DRAWNULL,DIF,DRAWNULL),COLORLIRED,LINETHICK2;
BBW:=IF(拉!=DRAWNULL,DIF,DRAWNULL),COLORRED,LINETHICK2;
CCW:=IF(派!=DRAWNULL,DIF,DRAWNULL),COLORGREEN,LINETHICK2;
DDW:=IF(落!=DRAWNULL,DIF,DRAWNULL),COLORWHITE,LINETHICK2;
STICKLINE(AAW,LOW,HIGH,0,0),COLORLIRED;
STICKLINE(AAW,C,O,3,0),COLORLIRED;
STICKLINE(BBW,LOW,HIGH,0,0),COLORRED;
STICKLINE(BBW ,C,O,3,0),COLORRED;
STICKLINE(CCW,LOW,HIGH,0,0),COLORGREEN;
STICKLINE(CCW,C,O,3,0)COLORGREEN;
STICKLINE(DDW,LOW,HIGH,0,0),COLORWHITE;
STICKLINE(DDW,C,O,3,0),COLORWHITE;
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND 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:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARE:=REF(VARD,1) AND 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(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
STICKLINE(VAR19,C,O,1.5,0),COLORBROWN;
STICKLINE(VAR1A,C,O,1.5,0),COLORBLUE;
DRAWTEXT(成立距今=6,箱頂*0.8,'6'),COLORYELLOW;
DRAWTEXT(成立距今=8,箱頂*0.8,'8'),COLORYELLOW;
DRAWTEXT(成立距今=12,箱頂*0.8,'12'),COLORYELLOW;
DRAWTEXT(成立距今=14,箱頂*0.8,'14'),COLORYELLOW;
DRAWTEXT(成立距今=15,箱頂*0.8,'15'),COLORYELLOW;
DRAWTEXT(成立距今=18,箱頂*0.8,'18'),COLORYELLOW;
DRAWTEXT(成立距今=19,箱頂*0.8,'19'),COLORYELLOW;
DRAWTEXT(成立距今=20,箱頂*0.8,'20'),COLORYELLOW;
DRAWTEXT(成立距今=21,箱頂*0.8,'21'),COLORYELLOW;
DRAWTEXT(成立距今=23,箱頂*0.8,'23'),COLORYELLOW;
DRAWTEXT(成立距今=28,箱頂*0.8,'28'),COLORYELLOW;
DRAWTEXT(成立距今=31,箱頂*0.8,'31'),COLORYELLOW;
一:IF(CURRBARSCOUNT<=5,DDA+KJ*0.1,DRAWNULL),COLORYELLOW,DOTLINE;
二: IF(CURRBARSCOUNT<=5,DDA+KJ*0.28,DRAWNULL),COLORYELLOW,DOTLINE;
三:IF(CURRBARSCOUNT<=5,DDA+KJ*0.41,DRAWNULL),COLORYELLOW,DOTLINE;
四:IF(CURRBARSCOUNT<=5,DDA+KJ*0.54,DRAWNULL),COLORYELLOW,DOTLINE;
五:IF(CURRBARSCOUNT<=5,DDA+KJ*0.62,DRAWNULL),COLORYELLOW,DOTLINE;
六:IF(CURRBARSCOUNT<=5,DDA+KJ*0.74,DRAWNULL),COLORYELLOW,DOTLINE;
七:IF(CURRBARSCOUNT<=5,DDA+KJ*0.88,DRAWNULL),COLORYELLOW,DOTLINE;
八:IF(CURRBARSCOUNT<=5,DDA+KJ*1,DRAWNULL),COLORYELLOW,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=1,一,' 一線'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,二,' 二線'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,三,' 三線'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,四,' 四線'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,五,' 五線'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,六,' 六線'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,七,' 七線'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,八,' 八線'),COLOR00FFFF;
PMA:MA(C,5),COLORWHITE,LINETHICK2;
IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORRED,LINETHICK2;
IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORGREEN,LINETHICK2;
X:=(3*C+L+O+H)/6;
多空線:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORFF00FF,LINETHICK2;
{用法：黃托底買進,藍壓頂賣出。}
DD:=多空線<REF(多空線,1);
IF(DD,多空線,DRAWNULL),COLOR00FFFF,LINETHICK2;
A:=(PMA>多空線);
IF(A,多空線,DRAWNULL),COLOR33FF33,POINTDOT,LINETHICK4;
P:=5;P1:=13;
{N為多少天內的高低值參數，我以自已的初始K線根數定義。
P1、P2為短、長支撐壓力取點參數}
A1S:=REF(H,P)=HHV(H,2*P+1);
B1S:=FILTER(A1S,P);
C1S:=BACKSET(B1S,P+1);
D1S:=FILTER(C1S,P);
E1S:=BACKSET(ISLASTBAR,BARSLAST(D1S)+1);
F1S:=E1S>REF(E1S,1);
短壓:DRAWLINE(D1S,H,F1S,H,1),COLORCYAN,DOTLINE;
A2:=REF(L,P)=LLV(L,2*P+1);
B2:=FILTER(A2,P);
C2:=BACKSET(B2,P+1);
D2:=FILTER(C2,P);
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
F2:=E2>REF(E2,1);
短支:DRAWLINE(D2,L,F2,L,1),COLORLIRED,DOTLINE;
AA1:=REF(H,P1)=HHV(H,2*P1+1);
BB1:=FILTER(AA1,P1);
CC1:=BACKSET(BB1,P1+1);
DD1:=FILTER(CC1,P1);{GUPIAOFF.COM};
EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);
FF1:=EE1>REF(EE1,1);
長壓:DRAWLINE(DD1,H,FF1,H,1),COLORGREEN,DOTLINE;
AA2:=REF(L,P1)=LLV(L,2*P1+1);
BB2:=FILTER(AA2,P1);
CC2:=BACKSET(BB2,P1+1);
DD2:=FILTER(CC2,P1);{GUPIAOFF.COM};
EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);
FF2:=EE2>REF(EE2,1);
長支:DRAWLINE(DD2,L,FF2,L,1),COLORYELLOW,DOTLINE;
TA:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:=EMA(TA,13);
VAR8A:=REF(CLOSE,1)-REF(ATR,1);
永不套牢線:HHV(VAR8A,13), COLORCYAN;
DRAWTEXT(ISLASTBAR,永不套牢線,' 永不套牢線'), COLORWHITE;
漲:=TROUGHBARS(3,15,1)=0 AND HIGH>LOW+0.01;
跌:=PEAKBARS(3,15,1)=1;
STICKLINE(漲,L-0.1,L-0.106,5,0)COLORMAGENTA;
STICKLINE(跌,H,H+0.006,5,0)COLORLIGREEN;
DRAWTEXT(漲,L-0.16,'變盤')COLORYELLOW;
DRAWTEXT(跌,H+0.09,'變盤')COLORYELLOW;
跟A7:=C-REF(C,1);
跟A8:=100*EMA(EMA(跟A7,6),6)/EMA(EMA(ABS(跟A7),6),6);
買:=LLV(跟A8,2)=LLV(跟A8,7) AND COUNT(跟A8<0,2) AND CROSS(跟A8,MA(跟A8,2));
跟莊買進:DRAWTEXT(FILTER(買=1,5),L*0.98,'∠跟莊買進')COLORMAGENTA;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.01,0,'一月:6/15/21/*25，二月:6/15/21，三月:6/15/*20/21，
四月:6/15/21，五月:6/*12/15/21，六月:6/*14/21'),COLORCYAN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.04,0,'七月:8/15/*9/23，八月:*6/8/15/23，九月:8/15/*18/23，
十月:8/15/23/*31，十一月:8/15/23/*28，十二月:8/15/23/*31'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.07,0,'六二一來上半年;下半年來八二三;神數十五在中間;'),COLORLIRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.10,0,'頂底轉折提前算;28天輪換轉;三五四七和十三;'),COLORCYAN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.13,0,'K線個數記心間;*字符號是關鍵;前后不差一二天;'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.16,0,'一波上漲二三線;離場要在兩線半;二波關鍵在五六線;五線離場要果斷;'),COLORLIRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.19,0,'三波七八一循環;七上八下多空轉;八線循環環套環;小環完成進大環;'),COLORCYAN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,0.22,0,'中國股市多變幻;第四線上是一關;回調關注一二線;五六頂底亦常見;'),COLORYELLOW;
N8:=STRCAT(CON2STR(YEAR,0),' 年 ');
Y8:=STRCAT(CON2STR(MONTH,0),' 月 ');
R8:=STRCAT(CON2STR(DAY,0),' 日 ');
SJ8:=STRCAT(STRCAT(N8,Y8), R8);
SJ9:=STRCAT(STRCAT(N8,Y8), R8);
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,1.02,0,SJ8),COLORYELLOW;
?
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?
有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信：cxhjy888 進行 有償收費 編寫！(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)
(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)
相關文章
-
沒有相關內容
會員登錄/注冊