飞狐《自动画线》指标公式源码

DRAWGBK(c>0 , COLORRgb(0,0,0), COLORRGB(0,0,1),1);
KLINE(O,H,L,C,0);
input:甲周期(10,1,88);
末根标:=ISLASTBAR;
顶判基:=REF(HIGH,甲周期)=HHV(HIGH,2*甲周期+1);
顶过筛:=FILTER(顶判基,甲周期);
顶回置:=BACKSET(顶过筛,甲周期+1);
顶确认:=FILTER(顶回置,甲周期);
顶合并:=顶确认 OR 末根标;
底判基:=REF(LOW,甲周期)=LLV(LOW,2*甲周期+1);
底过筛:=FILTER(底判基,甲周期);
底回置:=BACKSET(底过筛,甲周期+1);
底确认:=FILTER(底回置,甲周期);
底净确:=底确认 AND NOT(顶确认);
顶回溯:=BACKSET(顶合并,REF(BARSLAST(底净确),1)+1);
顶段起:=顶回溯>REF(顶回溯,1);
顶段滤:=BACKSET(顶段起,2);
顶段确:=顶段滤>REF(顶段滤,1);
顶延一:=BACKSET(顶段确 AND COUNT(顶合并,REF(BARSLAST(底净确),1)+2)=0,REF(BARSLAST(底净确),1)+2);
顶延一确:=顶延一>REF(顶延一,1);
顶延二:=BACKSET(顶延一确 AND COUNT(顶合并,REF(BARSLAST(底净确),1)+2)=0,REF(BARSLAST(底净确),1)+2);
顶延二确:=顶延二>REF(顶延二,1);
底计数:=IF(顶合并,COUNT(底净确,REF(BARSLAST(顶合并),1)+1),0);
底第一:=IF(底计数=1 AND 顶合并,BARSLAST(顶段确),0);
底择一:=IF(顶合并 AND REF(LOW,BARSLAST(顶段确))>=REF(LOW,BARSLAST(顶延一确)),BARSLAST(顶延一确),BARSLAST(顶段确));
底第二:=IF(底计数=2 AND 顶合并,底择一,0);
底择二:=IF(底计数>=3 AND 顶合并,IF(顶合并 AND REF(LOW,底择一)>=REF(LOW,BARSLAST(顶延二确)),BARSLAST(顶延二确),底择一),0);
底合距:=底第一+底第二+底择二;
底回溯:=BACKSET(顶合并,底合距);
底段起:=底回溯>REF(底回溯,1);
底段滤:=BACKSET(底段起,2);
底段确:=底段滤>REF(底段滤,1);
底段末:=底段确 OR 末根标;
底回溯二:=BACKSET(底段末,REF(BARSLAST(顶合并),1)+1);
底新起:=底回溯二>REF(底回溯二,1);
底新滤:=BACKSET(底新起,2);
底新确:=底新滤>REF(底新滤,1);
底延一:=BACKSET(底新确 AND COUNT(底段末,REF(BARSLAST(顶合并),1)+2)=0,REF(BARSLAST(顶合并),1)+2);
底延一确:=底延一>REF(底延一,1);
底延二:=BACKSET(底延一确 AND COUNT(底段末,REF(BARSLAST(顶合并),1)+2)=0,REF(BARSLAST(顶合并),1)+2);
底延二确:=底延二>REF(底延二,1);
顶计数二:=IF(底段末,COUNT(顶确认,REF(BARSLAST(底段末),1)+1),0);
顶第一:=IF(顶计数二=1 AND 底段末,BARSLAST(底新确),0);
顶择一:=IF(底段末 AND REF(HIGH,BARSLAST(底新确))<=REF(HIGH,BARSLAST(底延一确)),BARSLAST(底延一确),BARSLAST(底新确));
顶第二:=IF(顶计数二=2 AND 底段末,顶择一,0);
顶择二:=IF(顶计数二>=3 AND 底段末,IF(底段末 AND REF(HIGH,顶择一)<=REF(HIGH,BARSLAST(底延二确)),BARSLAST(底延二确),顶择一),0);
顶合距:=顶第一+顶第二+顶择二;
顶回溯二:=BACKSET(底段末,顶合距);
顶新起:=顶回溯二>REF(顶回溯二,1);
顶新滤:=BACKSET(顶新起,2);
顶新确:=顶新滤>REF(顶新滤,1);
DRAWLINE(底段起,LOW,顶新确,HIGH,0),linethick4,colorred;
DRAWLINE(顶新确,HIGH,底段起,LOW,0),linethick4,colorgreen;
DRAWLINE(REF(底段起,1),REF(L,1),底段起,L,0),LINETHICK2,,COLORBLUE;
DRAWLINE(REF(顶新确,1),REF(H,1),顶新确,H,0),LINETHICK2,,COLORBLUE;
末底回:=BACKSET(末根标,BARSLAST(底段起)+1);
末底确:=末底回>REF(末底回,1);
末顶回:=BACKSET(末根标,BARSLAST(顶新确)+1);
末顶确:=末顶回>REF(末顶回,1);
近端判:=IF(BARSLAST(末底确)<BARSLAST(末顶确),末底确,末顶确);
近端价:=IF(BARSLAST(末底确)<BARSLAST(末顶确),LOW,HIGH);
DRAWLINE(近端判,近端价,末根标,CLOSE,0),linethick2;
末底再:=BACKSET(末根标,BARSLAST(底段起)+1);
末底再确:=末底再>REF(末底再,1);
末底前:=BACKSET(末底再确,REF(BARSLAST(底段起),1)+2);
末底前确:=末底前>REF(末底前,1);
DRAWLINE(末底前确,LOW,末底再确,LOW,1),linethick2;
末顶再:=BACKSET(末根标,BARSLAST(顶新确)+1);
末顶再确:=末顶再>REF(末顶再,1);
末顶前:=BACKSET(末顶再确,REF(BARSLAST(顶新确),1)+2);
末顶前确:=末顶前>REF(末顶前,1);
DRAWLINE(末顶前确,HIGH,末顶再确,HIGH,1),linethick2;
前一低: REF(LOW,BARSLAST(末底再确)),colorccff99,LINEDOT,linethick2;
前一高: REF(HIGH,BARSLAST(末顶再确)),colorccff99,linethick2;
前二低: REF(LOW,BARSLAST(末底前确)),colormagenta,LINEDOT,linethick2;
前二高: REF(HIGH,BARSLAST(末顶前确)),colormagenta,linethick2;