Up = IIf(C>O,1,0);
UpDoji = IIf(C==O AND Ref(C,-1)>Ref(O,-1),1,0);
Down = C<O ;
DownDoji = C==O AND Ref(C,-1)<Ref(O,-1);
SetBarFillColor( IIf(up==1, colorGreen,IIf(updoji,colorGreen ,IIf(down==1,colorRed,IIf(downdoji==1,colorRed,colorBlack )))) );
Plot( C, "Price", IIf( C > O, colorGreen, colorRed ), styleCandle ) ;