“佛引线”源码(大智慧)

佛引线

{佛引线参数}
拉升力:=(CLOSE-LLV(LOW,28))/(HHV(HIGH,30)-LLV(LOW,36))*0.6*CLOSE;
拉升力A:=SMA(拉升力,6.3,1);
波峰波谷:=SMA(拉升力A,3,1);
拉升力B:=3*拉升力A-2.1*波峰波谷;
空方:=3*波峰波谷-1* 拉升力A;
后世趋势线:IF(空方>拉升力B,拉升力B,空方),LINETHICK0,COLOR61FE78;
{后世趋势线变色}
partline(后世趋势线,后世趋势线>=ref(后世趋势线,1) and 后世趋势线>=12,rgb(255,56,51),
后世趋势线>=ref(后世趋势线,1) and 后世趋势线>=9,rgb(255,91,51),
后世趋势线>=ref(后世趋势线,1) and 后世趋势线>=6,rgb(255,115,51),
后世趋势线>=ref(后世趋势线,1) and 后世趋势线>=3,rgb(255,160,51),
后世趋势线>=ref(后世趋势线,1) and 后世趋势线>=0,rgb(255,240,51),
后世趋势线=12,rgb(62,51,255),
后世趋势线=9,rgb(51,75,255),
后世趋势线=6,rgb(51,95,255),
后世趋势线=3,rgb(51,113,255),
后世趋势线=0,rgb(51,150,255)),linethick5;
{窗口提示文字}
DRAWMOVETEXT(后世趋势线>ref(后世趋势线,1) and 后世趋势线>=0 and 后世趋势线<3, '五世恶报还，南海神光引 ！一级浮屠起，今世好做人 ！'),COLOR85FED3;
DRAWMOVETEXT(后世趋势线>ref(后世趋势线,1) and 后世趋势线>=3 and 后世趋势线<6, '今生弃恶行，佛光引善缘 ！三级浮屠升，扬善多积德 ！'),COLOR87F3FC;
DRAWMOVETEXT(后世趋势线>ref(后世趋势线,1) and 后世趋势线>=6 and 后世趋势线<9, '大舍小我明，诸佛佑前路 ！五级浮屠来，行善多造福 ！'),COLOR6