It is simply a Heiken-ashi that closes at the midpoint:
CHANGE THE CODE TO:
//---Dragon-Ashi OPEN---
haOpen = ((ExtMapBuffer3[pos+1]*6.18)+(ExtMapBuffer4[pos+1]*3.82))/10;
//---Dragon-Ashi CLOSE--
haClose= (((Open[pos+1]+High[pos+1]+Low[pos+1])/3)+((High[pos]+Low[pos]+Close[pos])/3))/2;
THEN HIT "COMPILE"