人人爽天天爽夜夜爽qc-人人爽天天爽夜夜爽曰-人人天天爱天天做天天摸-人人天天夜夜-色网站在线-色网站在线看

您現在的位置：程序化交易>> 股票公式>> 其他>> 其他軟件公式>>正文內容

黃金分割 光標公式、源碼[其他軟件公式]

作者：飛狐 來源：cxh99.com 發布時間：2021年03月28日 點擊數： 　【收藏到本網的會員中心】

相關標簽:

?


黃金分割 光標 {又優化了一下添了兩條均線和近高點到當前收盤價的幅度和漲跌}
{黃金分割 光標}

?

?

原理解析：

輸出INPUT:T(20,1,360),F(0,0,255),F1(0,0,255),F2(0,0,255)
TTT賦值:是否最后一個周期=1
T1賦值:DATACOUNT-BARPOS+0
T2賦值:DATEDIFF(日期,CURRENTDATE)
A1賦值:((最高價-最低價)/最低價)*100
A2賦值:最高價-最低價
MAI賦值:收盤價*1.017
MAII賦值:收盤價*1.03
輸出DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,299,1,'▼明短線贏利[1.7%--3%:]'+'/'+NUMTOSTR(MAI[SYSPARAM(1)],2)+'--'+NUMTOSTR(MAII [SYSPARAM(1)],2)),COLOR00FF00
輸出輸出DRAWTEXTEX(TTT,0,1,1,'【代碼:'+STKLABEL+' 名稱:'+品種名稱+'】'),COLOR00FFFF
輸出DRAWTEXTEX(TTT,0,176,1,'【振幅:'+NUMTOSTR(A1[SYSPARAM(1)],2)+'% '+NUMTOSTR(A2[SYSPARAM(1)],2)+'元 】'+''),COLORFFFF00
輸出輸出DRAWTEXTEX(TTT,0,15,14,'交易天:'+NUMTOSTR(T1[SYSPARAM(1)],0)+'(天) / '+'◆自然天:'+NUMTOSTR(T2[SYSPARAM(1)],0)+'(天) '),COLORFFFFFF
當滿足條件收盤價>=開盤價時,在最低價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORFF
當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR102088
當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR102099
當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR1020AA
當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR1020BB
當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR1020CC
當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR1020DD
當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR1020EE
當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR1020FF
當滿足條件收盤價<=開盤價時,在最低價和最高價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORFF8800
當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORFF7700
當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF8800
當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF9900
當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFFAA00
當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFFBB00
當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFCC00
當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFDD00
當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFEE00
AS賦值:(開盤價+最高價+最低價+收盤價)/4
輸出BL: AS的F日簡單移動平均,線寬為1,COLOR208FFF
輸出BL1: 收盤價的F1日簡單移動平均,線寬為1,COLORFFFFFF
輸出BL2: 收盤價的F2日簡單移動平均,線寬為1,COLOR00FFFF
PARTLINE(BL<1日前的BL,BL),COLORFF0000,線寬為2
PARTLINE(BL1<1日前的BL1,BL1),COLOR00FF00,線寬為1
PARTLINE(BL2<1日前的BL2,BL2),COLOR00FF00,線寬為1
BLT賦值:數據位置狀態=2
當滿足條件BLTANDBL>1日前的BL時,在BL位置書寫文字,COLOR208FFF
當滿足條件BLTANDBL<1日前的BL時,在BL位置書寫文字,COLOR208FFF
當滿足條件BLTANDBL1>1日前的BL1時,在BL1位置書寫文字,COLORFFFFFF
當滿足條件BLTANDBL1<1日前的BL1時,在BL1位置書寫文字,COLORFFFDED
當滿足條件BLTANDBL2>1日前的BL2時,在BL2位置書寫文字,COLOR00CCCC
當滿足條件BLTANDBL2<1日前的BL2時,在BL2位置書寫文字,COLOR00CCCC
B賦值:如果(SYSPARAM(1)=(首次(收盤價>0)距今天數+1)),返回1,否則返回0
B1賦值:(最高價<1日前的最低價)
B2賦值:(最低價>1日前的最高價)
當滿足條件B1時,在(收盤價+開盤價)/2和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORAA0000
當滿足條件B1時,在(收盤價+開盤價)/2和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORCC0000
當滿足條件B1時,在(收盤價+開盤價)/2和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOREE0000
當滿足條件B2時,在開盤價和(收盤價+開盤價)/2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR00AAAA
當滿足條件B2時,在開盤價和(收盤價+開盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00CCCC
當滿足條件B2時,在開盤價和(收盤價+開盤價)/2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00EEEE
當滿足條件((B>0)ANDB1)時,在最高價位置書寫文字,COLORFFFFEE,PXDN10,ALIGN2
當滿足條件((B>0)ANDB2)時,在最低價位置書寫文字,COLOR00FFEE,PXDN10,ALIGN2
輸出VAR100賦值:'【所屬板塊】:'
VAR100賦值:VAR100+' 電力'
VAR100賦值:VAR100+' 電腦'
VAR100賦值:VAR100+' 電器'
VAR100賦值:VAR100+' 電子信息'
VAR100賦值:VAR100+' 房地產'
VAR100賦值:VAR100+' 紡織服裝'
VAR100賦值:VAR100+' 鋼鐵'
VAR100賦值:VAR100+' 工程建筑'
VAR100賦值:VAR100+' 供水供氣'
VAR100賦值:VAR100+' 化工'
VAR100賦值:VAR100+' 化纖'
VAR100賦值:VAR100+' 機械'
VAR100賦值:VAR100+' 建材'
VAR100賦值:VAR100+' 交通工具'
VAR100賦值:VAR100+' 交通設施'
VAR100賦值:VAR100+' 教育傳媒'
VAR100賦值:VAR100+' 金融'
VAR100賦值:VAR100+' 旅游酒店'
VAR100賦值:VAR100+' 煤炭石油'
VAR100賦值:VAR100+' 釀酒食品'
VAR100賦值:VAR100+' 農林牧漁'
VAR100賦值:VAR100+' 其他行業'
VAR100賦值:VAR100+' 汽車'
VAR100賦值:VAR100+' 汽配'
VAR100賦值:VAR100+' 商業連鎖'
VAR100賦值:VAR100+' 石化'
VAR100賦值:VAR100+' 通信'
VAR100賦值:VAR100+' 外貿'
VAR100賦值:VAR100+' 醫藥'
VAR100賦值:VAR100+' 儀電儀表'
VAR100賦值:VAR100+' 有色金屬'
VAR100賦值:VAR100+' 運輸物流'
VAR100賦值:VAR100+' 造紙印刷'
VAR100賦值:VAR100+' 安徽'
VAR100賦值:VAR100+' 北京'
VAR100賦值:VAR100+' 福建'
VAR100賦值:VAR100+' 甘肅'
VAR100賦值:VAR100+' 廣東'
VAR100賦值:VAR100+' 廣西'
VAR100賦值:VAR100+' 貴州'
VAR100賦值:VAR100+' 海南'
VAR100賦值:VAR100+' 河北'
VAR100賦值:VAR100+' 河南'
VAR100賦值:VAR100+' 黑龍江'
VAR100賦值:VAR100+' 湖北'
VAR100賦值:VAR100+' 湖南'
VAR100賦值:VAR100+' 吉林'
VAR100賦值:VAR100+' 江蘇'
VAR100賦值:VAR100+' 江西'
VAR100賦值:VAR100+' 遼寧'
VAR100賦值:VAR100+' 內蒙古'
VAR100賦值:VAR100+' 寧夏'
VAR100賦值:VAR100+' 青海'
VAR100賦值:VAR100+' 山東'
VAR100賦值:VAR100+' 山西'
VAR100賦值:VAR100+' 陜西'
VAR100賦值:VAR100+' 上海'
VAR100賦值:VAR100+' 深圳'
VAR100賦值:VAR100+' 四川'
VAR100賦值:VAR100+' 天津'
VAR100賦值:VAR100+' ***'
VAR100賦值:VAR100+' 新疆'
VAR100賦值:VAR100+' 云南'
VAR100賦值:VAR100+' 浙江'
VAR100賦值:VAR100+' 重慶'
VAR100賦值:VAR100+' 3G'
VAR100賦值:VAR100+' H股'
VAR100賦值:VAR100+' QFII持股'
VAR100賦值:VAR100+' ST'
VAR100賦值:VAR100+' 智能電網'
VAR100賦值:VAR100+' 創投'
VAR100賦值:VAR100+' 次新股'
VAR100賦值:VAR100+' 大盤'
VAR100賦值:VAR100+' 海峽西岸'
VAR100賦值:VAR100+' 大訂單'
VAR100賦值:VAR100+' 股權改革'
VAR100賦值:VAR100+' 股權投資'
VAR100賦值:VAR100+' 火電板塊'
VAR100賦值:VAR100+' 水電板塊'
VAR100賦值:VAR100+' 燃氣板塊'
VAR100賦值:VAR100+' 供熱板塊'
VAR100賦值:VAR100+' 滬深300'
VAR100賦值:VAR100+' 濱海特區'
VAR100賦值:VAR100+' 參股金融'
VAR100賦值:VAR100+' 新能源A'
VAR100賦值:VAR100+' 社保重倉'
VAR100賦值:VAR100+' 資源優勢'
VAR100賦值:VAR100+' 鐵路基建'
VAR100賦值:VAR100+' 稀缺資源'
VAR100賦值:VAR100+' 航天軍工'
VAR100賦值:VAR100+' 中小企業板'
DRAWTEXTEX(TTT,0,2,28,VAR100+' '),COLORFFB060
DRAWTEXTEX(TTT,0,2,42,'【創于09.06.13 迷惑】'),COLORFFFFFF
N賦值:如果SYSPARAM(1)=DATACOUNT,返回T,否則返回DATACOUNT-SYSPARAM(1)
HH賦值:N日內最高價的最高值
LL賦值:N日內最低價的最低值
VN賦值:N
THENVN賦值:DATACOUNT+1
賦值:HH[DATACOUNT]
賦值:LL[DATACOUNT]
END
TMP賦值:SETLBOUND(HH,DATACOUNT-VN+1)
TMP賦值:SETLBOUND(LL,DATACOUNT-VN+1)
輸出AH:HH,線寬為2,COLOR0000FF
輸出AL:LL,線寬為2,COLOR00FF00
輸出QA:(LL + ((HH - LL) * 0.191)),LINEDOT,COLOR00FFFF
輸出QA2:(LL + ((HH - LL) * 0.382)),LINEDOT,COLOR00FFFF
輸出QA3:(LL + ((HH - LL) * 0.5)),COLORFFFFFF,LINEDOT
輸出QA4:(LL + ((HH - LL) * 0.618)),LINEDOT,COLOR00FFFF
輸出QA5:(LL + ((HH - LL) * 0.809)),LINEDOT,COLOR00FFFF
當滿足條件SYSPARAM(3)=BARPOS時,在QA位置書寫文字,COLORAAAAAA,ALIGN2,PXDN5
當滿足條件SYSPARAM(3)=BARPOS時,在QA2位置書寫文字,COLORAAAAAA,ALIGN2,PXUP22
當滿足條件SYSPARAM(3)=BARPOS時,在QA3位置書寫文字,COLORFFFFFF,ALIGN2,PXDN5
當滿足條件SYSPARAM(3)=BARPOS時,在QA4位置書寫文字,COLORAAAAAA,ALIGN2,PXDN5
當滿足條件SYSPARAM(3)=BARPOS時,在QA5位置書寫文字,COLORAAAAAA,ALIGN2,PXDN5
當滿足條件SYSPARAM(3)=BARPOS時,在HH位置書寫文字,COLORFFFFFF,ALIGN2,PXDN5
當滿足條件SYSPARAM(3)=BARPOS時,在LL位置書寫文字,COLORFFFFFF,ALIGN2,PXDN5
D1賦值:HH-LL
D2賦值:D1/LL*100
D3賦值:HH-最低價
D4賦值:D3/HH*100
D5賦值:HH-收盤價
D6賦值:D5/HH*100
KKH賦值:上次最高價=HH距今天數
KKL賦值:上次最低價=LL距今天數
ND賦值:STRTONUM(NUMTOSTR(KKL日前的日期,0))
NG賦值:STRTONUM(NUMTOSTR(KKH日前的日期,0))
DK賦值:如果ND>NG,返回2,否則返回1,線寬為0
DATE1賦值:如果DK=1,返回ND,否則返回NG
VERTLINE(日期=DATE1),COLORFFAAAA,,線寬為2
當滿足條件日期=DATE1時,在SYSPARAM(4)*0.95位置書寫文字'+'('+NUMTOSTR(D1,2)+' 元)'+'\N \N \N \N \N 近高\N \N 到\N \N 當前低于收\N \N 幅度（'+NUMTOSTR(D4,2)+' % )'+'('+NUMTOSTR(D3,2)+' 元)'+'\N （'+NUMTOSTR(D6,2)+' % )'+'('+NUMTOSTR(D5,2)+' 元)'),COLORFFFFFF
?

