【圖】賣拐公式及其源碼

海天云騫 2017-06-04

展開全文

趙本山的“賣拐”小品已是家喻戶曉了:))，今天周末我來給大家說一個公式的“賣拐”

朋友告訴我：公式如此多嬌，引無數(shù)英雄競折腰！
有一組名叫“LKT-系統(tǒng)”的所謂貴重公式

，我最早是在理想論壇看見大概是求助破解的意思，一共7個公式都是定向完全加密的，公式文件都非常大最大的近20k，下載來導入飛狐看了一眼就使得我暈了

好幾天--簡直就是垃圾回收站的倉庫，里面有著連篇贅語的忽悠詞句和500多個公式語句，估計看了他的圖示還不會暈倒的人只有兩類，1、是定力深厚有坐懷不亂之能的高僧大德；2、各種原因?qū)е轮袠猩窠?jīng)短路的白癡。

附LKT-系統(tǒng)防騙K線公式及效果圖，有情提示：看過之后近期內(nèi)請不要乘坐任何交通工具

股票論壇 www.

附件:

0a1.gif (31.61 KB)

2005-11-13 13:47

1LKT-系統(tǒng)防騙K線.ALG (17.26 KB): 2005-11-13 13:47, 下載次數(shù): 31

會員參與反饋

推薦(1次)
100.00%

