|
尋找？不尋找？---不必如此麻煩，無論如何也要把算法代碼真誠(chéng)奉上。 第一位，視頻《算法0041數(shù)據(jù)的疊加顯示②》里的內(nèi)容，實(shí)現(xiàn)的是在日線周期疊加周線的基本數(shù)據(jù)的情況。 “計(jì)算出人意料”不是一句空話，當(dāng)你實(shí)現(xiàn)了在日線周期疊加周線的基本數(shù)據(jù)之后，那么，在日線顯示所有使用了周線基本數(shù)據(jù)的計(jì)算輸出，。將成為可能?。?/p> 意外？是的，意料之外的收獲。難道不是？---這也許就是初心計(jì)算之外的禮物吧：雖然這個(gè)算法讓我們看到的只是周K線在日線界面里左右移來移去， 但是，這絕不是算法的結(jié)束，恰恰相反，基礎(chǔ)工作的后續(xù)是一切的剛剛開始。。。 代碼流程  日線周期疊加周線 完整代碼 {參數(shù)在這里用了中文} 中軸位置:=CONST(WEEKDAY+ROUND(5/2)+前一根周線*5); HH:=H#WEEK; OO:=O#WEEK; LL:=L#WEEK; CC:=C#WEEK; STICKLINE(CURRBARSCOUNT=中軸位置 AND CC<=OO,HH,LL,1,0),COLORLIBLUE; STICKLINE(CURRBARSCOUNT=中軸位置 AND CC<=OO,OO,CC,4*5,0),COLORLIBLUE; STICKLINE(CURRBARSCOUNT=中軸位置 AND CC>=OO,HH,LL,1,0),COLORLIRED; STICKLINE(CURRBARSCOUNT=中軸位置 AND CC>=OO,OO,CC,4*5,0),COLORLIRED; 周H:IF(CURRBARSCOUNT<=中軸位置,CONST(REF(HH,中軸位置)),DRAWNULL),COLORWHITE; 周L:IF(CURRBARSCOUNT<=中軸位置,CONST(REF(LL,中軸位置)),DRAWNULL),COLORWHITE; DRAWNUMBER(ISLASTBAR,周H,周H),COLORWHITE; DRAWNUMBER(ISLASTBAR,周L,周L),COLORWHITE; DRAWKLINE(H,O,L,C); 第二位，昨天文章《九轉(zhuǎn)算法之初步（二）》 這一算法的意料之外，卻是只用兩個(gè)語句的重復(fù)完成當(dāng)前CLOSE低于4日前的CLOSE的標(biāo)注方法，簡(jiǎn)單且單純。 代碼流程  完整代碼 D1C:=CONST(BARSSINCEN(C=LLV(C,4),CONST(PEAKBARS(1,BFB,1))));{D1C 第1次} D2C:=CONST(BARSSINCEN(C=LLV(C,4),D1C));{D2C 第2次} D3C:=CONST(BARSSINCEN(C=LLV(C,4),D2C));{D3C 第3次} D4C:=CONST(BARSSINCEN(C=LLV(C,4),D3C));{D4C 第4次} D5C:=CONST(BARSSINCEN(C=LLV(C,4),D4C));{D5C 第5次} D6C:=CONST(BARSSINCEN(C=LLV(C,4),D5C));{D6C 第6次} D7C:=CONST(BARSSINCEN(C=LLV(C,4),D6C));{D7C 第7次} D8C:=CONST(BARSSINCEN(C=LLV(C,4),D7C));{D8C 第8次} D9C:=CONST(BARSSINCEN(C=LLV(C,4),D8C));{D9C 第9次} D10C:=CONST(BARSSINCEN(C=LLV(C,4),D9C));{D10C 第10次} DRAWNUMBER(CURRBARSCOUNT=D1C+1,(H+L)/2,1),COLORMAGENTA; DRAWNUMBER(CURRBARSCOUNT=D2C+1,(H+L)/2,2),COLORMAGENTA; DRAWNUMBER(CURRBARSCOUNT=D3C+1,(H+L)/2,3),COLORMAGENTA; DRAWNUMBER(CURRBARSCOUNT=D4C+1,(H+L)/2,4),COLORMAGENTA; DRAWNUMBER(CURRBARSCOUNT=D5C+1,(H+L)/2,5),COLORMAGENTA; DRAWNUMBER(CURRBARSCOUNT=D6C+1,(H+L)/2,6),COLORMAGENTA; DRAWNUMBER(CURRBARSCOUNT=D7C+1,(H+L)/2,7),COLORMAGENTA; DRAWNUMBER(CURRBARSCOUNT=D8C+1,(H+L)/2,8),COLORMAGENTA; DRAWNUMBER(CURRBARSCOUNT=D9C+1,(H+L)/2,9),COLORMAGENTA; DRAWNUMBER(CURRBARSCOUNT=D10C+1,(H+L)/2,1),COLORMAGENTA; 除了保留前述的 參數(shù)BFB 其余的變通方法如下 代碼流程  完整代碼 TJ:=CONST(PEAKBARS(1,BFB,1))<CONST(TROUGHBARS(2,BFB,1));{TJ 條件} DQD:=CONST(PEAKBARS(1,BFB,1));{DQD 跌起點(diǎn)} DXH:=DQD-CURRBARSCOUNT+1;{DXH 跌序號(hào)} DXH0:=IF(MOD(DXH,9)=0,9,MOD(DXH,9)); DRAWNUMBER(CURRBARSCOUNT<=DQD,(H+L)/2,DXH0),COLORMAGENTA; DRAWICON(CURRBARSCOUNT<=DQD AND C=LLV(C,4),L*0.997,85); 如果有什么不適宜的感覺，請(qǐng)記得調(diào)整參數(shù)BFB喲~ 第三位，威力爆裂的《頭肩頂頭肩底》算法 代碼流程  頭肩頂頭肩底算法 完整代碼 {DJG 第幾個(gè)} GW:=CONST(TROUGHBARS(2,1,DJG));{GW 俗位} DRAWICON(CURRBARSCOUNT=GW+1,L*0.999,85); CONST(REF(PEAK(1,1,1),GW)); YFW:=CONST(BARSSINCEN(H=PEAK(1,1,1),GW));{YFW 右峰位} DRAWICON(CURRBARSCOUNT=YFW+1,H*1.008,12); CONST(REF(H,YFW)); FW:=CONST(PEAKBARS(1,1,DJG));{FW 峰位} DRAWICON(CURRBARSCOUNT=FW+1,H*1.008,86); CONST(REF(TROUGH(2,1,1),FW)); YGW:=CONST(BARSSINCEN(L=TROUGH(2,1,1),FW));{YGW 右谷位} DRAWICON(CURRBARSCOUNT=YGW+1,L*0.999,11); CONST(REF(L,YGW)); 這樣的算法建立，值得珍藏，正如扇動(dòng)中的蝴蝶的那雙美麗的翅膀，既遙遠(yuǎn)又那么的微不足道，而它面向未來的效應(yīng)卻勝過難以抵擋的颶風(fēng)。。。 寫在文末：江豐魚的文章只在今日頭條首發(fā)；文中代碼均可運(yùn)行。 |
|
|