源碼：

?

INPUT:T(20,1,360),F(0,0,255),F1(0,0,255),F2(0,0,255);
TTt:=ISLASTBAR=1;
T1:=datacount-barpos+0;
T2:=DATEDIFF(date,CURRENTDATE);
A1:=((H-L)/L)*100;
A2:=H-L;
MAI:=C*1.017;
MAII:=C*1.03;
DRAWTEXTEX(sysparam(3)=BARPOS,0,299,1,'▼明短線贏利[1.7%--3%:]'+'/'+NUMTOSTR(MAI[SYSPARAM(1)],2)+'--'+NUMTOSTR(MAII [SYSPARAM(1)],2)),Color00FF00;
DRAWTEXTEX(TTt,0,1,1,'【代碼:'+STKLABEL+' 名稱:'+STKNAME+'】'),Color00FFFF;
DRAWTEXTEX(TTt,0,176,1,'【振幅:'+NUMTOSTR(A1[SYSPARAM(1)],2)+'% '+NUMTOSTR(A2[SYSPARAM(1)],2)+'元 】'+''),ColorFFFF00;
DRAWTEXTEX(TTt,0,15,14,'交易天:'+NUMTOSTR(T1[SYSPARAM(1)],0)+'(天) / '+'◆自然天:'+NUMTOSTR(T2[SYSPARAM(1)],0)+'(天) '),colorFFFFFF;
STICKLINE(C>=O,low,high,0.5,0),colorFF;
STICKLINE(C>=O,close,open,8,0),color102088;
STICKLINE(C>=O,close,open,7,0),color102099;
STICKLINE(C>=O,close,open,6,0),color1020AA;
STICKLINE(C>=O,close,open,5,0),color1020BB;
STICKLINE(C>=O,close,open,4,0),color1020CC;
STICKLINE(C>=O,close,open,3,0),color1020DD;
STICKLINE(C>=O,close,open,2,0),color1020EE;
STICKLINE(C>=O,close,open,1,0),color1020FF;
STICKLINE(C<=O,low,high,0.5,0),colorFF8800;
STICKLINE(C<=O,close,open,8,0),colorFF7700;
STICKLINE(C<=O,close,open,7,0),colorFF8800;
STICKLINE(C<=O,close,open,6,0),colorFF9900;
STICKLINE(C<=O,close,open,5,0),colorFFAA00;
STICKLINE(C<=O,close,open,4,0),colorFFBB00;
STICKLINE(C<=O,close,open,3,0),colorFFCC00;
STICKLINE(C<=O,close,open,2,0),colorFFDD00;
STICKLINE(C<=O,close,open,1,0),colorFFEE00;
as:=(o+h+l+c)/4;
BL: MA(as,F),linethick1,Color208FFF;
BL1: MA(C,F1),linethick1,ColorFFFFFF;
BL2: MA(C,F2),linethick1,Color00FFFF;
PARTLINE(BL<REF(BL,1),BL),colorff0000,linethick2;
PARTLINE(BL1<REF(BL1,1),BL1),color00ff00,linethick1;
PARTLINE(BL2<REF(BL2,1),BL2),color00ff00,linethick1;
BLT:=BARSTATUS=2;
DRAWTEXT(BLT AND BL>REF(BL,1),BL,'↑'+NUMTOSTR(f,0)+':'+NUMTOSTR(BL,2)),COLOR208fff;
DRAWTEXT(BLT AND BL<REF(BL,1),BL,'↓'+NUMTOSTR(f,0)+':'+NUMTOSTR(BL,2)),Color208FFF;
DRAWTEXT(BLT AND BL1>REF(BL1,1),BL1,'↑'+NUMTOSTR(f1,0)+':'+NUMTOSTR(BL1,2)),COLORFFffff;
DRAWTEXT(BLT AND BL1<REF(BL1,1),BL1,'↓'+NUMTOSTR(f1,0)+':'+NUMTOSTR(BL1,2)),ColorFFFDED;
DRAWTEXT(BLT AND BL2>REF(BL2,1),BL2,'↑'+NUMTOSTR(f2,0)+':'+NUMTOSTR(BL2,2)),COLOR00CCCC;
DRAWTEXT(BLT AND BL2<REF(BL2,1),BL2,'↓'+NUMTOSTR(f2,0)+':'+NUMTOSTR(BL2,2)),Color00CCCC;
B:=IF((SYSPARAM(1) = (BARSSINCE((C > 0)) + 1)),1,0);
B1:=(H<REF(L,1));
B2:=(L>REF(H,1));
STICKLINE(B1,(c+o)/2,O,5,0),coloraa0000;
STICKLINE(B1,(c+o)/2,O,3,0),colorcc0000;
STICKLINE(B1,(c+o)/2,O,1,0),coloree0000;
STICKLINE(B2,O,(c+o)/2,5,0),color00AAaa;
STICKLINE(B2,O,(c+o)/2,3,0),color00CCcc;
STICKLINE(B2 ,O,(c+o)/2,1,0),color00EEee;
DRAWTEXT(((B > 0) AND B1),H,'↓缺口'),colorFFFFEE,pxdn10,ALIGN2;
DRAWTEXT(((B > 0) AND B2),L,'↑缺口'),color00FFEE,pxdn10,ALIGN2;
var100:='【所屬板塊】:';
if inblock('電力')=1 then var100:=var100+' 電力';
if inblock('電腦')=1 then var100:=var100+' 電腦';
if inblock('電器')=1 then var100:=var100+' 電器';
if inblock('電子信息')=1 then var100:=var100+' 電子信息';
if inblock('房地產')=1 then var100:=var100+' 房地產';
if inblock('紡織服裝')=1 then var100:=var100+' 紡織服裝';
if inblock('鋼鐵')=1 then var100:=var100+' 鋼鐵';
if inblock('工程建筑')=1 then var100:=var100+' 工程建筑';
if inblock('供水供氣')=1 then var100:=var100+' 供水供氣';
if inblock('化工')=1 then var100:=var100+' 化工';
if inblock('化纖')=1 then var100:=var100+' 化纖';
if inblock('機械')=1 then var100:=var100+' 機械';
if inblock('建材')=1 then var100:=var100+' 建材';
if inblock('交通工具')=1 then var100:=var100+' 交通工具';
if inblock('交通設施')=1 then var100:=var100+' 交通設施';
if inblock('教育傳媒')=1 then var100:=var100+' 教育傳媒';
if inblock('金融')=1 then var100:=var100+' 金融';
if inblock('旅游酒店')=1 then var100:=var100+' 旅游酒店';
if inblock('煤炭石油')=1 then var100:=var100+' 煤炭石油';
if inblock('釀酒食品')=1 then var100:=var100+' 釀酒食品';
if inblock('農林牧漁')=1 then var100:=var100+' 農林牧漁';
if inblock('其他行業')=1 then var100:=var100+' 其他行業';
if inblock('汽車')=1 then var100:=var100+' 汽車';
if inblock('汽配')=1 then var100:=var100+' 汽配';
if inblock('商業連鎖')=1 then var100:=var100+' 商業連鎖';
if inblock('石化')=1 then var100:=var100+' 石化';
if inblock('通信')=1 then var100:=var100+' 通信';
if inblock('外貿')=1 then var100:=var100+' 外貿';
if inblock('醫藥')=1 then var100:=var100+' 醫藥';
if inblock('儀電儀表')=1 then var100:=var100+' 儀電儀表';
if inblock('有色金屬')=1 then var100:=var100+' 有色金屬';
if inblock('運輸物流')=1 then var100:=var100+' 運輸物流';
if inblock('造紙印刷')=1 then var100:=var100+' 造紙印刷';
if inblock('安徽')=1 then var100:=var100+' 安徽';
if inblock('北京')=1 then var100:=var100+' 北京';
if inblock('福建')=1 then var100:=var100+' 福建';
if inblock('甘肅')=1 then var100:=var100+' 甘肅';
if inblock('廣東')=1 then var100:=var100+' 廣東';
if inblock('廣西')=1 then var100:=var100+' 廣西';
if inblock('貴州')=1 then var100:=var100+' 貴州';
if inblock('海南')=1 then var100:=var100+' 海南';
if inblock('河北')=1 then var100:=var100+' 河北';
if inblock('河南')=1 then var100:=var100+' 河南';
if inblock('黑龍江')=1 then var100:=var100+' 黑龍江';
if inblock('湖北')=1 then var100:=var100+' 湖北';
if inblock('湖南')=1 then var100:=var100+' 湖南';
if inblock('吉林')=1 then var100:=var100+' 吉林';
if inblock('江蘇')=1 then var100:=var100+' 江蘇';
if inblock('江西')=1 then var100:=var100+' 江西';
if inblock('遼寧')=1 then var100:=var100+' 遼寧';
if inblock('內蒙古')=1 then var100:=var100+' 內蒙古';
if inblock('寧夏')=1 then var100:=var100+' 寧夏';
if inblock('青海')=1 then var100:=var100+' 青海';
if inblock('山東')=1 then var100:=var100+' 山東';
if inblock('山西')=1 then var100:=var100+' 山西';
if inblock('陜西')=1 then var100:=var100+' 陜西';
if inblock('上海')=1 then var100:=var100+' 上海';
if inblock('深圳')=1 then var100:=var100+' 深圳';
if inblock('四川')=1 then var100:=var100+' 四川';
if inblock('天津')=1 then var100:=var100+' 天津';
if inblock('***')=1 then var100:=var100+' ***';
if inblock('新疆')=1 then var100:=var100+' 新疆';
if inblock('云南')=1 then var100:=var100+' 云南';
if inblock('浙江')=1 then var100:=var100+' 浙江';
if inblock('重慶')=1 then var100:=var100+' 重慶';
if inblock('3G')=1 then var100:=var100+' 3G';
if inblock('H股')=1 then var100:=var100+' H股';
if inblock('QFII持股')=1 then var100:=var100+' QFII持股';
if inblock('ST')=1 then var100:=var100+' ST';
if inblock('智能電網')=1 then var100:=var100+' 智能電網';
if inblock('創投')=1 then var100:=var100+' 創投';
if inblock('次新股')=1 then var100:=var100+' 次新股';
if inblock('大盤')=1 then var100:=var100+' 大盤';
if inblock('海峽西岸')=1 then var100:=var100+' 海峽西岸';
if inblock('大訂單')=1 then var100:=var100+' 大訂單';
if inblock('股權改革')=1 then var100:=var100+' 股權改革';
if inblock('股權投資')=1 then var100:=var100+' 股權投資';
if inblock('火電板塊')=1 then var100:=var100+' 火電板塊';
if inblock('水電板塊')=1 then var100:=var100+' 水電板塊';
if inblock('燃氣板塊')=1 then var100:=var100+' 燃氣板塊';
if inblock('供熱板塊')=1 then var100:=var100+' 供熱板塊';
if inblock('滬深300')=1 then var100:=var100+' 滬深300';
if inblock('濱海特區')=1 then var100:=var100+' 濱海特區';
if inblock('參股金融')=1 then var100:=var100+' 參股金融';
if inblock('新能源A')=1 then var100:=var100+' 新能源A';
if inblock('社保重倉')=1 then var100:=var100+' 社保重倉';
if inblock('資源優勢')=1 then var100:=var100+' 資源優勢';
if inblock('鐵路基建')=1 then var100:=var100+' 鐵路基建';
if inblock('稀缺資源')=1 then var100:=var100+' 稀缺資源';
if inblock('航天軍工')=1 then var100:=var100+' 航天軍工';
if inblock('中小企業板')=1 then var100:=var100+' 中小企業板';
DRAWTEXTEX(TTT,0,2,28,var100+' '),ColorFFB060;
DRAWTEXTEX(TTt,0,2,42,'【創于09.06.13 迷惑】'),ColorFFFFFF;
N:=IF(SYSPARAM(1)=DATACOUNT,T,DATACOUNT-SYSPARAM(1));
HH:=HHV(HIGH,N);
LL:=LLV(LOW,N);
VN:=N;
{LAST1:=DATACOUNT;}
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);
AH:HH,LINETHICK2,color0000FF;
AL:LL,LINETHICK2,color00FF00;
Qa:(LL + ((HH - LL) * 0.191)),LINEDOT,Color00ffff;
Qa2:(LL + ((HH - LL) * 0.382)),LINEDOT,Color00ffff;
Qa3:(LL + ((HH - LL) * 0.5)),Colorffffff,LINEDOT;
Qa4:(LL + ((HH - LL) * 0.618)),LINEDOT,Color00ffff;
Qa5:(LL + ((HH - LL) * 0.809)),LINEDOT,Color00ffff;
DRAWTEXT(SYSPARAM(3)=BARPOS,Qa,NUMTOSTR(Qa,2)+'--0.191'),COLORAAAAAA,ALIGN2,PXDN5;
DRAWTEXT(SYSPARAM(3)=BARPOS,Qa2,NUMTOSTR(Qa2,2)+'--0.382'),COLORAAAAAA,ALIGN2,PXUP22;
DRAWTEXT(SYSPARAM(3)=BARPOS,Qa3,NUMTOSTR(Qa3,2)+'--1/2'),COLORFFFFFF,ALIGN2,PXDN5;
DRAWTEXT(SYSPARAM(3)=BARPOS,Qa4,NUMTOSTR(Qa4,2)+'--0.618'),COLORAAAAAA,ALIGN2,PXDN5;
DRAWTEXT(SYSPARAM(3)=BARPOS,Qa5,NUMTOSTR(Qa5,2)+'--0.809'),COLORAAAAAA,ALIGN2,PXDN5;
DRAWTEXT(SYSPARAM(3)=BARPOS,HH,'階段高--'+NUMTOSTR(HH,2)),COLORFFFFFF,ALIGN2,PXDN5;
DRAWTEXT(SYSPARAM(3)=BARPOS,LL,'階段低--'+NUMTOSTR(LL,2)),COLORFFFFFF,ALIGN2,PXDN5;
D1:=HH-LL;
D2:=D1/LL*100;
D3:=HH-L;
D4:=D3/HH*100;
D5:=HH-c;
D6:=D5/HH*100;
KKH:=BARSLAST(HIGH=HH);
KKL:=BARSLAST(LOW=LL);
ND:=STRTONUM(NUMTOSTR(REF(DATE,KKL),0));
NG:=STRTONUM(NUMTOSTR(REF(DATE,KKH),0));
DK:=IF(ND>NG,2,1),LINETHICK0;
DATE1:=IF(DK=1,ND,NG);
VERTLINE(DATE=DATE1),COLORFFAAAA,,LINETHICK2;
DRAWTEXT(DATE=DATE1,SYSPARAM(4)*0.95,' 起\n \n 始\n \n 線('+NUMTOSTR(ll,2)+' 元)'+'\n \n \n \n \n \n 漲\n \n 幅（'+NUMTOSTR(D2,2)+' % )'+'('+NUMTOSTR(D1,2)+' 元)'+'\n \n \n \n \n 近高\n \n 到\n \n 當前低于收\n \n 幅度（'+NUMTOSTR(D4,2)+' % )'+'('+NUMTOSTR(D3,2)+' 元)'+'\n （'+NUMTOSTR(D6,2)+' % )'+'('+NUMTOSTR(D5,2)+' 元)'),COLORFFFFFF;

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?

 

