Copy semua bagian ini kemudian paste di AFL TD Sequential sesuai pada tempatnya semula.
Notes: ada yang memberitahu bahwa di bawah sepertinya ada missing code, tapi sebenarnya tidak, saya sudah coba perbaiki tapi belum bisa... jadi khusus pada baris yang seolah-olah missing tsb dilengkapi menjadi spt berikut:
for (i=0; i < barcount ; i++) seharusnya ditulis: for dalam kurung i=0 titik koma i lebih kecil dari BarCount titik koma i plus plus kurung tutup
atau lihat contoh PlotText dimenu Help Amibroker.
Semoga berhasil.
/*
if(ShowNumbers)
PlotShapes(IIf(Buy9Bars==1, shapeDigit1,
IIf(Buy9Bars==2, shapeDigit2,
IIf(Buy9Bars==3, shapeDigit3,
IIf(Buy9Bars==4, shapeDigit4,
IIf(Buy9Bars==5, shapeDigit5,
IIf(Buy9Bars==6, shapeDigit6,
IIf(Buy9Bars==7, shapeDigit7,
IIf(Buy9Bars==8, shapeDigit8,
IIf(Buy9Bars >9, shapeStar,shapeNone))))))))),colorDarkRed, 0, L, -12);//L*.01);
/*
if(ShowNumbers)
PlotShapes(
IIf(Sell9Bars==1, shapeDigit1+shapePositionAbove,
IIf(Sell9Bars==2, shapeDigit2+shapePositionAbove,
IIf(Sell9Bars==3, shapeDigit3+shapePositionAbove,
IIf(Sell9Bars==4, shapeDigit4+shapePositionAbove,
IIf(Sell9Bars==5, shapeDigit5+shapePositionAbove,
IIf(Sell9Bars==6, shapeDigit6+shapePositionAbove,
IIf(Sell9Bars==7, shapeDigit7+shapePositionAbove,
IIf(Sell9Bars==8, shapeDigit8+shapePositionAbove,
IIf(sell9bars>9, shapeStar+shapePositionAbove,shapeNone))))))))),colorGreen, 0, H, -10); //H*.002);
*/
if(ShowNumbers)
PlotShapes(IIf(Buy9Bars==1, shapeDigit1,
IIf(Buy9Bars==2, shapeDigit2,
IIf(Buy9Bars==3, shapeDigit3,
IIf(Buy9Bars==4, shapeDigit4,
IIf(Buy9Bars==5, shapeDigit5,
IIf(Buy9Bars==6, shapeDigit6,
IIf(Buy9Bars==7, shapeDigit7,
IIf(Buy9Bars==8, shapeDigit8,
IIf(Buy9Bars >9, shapeStar,shapeNone))))))))),colorDarkRed, 0, L, -12);//L*.01);
/*
if(ShowNumbers)
PlotShapes(
IIf(Sell9Bars==1, shapeDigit1+shapePositionAbove,
IIf(Sell9Bars==2, shapeDigit2+shapePositionAbove,
IIf(Sell9Bars==3, shapeDigit3+shapePositionAbove,
IIf(Sell9Bars==4, shapeDigit4+shapePositionAbove,
IIf(Sell9Bars==5, shapeDigit5+shapePositionAbove,
IIf(Sell9Bars==6, shapeDigit6+shapePositionAbove,
IIf(Sell9Bars==7, shapeDigit7+shapePositionAbove,
IIf(Sell9Bars==8, shapeDigit8+shapePositionAbove,
IIf(sell9bars>9, shapeStar+shapePositionAbove,shapeNone))))))))),colorGreen, 0, H, -10); //H*.002);
*/
//Ganti dengan code berikut:
Buy9barsku = IIf(Buy9bars==1, 1, IIf(Buy9bars==2, 2, IIf(Buy9bars==3,3, IIf(Buy9bars==4,4, IIf(Buy9bars==5,5,
IIf(Buy9bars==6,6, IIf(Buy9bars==7,7, IIf(Buy9bars==8,8, IIf(Buy9bars==9, 9, Null)))))))));
Sell9barsku = IIf(Sell9bars==1, 1, IIf(Sell9bars==2, 2, IIf(Sell9bars==3,3, IIf(Sell9bars==4,4, IIf(Sell9bars==5,5,
IIf(Sell9bars==6,6, IIf(Sell9bars==7,7, IIf(Sell9bars==8,8, IIf(Sell9bars==9, 9, Null)))))))));
distS=Param("Lime_Multiplier", -0.2,0,-9,0.25,0);
distB=Param("Orange_multiplier",0.5,19,19,0.25,0);
distance=ATR(5);
distanceH=ATR(6);
if(ShowNumbers)
for (i=0; i
{
distB[i] = distB[i]*distanceH[i];
if (Buy9barsku[i]>0) PlotText( " " + NumToStr(Buy9barsku[ i ],1.0), i, L[ i ]-distB[i], colorPaleGreen );
}
if(ShowNumbers)
{
distS[i] = distS[i]*distance[i];
if (Sell9barsku[i]>0) PlotText( " " + NumToStr(Sell9barsku[ i ],1.0), i, H[ i ]-distS[i], colorOrange );
}
Semoga bermanfaat.
Eco Syariah
No comments:
Post a Comment
Note: Only a member of this blog may post a comment.