-
江恩輪中輪指標源碼
來源： 【贏家江恩】 責(zé)任編輯：wanghuijuan 添加時間：2014-04-16 09:55:29
江恩輪中輪是諸多江恩愛好者喜歡的工具。也是對江恩全部理論的概括和總結(jié)，將市場上的短、中和長期循環(huán)進行統(tǒng)一的描述，并將市場的價格點位融合到江恩的幾何角度中，能很好的幫助投資來分析時間和價位的關(guān)系。以下是筆者在網(wǎng)絡(luò)中找到的指標源碼，分享給喜歡江恩輪中輪的朋友!
INPUT:最近天(30,1,360);當前月:=FRACPART(ROUND(當前日期/100)/100)*100;
月:=MONTH;日:=DAY;
N:=if(sysparam(1)=datacount,最近天,datacount-sysparam(1)+1);
HH:=HHV(HIGH,N);
LL:=LLV(LOW,N);
VN:=N;
IF VN>DATACOUNT THEN
VN=DATACOUNT+1;
FOR I=DATACOUNT DOWNTO DATACOUNT-VN+1 DO BEGIN
HH[I]:=HH[DATACOUNT];
LL[I]:=LL[DATACOUNT];
END;
TMP:=SETLBOUND(hh,DATACOUNT-VN+1);
TMP:=SETLBOUND(ll,DATACOUNT-VN+1);
KKH:=BARSLAST(H=HH);
KKL:=BARSLAST(L=LL);
N低日:=STRTONUM(NUMTOSTR(REF(DATE,KKL),0));
N高日:=STRTONUM(NUMTOSTR(REF(DATE,KKH),0));
多空:=IF(N低日>N高日,2,1),LINETHICK0;
DATE1:=IF(多空=1,N低日,N高日);
LLOW:=ref(LOW,BARSLAST(DATE1=DATE));
H1:=STRTONUM(NUMTOSTR(hh,2));
L1:=STRTONUM(NUMTOSTR(LLOW,2));
VERTLINE(DATE=DATE1),COLORFFAAAA,LINETHICK1;
{DRAWTEXT(DATE=DATE1,SYSPARAM(4)*0.95,'起\n \n\n測\n \n點'),COLORFFFFFF;}
IF 多空=1 THEN BEGIN
PARTLINE(DATE>N低日,L1),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.042),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.083),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.125),COLORMAGENTA;
PARTLINE(DATE>N低日,L1*1.167),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.208),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.25),COLORMAGENTA;
PARTLINE(DATE>N低日,L1*1.292),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.33),COLORMAGENTA;
PARTLINE(DATE>N低日,L1*1.375),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.417),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.458),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.5),COLORMAGENTA;
PARTLINE(DATE>N低日,L1*1.542),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.583),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.625),COLORMAGENTA;
PARTLINE(DATE>N低日,L1*1.667),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.708),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.75),COLORMAGENTA;
PARTLINE(DATE>N低日,L1*1.792),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.833),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.875),COLORMAGENTA;
PARTLINE(DATE>N低日,L1*1.917),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*1.958),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N低日,L1*2),COLORMAGENTA;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1+0.002,NUMTOSTR(L1,2)+' 0 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.042+0.002,NUMTOSTR(L1*1.042,2)+' 15 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.083+0.002,NUMTOSTR(L1*1.083,2)+' 30 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.125+0.002,NUMTOSTR(L1*1.125,2)+' 45 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.167+0.002,NUMTOSTR(L1*1.167,2)+' 60 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.208+0.002,NUMTOSTR(L1*1.208,2)+' 75 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.25+0.002,NUMTOSTR(L1*1.25,2)+' 90 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.292+0.002,NUMTOSTR(L1*1.292,2)+' 105 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.33+0.002,NUMTOSTR(L1*1.33,2)+' 120 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.375+0.002,NUMTOSTR(L1*1.375,2)+' 135 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.417+0.002,NUMTOSTR(L1*1.417,2)+' 150 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.458+0.002,NUMTOSTR(L1*1.458,2)+' 165 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.5+0.002,NUMTOSTR(L1*1.5,2)+' 180 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.542+0.002,NUMTOSTR(L1*1.542,2)+' 195 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.583+0.002,NUMTOSTR(L1*1.583,2)+' 210 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.625+0.002,NUMTOSTR(L1*1.625,2)+' 225 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.667+0.002,NUMTOSTR(L1*1.667,2)+' 240 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.708+0.002,NUMTOSTR(L1*1.708,2)+' 255 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.75+0.002,NUMTOSTR(L1*1.75,2)+' 270 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.792+0.002,NUMTOSTR(L1*1.792,2)+' 285 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.833+0.002,NUMTOSTR(L1*1.833,2)+' 290 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.875+0.002,NUMTOSTR(L1*1.875,2)+' 315 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.917+0.002,NUMTOSTR(L1*1.917,2)+' 330 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*1.958+0.002,NUMTOSTR(L1*1.958,2)+' 345 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,L1*2+0.002,NUMTOSTR(L1*2,2)+' 360 '),COLORWHITE,ALIGN2;
END;
ELSE BEGIN
PARTLINE(DATE>N高日,H1),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.042),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.083),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.125),COLORMAGENTA;
PARTLINE(DATE>N高日,H1-H1*0.167),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.208),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.25),COLORMAGENTA;
PARTLINE(DATE>N高日,H1-H1*0.292),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.33),COLORMAGENTA;
PARTLINE(DATE>N高日,H1-H1*0.375),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.417),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.458),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.5),COLORMAGENTA;
PARTLINE(DATE>N高日,H1-H1*0.542),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.583),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.625),COLORMAGENTA;
PARTLINE(DATE>N高日,H1-H1*0.667),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.708),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.75),COLORMAGENTA;
PARTLINE(DATE>N高日,H1-H1*0.792),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.833),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.875),COLORMAGENTA;
PARTLINE(DATE>N高日,H1-H1*0.917),COLORFFFF99,LINEDOT;
PARTLINE(DATE>N高日,H1-H1*0.958),COLORMAGENTA;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1+0.002,NUMTOSTR(H1-H1*0.042,2)+' 0 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.042+0.002,NUMTOSTR(H1-H1*0.042,2)+' 15 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.083+0.002,NUMTOSTR(H1-H1*0.083,2)+' 30 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.125+0.002,NUMTOSTR(H1-H1*0.125,2)+' 45 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.167+0.002,NUMTOSTR(H1-H1*0.167,2)+' 60 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.208+0.002,NUMTOSTR(H1-H1*0.208,2)+' 75 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.25+0.002,NUMTOSTR(H1-H1*0.25,2)+' 90 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.292+0.002,NUMTOSTR(H1-H1*0.292,2)+' 105 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.33+0.002,NUMTOSTR(H1-H1*0.33,2)+' 120 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.375+0.002,NUMTOSTR(H1-H1*0.375,2)+' 135 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.417+0.002,NUMTOSTR(H1-H1*0.417,2)+' 150 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.458+0.002,NUMTOSTR(H1-H1*0.458,2)+' 165 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.5+0.002,NUMTOSTR(H1-H1*0.5,2)+' 180 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.542+0.002,NUMTOSTR(H1-H1*0.542,2)+' 195 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.583+0.002,NUMTOSTR(H1-H1*0.583,2)+' 210 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.625+0.002,NUMTOSTR(H1-H1*0.625,2)+' 225 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.667+0.002,NUMTOSTR(H1-H1*0.667,2)+' 240 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.708+0.002,NUMTOSTR(H1-H1*0.708,2)+' 255 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.75+0.002,NUMTOSTR(H1-H1*0.75,2)+' 270 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.792+0.002,NUMTOSTR(H1-H1*0.792,2)+' 285 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.833+0.002,NUMTOSTR(H1-H1*0.833,2)+' 300 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.875+0.002,NUMTOSTR(H1-H1*0.875,2)+' 315 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.917+0.002,NUMTOSTR(H1-H1*0.917,2)+' 330 '),COLORWHITE,ALIGN2;
DRAWTEXT(SYSPARAM(3)=BARPOS,H1-H1*0.958+0.002,NUMTOSTR(H1-H1*0.958,2)+' 345 '),COLORWHITE,ALIGN2;
END;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='1',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:6、15、21、*25\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='2',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:6、15、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='3',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:6、15、*20、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='4',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:6、15、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='5',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:6、*12、15、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='6',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:6、*14、21\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='7',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:8、15、*19、23\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='8',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:*6、8、15、23\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='9',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:8、15、*18、23\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='10',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:8、15、23、*31\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='11',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:8、15、23、*28\n \n \n \n '),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(2)=BARPOS and NUMTOSTR(當前月,0)='12',c,NUMTOSTR(當前月,0)+'月轉(zhuǎn)折日:8、15、23、*31\n \n \n \n '),COLOR00FFFF,ALIGN4;
本源碼由贏家財富網(wǎng)編輯從互聯(lián)網(wǎng)上搜集整理，如有錯誤或遺漏還望網(wǎng)友指出，我們會盡快修正。
上一篇: 江恩輪中輪的步長設(shè)定
下一篇: 江恩理論中輪中輪與24節(jié)氣
評論排行
- ·一陽穿三線的K線圖解講解 (14)
- ·佛祖眼中的世界 世界到 (10)
- ·macd是什么意思 macd指標詳 (9)
- ·5日、10日、60日均線實戰(zhàn)分析 (9)
- ·bias指標詳解圖解法 bias指 (8)
- ·股票成交量怎么看 量價分析 (8)
- · ASI指標簡介及買入技巧詳解 (7)
- · 江恩波動率的秘密到底是什么 (6)
- · 江恩角度線用法圖解 (6)
- · 關(guān)于江恩理論實戰(zhàn)應(yīng)用的深入 (5)
- · 江恩輪中輪的使用奧妙【精品 (5)
- · 金融投資市場最完善的投資理 (5)
- · 成交量紅綠柱 (5)
- · 漲停后常見的跳空高開圖解 (5)
- · 單陽不破 戰(zhàn)法【精品】 (4)
- · 江恩買賣法則中時間、價格、 (4)
- · 江恩24條規(guī)則（二）止損單 (4)
- · 江恩時間法則背后的原理是什 (4)
- · 江恩從人類的身體結(jié)構(gòu)解讀市 (4)
- · 角度線和江恩箱的原理及使用 (4)
- 欄目分類
- 選股技巧|
- 江恩理論|
- 江恩看盤|
- 經(jīng)典實戰(zhàn)|
- 看盤技巧|
- 止損技巧|
- 解套技巧|
- 跟莊技巧|
- 賣出技巧|
- 買入技巧|
- 波段技巧|
- 短線技巧|
- 個股期權(quán)|
- 資金倉位|
- 心理分析|
- 新股投資|
- 贏家戰(zhàn)法|
- 翻倍黑馬|
- 波浪理論|
- 道氏理論|
- 江恩正方|
- 隨機漫步|
- 相反理論|
- 投資書籍|
- 江恩看盤|
- 基金知識|
- 莊家吸籌|
- 抄底技巧|
- 外匯知識|
- 白銀知識|
- 黃金知識|
- 期貨知識|
- 江恩時間法則|
- MACD?|
- KDJ?|
- BOLL?|
- RSI?|
- 日內(nèi)分析|
- 融資融券|
- K線入門?|
- 均線操盤|
- 買賣策略?|
- 股票買賣方法?|
- 趨勢判斷?|
- 最新文章
-
2018-05-23
對于近期融鈺集團走勢的盤面
-
2018-05-23
股市中的“風(fēng)”與“浪”的相
- 2018-05-23
-
2018-05-23
簡單分析股民對于成交量認知
- 2018-05-23
- 2018-05-23
-
2018-05-23
一陽穿三線的K線圖解講解
詳細內(nèi)容
-
2018-05-23
佛祖眼中的世界 世界到
詳細內(nèi)容
-
2018-05-23
macd是什么意思 macd指標詳
詳細內(nèi)容
-
2018-05-23
5日、10日、60日均線實戰(zhàn)分析
詳細內(nèi)容
-
2018-05-23
bias指標詳解圖解法 bias指
詳細內(nèi)容
-
2018-05-23
股票成交量怎么看 量價分析
詳細內(nèi)容
- 2018-05-23
- 2018-05-23
- 2018-05-23
- 2018-05-23
- 參禪悟道
-
2018-05-23
從佛學(xué)角度分析賣出的四大境
-
2018-05-23
股市投資是一種修行
-
2018-05-23
炒股就要做到水的三層境界
-
2018-05-23
我不是為了生氣而做股票的
-
2018-05-23
參禪悟道：“涅槃”是死生一
-
2018-05-23
不因股票虧損而動惡念 心存
- 2018-05-23
- 江恩理論
-
2018-05-23
使用江恩角度線捕捉西部建設(shè)
-
2018-05-23
關(guān)于江恩輪中輪幾個問題的回
-
2018-05-23
江恩十二方圖的應(yīng)用
-
2018-05-23
時間窗口是什么意思
-
2018-05-23
江恩時間窗確定市場買點
- 2018-05-23
-
2018-05-23
江恩看盤—2018年05月23日大
-
關(guān)于本站
-
聯(lián)系我們
-
免責(zé)聲明
-
網(wǎng)站地圖
-
江恩理論
-
股票軟件
Copyright ? 2004-2018 鄭州亨瑞軟件開發(fā)有限公司 版權(quán)所有
豫ICP備05016962號-1
-
經(jīng)營性網(wǎng)站備案信息
-
中國互聯(lián)網(wǎng)違法和不良信息舉報中心
-
本站帶寬由
中國電信鼎力提供 -
河南網(wǎng)絡(luò)
行業(yè)協(xié)會 -
網(wǎng)絡(luò) 110
報警服務(wù)
版權(quán)所有
服務(wù)中心:鄭州市經(jīng)三路32號財富廣場2號樓4樓C座
郵編:450002 網(wǎng)址:www.bjxghh.com
銷售熱線:0371-65350318/65350319
技術(shù)支持:13333833889