有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友

可聯系技術人員 QQ: 262069696  點擊在線交流或微信：cxhjy888 進行 有償收費 編寫！(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)

（怎么收費，代編流程等詳情請點擊查閱！）

(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)

 


【字體：小 大】【打印文章】【查看評論】

相關文章

    沒有相關內容
　 主站蜘蛛池模板： 操欧美美女 | 国产色视频在线观看免费 | 亲子乱子伦xxxxxinin | 伊人精品线视天天综合 | 色噜噜视频 | 就操视频 | 国产欧美日韩在线不卡第一页 | 亚洲欧美日韩在线观看播放 | 日韩在线高清视频 | 91国内精品久久久久怡红院 | 国产精品亚洲一区二区三区正片 | 国产成人精品综合久久久软件 | 午夜色视频在线观看 | 三级在线观看视频 | 特级黄色一级片 | 欧美网站在线 | 第一福利在线导航 | 欧美一级爽快片淫片高清在线观看 | 九九精品在线播放 | 一级黄色片一级黄色片 | 国产一级特黄aa毛片 | 日韩欧美一区二区三区免费看 | 日韩精品欧美亚洲高清有无 | 可以看的黄色网址 | 久久97精品久久久久久久不卡 | 最近2019好看的中文字幕 | 97公开免费视频 | 国产日韩欧美一区二区 | 午夜一级做a爰片久久毛片 午夜一级免费视频 | 天天爱天天做色综合 | 久久一本精品久久精品66 | 亚洲人影院 | 久久香蕉国产线看观看亚洲片 | 18成人免费观看视频 | 精品久久久久久综合日本 | 最新国产成人综合在线观看 | 国产精品黄在线观看免费网站 | 成人黄色一级片 | 亚洲成年人网 | 天天操天天干天天干 | 男人使劲桶女人下面动态图片 |