不推薦(0次)
0.00%

	接下來我們再看看公式用法注釋部分，據(jù)說趙本山看了后沉默了很久才嘆息道：人和人差別咋就這么大呢？！既生趙何生L。（提示：請預先服用健胃鎮(zhèn)吐藥物） “本 LKT-波段共振決策系統(tǒng)已申請專利與注冊！ LKT波段決策系統(tǒng)電腦最低配置： CPU: C4 1.8G以上(或：AMD1700) 內(nèi)存：512M 以上硬盤：40G 7200轉 {注:低于此配置,請快升級,否則責任在自身} 本LKT-波段共振決策系統(tǒng)從1998年測試至今共振解讀個股的成功率98%；” “特別敬告：請大家不要對外界公開本系統(tǒng)，因太多人知道的東西會大大的減少準確度，要是這樣那可能我們公司升級系統(tǒng)都沒有那么快；同時太多人使用的東西也會降低準確度，所以本系統(tǒng)也會進行每年的限量租賃，請大家為了自己的資金操作安全和本系統(tǒng)的長期保持信號的準確度請不要公開本系統(tǒng)（日后如果有發(fā)現(xiàn)有用戶嚴重的公開本系統(tǒng)，本公司會考慮把該用戶列為使用黑名單）謝謝 ” “(友情提示：波段系統(tǒng)過了期的時候不要再使用，請及時把過期的波段系統(tǒng)從你的電腦硬盤中徹底清除，（只要刪除了飛狐與存放的文件就沒有問題了）否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)）” “LKT投資公司組建了一支年輕，活力富有朝氣的操盤系統(tǒng)研發(fā)團隊。這個專業(yè)研發(fā)團藏龍臥虎，其中不乏博士，金融學碩士。資深證券分析師，頂尖操盤手,頂尖編程人員，公式編寫大師?！?br> “我公司有兩套操盤決策系統(tǒng)（LKT100萬操盤系統(tǒng)與LKT波段決策系統(tǒng)），提供租賃業(yè)務，價格分別為年租賃費為人民幣100萬元與6800元；”

	昨晚閑逛在江海論壇找到了幾個LKT公式，令人啼笑皆非的是號稱擁有“博士，金融學碩士。資深證券分析師，頂尖操盤手,頂尖編程人員，公式編寫大師”的 LKT公司居然會在名為“LKT波段(B)多空線”公式里編寫出這樣的語句 {VAR63:DRAWTEXT((DATE = 1060129),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR64:DRAWTEXT((DATE = 1060215),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR65:DRAWTEXT((DATE = 1060301),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR66:DRAWTEXT((DATE = 1060315),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR67:DRAWTEXT((DATE = 1060330),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR68:DRAWTEXT((DATE = 1060401),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR69:DRAWTEXT((DATE = 1060415),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR70:DRAWTEXT((DATE = 1060430),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR71:DRAWTEXT((DATE = 1060515),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR72:DRAWTEXT((DATE = 1060530),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR73:DRAWTEXT((DATE = 1060615),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR74:DRAWTEXT((DATE = 1060630),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR75:DRAWTEXT((DATE = 1060715),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR76:DRAWTEXT((DATE = 1060730),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR77:DRAWTEXT((DATE = 1060815),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR78:DRAWTEXT((DATE = 1060830),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR79:DRAWTEXT((DATE = 1060915),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR80:DRAWTEXT((DATE = 1060930),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR81:DRAWTEXT((DATE = 1061015),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR82:DRAWTEXT((DATE = 1061030),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR83:DRAWTEXT((DATE = 1061115),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR84:DRAWTEXT((DATE = 1061130),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR85:DRAWTEXT((DATE = 1061215),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR86:DRAWTEXT((DATE = 1061230),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR87:DRAWTEXT((DATE = 1070115),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR88:DRAWTEXT((DATE = 1070130),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR89:DRAWTEXT((DATE = 1070215),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR90:DRAWTEXT((DATE = 1070230),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR91:DRAWTEXT((DATE = 1070315),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR92:DRAWTEXT((DATE = 1070330),50,'系統(tǒng)到期如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; VAR93:DRAWTEXT((DATE = 1070415),50,'系統(tǒng)到期*如不繼費使，請及時把波段系統(tǒng)從你的電腦硬盤中徹底清除，否則系統(tǒng)里裝置的定時啟動惡性程序會擾亂你的交易數(shù)據(jù)并會對硬盤進行破壞'),ALIGN3,colorFFFF00; EXPLAIN((CLOSE > 0),'〓內(nèi)部有惡意攻擊程序，一經(jīng)破解自動打開--子和w乙w我r的w國e到廠w一r子w一r的w刁r乙w一r3的w刁r匕we到的w在r用w九w七r一w兒女一4司令部砒不子天展輒較6較不丌有亻不人展露5人們蹙亻大子不不會6到不亻些他萬噸6成不的在虎w匕大兒w大wenkwjhiuwhiughifbishbefishbifyhsiuhdishiuehifushiufhisehfiuhse乙t現(xiàn)3大較不較不較6子宮〓'),colorFFFFFF;} 唉！都是破解惹的禍，看把人逼得不斷的嚇唬不說連神漢巫婆的咒語都用上了！這江海也是人家從6800忽悠到上100w了你卻把他裸體示眾，面子沒有了，里子也... 買別人的公式光要錢，買了這個公式連命都要?。?！

	接下來提供幾個收集到的LKT-系統(tǒng)公式源碼 LKT-提前預警選股 aa:=CROSS("KD.K","KD.D"); JM:=COUNT(aa,BARSLAST(("KD.D" >= 50))); 準備:(60 * (("KD.D" < 50) AND (COUNT((JM = 3),21) = 1))); 準備:=IF(((YEAR > 2004) AND (MONTH > 9)),0,準備); JMCOUNT:=IF(((YEAR > 2004) AND (MONTH > 9)),0,JMCOUNT); 準備,LINETHICK0; JMCOUNT,LINETHICK0; DRAWTEXT(準備,"KD.D",''),LINETHICK2; 準備:=IF(((YEAR > 2004) AND (MONTH > 9)),0,準備); 準備,LINETHICK0; LKT提前預警選股:(50 * (準備 AND (SLOPE(MA(CLOSE,20),3) > 0))),LINETHICK2,colorFF; [ 本帖最后由蝶戀花于 2005-11-13 16:45 編輯 ]

	LKT底部免費簡化版 DRAWGBK((VOL > 1),COLORRGB(70,80,0),COLORRGB(40,30,10),1); DRAWTEXT(BARPOS = SYSPARAM(2),HIGH,BLKNAME +'\n'+' LKT投資公司歡迎你'),ALIGN4,colorFF; var0:=(MA(((100 * (CLOSE - LLV(CLOSE,34))) / (HHV(HIGH,34) - LLV(LOW,34))),5) - 20); VAR1:=(2 * ABS(var0)); VAR2:=(100 - ((100 - (3 * SMA((((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100),20,1))) + (2 * SMA(SMA((((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100),20,1),15,1)))); VAR3:=(100 - ((100 - (3 * SMA((((OPEN - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100),20,1))) + (2 * SMA(SMA((((OPEN - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100),20,1),15,1)))); VAR4:=(((HIGH + LOW) + CLOSE) / 3); VAR5:=((VAR4 - MA(VAR4,10)) / (0.015 * AVEDEV(VAR4,10))); VAR6:=((VAR4 - MA(VAR4,30)) / (0.015 * AVEDEV(VAR4,30))); VAR7:=IF(((((VAR5 >= 150) AND (VAR5 < 200)) AND (VAR6 >= 150)) AND (VAR6 < 200)),10,0); VAR8:=IF(((((VAR5 <= (0 - 150)) AND (VAR5 > (0 - 200))) AND (VAR6 <= (0 - 150))) AND (VAR6 > (0 - 200))),(0 - 10),VAR7); VAR9:=(((CLOSE - MA(CLOSE,13)) / MA(CLOSE,13)) * 100); VARA:=(100 - ABS(VAR9)); VARB:=((3 * SMA((((INDEXC - LLV(INDEXL,55)) / (HHV(INDEXH,55) - LLV(INDEXL,55))) * 100),20,1)) - (2 * SMA(SMA((((INDEXC - LLV(INDEXL,55)) / (HHV(INDEXH,55) - LLV(INDEXL,55))) * 100),20,1),15,1))); VARC:=((3 * SMA((((INDEXO - LLV(INDEXL,55)) / (HHV(INDEXH,55) - LLV(INDEXL,55))) * 100),20,1)) - (2 * SMA(SMA((((INDEXO - LLV(INDEXL,55)) / (HHV(INDEXH,55) - LLV(INDEXL,55))) * 100),20,1),15,1))); VARD:=(REF(LOW,1) * 0.9); VARE:=(LOW * 0.9); VARF:=(((VARE * VOL) + (VARD * (CAPITAL - VOL))) / CAPITAL); VAR10:=EMA(VARF,30); VAR11:=(VAR10 - CLOSE); VAR12:=REF(CLOSE,1); VAR13:=((SMA(MAX((CLOSE - VAR12),0),7,1) / SMA(ABS((CLOSE - VAR12)),7,1)) * 100); VAR14:=((SMA(MAX((CLOSE - VAR12),0),13,1) / SMA(ABS((CLOSE - VAR12)),13,1)) * 100); VAR15:=BARSCOUNT(CLOSE); VAR16:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),6,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),6,1)) * 100); VAR17:=(((((0 - 100) * (HHV(HIGH,60) - CLOSE)) / (HHV(HIGH,60) - LLV(LOW,60))) + 50) * 2); VAR18:=(((CLOSE - LLV(LOW,15)) / (HHV(HIGH,15) - LLV(LOW,15))) * 100); VAR19:=((SMA(VAR18,4,1) - 50) * 2); VAR1A:=SMA(VAR19,3,1); VAR1B:=(((INDEXC - LLV(INDEXL,14)) / (HHV(INDEXH,14) - LLV(INDEXL,14))) * 100); VAR1C:=SMA(VAR1B,4,1); VAR1D:=SMA(VAR1C,3,1); VAR1E:=(((HHV(HIGH,30) - CLOSE) / CLOSE) * 100); VAR1F:=IF((((((((((VAR16 <= 25) AND (VAR17 < (0 - 95))) AND (VAR1E > 20)) AND (VAR1A < (0 - 30))) AND (VAR1D < 30)) AND (VAR11 >= (0 - 0.25))) AND (VAR13 < 22)) AND (VAR14 < 28)) AND (VAR15 > 50)),80,0); VAR20:=IF((VARA < 90),VARA,100); 頂線:=IF((var0> 0),var0,0); 多方:=(0 - IF((var0 < 0),VAR1,0)); 反彈:VAR1F,LINETHICK3,colorFF00; 空方:=(IF((((VAR6 >= 200) AND (VAR5 >= 150)) OR CROSS(65,頂線)),15,IF(((VAR6 <= (0 - 200)) AND (VAR5 <= (0 - 150))),(0 - 15),VAR8)) + 65); 壓力線:=((CLOSE > MA(CLOSE,20)) AND (MA(CLOSE,20) >= REF(MA(CLOSE,20),1))); T1:=((CLOSE < MA(CLOSE,20)) AND (MA(CLOSE,20) < REF(MA(CLOSE,20),1))); T2:=(((頂線 > 60) AND (空方 > 65)) AND (VAR20 = 100)); T3:=(((頂線 > 48) AND (空方 > 65)) AND (VAR20 < 100)); T4:=((多方 < (0 - 38)) AND (空方 < 65)); T5:=((反彈 > 50) AND (VAR20 < 90)); T6:=(((VAR2 > REF(VAR3,1)) AND (VOL > REF(VOL,1))) AND (CLOSE > REF(CLOSE,1))); T7:=((((((VAR2 <= REF(VAR3,1)) AND (CLOSE < REF(CLOSE,1))) AND (空方 = 65)) AND (反彈 = 0)) AND (多方 >= REF(多方,1))) AND (VARB < REF(VARC,1))); T8:=(AMOUNT / (100 * VOL)); VARAAA:=MA(T8,13); CYC13:=MA(T8,34); CYC34:=DMA(CLOSE,(VOL / CAPITAL)); CYCMAX:=(((CLOSE - VARAAA) / VARAAA) * 100); CYS13:=(((CLOSE - CYC13) / CYC13) * 100); CYS34:=(((CLOSE - CYC34) / CYC34) * 100); 超跌:IF((CYCMAX <= (0 - 20)),42,0),STICK,LINETHICK5,colorFFFF80; CYSMAX:=REF(CLOSE,1); VA1:=((SMA(MAX((CLOSE - CYSMAX),0),7,1) / SMA(ABS((CLOSE - CYSMAX)),7,1)) * 100); VA2:=((SMA(MAX((CLOSE - CYSMAX),0),13,1) / SMA(ABS((CLOSE - CYSMAX)),13,1)) * 100); VA3:=BARSCOUNT(CLOSE); VA4:=(((VA1 < 20) AND (VA2 < 25)) AND (VA3 > 50)); 階段底部:(VA4 * 60),LINETHICK4,colorFF0000; DRAWTEXT((SYSPARAM(2) = BARPOS),CLOSE,F10TEXT(F10FIND('',100),0)),ALIGN5; [ 本帖最后由蝶戀花于 2005-11-13 16:46 編輯 ]

	LKT靜態(tài)分析（試用B） input:N(10,1,88);流通盤:FINANCE(7),LINETHICK0; 每股凈資產(chǎn):FINANCE(34),LINETHICK0; 每股收益:FINANCE(33),LINETHICK0; EXPLAIN(1,(((STKNAME + STKLABEL) + 'n所屬板塊') + BLKNAME)); DRAWTEXT((BARPOS = SYSPARAM(2)),HIGH,BLKNAME),ALIGN4,colorFF; Ａ:=MA(CLOSE,5); A1:=MA(CLOSE,20); 生命線:=MA(CLOSE,10); 取舍線:=1; VAR1:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) * 100); VAR2:=((CLOSE > OPEN) AND ((OPEN - LOW) > (HIGH - CLOSE))); VAR3:=((REF(VAR1,1) < (0 - 20)) AND VAR2); VAR4:=(((REF(VAR1,1) < (0 - 20)) AND (CLOSE > OPEN)) AND ((((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 1000) > 20)); VAR5:=FILTER((VAR3 OR VAR4),3); VAR6:=((OPEN > CLOSE) AND ((HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)) > (IF((OPEN < CLOSE),OPEN,CLOSE) - LOW))); VAR7:=((REF(VAR1,1) > ABS((0 - 20))) AND VAR6); VAR8:=(((REF(VAR1,1) > ABS((0 - 20))) AND (CLOSE < OPEN)) AND ((((REF(CLOSE,1) - CLOSE) / REF(CLOSE,1)) * 1000) > 20)); VAR9:=FILTER((VAR7 OR VAR8),3); VARA:=((CLOSE > OPEN) AND ((OPEN - LOW) > (HIGH - CLOSE))); VARB:=((REF(VAR1,1) < (0 - 13)) AND VAR2); VARC:=(((REF(VAR1,1) < (0 - 13)) AND (CLOSE > OPEN)) AND ((((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 1000) > 20)); VARD:=FILTER((VARB OR VARC),3); VARE:=((OPEN > CLOSE) AND ((HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)) > (IF((OPEN < CLOSE),OPEN,CLOSE) - LOW))); VARF:=((REF(VAR1,1) > ABS((0 - 13))) AND VAR6); VAR10:=(((REF(VAR1,1) > ABS((0 - 13))) AND (CLOSE < OPEN)) AND ((((REF(CLOSE,1) - CLOSE) / REF(CLOSE,1)) * 1000) > 20)); VAR11:=FILTER((VARF OR VAR10),3); VAR9:=IF(((YEAR > 2004) AND (MONTH > 9)),0,VAR9); 取舍線:=IF(((YEAR > 2004) AND (MONTH > 9)),0,取舍線); VAR11:=IF(((YEAR > 2004) AND (MONTH > 9)),0,VAR11); VAR11,LINETHICK0; VAR9,LINETHICK0; 取舍線,LINETHICK0; DRAWICON(((VAR9 * 取舍線) > 0),HIGH,2); DRAWTEXT(((VAR11 * 取舍線) > 0),(0.99 * REF(CLOSE,1)),''),colorFFFF00; VAR12:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1)); A3:=(((REF(CLOSE,(VAR12 + 1)) > CLOSE) AND (REF("RSI.RSI1",(VAR12 + 1)) < "RSI.RSI1")) AND CROSS("RSI.RSI1","RSI.RSI2")); A3:=IF(((YEAR > 2004) AND (MONTH > 9)),0,A3); A3,LINETHICK0; DRAWICON(FILTER((A3 > 0),5),(LOW * 0.98),1); DRAWTEXT(FILTER((A3 > 0),5),(LOW * 0.98),''),colorFFFF; B3:=ISLASTBAR; V1:=(REF(HIGH,N) = HHV(HIGH,((2 * N) + 1))); V2:=FILTER(V1,N); V3:=BACKSET(V2,(N + 1)); V4:=FILTER(V3,N); V5:=(V4 OR B3); V6:=(REF(LOW,N) = LLV(LOW,((2 * N) + 1))); V7:=FILTER(V6,N); V8:=BACKSET(V7,(N + 1)); V9:=FILTER(V8,N); VA:=(V9 AND NOT(V4)); VB:=BACKSET(V5,(REF(BARSLAST(VA),1) + 1)); VC:=(VB > REF(VB,1)); VD:=BACKSET(VC,2); VE:=(VD > REF(VD,1)); VF:=BACKSET((VE AND (COUNT(V5,(REF(BARSLAST(VA),1) + 2)) = 0)),(REF(BARSLAST(VA),1) + 2)); V10:=(VF > REF(VF,1)); V11:=BACKSET((V10 AND (COUNT(V5,(REF(BARSLAST(VA),1) + 2)) = 0)),(REF(BARSLAST(VA),1) + 2)); V12:=(V11 > REF(V11,1)); V13:=IF(V5,COUNT(VA,(REF(BARSLAST(V5),1) + 1)),0); V14:=IF(((V13 = 1) AND V5),BARSLAST(VE),0); V15:=IF((V5 AND (REF(LOW,BARSLAST(VE)) >= REF(LOW,BARSLAST(V10)))),BARSLAST(V10),BARSLAST(VE)); V16:=IF(((V13 = 2) AND V5),V15,0); V17:=IF(((V13 >= 3) AND V5),IF((V5 AND (REF(LOW,V15) >= REF(LOW,BARSLAST(V12)))),BARSLAST(V12),V15),0); V18:=((V14 + V16) + V17); V19:=BACKSET(V5,V18); V1A:=(V19 > REF(V19,1)); V1B:=BACKSET(V1A,2); V1C:=(V1B > REF(V1B,1)); V1D:=(V1C OR B3); V1E:=BACKSET(V1D,(REF(BARSLAST(V5),1) + 1)); V1F:=(V1E > REF(V1E,1)); V20:=BACKSET(V1F,2); V21:=(V20 > REF(V20,1)); V22:=BACKSET((V21 AND (COUNT(V1D,(REF(BARSLAST(V5),1) + 2)) = 0)),(REF(BARSLAST(V5),1) + 2)); V23:=(V22 > REF(V22,1)); V24:=BACKSET((V23 AND (COUNT(V1D,(REF(BARSLAST(V5),1) + 2)) = 0)),(REF(BARSLAST(V5),1) + 2)); V25:=(V24 > REF(V24,1)); V26:=IF(V1D,COUNT(V4,(REF(BARSLAST(V1D),1) + 1)),0); V27:=IF(((V26 = 1) AND V1D),BARSLAST(V21),0); V28:=IF((V1D AND (REF(HIGH,BARSLAST(V21)) <= REF(HIGH,BARSLAST(V23)))),BARSLAST(V23),BARSLAST(V21)); V29:=IF(((V26 = 2) AND V1D),V28,0); V2A:=IF(((V26 >= 3) AND V1D),IF((V1D AND (REF(HIGH,V28) <= REF(HIGH,BARSLAST(V25)))),BARSLAST(V25),V28),0); V2B:=((V27 + V29) + V2A); V2C:=BACKSET(V1D,V2B); V2D:=(V2C > REF(V2C,1)); V2E:=BACKSET(V2D,2); V2F:=(V2E > REF(V2E,1)); DRAWLINE(V1C,LOW,V2F,HIGH,0),LINETHICK1; DRAWLINE(V2F,HIGH,V1C,LOW,0),LINETHICK1; V30:=BACKSET(B3,(BARSLAST(V1C) + 1)); V31:=(V30 > REF(V30,1)); V32:=BACKSET(B3,(BARSLAST(V2F) + 1)); V33:=(V32 > REF(V32,1)); V34:=IF((BARSLAST(V31) < BARSLAST(V33)),V31,V33); V35:=IF((BARSLAST(V31) < BARSLAST(V33)),LOW,HIGH); DRAWLINE(V34,V35,B3,CLOSE,0),LINETHICK1; V36:=BACKSET(B3,(BARSLAST(V1C) + 1)); V37:=(V36 > REF(V36,1)); V38:=BACKSET(V37,(REF(BARSLAST(V1C),1) + 2)); V39:=(V38 > REF(V38,1)); DRAWLINE(V39,LOW,V37,LOW,1),POINTDOT,LINETHICK1,colorFFFF; V3A:=BACKSET(B3,(BARSLAST(V2F) + 1)); V3B:=(V3A > REF(V3A,1)); V3C:=BACKSET(V3B,(REF(BARSLAST(V2F),1) + 2)); V3D:=(V3C > REF(V3C,1)); DRAWLINE(V3D,HIGH,V3B,HIGH,1),POINTDOT,LINETHICK1,colorFFFF; XX1:REF(LOW,BARSLAST(V37)),LINETHICK2,colorCCFF99; 前低線:REF(LOW,BARSLAST(V39)),LINETHICK2,colorFF00FF; YY1:REF(HIGH,BARSLAST(V3B)),LINETHICK2,colorCCFF99; 前高線:REF(HIGH,BARSLAST(V3D)),LINETHICK2,colorFF00FF; DRAWNUMBER(ISLASTBAR,YY1,YY1,2); DRAWNUMBER(ISLASTBAR,XX1,XX1,2); DRAWNUMBER(ISLASTBAR,前低線,前低線,2); DRAWNUMBER(ISLASTBAR,前高線,前高線,2); V3E:=(REF(HIGH,N) = HHV(HIGH,((2 * N) + 1))); J:=FILTER(V3E,N); JA:=BACKSET(J,(N + 1)); BB:=FILTER(JA,N); V3E:=(BB OR ISLASTBAR); J1:=(REF(LOW,N) = LLV(LOW,((2 * N) + 1))); J2:=FILTER(J1,N); JA2:=BACKSET(J2,(N + 1)); BB2:=FILTER(JA2,N); J1:=(BB2 AND NOT(BB)); J22:=BACKSET(V3E,(REF(BARSLAST(J1),1) + 1)); EA:=(J22 > REF(J22,1)); EB:=BACKSET(EA,2); JF:=(EB > REF(EB,1)); JJ1:=BACKSET((JF AND (COUNT(V3E,(REF(BARSLAST(J1),1) + 2)) = 0)),(REF(BARSLAST(J1),1) + 2)); JF2:=(JJ1 > REF(JJ1,1)); JJ2:=BACKSET((JF2 AND (COUNT(V3E,(REF(BARSLAST(J1),1) + 2)) = 0)),(REF(BARSLAST(J1),1) + 2)); JF3:=(JJ2 > REF(JJ2,1)); JJ3:=IF(V3E,COUNT(J1,(REF(BARSLAST(V3E),1) + 1)),0); JS:=IF(((JJ3 = 1) AND V3E),BARSLAST(JF),0); G1:=IF((V3E AND (REF(LOW,BARSLAST(JF)) >= REF(LOW,BARSLAST(JF2)))),BARSLAST(JF2),BARSLAST(JF)); GA:=IF(((JJ3 = 2) AND V3E),G1,0); G2:=IF(((JJ3 >= 3) AND V3E),IF((V3E AND (REF(LOW,G1) >= REF(LOW,BARSLAST(JF3)))),BARSLAST(JF3),G1),0); G3:=((JS + GA) + G2); J:=BACKSET(V3E,G3); GG:=(J > REF(J,1)); JB:=BACKSET(GG,2); JJ:=(JB > REF(JB,1)); LD:=(JJ OR ISLASTBAR); LD1:=BACKSET(LD,(REF(BARSLAST(V3E),1) + 1)); HEA:=(LD1 > REF(LD1,1)); HEB:=BACKSET(HEA,2); HJF:=(HEB > REF(HEB,1)); HJJ1:=BACKSET((HJF AND (COUNT(LD,(REF(BARSLAST(V3E),1) + 2)) = 0)),(REF(BARSLAST(V3E),1) + 2)); HJF2:=(HJJ1 > REF(HJJ1,1)); HJJ2:=BACKSET((HJF2 AND (COUNT(LD,(REF(BARSLAST(V3E),1) + 2)) = 0)),(REF(BARSLAST(V3E),1) + 2)); HJF3:=(HJJ2 > REF(HJJ2,1)); HJJ3:=IF(LD,COUNT(BB,(REF(BARSLAST(LD),1) + 1)),0); HJS:=IF(((HJJ3 = 1) AND LD),BARSLAST(HJF),0); HG1:=IF((LD AND (REF(HIGH,BARSLAST(HJF)) <= REF(HIGH,BARSLAST(HJF2)))),BARSLAST(HJF2),BARSLAST(HJF)); HGA:=IF(((HJJ3 = 2) AND LD),HG1,0); HG2:=IF(((HJJ3 >= 3) AND LD),IF((LD AND (REF(HIGH,HG1) <= REF(HIGH,BARSLAST(HJF3)))),BARSLAST(HJF3),HG1),0); HG3:=((HJS + HGA) + HG2); HGG:=BACKSET(LD,HG3); HJA:=(HGG > REF(HGG,1)); HJB:=BACKSET(HJA,2); HJJ:=(HJB > REF(HJB,1)); HD:=BACKSET(ISLASTBAR,(BARSLAST(JJ) + 1)); UU:=(10 * (HD > REF(HD,1))); VV:=BACKSET(ISLASTBAR,(BARSLAST(HJJ) + 1)); UU2:=(20 * (VV > REF(VV,1))); VV2:=REF(LOW,BARSLAST(JJ)); 底1:=REF(HIGH,BARSLAST(HJJ)); STICKLINE(HJJ,底1,VV2,0,0),LINETHICK1,color660099; DRAWLINE(JJ,LOW,HJJ,HIGH,0),LINETHICK1,color660099; DRAWLINE(JJ,LOW,HJJ,VV2,0),LINETHICK1,color660099; STICKLINE(JJ,底1,VV2,0,0),LINETHICK1,color666666; DRAWLINE(HJJ,HIGH,JJ,LOW,0),LINETHICK1,color666666; DRAWLINE(HJJ,HIGH,JJ,底1,0),LINETHICK1,color666666; 底價線:REF(LOW,BARSLAST(UU)),LINETHICK2,colorFF; 頂價線:REF(HIGH,BARSLAST(UU2)),LINETHICK2,colorFF00; [ 本帖最后由蝶戀花于 2005-11-13 16:45 編輯 ]

LKT波段系統(tǒng)-A
w:=winner(c);
hwxwinner:=dma(w,v/capital*1)*100;
xd1:=hwxwinner;
xwxmh:=ema(hwxwinner,6);
xd2:=xwxmh;
xd3:=ma(hwxwinner,14);
xd1:=if(year>2007 and month>9,0,xd1);
xd2:=if(year>2007 and month>9,0,xd2);
xd1,linethick0;
xd2,linethick0;
控盤:(xd1-xd2)*10,colorstick,Linethick4;
var1:=ma(100*(c-llv(c,34))/(hhv(h,34)-llv(l,34)),5)-20;
var2:=2*abs(var1);
var3:=100-100-3*sma((c-llv(l,55))/(hhv(h,55)-llv(l,55))*100,20,1)+2*sma(sma((c-llv(l,55))/(hhv(h,55)-llv(l,55))*100,20,1),15,1);
var4:=100-100-3*sma((o-llv(l,55))/(hhv(h,55)-llv(l,55))*100,20,1)+2*sma(sma((o-llv(l,55))/(hhv(h,55)-llv(l,55))*100,20,1),15,1);
var5:=(h+l+c)/3;
var6:=(var5-ma(var5,10))/0.015*avedev(var5,10);
var7:=(var5-ma(var5,30))/0.015*avedev(var5,30);
var8:=if(var6>=150 and var6<200 and var7>=150 and var7<200,10,0);
var9:=if(var6<=-150 and var6>-200 and var7<=-150 and var7>-200,-10,var8);
vara:=(c-ma(c,13))/ma(c,13)*100;
varb:=100-abs(vara);
varc:=3*sma((indexc-llv(indexl,55))/(hhv(indexh,55)-llv(indexl,55))*100,20,1)-2*sma(sma((indexc-llv(indexl,55))/(hhv(indexh,55)-llv(indexl,55))*100,20,1),15,1);
vard:=3*sma((indexo-llv(indexl,55))/(hhv(indexh,55)-llv(indexl,55))*100,20,1)-2*sma(sma((indexo-llv(indexl,55))/(hhv(indexh,55)-llv(indexl,55))*100,20,1),15,1);
vare:=ref(l,1)*0.9;
varf:=l*0.9;
var10:=(varf*v+vare*(capital-v))/capital;
var11:=ema(var10,30);
var12:=var11-c;
var13:=ref(c,1);
var14:=sma(max(c-var13,0),7,1)/sma(abs(c-var13),7,1)*100;
var15:=sma(max(c-var13,0),13,1)/sma(abs(c-var13),13,1)*100;
var16:=barscount(c);
var17:=sma(max(c-ref(c,1),0),6,1)/sma(abs(c-ref(c,1)),6,1)*100;
var18:=((-100)*(hhv(h,60)-c)/(hhv(h,60)-llv(l,60))+50)*2;
var19:=(c-llv(l,15))/(hhv(h,15)-llv(l,15))*100;
var1a:=(sma(var19,4,1)-50)*2;
var1b:=sma(var1a,3,1);
var1c:=(indexc-llv(indexl,14))/(hhv(indexh,14)-llv(indexl,14))*100;
var1d:=sma(var1c,4,1);
var1e:=sma(var1d,3,1);
var1f:=(hhv(h,30)-c)/c*100;
var20:=if(var17<=25 and var18<-95 and var1f>20 and var1b<-30 and var1e<30 and var12>=-0.25 and var14<22 and var15<28 and var16>50,80,0);
大趨勢:=var3;
頂線:=if(varb<90,varb,100);
多方:=if(var1>0,var1,0);
空方:=-(if(var1<0,var2,0));
抄底:=var20;
預警系統(tǒng):=if(var7>=200 and var6>=150 or cross(65,多方),15,if(var7<=-200 and var6<=-150,-15,var9))+65;
t1:=c>ma(c,20) and ma(c,20)>=ref(ma(c,20),1);
t2:=c<ma(c,20) and ma(c,20)<ref(ma(c,20),1);
t3:=多方>60 and 預警系統(tǒng)>65 and 頂線=100;
t4:=多方>48 and 預警系統(tǒng)>65 and 頂線<100;
t5:=空方<-38 and 預警系統(tǒng)<65;
t6:=抄底>50 and 頂線<90;
t7:=var3>ref(var4,1) and v>ref(v,1) and c>ref(c,1);
t8:=var3<=ref(var4,1) and c<ref(c,1) and 預警系統(tǒng)=65 and 抄底=0 and 空方>=ref(空方,1) and varc<ref(vard,1);
t3:=if(year>2007 and month>9,0,t3);
t4:=if(year>2007 and month>9,0,t4);
t7:=if(year>2007 and month>9,0,t7);
t3,linethick0;
t4,linethick0;
t7,linethick0;
b3:=drawtext(t3 and count(t3,30)=1,55,'升過急');
b4:=drawtext(t4 and count(t4,30)=1,75,'主升');
b7:=drawtext(t7 and count(t7,30)=1,60,'★資金進出');
超跌線:20,Linethick2,colorff00;
高位線:80,Linethick2,colorffff00;
中間線:50,Linethick2,colorffffff;
fvar2:=ref(l,1);
fvar3:=sma(abs(l-fvar2),13,1)/sma(max(l-fvar2,0),13,1)*100;
fvar4:=ema(fvar3,13);
fvar5:=llv(l,34);
fvar8:=ema(if(l<=fvar5,fvar4,0),3);
fvar9:=ema(c,5);
fvar10:=(c-ma(c,34))/ma(c,34)*(-10);
var1:=(c+h+l+o)/4;
var2:=sumbars(v,capital);
var3:=hhv(var1,var2);
var4:=llv(var1,var2);
var5:=(2*var1-var4-ref(var4,1))/(var3-var4);
var6:=(var1-var4)/(var3-var4);
var7:=if(var1<=var4,var5*60,var6*60);
var8:=600*(ema(c,3)-ema(l,30))/ema(l,30);
var9:=ema(var8,7);
vara:=(winner(120*c/100)-winner(100*c/100))*100;
varb:=(-100)*(winner(120*c/100)-winner(100*c/100))+5;
varc:=hhv(h,9)-llv(l,9);
vard:=hhv(h,9)-c;
vare:=c-llv(l,9);
varf:=vard/varc*100-70;
var10:=(c-llv(l,60))/(hhv(h,60)-llv(l,60))*100;
var11:=(2*c+h+l)/4;
var12:=sma(vare/varc*100,3,1);
var13:=llv(l,34);
var14:=sma(var12,3,1)-sma(varf,9,1);
var15:=if(var14>100,var14-100,0);
var16:=hhv(h,34);
var17:=ema((var11-var13)/(var16-var13)*100,8);
珊林:=var17;
var18:=ema(var17,5);
var22:=ref(l,1);
var23:=sma(abs(l-var22),3,1)/sma(max(l-var22,0),3,1)*100;
var24:=ema(if(c*1.3,var23*10,var23/10),3);
var25:=llv(l,30);
var26:=hhv(var24,30);
var27:=if(ma(c,58),1,0);
var28:=ema(if(l<=var25,(var24+var26*2)/2,0),3)/618*var27;
var29:=if(var28>100,100,var28);
stickline(var29>-150,0,var29,3,0),color808080;
多空值:=(c-ma(c,40))/ma(c,40)*100;
stickline(cross(多空值,-24),100,0,6,0),colorffffff;
進出值:=(c-ma(c,5))/ma(c,5)*100;
多空值:=if(year>2005 and month>1,0,多空值);
多空值,linethick0;
pglkjoj:if(cross(多空值,-24),1,0),colorffffff;
vark1:=(c-llv(l,27))/(hhv(h,27)-llv(l,27))*100;
vark2:=reverse(vark1);
vark3:=sma(vark1,3,1);
榮貴梁:=sma(vark3,3,1);
洋海黃:=sma(榮貴梁,2.5,1);
真實走勢線:=3*sma((c-llv(l,27))/(hhv(h,27)-llv(l,27))*100,5,1)-2*sma(sma((c-llv(l,27))/(hhv(h,27)-llv(l,27))*100,5,1),3,1);
rsv9:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100;
k1:=sma(rsv9,3,1);
dk1:=k1-ref(k1,1);
買進:if(dk1>7 and ref(dk1,1)<0 and dk1-ref(dk1,1)>9,50,0),stick,linethick0,colorffff;
drawicon(買進>0,50,1);
drawtext(if(cross(10,真實走勢線),1,0),10,'準備'),color33ffcc;
rsv:=(c-llv(l,30))/(hhv(h,30)-llv(l,30))*100;
k:=sma(rsv,5,1);
d:=sma(k,3,1);
目前位置:=k;
超梁:=20;
彪庭謝:=50;
幫衛(wèi)梁:=80;
var1:=(o+l+h+c)/4;
jj:=(c+h+l)/3;
a:=ema(jj,10);
b:=ref(a,1);
持多:=stickline(a>b,a,b,5,0);
持空:=stickline(a<b,a,b,5,0);
var3:=(c-llv(l,26))/(hhv(h,26)-llv(l,26))*100;
var8:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100;
k:=sma(var8,3,1);
d:=sma(k,3,1);
var9:=3*k-2*d;
vara:=llv(l,36);
varb:=hhv(h,30);
varc:=ema((c-vara)/(varb-vara)*4,4)*25;
vard:=87.5;
vare:=(varc-llv(varc,4))/(hhv(varc,4)-llv(varc,4))*4*25;
將雪燕:=if(cross(varc,10) and varc>10,50,0);
varf:=sma(var3,20,1);
var10:=sma(varf,15,1);
var11:=(3*varf+2*var10)/4;
var12:=ref(var11,1);
var13:=sma(max(var11-var12,0),2,1)/sma(abs(var11-var12),2,1)*100;
var14:=ma(var13,10);
var15:=if(cross(var14,90),25,0);
var20:=ema(c,12)-ema(c,26);
var21:=(c*2+h+l)/4;
var22:=ema(var21,12)-ema(var21,26);
var23:=ema(var22,2);
var24:=2*(var22-var23)*5.8;
var25:=ema(100*(c-llv(l,34))/(hhv(h,34)-llv(l,34)),3);
var26:=66.6;
vaz1:=(c-llv(c,126))/(hhv(c,126)-llv(c,126))*100;
vaz2:=vaz1=0;
drawicon(vaz2>0,30,11);
vaz3:=vaz1=100;
drawicon(vaz3>0,101,7);
var9a:=sum(if(c>ref(c,1),v,if(c<ref(c,1),-(v),0)),0);
var9b:=sumbars(v,capital);
var9c:=if(c>llv(c,var9b),1,-1);
var9d:=if(var9a>llv(var9a,var9b),1,-1);
var9e:=var9c*var9d;
var9f:=if(var9e=-1,1,0);
yjfh:=var9f and c=llv(c,120)*48;
va1:=ref(c,1);
va2:=sma(max(c-va1,0),7,1)/sma(abs(c-va1),7,1)*100;
va3:=sma(max(c-va1,0),13,1)/sma(abs(c-va1),13,1)*100;
va4:=barscount(c);
va6:=va2<20 and va3<25 and va4>50;
jesse:va6*70,Linethick2,colorff9933;
qq:=(ref(c,1)+ref(c,2)+ref(c,3)+ref(c,4)+ref(c,5))/5;
qq1:=qq<cost(10) and c/qq>1.025 and (hhv(c,5)-llv(c,5))/llv(c,5)*100>7;
qq2:=qq1 and ref(c,5)/ref(c,1)>1.003 and ma(indexc,3)>=ref(ma(indexc,3),1);
地量:=filter(qq2,10)*28;
var3:=ref(h,1)*1.1;
var4:=h*1.1;
var5:=(var4*v+var3*(capital-v))/capital;
var6:=ref(l,1)*0.9;
var7:=l*0.9;
var8:=(var7*v+var6*(capital-v))/capital;
var9:=ema(var8,30);
vara:=ema(var5,30);
varb:=vara-2;
varc:=if(c<=var9,varb,vara);
vard:=ma(c,80)-ma(c,10)/17;
varc:=if(year>2007 and month>9,0,varc);
varb:=if(year>2007 and month>9,0,varb);
varc,linethick0;
varb,linethick0;
stickline(varc-varb=0 and cross((ema(ema(ema(c,3),3),3)-ref(ema(ema(ema(c,3),3),3),1))/ref(ema(ema(ema(c,3),3),3),1)*100,ma((ema(ema(ema(c,3),3),3)-ref(ema(ema(ema(c,3),3),3),1))/ref(ema(ema(ema(c,3),3),3),1)*100,2)),80,0,3,0),color80ff;
drawtext(filter(varc-varb=0 and cross((ema(ema(ema(c,3),3),3)-ref(ema(ema(ema(c,3),3),3),1))/ref(ema(ema(ema(c,3),3),3),1)*100,ma((ema(ema(ema(c,3),3),3)-ref(ema(ema(ema(c,3),3),3),1))/ref(ema(ema(ema(c,3),3),3),1)*100,2)),4),65,'←撞針'),color80ff;
stickline(var4>var5,var5,var4,0.1,0),colorff00;
stickline(var4<var5,var4,var5,0.1,0),colorf00ff0;
dif:=ema(c,12)-ema(c,26);
macd1:=ema(dif,9);
def:=2*(dif-macd1);
縮頭:=if(def>0 and ref(def,1)>ref(def,2) and def<ref(def,1),-0.03,0);
縮腳:=if(def<0 and ref(def,1)<ref(def,2) and def>ref(def,1),-0.04,0);
阻力:=if(cross(c,ma(c,20)) or cross(c,ma(c,60)),-0.04,0);
支撐:=if(cross(ma(c,20),c) or cross(ma(c,60),c),-0.04,0);
做多:=if(cross(macd1,dif) and dif>0 and macd1>0,-0.04,0);
跳空:=if(cross(dif,macd1) and dif<0 and macd1<0,-0.04,0);
macd:=ema(dif,9);
if(dif<0,dif,0),Linethick2,colorffff;
if(dif<0,0,dif),Linethick2,colorff;
阻力:=if(year>2007 and month>7,0,阻力);
macd1:=if(year>2007 and month>7,0,macd1);
fvar8:=if(year>2007 and month>7,0,fvar8);
阻力,linethick0;
macd1,linethick0;
fvar8,linethick0;
drawtext(filter(阻力,16) and def>=0,85,'★追高？'),colorffff;
drawtext(cross(macd1,dif) and dif>0 and macd1>0,55,'◇拐點？'),colorff00;
資金介入:if(fvar8>ref(fvar8,1),fvar8*8,0),linethick0,color10ffff;
stickline(fvar8<ref(fvar8,1),100,100-fvar8/6,7,1),colorffff;
varg:=(2*c+h+l)/4;
varh:=llv(l,34);
varf:=hhv(h,34);
bb:=ema((varg-varh)/(varf-varh)*100,9);
varr:=ema(0.667*ref(bb,1)+0.333*bb,2);
浪花:bb,pointdot,colora8;
rsv1:=(c-llv(l,35))/(hhv(h,35)-llv(l,35))*100;
k1:=sma(rsv1,13,1);
d1:=sma(k1,13,1);
浪潮:ema(d1,3),pointdot,colorffff;
bb:=if(year>2011 and month>1,0,bb);
varr:=if(year>2011 and month>1,0,varr);
bb,linethick0;
varr,linethick0;
stickline(bb-varr>0,bb,varr,6,0),colora8;
stickline(bb-varr>0,bb,varr,5,0),colorc0;
stickline(bb-varr>0,bb,varr,4,0),colore0;
stickline(bb-varr>0,bb,varr,3,0),colorf0;
stickline(bb-varr>0,bb,varr,2,0),colord0;
stickline(bb-varr>0,bb,varr,1,0),color8080ff;
stickline(bb-varr<0,bb,varr,6,0),color8800;
stickline(bb-varr<0,bb,varr,5,0),color9900;
stickline(bb-varr<0,bb,varr,4,0),coloraa00;
stickline(bb-varr<0,bb,varr,3,0),colorbb00;
stickline(ema(d1,3)>ref(ema(d1,3),1),ema(d1,3),ref(ema(d1,3),1),8,1),colorff00ff;
bb:=if(year>2007 and month>7,0,bb);
bb,linethick0;
drawicon(filter(bb<ref(bb,1) and bb>55 and bb>ref(bb,3) and c>ma(c,15),7),80,2);
mid:=ma(bb,21);
upr1:=mid+2*std(bb,21);
dwn1:=mid-2*std(bb,21);
底區(qū):=llv(bb,250);
頂區(qū):=hhv(bb,250);
cc:=bb-varr<0.3 and bb<25 and c<ma(c,13)*0.98 and c>ref(c,1);
dd:=filter(cc,10);
drawicon(dd,12,1);
vara3:=頂區(qū)-底區(qū);
h050:=vara3*0.5+底區(qū);
drawicon(底區(qū)>ref(底區(qū),1),底區(qū),6);
drawicon(底區(qū)<ref(底區(qū),1),底區(qū),5);
顯示文字(數(shù)據(jù)位置=系統(tǒng)參數(shù)(2),最高價,'江海論壇會員專用')align4,COLORYELLOW;

liya88

Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7

粉絲：5

理想論壇榮譽班長

14樓 只看：liya88 發(fā)表于 2005-11-13 16:31

LKT波段系統(tǒng)-A

w:=winner(c);
hwxwinner:=dma(w,v/capital*1)*100;
xd1:=hwxwinner;
xwxmh:=ema(hwxwinner,6);
xd2:=xwxmh;
xd3:=ma(hwxwinner,14);
xd1:=if(year>2007 and month>9,0,xd1);
xd2:=if(year>2007 and month>9,0,xd2);
xd1,linethick0;
xd2,linethick0;
控盤:(xd1-xd2)*10,colorstick,Linethick4;
var1:=ma(100*(c-llv(c,34))/(hhv(h,34)-llv(l,34)),5)-20;
var2:=2*abs(var1);
var3:=100-100-3*sma((c-llv(l,55))/(hhv(h,55)-llv(l,55))*100,20,1)+2*sma(sma((c-llv(l,55))/(hhv(h,55)-llv(l,55))*100,20,1),15,1);
var4:=100-100-3*sma((o-llv(l,55))/(hhv(h,55)-llv(l,55))*100,20,1)+2*sma(sma((o-llv(l,55))/(hhv(h,55)-llv(l,55))*100,20,1),15,1);
var5:=(h+l+c)/3;
var6:=(var5-ma(var5,10))/0.015*avedev(var5,10);
var7:=(var5-ma(var5,30))/0.015*avedev(var5,30);
var8:=if(var6>=150 and var6<200 and var7>=150 and var7<200,10,0);
var9:=if(var6<=-150 and var6>-200 and var7<=-150 and var7>-200,-10,var8);
vara:=(c-ma(c,13))/ma(c,13)*100;
varb:=100-abs(vara);
varc:=3*sma((indexc-llv(indexl,55))/(hhv(indexh,55)-llv(indexl,55))*100,20,1)-2*sma(sma((indexc-llv(indexl,55))/(hhv(indexh,55)-llv(indexl,55))*100,20,1),15,1);
vard:=3*sma((indexo-llv(indexl,55))/(hhv(indexh,55)-llv(indexl,55))*100,20,1)-2*sma(sma((indexo-llv(indexl,55))/(hhv(indexh,55)-llv(indexl,55))*100,20,1),15,1);
vare:=ref(l,1)*0.9;
varf:=l*0.9;
var10:=(varf*v+vare*(capital-v))/capital;
var11:=ema(var10,30);
var12:=var11-c;
var13:=ref(c,1);
var14:=sma(max(c-var13,0),7,1)/sma(abs(c-var13),7,1)*100;
var15:=sma(max(c-var13,0),13,1)/sma(abs(c-var13),13,1)*100;
var16:=barscount(c);
var17:=sma(max(c-ref(c,1),0),6,1)/sma(abs(c-ref(c,1)),6,1)*100;
var18:=((-100)*(hhv(h,60)-c)/(hhv(h,60)-llv(l,60))+50)*2;
var19:=(c-llv(l,15))/(hhv(h,15)-llv(l,15))*100;
var1a:=(sma(var19,4,1)-50)*2;
var1b:=sma(var1a,3,1);
var1c:=(indexc-llv(indexl,14))/(hhv(indexh,14)-llv(indexl,14))*100;
var1d:=sma(var1c,4,1);
var1e:=sma(var1d,3,1);
var1f:=(hhv(h,30)-c)/c*100;
var20:=if(var17<=25 and var18<-95 and var1f>20 and var1b<-30 and var1e<30 and var12>=-0.25 and var14<22 and var15<28 and var16>50,80,0);
大趨勢:=var3;
頂線:=if(varb<90,varb,100);
多方:=if(var1>0,var1,0);
空方:=-(if(var1<0,var2,0));
抄底:=var20;
預警系統(tǒng):=if(var7>=200 and var6>=150 or cross(65,多方),15,if(var7<=-200 and var6<=-150,-15,var9))+65;
t1:=c>ma(c,20) and ma(c,20)>=ref(ma(c,20),1);
t2:=c<ma(c,20) and ma(c,20)<ref(ma(c,20),1);
t3:=多方>60 and 預警系統(tǒng)>65 and 頂線=100;
t4:=多方>48 and 預警系統(tǒng)>65 and 頂線<100;
t5:=空方<-38 and 預警系統(tǒng)<65;
t6:=抄底>50 and 頂線<90;
t7:=var3>ref(var4,1) and v>ref(v,1) and c>ref(c,1);
t8:=var3<=ref(var4,1) and c<ref(c,1) and 預警系統(tǒng)=65 and 抄底=0 and 空方>=ref(空方,1) and varc<ref(vard,1);
t3:=if(year>2007 and month>9,0,t3);
t4:=if(year>2007 and month>9,0,t4);
t7:=if(year>2007 and month>9,0,t7);
t3,linethick0;
t4,linethick0;
t7,linethick0;
b3:=drawtext(t3 and count(t3,30)=1,55,'升過急');
b4:=drawtext(t4 and count(t4,30)=1,75,'主升');
b7:=drawtext(t7 and count(t7,30)=1,60,'★資金進出');
超跌線:20,Linethick2,colorff00;
高位線:80,Linethick2,colorffff00;
中間線:50,Linethick2,colorffffff;
fvar2:=ref(l,1);
fvar3:=sma(abs(l-fvar2),13,1)/sma(max(l-fvar2,0),13,1)*100;
fvar4:=ema(fvar3,13);
fvar5:=llv(l,34);
fvar8:=ema(if(l<=fvar5,fvar4,0),3);
fvar9:=ema(c,5);
fvar10:=(c-ma(c,34))/ma(c,34)*(-10);
var1:=(c+h+l+o)/4;
var2:=sumbars(v,capital);
var3:=hhv(var1,var2);
var4:=llv(var1,var2);
var5:=(2*var1-var4-ref(var4,1))/(var3-var4);
var6:=(var1-var4)/(var3-var4);
var7:=if(var1<=var4,var5*60,var6*60);
var8:=600*(ema(c,3)-ema(l,30))/ema(l,30);
var9:=ema(var8,7);
vara:=(winner(120*c/100)-winner(100*c/100))*100;
varb:=(-100)*(winner(120*c/100)-winner(100*c/100))+5;
varc:=hhv(h,9)-llv(l,9);
vard:=hhv(h,9)-c;
vare:=c-llv(l,9);
varf:=vard/varc*100-70;
var10:=(c-llv(l,60))/(hhv(h,60)-llv(l,60))*100;
var11:=(2*c+h+l)/4;
var12:=sma(vare/varc*100,3,1);
var13:=llv(l,34);
var14:=sma(var12,3,1)-sma(varf,9,1);
var15:=if(var14>100,var14-100,0);
var16:=hhv(h,34);
var17:=ema((var11-var13)/(var16-var13)*100,8);
珊林:=var17;
var18:=ema(var17,5);
var22:=ref(l,1);
var23:=sma(abs(l-var22),3,1)/sma(max(l-var22,0),3,1)*100;
var24:=ema(if(c*1.3,var23*10,var23/10),3);
var25:=llv(l,30);
var26:=hhv(var24,30);
var27:=if(ma(c,58),1,0);
var28:=ema(if(l<=var25,(var24+var26*2)/2,0),3)/618*var27;
var29:=if(var28>100,100,var28);
stickline(var29>-150,0,var29,3,0),color808080;
多空值:=(c-ma(c,40))/ma(c,40)*100;
stickline(cross(多空值,-24),100,0,6,0),colorffffff;
進出值:=(c-ma(c,5))/ma(c,5)*100;
多空值:=if(year>2005 and month>1,0,多空值);
多空值,linethick0;
pglkjoj:if(cross(多空值,-24),1,0),colorffffff;
vark1:=(c-llv(l,27))/(hhv(h,27)-llv(l,27))*100;
vark2:=reverse(vark1);
vark3:=sma(vark1,3,1);
榮貴梁:=sma(vark3,3,1);
洋海黃:=sma(榮貴梁,2.5,1);
真實走勢線:=3*sma((c-llv(l,27))/(hhv(h,27)-llv(l,27))*100,5,1)-2*sma(sma((c-llv(l,27))/(hhv(h,27)-llv(l,27))*100,5,1),3,1);
rsv9:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100;
k1:=sma(rsv9,3,1);
dk1:=k1-ref(k1,1);
買進:if(dk1>7 and ref(dk1,1)<0 and dk1-ref(dk1,1)>9,50,0),stick,linethick0,colorffff;
drawicon(買進>0,50,1);
drawtext(if(cross(10,真實走勢線),1,0),10,'準備'),color33ffcc;
rsv:=(c-llv(l,30))/(hhv(h,30)-llv(l,30))*100;
k:=sma(rsv,5,1);
d:=sma(k,3,1);
目前位置:=k;
超梁:=20;
彪庭謝:=50;
幫衛(wèi)梁:=80;
var1:=(o+l+h+c)/4;
jj:=(c+h+l)/3;
a:=ema(jj,10);
b:=ref(a,1);
持多:=stickline(a>b,a,b,5,0);
持空:=stickline(a<b,a,b,5,0);
var3:=(c-llv(l,26))/(hhv(h,26)-llv(l,26))*100;
var8:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100;
k:=sma(var8,3,1);
d:=sma(k,3,1);
var9:=3*k-2*d;
vara:=llv(l,36);
varb:=hhv(h,30);
varc:=ema((c-vara)/(varb-vara)*4,4)*25;
vard:=87.5;
vare:=(varc-llv(varc,4))/(hhv(varc,4)-llv(varc,4))*4*25;
將雪燕:=if(cross(varc,10) and varc>10,50,0);
varf:=sma(var3,20,1);
var10:=sma(varf,15,1);
var11:=(3*varf+2*var10)/4;
var12:=ref(var11,1);
var13:=sma(max(var11-var12,0),2,1)/sma(abs(var11-var12),2,1)*100;
var14:=ma(var13,10);
var15:=if(cross(var14,90),25,0);
var20:=ema(c,12)-ema(c,26);
var21:=(c*2+h+l)/4;
var22:=ema(var21,12)-ema(var21,26);
var23:=ema(var22,2);
var24:=2*(var22-var23)*5.8;
var25:=ema(100*(c-llv(l,34))/(hhv(h,34)-llv(l,34)),3);
var26:=66.6;
vaz1:=(c-llv(c,126))/(hhv(c,126)-llv(c,126))*100;
vaz2:=vaz1=0;
drawicon(vaz2>0,30,11);
vaz3:=vaz1=100;
drawicon(vaz3>0,101,7);
var9a:=sum(if(c>ref(c,1),v,if(c<ref(c,1),-(v),0)),0);
var9b:=sumbars(v,capital);
var9c:=if(c>llv(c,var9b),1,-1);
var9d:=if(var9a>llv(var9a,var9b),1,-1);
var9e:=var9c*var9d;
var9f:=if(var9e=-1,1,0);
yjfh:=var9f and c=llv(c,120)*48;
va1:=ref(c,1);
va2:=sma(max(c-va1,0),7,1)/sma(abs(c-va1),7,1)*100;
va3:=sma(max(c-va1,0),13,1)/sma(abs(c-va1),13,1)*100;
va4:=barscount(c);
va6:=va2<20 and va3<25 and va4>50;
jesse:va6*70,Linethick2,colorff9933;
qq:=(ref(c,1)+ref(c,2)+ref(c,3)+ref(c,4)+ref(c,5))/5;
qq1:=qq<cost(10) and c/qq>1.025 and (hhv(c,5)-llv(c,5))/llv(c,5)*100>7;
qq2:=qq1 and ref(c,5)/ref(c,1)>1.003 and ma(indexc,3)>=ref(ma(indexc,3),1);
地量:=filter(qq2,10)*28;
var3:=ref(h,1)*1.1;
var4:=h*1.1;
var5:=(var4*v+var3*(capital-v))/capital;
var6:=ref(l,1)*0.9;
var7:=l*0.9;
var8:=(var7*v+var6*(capital-v))/capital;
var9:=ema(var8,30);
vara:=ema(var5,30);
varb:=vara-2;
varc:=if(c<=var9,varb,vara);
vard:=ma(c,80)-ma(c,10)/17;
varc:=if(year>2007 and month>9,0,varc);
varb:=if(year>2007 and month>9,0,varb);
varc,linethick0;
varb,linethick0;
stickline(varc-varb=0 and cross((ema(ema(ema(c,3),3),3)-ref(ema(ema(ema(c,3),3),3),1))/ref(ema(ema(ema(c,3),3),3),1)*100,ma((ema(ema(ema(c,3),3),3)-ref(ema(ema(ema(c,3),3),3),1))/ref(ema(ema(ema(c,3),3),3),1)*100,2)),80,0,3,0),color80ff;
drawtext(filter(varc-varb=0 and cross((ema(ema(ema(c,3),3),3)-ref(ema(ema(ema(c,3),3),3),1))/ref(ema(ema(ema(c,3),3),3),1)*100,ma((ema(ema(ema(c,3),3),3)-ref(ema(ema(ema(c,3),3),3),1))/ref(ema(ema(ema(c,3),3),3),1)*100,2)),4),65,'←撞針'),color80ff;
stickline(var4>var5,var5,var4,0.1,0),colorff00;
stickline(var4<var5,var4,var5,0.1,0),colorf00ff0;
dif:=ema(c,12)-ema(c,26);
macd1:=ema(dif,9);
def:=2*(dif-macd1);
縮頭:=if(def>0 and ref(def,1)>ref(def,2) and def<ref(def,1),-0.03,0);
縮腳:=if(def<0 and ref(def,1)<ref(def,2) and def>ref(def,1),-0.04,0);
阻力:=if(cross(c,ma(c,20)) or cross(c,ma(c,60)),-0.04,0);
支撐:=if(cross(ma(c,20),c) or cross(ma(c,60),c),-0.04,0);
做多:=if(cross(macd1,dif) and dif>0 and macd1>0,-0.04,0);
跳空:=if(cross(dif,macd1) and dif<0 and macd1<0,-0.04,0);
macd:=ema(dif,9);
if(dif<0,dif,0),Linethick2,colorffff;
if(dif<0,0,dif),Linethick2,colorff;
阻力:=if(year>2007 and month>7,0,阻力);
macd1:=if(year>2007 and month>7,0,macd1);
fvar8:=if(year>2007 and month>7,0,fvar8);
阻力,linethick0;
macd1,linethick0;
fvar8,linethick0;
drawtext(filter(阻力,16) and def>=0,85,'★追高？'),colorffff;
drawtext(cross(macd1,dif) and dif>0 and macd1>0,55,'◇拐點？'),colorff00;
資金介入:if(fvar8>ref(fvar8,1),fvar8*8,0),linethick0,color10ffff;
stickline(fvar8<ref(fvar8,1),100,100-fvar8/6,7,1),colorffff;
varg:=(2*c+h+l)/4;
varh:=llv(l,34);
varf:=hhv(h,34);
bb:=ema((varg-varh)/(varf-varh)*100,9);
varr:=ema(0.667*ref(bb,1)+0.333*bb,2);
浪花:bb,pointdot,colora8;
rsv1:=(c-llv(l,35))/(hhv(h,35)-llv(l,35))*100;
k1:=sma(rsv1,13,1);
d1:=sma(k1,13,1);
浪潮:ema(d1,3),pointdot,colorffff;
bb:=if(year>2011 and month>1,0,bb);
varr:=if(year>2011 and month>1,0,varr);
bb,linethick0;
varr,linethick0;
stickline(bb-varr>0,bb,varr,6,0),colora8;
stickline(bb-varr>0,bb,varr,5,0),colorc0;
stickline(bb-varr>0,bb,varr,4,0),colore0;
stickline(bb-varr>0,bb,varr,3,0),colorf0;
stickline(bb-varr>0,bb,varr,2,0),colord0;
stickline(bb-varr>0,bb,varr,1,0),color8080ff;
stickline(bb-varr<0,bb,varr,6,0),color8800;
stickline(bb-varr<0,bb,varr,5,0),color9900;
stickline(bb-varr<0,bb,varr,4,0),coloraa00;
stickline(bb-varr<0,bb,varr,3,0),colorbb00;
stickline(ema(d1,3)>ref(ema(d1,3),1),ema(d1,3),ref(ema(d1,3),1),8,1),colorff00ff;
bb:=if(year>2007 and month>7,0,bb);
bb,linethick0;
drawicon(filter(bb<ref(bb,1) and bb>55 and bb>ref(bb,3) and c>ma(c,15),7),80,2);
mid:=ma(bb,21);
upr1:=mid+2*std(bb,21);
dwn1:=mid-2*std(bb,21);
底區(qū):=llv(bb,250);
頂區(qū):=hhv(bb,250);
cc:=bb-varr<0.3 and bb<25 and c<ma(c,13)*0.98 and c>ref(c,1);
dd:=filter(cc,10);
drawicon(dd,12,1);
vara3:=頂區(qū)-底區(qū);
h050:=vara3*0.5+底區(qū);
drawicon(底區(qū)>ref(底區(qū),1),底區(qū),6);
drawicon(底區(qū)<ref(底區(qū),1),底區(qū),5);

	input:N(10,1,88);流通盤:FINANCE(7),LINETHICK0; 每股凈資產(chǎn):FINANCE(34),LINETHICK0; 每股收益:FINANCE(33),LINETHICK0; EXPLAIN(1,(((STKNAME + STKLABEL) + 'n所屬板塊') + BLKNAME)); DRAWTEXT((BARPOS = SYSPARAM(2)),HIGH,BLKNAME),ALIGN4,colorFF; Ａ:=MA(CLOSE,5); A1:=MA(CLOSE,20); 生命線:=MA(CLOSE,10); 取舍線:=1; VAR1:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) * 100); VAR2:=((CLOSE > OPEN) AND ((OPEN - LOW) > (HIGH - CLOSE))); VAR3:=((REF(VAR1,1) < (0 - 20)) AND VAR2); VAR4:=(((REF(VAR1,1) < (0 - 20)) AND (CLOSE > OPEN)) AND ((((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 1000) > 20)); VAR5:=FILTER((VAR3 OR VAR4),3); VAR6:=((OPEN > CLOSE) AND ((HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)) > (IF((OPEN < CLOSE),OPEN,CLOSE) - LOW))); VAR7:=((REF(VAR1,1) > ABS((0 - 20))) AND VAR6); VAR8:=(((REF(VAR1,1) > ABS((0 - 20))) AND (CLOSE < OPEN)) AND ((((REF(CLOSE,1) - CLOSE) / REF(CLOSE,1)) * 1000) > 20)); VAR9:=FILTER((VAR7 OR VAR8),3); VARA:=((CLOSE > OPEN) AND ((OPEN - LOW) > (HIGH - CLOSE))); VARB:=((REF(VAR1,1) < (0 - 13)) AND VAR2); VARC:=(((REF(VAR1,1) < (0 - 13)) AND (CLOSE > OPEN)) AND ((((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 1000) > 20)); VARD:=FILTER((VARB OR VARC),3); VARE:=((OPEN > CLOSE) AND ((HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)) > (IF((OPEN < CLOSE),OPEN,CLOSE) - LOW))); VARF:=((REF(VAR1,1) > ABS((0 - 13))) AND VAR6); VAR10:=(((REF(VAR1,1) > ABS((0 - 13))) AND (CLOSE < OPEN)) AND ((((REF(CLOSE,1) - CLOSE) / REF(CLOSE,1)) * 1000) > 20)); VAR11:=FILTER((VARF OR VAR10),3); VAR9:=IF(((YEAR > 2004) AND (MONTH > 9)),0,VAR9); 取舍線:=IF(((YEAR > 2004) AND (MONTH > 9)),0,取舍線); VAR11:=IF(((YEAR > 2004) AND (MONTH > 9)),0,VAR11); VAR11,LINETHICK0; VAR9,LINETHICK0; 取舍線,LINETHICK0; DRAWICON(((VAR9 * 取舍線) > 0),HIGH,2); DRAWTEXT(((VAR11 * 取舍線) > 0),(0.99 * REF(CLOSE,1)),''),colorFFFF00; VAR12:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1)); A3:=(((REF(CLOSE,(VAR12 + 1)) > CLOSE) AND (REF("RSI.RSI1",(VAR12 + 1)) < "RSI.RSI1")) AND CROSS("RSI.RSI1","RSI.RSI2")); A3:=IF(((YEAR > 2004) AND (MONTH > 9)),0,A3); A3,LINETHICK0; DRAWICON(FILTER((A3 > 0),5),(LOW * 0.98),1); DRAWTEXT(FILTER((A3 > 0),5),(LOW * 0.98),''),colorFFFF; B3:=ISLASTBAR; V1:=(REF(HIGH,N) = HHV(HIGH,((2 * N) + 1))); V2:=FILTER(V1,N); V3:=BACKSET(V2,(N + 1)); V4:=FILTER(V3,N); V5:=(V4 OR B3); V6:=(REF(LOW,N) = LLV(LOW,((2 * N) + 1))); V7:=FILTER(V6,N); V8:=BACKSET(V7,(N + 1)); V9:=FILTER(V8,N); VA:=(V9 AND NOT(V4)); VB:=BACKSET(V5,(REF(BARSLAST(VA),1) + 1)); VC:=(VB > REF(VB,1)); VD:=BACKSET(VC,2); VE:=(VD > REF(VD,1)); VF:=BACKSET((VE AND (COUNT(V5,(REF(BARSLAST(VA),1) + 2)) = 0)),(REF(BARSLAST(VA),1) + 2)); V10:=(VF > REF(VF,1)); V11:=BACKSET((V10 AND (COUNT(V5,(REF(BARSLAST(VA),1) + 2)) = 0)),(REF(BARSLAST(VA),1) + 2)); V12:=(V11 > REF(V11,1)); V13:=IF(V5,COUNT(VA,(REF(BARSLAST(V5),1) + 1)),0); V14:=IF(((V13 = 1) AND V5),BARSLAST(VE),0); V15:=IF((V5 AND (REF(LOW,BARSLAST(VE)) >= REF(LOW,BARSLAST(V10)))),BARSLAST(V10),BARSLAST(VE)); V16:=IF(((V13 = 2) AND V5),V15,0); V17:=IF(((V13 >= 3) AND V5),IF((V5 AND (REF(LOW,V15) >= REF(LOW,BARSLAST(V12)))),BARSLAST(V12),V15),0); V18:=((V14 + V16) + V17); V19:=BACKSET(V5,V18); V1A:=(V19 > REF(V19,1)); V1B:=BACKSET(V1A,2); V1C:=(V1B > REF(V1B,1)); V1D:=(V1C OR B3); V1E:=BACKSET(V1D,(REF(BARSLAST(V5),1) + 1)); V1F:=(V1E > REF(V1E,1)); V20:=BACKSET(V1F,2); V21:=(V20 > REF(V20,1)); V22:=BACKSET((V21 AND (COUNT(V1D,(REF(BARSLAST(V5),1) + 2)) = 0)),(REF(BARSLAST(V5),1) + 2)); V23:=(V22 > REF(V22,1)); V24:=BACKSET((V23 AND (COUNT(V1D,(REF(BARSLAST(V5),1) + 2)) = 0)),(REF(BARSLAST(V5),1) + 2)); V25:=(V24 > REF(V24,1)); V26:=IF(V1D,COUNT(V4,(REF(BARSLAST(V1D),1) + 1)),0); V27:=IF(((V26 = 1) AND V1D),BARSLAST(V21),0); V28:=IF((V1D AND (REF(HIGH,BARSLAST(V21)) <= REF(HIGH,BARSLAST(V23)))),BARSLAST(V23),BARSLAST(V21)); V29:=IF(((V26 = 2) AND V1D),V28,0); V2A:=IF(((V26 >= 3) AND V1D),IF((V1D AND (REF(HIGH,V28) <= REF(HIGH,BARSLAST(V25)))),BARSLAST(V25),V28),0); V2B:=((V27 + V29) + V2A); V2C:=BACKSET(V1D,V2B); V2D:=(V2C > REF(V2C,1)); V2E:=BACKSET(V2D,2); V2F:=(V2E > REF(V2E,1)); DRAWLINE(V1C,LOW,V2F,HIGH,0),LINETHICK1; DRAWLINE(V2F,HIGH,V1C,LOW,0),LINETHICK1; V30:=BACKSET(B3,(BARSLAST(V1C) + 1)); V31:=(V30 > REF(V30,1)); V32:=BACKSET(B3,(BARSLAST(V2F) + 1)); V33:=(V32 > REF(V32,1)); V34:=IF((BARSLAST(V31) < BARSLAST(V33)),V31,V33); V35:=IF((BARSLAST(V31) < BARSLAST(V33)),LOW,HIGH); DRAWLINE(V34,V35,B3,CLOSE,0),LINETHICK1; V36:=BACKSET(B3,(BARSLAST(V1C) + 1)); V37:=(V36 > REF(V36,1)); V38:=BACKSET(V37,(REF(BARSLAST(V1C),1) + 2)); V39:=(V38 > REF(V38,1)); DRAWLINE(V39,LOW,V37,LOW,1),POINTDOT,LINETHICK1,colorFFFF; V3A:=BACKSET(B3,(BARSLAST(V2F) + 1)); V3B:=(V3A > REF(V3A,1)); V3C:=BACKSET(V3B,(REF(BARSLAST(V2F),1) + 2)); V3D:=(V3C > REF(V3C,1)); DRAWLINE(V3D,HIGH,V3B,HIGH,1),POINTDOT,LINETHICK1,colorFFFF; XX1:REF(LOW,BARSLAST(V37)),LINETHICK2,colorCCFF99; 前低線:REF(LOW,BARSLAST(V39)),LINETHICK2,colorFF00FF; YY1:REF(HIGH,BARSLAST(V3B)),LINETHICK2,colorCCFF99; 前高線:REF(HIGH,BARSLAST(V3D)),LINETHICK2,colorFF00FF; DRAWNUMBER(ISLASTBAR,YY1,YY1,2); DRAWNUMBER(ISLASTBAR,XX1,XX1,2); DRAWNUMBER(ISLASTBAR,前低線,前低線,2); DRAWNUMBER(ISLASTBAR,前高線,前高線,2); V3E:=(REF(HIGH,N) = HHV(HIGH,((2 * N) + 1))); J:=FILTER(V3E,N); JA:=BACKSET(J,(N + 1)); BB:=FILTER(JA,N); V3E:=(BB OR ISLASTBAR); J1:=(REF(LOW,N) = LLV(LOW,((2 * N) + 1))); J2:=FILTER(J1,N); JA2:=BACKSET(J2,(N + 1)); BB2:=FILTER(JA2,N); J1:=(BB2 AND NOT(BB)); J22:=BACKSET(V3E,(REF(BARSLAST(J1),1) + 1)); EA:=(J22 > REF(J22,1)); EB:=BACKSET(EA,2); JF:=(EB > REF(EB,1)); JJ1:=BACKSET((JF AND (COUNT(V3E,(REF(BARSLAST(J1),1) + 2)) = 0)),(REF(BARSLAST(J1),1) + 2)); JF2:=(JJ1 > REF(JJ1,1)); JJ2:=BACKSET((JF2 AND (COUNT(V3E,(REF(BARSLAST(J1),1) + 2)) = 0)),(REF(BARSLAST(J1),1) + 2)); JF3:=(JJ2 > REF(JJ2,1)); JJ3:=IF(V3E,COUNT(J1,(REF(BARSLAST(V3E),1) + 1)),0); JS:=IF(((JJ3 = 1) AND V3E),BARSLAST(JF),0); G1:=IF((V3E AND (REF(LOW,BARSLAST(JF)) >= REF(LOW,BARSLAST(JF2)))),BARSLAST(JF2),BARSLAST(JF)); GA:=IF(((JJ3 = 2) AND V3E),G1,0); G2:=IF(((JJ3 >= 3) AND V3E),IF((V3E AND (REF(LOW,G1) >= REF(LOW,BARSLAST(JF3)))),BARSLAST(JF3),G1),0); G3:=((JS + GA) + G2); J:=BACKSET(V3E,G3); GG:=(J > REF(J,1)); JB:=BACKSET(GG,2); JJ:=(JB > REF(JB,1)); LD:=(JJ OR ISLASTBAR); LD1:=BACKSET(LD,(REF(BARSLAST(V3E),1) + 1)); HEA:=(LD1 > REF(LD1,1)); HEB:=BACKSET(HEA,2); HJF:=(HEB > REF(HEB,1)); HJJ1:=BACKSET((HJF AND (COUNT(LD,(REF(BARSLAST(V3E),1) + 2)) = 0)),(REF(BARSLAST(V3E),1) + 2)); HJF2:=(HJJ1 > REF(HJJ1,1)); HJJ2:=BACKSET((HJF2 AND (COUNT(LD,(REF(BARSLAST(V3E),1) + 2)) = 0)),(REF(BARSLAST(V3E),1) + 2)); HJF3:=(HJJ2 > REF(HJJ2,1)); HJJ3:=IF(LD,COUNT(BB,(REF(BARSLAST(LD),1) + 1)),0); HJS:=IF(((HJJ3 = 1) AND LD),BARSLAST(HJF),0); HG1:=IF((LD AND (REF(HIGH,BARSLAST(HJF)) <= REF(HIGH,BARSLAST(HJF2)))),BARSLAST(HJF2),BARSLAST(HJF)); HGA:=IF(((HJJ3 = 2) AND LD),HG1,0); HG2:=IF(((HJJ3 >= 3) AND LD),IF((LD AND (REF(HIGH,HG1) <= REF(HIGH,BARSLAST(HJF3)))),BARSLAST(HJF3),HG1),0); HG3:=((HJS + HGA) + HG2); HGG:=BACKSET(LD,HG3); HJA:=(HGG > REF(HGG,1)); HJB:=BACKSET(HJA,2); HJJ:=(HJB > REF(HJB,1)); HD:=BACKSET(ISLASTBAR,(BARSLAST(JJ) + 1)); UU:=(10 * (HD > REF(HD,1))); VV:=BACKSET(ISLASTBAR,(BARSLAST(HJJ) + 1)); UU2:=(20 * (VV > REF(VV,1))); VV2:=REF(LOW,BARSLAST(JJ)); 底1:=REF(HIGH,BARSLAST(HJJ)); STICKLINE(HJJ,底1,VV2,0,0),LINETHICK1,color660099; DRAWLINE(JJ,LOW,HJJ,HIGH,0),LINETHICK1,color660099; DRAWLINE(JJ,LOW,HJJ,VV2,0),LINETHICK1,color660099; STICKLINE(JJ,底1,VV2,0,0),LINETHICK1,color666666; DRAWLINE(HJJ,HIGH,JJ,LOW,0),LINETHICK1,color666666; DRAWLINE(HJJ,HIGH,JJ,底1,0),LINETHICK1,color666666; 底價線:REF(LOW,BARSLAST(UU)),LINETHICK2,colorFF; 頂價線:REF(HIGH,BARSLAST(UU2)),LINETHICK2,colorFF00;