打印本文
關(guān)閉窗口
相關(guān)標(biāo)簽: 鬼變臉 、 鬼變臉下載 、 童牧野鬼變臉 、 鬼變臉mp4下載 、 鬼變臉 百度影音 、 童牧野鬼變臉實(shí)戰(zhàn) 、 鬼變臉高清 、 鬼變臉快播 、 韓國(guó)電影《鬼變臉》 、
十一的時(shí)候看了童牧野的寶塔線,四處找源碼,南客大師的跟童牧野的畫法有點(diǎn)出入,就自己在他的基礎(chǔ)了改了改,還整合其它一些源碼里東西.雖然飛狐本身帶了鬼變臉主圖,但自己思考后再畫出來(lái)理解的深刻,其實(shí)按楊新宇博士的話說(shuō)就是收盤價(jià)的一種非線性變換,現(xiàn)在發(fā)出來(lái)在大家參考參考吧.
飛狐鬼變臉寶塔線指標(biāo)公式源碼
sensitivy:=o; towero:=o; towerc:=c; fc:=c;
i:=2;
while i<=datacount do begin
towero[i]:=towerc[i-1];
towerc[i]:=fc[i];
sensitivy[i]:=towero[i-1];
if (towerc[i-1]-towero[i-1])*(towerc[i-1]-sensitivy[i-1])<=0 then
begin
towero[i]:=towero[i-1];
sensitivy[i]:=towerc[i-1];
end
else if between(sensitivy[i-1],towero[i-1],towerc[i-1]) then sensitivy[i]:=sensitivy[i-1];
i:=i+1;
end;
tj:=(sensitivy-towero)*(sensitivy-towerc)<=0 and sensitivy<>towerc;
stickline(tj,max(towero,towerc),sensitivy,7,1), colorred;
stickline(tj,min(towero,towerc),sensitivy,7,0), color006600;
stickline(sensitivy<=min(towero,towerc) and not(tj),towero,towerc,7,1), colorred;
stickline(sensitivy>=max(towero,towerc) and not(tj),towero,towerc,7,0), color006600;
今開(kāi)盤:TOWERO,LINETHICK0;
今收盤:TOWERC,LINETHICK0;
今敏感:sensitivy,LINETHICK0; {本文來(lái)至程序化交易網(wǎng) cxh99.com}
三平底翻紅: min(towero,towerc)=ref(min(towero,towerc),1) and min(towero,towerc)=ref(min(towero,towerc),2) and max(towero,towerc)>sensitivy,LINETHICK,COLORRED;
三平頂翻綠: max(towero,towerc)=ref(max(towero,towerc),1) and max(towero,towerc)=ref(max(towero,towerc),2) and min(towero,towerc)<SENSITIVY,LINETHICK,COLOR006600;
if k=0 then exit;
DRAWICON(三平底翻紅,min(towero,towerc)*0.98,4);DRAWICON(三平頂翻綠,max(towero,towerc)*1.02,5);