Amibroker For Dummies........a Beginner's Forum On How To Use Amibroker

will this thread serve its purpose?

  • yes

    Votes: 397 93.2%
  • no

    Votes: 29 6.8%

  • Total voters
    426

KelvinHand

Well-Known Member
bumping....................
Dear Kelvin;


They are part of code which I intend to backtest.

I am simplifying it.

Buy=(C=H) AND (V>Ref(V ,-1);
Short=(C=L) AND (V>Ref(V ,-1);

Substitute these conditions and run explorer.You will find errors in exploration results.Pl. correct them.
Layout the proper code to prevent misunderstanding.
Redo your code with your substitution.
 
Dear Kelvin,

Thanks for prompt response

////////////////////// HERE WE WRITE System SIGNALS /////////////////////

//--------------------- condition Long
CondL1=(C=H) and (V>Ref(V,-1));
CondL2=0;
CondL3=0;
CondL4=0;
//--------------------- condition SELL
CondSL1=H<Ref(H,-1) OR TimeNum() >= 153000;
CondSL2=0;
CondSL3=0;
CondSL4=0;
//--------------------- condition short
CondS1=(L=C) and (V>Ref(V,-1));
CondS2=0;
CondS3=0;
CondS4=0;
//--------------------- condition Cover
CondC1=L>Ref(L,-1) OR TimeNum() >= 153000;
CondC2=0;
CondC3=0;
CondC4=0;

//--------AND THE FINAL ---BUY / SHORT WE HAVE TO WRITE BELOW HERE-----
// for EXAMPLE BUYOK= CondL1=SEXE OR CondL5=NB8 AND CondL9=NUp1 AND NOT CondL13=bex;
// Buy = Ref(Buy,-1); BuyPrice = Open; //DECLARE THE"Open" OF THE NEXT BAR
buyOK = (Ref(CondL1,-1)) ;//OR (Ref(CondL3,-1)) (Ref(CondL1,-1)) OR (Ref(CondL2,-1)) OR (Ref(CondL3,-1)) OR
SellOK =Ref(CondSL1,-1);
ShortOK = (Ref(CondS1,-1)) ;//OR (Ref(CondS3,-1)) (Ref(CondS1,-1)) OR (Ref(CondS2,-1)) OR (Ref(CondS3,-1)) OR
CoverOK =Ref(CondC1,-1);



// -------- DO NOT TOUCH BELOW HERE IF YOU NOT KN/OW/ WHAT ARE YOU DOING ----------------------
//--------------------- trading hours 91500 to 153000
TradeTime=ParamToggle(" backTest with Time?", "No|Yes",0 ) ;
StartTime = ParamTime( "Start Time", "9:16" );
EndTime = ParamTime( "End Time", "15:30" );
EA = TimeNum() >= starttime AND TimeNum() <= endtime;
EA = TimeNum() >= 091600 AND TimeNum() <= 153000; // <<<<<<< ?????? time is fixed

if (TradeTime) {
//--------------------- Buy, Sell, Short, Cover, Here is with time
Buy=buyOK AND EA ; BuyPrice = Open;
Sell=SellOK OR EndTime ; SellPrice = Close;
Short= ShortOK AND EA; ShortPrice = Open;
Cover=CoverOK OR EndTime ; CoverPrice = Close;
TitleTradeTime= "\nBacktest Trade With Time = ON";
}
else {
//--------------------- Buy, Sell, Short, Cover, Here is without time
Buy=buyOK ; BuyPrice = Open;
Sell=SellOK ; SellPrice = Open;
Short= ShortOK ; ShortPrice = Open;
Cover=CoverOK ; CoverPrice = Open;
TitleTradeTime= "\nBacktest Trade Time is = OFF ";
}

Buy= ExRem(Buy,Sell); Sell= ExRem(Sell,Buy);
Short= ExRem(Short,Cover); Cover=ExRem(Cover,Short);


//--------------------- EXPLORATION
lastpriceBuy=ValueWhen(Buy,Open,-1);
lastpriceSELL=ValueWhen(Sell,Open,-1);
lastpriceShort=ValueWhen(Short,Open,-1);
lastpriceCover=ValueWhen(Cover,Open,-1);
BuyProfit= ((lastpriceSELL- lastpriceBuy)); "BuyProfit= "+WriteVal(BuyProfit,1.4); // return a single trade BUY-Sell
ShortProfit =((lastpriceShort-lastpriceCover)); "ShortProfit= "+WriteVal(ShortProfit,1.4);

//// Gainers/Lossers
monodesLong= Cum(BuyProfit) ;
monadesShort=Cum(ShortProfit );
total= monodesLong;

if(Status("Action")==actionScan OR Status("Action")==actionExplore)
{
Width60=60;
Filter = Buy OR Sell OR Short OR Cover;

colorBuyProfit = IIf(BuyProfit>0,colorBrightGreen,colorRed);
ColorShortProfit = IIf(ShortProfit >0,colorBrightGreen,colorRed);

SetOption("NoDefaultColumns", True);
AddTextColumn(Name(), "Symbol", 77, 1, colorDefault, 70);
AddColumn(DateTime(), "Date", formatDateTime, 1, colorDefault, 120);
// these 5 linea are for Long trades
AddColumn(IIf(Buy, Asc("B",0), Asc("S")), "PosL", formatChar);
AddColumn( Buy, "Buy", 1 );
AddColumn(IIf( Buy, lastpriceBuy, Null ) ,"BUY",1.4,colorDefault,colorDefault,60);
AddColumn(IIf(Sell,lastpriceSELL,Null),"SELL",1.4,colorDefault,colorDefault,60);
AddColumn(a1=IIf(Sell,(lastpriceSELL- lastpriceBuy),Null),"Long-Pip",1.4,colorDefault,colorBuyProfit ,60);

// these 5 linea are for Short trades
AddColumn(IIf(Short, Asc("S",0), Asc("C")), "PosS", formatChar);
AddColumn( Sell, "Short", 1 );
AddColumn(IIf( Short, lastpriceShort, Null ) ,"Short",1.4,colorDefault,colorDefault,70);
AddColumn(IIf(Cover,lastpriceCover,Null),"Cover",1.4,colorDefault,colorDefault,70);
AddColumn(b1=IIf(Cover,(lastpriceshort-lastpriceCover),Null),"ShortPip",1.4,colorDefault,ColorShortProfit ,60);



a3=IIf(Sell,a1,IIf( Cover,b1 ,Null)); // tell me the points of every trade
Mycolor = IIf( a3 > 0 , colorGreen, colorRed); //is it correct??????no ap3ut it after a3 line this line
AddColumn(a3,"Gain/Loss",1.4,Mycolor,colorBuyProfit ,80);
// contains wining trades of every 2 lines

//AddColumn(a3,"Gain/Loss",1.4,colorDefault,colorBuyProfit ,80); // contains wining trades of every 2 lines
// all above are corect for gia BUY SELL sort cover

AddSummaryRows( 1, 1.4, 4,7,9, 12,13,15);
} // end actionExplore


//--------------------- appearance of various signals of long / short in the chart
if( Status("Action")==actionIndicator )
{
SetChartBkColor(ParamColor("backround ",colorBlack));
SetChartOptions(0,chartShowArrows|chartShowDates);
strWeekday = StrMid("SunMonTueWedThuFriSat", SelectedValue(DayOfWeek())*3,3);
Title1= Name() +","+Date()+","+ " TimeFrame: " + Interval(2)+"\n Open "+O +", High " +H +", Low "+L +", Close "+C+ ", "+"(" +WriteVal(ROC(C,1),1.2)+"%)" ;

Display_Bars = ParamToggle("Display Bars","No|Yes",1);
if (Display_Bars) Plot( C, "" , colorWhite, styleBar);
if (TradeTime) Plot( IIf(EA,6,-1e10),"",colorBlueGrey ,styleOwnScale|styleArea|styleNoLabel, -1, 90);

////////////////////// Arrows
belakiaBS = ParamToggle("Arrows Buy-Sell","HIDE|SHOW",1);
if( belakiaBS )
{
PlotShapes(IIf (Buy,shapeUpArrow,shapeNone),colorGreen,0,L,-30);
PlotShapes(IIf (Buy,shapeSmallCircle,shapeNone),colorGreen,0,O,0);
PlotShapes(IIf (Sell,shapeDownArrow,shapeNone),colorRed,0,H,-40);
PlotShapes(IIf (Sell,shapeSmallCircle,shapeNone),colorRed,0,O,0);
}
belakiaSC = ParamToggle("Arrows Short-Cover","HIDE|SHOW",1);
if( belakiaSC )
{
PlotShapes(IIf(Short,shapeSmallDownTriangle,shapeNone),colorRed,0,H,-30);
PlotShapes(IIf (Short,shapeSmallCircle,shapeNone),colorRed,0,O,0);
PlotShapes(IIf(Cover,shapeSmallUpTriangle,shapeNone),colorOrange,0,L,-40);
PlotShapes(IIf (Cover,shapeSmallCircle,shapeNone),colorOrange,0,O,0);
}

////////////////////// Sum Total buy and short positions//YOU MAY OMIT THIS SECTION,BECAUSE THIS SEEMS TO BE APPLICABLE TO NIFTY INDEX.

// Value of one lot of Nifty is approx. Rs.250,000 for which Rs.25000 margin is required.
// commission for 1 lot=Rs250 Stop=12
TotalPosBuy=Cum(Buy); x1=Cum(BuyProfit); x2=Sum(ShortProfit,98);
NumContracts = Param("NumContracts ", 1,1,100,1);
Commission = TickSize*Param("Commission", 250,0,450,1); // 250 per lot
TotalCommisionTrade =TotalPosBuy*NumContracts*Commission ;

TitleSynolo=" Entry Long Trades = "+TotalPosBuy +"\n Num Contracts "+NumContracts + "\nTotal Commision Of Long Trades RS = "+TotalCommisionTrade +
"\n";



EventNum =TotalPosBuy;
FirstVisibleBar = Status( "FirstVisibleBar" );
Lastvisiblebar = Status("LastVisibleBar");
for( b = Firstvisiblebar; b < Lastvisiblebar AND b < BarCount; b++)
{
dist = TickSize*9;
colorBuyProfit = IIf(BuyProfit>0,colorGreen,colorRed);
ColorShortProfit = IIf(ShortProfit >0,colorGreen,colorRed);
////////////////////// PlotText Total Pos Buy appear
TextEventNum = ParamToggle("Event TotalPosBuy","HIDE|SHOW",0); if( TextEventNum )
{
if( Buy ) PlotText("\n\n\n\nEvent\n"+NumToStr(EventNum,1.0,False),b,L,colorWhite);
if( Sell ) PlotText("Event\n"+NumToStr(EventNum,1.0,False),b,H,colorWhite);
}

////////////////////// PlotText we appear gainers / lossers
TextPipsBS = ParamToggle("Plot Buy Pips","HIDE|SHOW",0); if( TextPipsBS )
{
if( Buy ) PlotText( "Buy\n\n" + lastpriceBuy , b, L-dist, colorBrightGreen ); //ColorShortProfit
if( Sell ) PlotText( "Sell\n"+lastpriceSELL +"\n" + WriteVal(BuyProfit ,1.4) , b, H+dist, colorBlack,colorBuyProfit );
}
TextPipsSC = ParamToggle("Plot Short Pips","HIDE|SHOW",0); if( TextPipsSC)
{
if( Short ) PlotText( "\n\n\nShort\n" + lastpriceShort, b, H+dist, colorOrange );
if( Cover ) PlotText( "\n\n\nCover\n"+ lastpriceCover+"\n"+WriteVal(ShortProfit ,1.4), b, L-dist, colorBlack, ColorShortProfit );
}
///////// END ///////////// PlotText we appear gainers / lossers

////////////////////// PlotText we appear the Time of the Trade
myDateTime = DateTime();
TextDateOnChart = ParamToggle("Plot Text Date Time","SHOW TextDate|HIDE TextDate",0);
if( TextDateOnChart )
{
if( Buy ) PlotText("\n\n\n"+NumToStr(myDateTime,formatDateTime) +"", b, H[ b ]-dist, colorLime );
if( Sell ) PlotText("\n\n\n"+NumToStr(myDateTime,formatDateTime)+"" , b, L[ b ]+dist, colorLime );
}

//////// END ////////////// PlotText we appear the Time of the Trade

} // end FirstVisibleBar

Eq = Equity( 1 );
if ( ParamToggle( "Equity", "HIDE|SHOW", 0 ) ) Plot( Eq, "", colorYellow, 1 | styleOwnScale );

Title=" # "+strWeekday+" # "+Title1 + TitleTradeTime+ "\n\n"+TitleSynolo ;

} // end actionIndicator


_SECTION_END();////////////////////// Sum Total buy AND Short positions





// Value of one lot of Nifty is approx.Rs.250,000 for which Rs.25000 margin is required.


// commission for 1 lot=Rs250; Stop=12


TotalPosBuy=Cum(Buy); x1=Cum(BuyProfit); x2=Sum(ShortProfit,98);


NumContracts = Param("NumContracts ", 1,1,100,1);


Commission = TickSize*Param("Commission", 250,1,450,1); // 250 per lot


SumCommisionBuyTrades =TotalPosBuy*NumContracts*Commission ;




TotalPosShort=Cum(Short);

SumCommisionShortTrades =TotalPosShort*NumContracts*Commission ;




TotalCommisionTrade =0;




TitleSynolo=" Entry Long Trades = "+TotalPosBuy + " Entry
Short Trades = "+TotalPosShort +"\n Num Contracts "+NumContracts
+ "\nTotal Commision Of Long
Trades RS = "+SumCommisionBuyTrades +


"\nTotal Commision Of Short
Trades RS = "+SumCommisionShortTrades
+


"\n";

/*
///////////////////////////////pop up stuff ///////////////////////////////
// Call the AFL from Include folder FIRst
#include_once <PopupWindowID.afl>
// samble PopupWindowEx( popupID, bodytext, captiontext, timeout, left, top )
// samble2 PopupWindowEx( "ID:1", "testing", "nomber of alert ", 5, -1, -1 );
LastClose= LastValue(C); // if you like to add this popup will show you

if (LastValue(BuyOK )) PopupWindowEx( " BUY ID:1", "Get Ready to BUY \n"+Name() + " "+ Interval(2)+" : "+ " Last ="+LastClose , "Buy Alert -", 20, 100, 1 ) ; //appear for 20 seconts
PlaySound("c:\\windows\\media\\ding.wav");

if (LastValue(ShortOK )) PopupWindowEx( " SHORT ID:2", "Get Ready to SHORT \n"+Name() + " "+ Interval(2) + " : "+ " Last ="+LastClose , "Short Alert ", 20, 1, 150 ) ;

PlaySound("c:\\windows\\media\\ding.wav");



bumping....................

Layout the proper code to prevent misunderstanding.
Redo your code with your substitution.
 

KelvinHand

Well-Known Member
Dear Kelvin,

Thanks for prompt response

////////////////////// HERE WE WRITE System SIGNALS /////////////////////

//--------------------- condition Long
CondL1=(C=H) and (V>Ref(V,-1));
CondL2=0;
CondL3=0;
CondL4=0;
//--------------------- condition SELL
CondSL1=H<Ref(H,-1) OR TimeNum() >= 153000;
CondSL2=0;
CondSL3=0;
CondSL4=0;
//--------------------- condition short
CondS1=(L=C) and (V>Ref(V,-1));
CondS2=0;
CondS3=0;
CondS4=0;
//--------------------- condition Cover
CondC1=L>Ref(L,-1) OR TimeNum() >= 153000;
CondC2=0;
CondC3=0;
CondC4=0;

....
Errors here:
//--------------------- condition Long
CondL1=(C==H) and (V>Ref(V,-1));

//--------------------- condition short
CondS1=(L==C) and (V>Ref(V,-1));


This is a intraday afl, need realtime processing and i cannot do and not my expertise in backtesting.
Need other good people help that know india market here like johnny, sr114...etc
 
Last edited:
bumping....................
Dear Kelvin,

Thanks for prompt response

////////////////////// HERE WE WRITE System SIGNALS /////////////////////

//--------------------- condition Long
CondL1=(C=H) and (V>Ref(V,-1));
CondL2=0;
CondL3=0;
CondL4=0;
//--------------------- condition SELL
CondSL1=H<Ref(H,-1) OR TimeNum() >= 153000;
CondSL2=0;
CondSL3=0;
CondSL4=0;
//--------------------- condition short
CondS1=(L=C) and (V>Ref(V,-1));
CondS2=0;
CondS3=0;
CondS4=0;
//--------------------- condition Cover
CondC1=L>Ref(L,-1) OR TimeNum() >= 153000;
CondC2=0;
CondC3=0;
CondC4=0;

//--------AND THE FINAL ---BUY / SHORT WE HAVE TO WRITE BELOW HERE-----
// for EXAMPLE BUYOK= CondL1=SEXE OR CondL5=NB8 AND CondL9=NUp1 AND NOT CondL13=bex;
// Buy = Ref(Buy,-1); BuyPrice = Open; //DECLARE THE"Open" OF THE NEXT BAR
buyOK = (Ref(CondL1,-1)) ;//OR (Ref(CondL3,-1)) (Ref(CondL1,-1)) OR (Ref(CondL2,-1)) OR (Ref(CondL3,-1)) OR
SellOK =Ref(CondSL1,-1);
ShortOK = (Ref(CondS1,-1)) ;//OR (Ref(CondS3,-1)) (Ref(CondS1,-1)) OR (Ref(CondS2,-1)) OR (Ref(CondS3,-1)) OR
CoverOK =Ref(CondC1,-1);



// -------- DO NOT TOUCH BELOW HERE IF YOU NOT KN/OW/ WHAT ARE YOU DOING ----------------------
//--------------------- trading hours 91500 to 153000
TradeTime=ParamToggle(" backTest with Time?", "No|Yes",0 ) ;
StartTime = ParamTime( "Start Time", "9:16" );
EndTime = ParamTime( "End Time", "15:30" );
EA = TimeNum() >= starttime AND TimeNum() <= endtime;
EA = TimeNum() >= 091600 AND TimeNum() <= 153000; // <<<<<<< ?????? time is fixed

if (TradeTime) {
//--------------------- Buy, Sell, Short, Cover, Here is with time
Buy=buyOK AND EA ; BuyPrice = Open;
Sell=SellOK OR EndTime ; SellPrice = Close;
Short= ShortOK AND EA; ShortPrice = Open;
Cover=CoverOK OR EndTime ; CoverPrice = Close;
TitleTradeTime= "\nBacktest Trade With Time = ON";
}
else {
//--------------------- Buy, Sell, Short, Cover, Here is without time
Buy=buyOK ; BuyPrice = Open;
Sell=SellOK ; SellPrice = Open;
Short= ShortOK ; ShortPrice = Open;
Cover=CoverOK ; CoverPrice = Open;
TitleTradeTime= "\nBacktest Trade Time is = OFF ";
}

Buy= ExRem(Buy,Sell); Sell= ExRem(Sell,Buy);
Short= ExRem(Short,Cover); Cover=ExRem(Cover,Short);


//--------------------- EXPLORATION
lastpriceBuy=ValueWhen(Buy,Open,-1);
lastpriceSELL=ValueWhen(Sell,Open,-1);
lastpriceShort=ValueWhen(Short,Open,-1);
lastpriceCover=ValueWhen(Cover,Open,-1);
BuyProfit= ((lastpriceSELL- lastpriceBuy)); "BuyProfit= "+WriteVal(BuyProfit,1.4); // return a single trade BUY-Sell
ShortProfit =((lastpriceShort-lastpriceCover)); "ShortProfit= "+WriteVal(ShortProfit,1.4);

//// Gainers/Lossers
monodesLong= Cum(BuyProfit) ;
monadesShort=Cum(ShortProfit );
total= monodesLong;

if(Status("Action")==actionScan OR Status("Action")==actionExplore)
{
Width60=60;
Filter = Buy OR Sell OR Short OR Cover;

colorBuyProfit = IIf(BuyProfit>0,colorBrightGreen,colorRed);
ColorShortProfit = IIf(ShortProfit >0,colorBrightGreen,colorRed);

SetOption("NoDefaultColumns", True);
AddTextColumn(Name(), "Symbol", 77, 1, colorDefault, 70);
AddColumn(DateTime(), "Date", formatDateTime, 1, colorDefault, 120);
// these 5 linea are for Long trades
AddColumn(IIf(Buy, Asc("B",0), Asc("S")), "PosL", formatChar);
AddColumn( Buy, "Buy", 1 );
AddColumn(IIf( Buy, lastpriceBuy, Null ) ,"BUY",1.4,colorDefault,colorDefault,60);
AddColumn(IIf(Sell,lastpriceSELL,Null),"SELL",1.4,colorDefault,colorDefault,60);
AddColumn(a1=IIf(Sell,(lastpriceSELL- lastpriceBuy),Null),"Long-Pip",1.4,colorDefault,colorBuyProfit ,60);

// these 5 linea are for Short trades
AddColumn(IIf(Short, Asc("S",0), Asc("C")), "PosS", formatChar);
AddColumn( Sell, "Short", 1 );
AddColumn(IIf( Short, lastpriceShort, Null ) ,"Short",1.4,colorDefault,colorDefault,70);
AddColumn(IIf(Cover,lastpriceCover,Null),"Cover",1.4,colorDefault,colorDefault,70);
AddColumn(b1=IIf(Cover,(lastpriceshort-lastpriceCover),Null),"ShortPip",1.4,colorDefault,ColorShortProfit ,60);



a3=IIf(Sell,a1,IIf( Cover,b1 ,Null)); // tell me the points of every trade
Mycolor = IIf( a3 > 0 , colorGreen, colorRed); //is it correct??????no ap3ut it after a3 line this line
AddColumn(a3,"Gain/Loss",1.4,Mycolor,colorBuyProfit ,80);
// contains wining trades of every 2 lines

//AddColumn(a3,"Gain/Loss",1.4,colorDefault,colorBuyProfit ,80); // contains wining trades of every 2 lines
// all above are corect for gia BUY SELL sort cover

AddSummaryRows( 1, 1.4, 4,7,9, 12,13,15);
} // end actionExplore


//--------------------- appearance of various signals of long / short in the chart
if( Status("Action")==actionIndicator )
{
SetChartBkColor(ParamColor("backround ",colorBlack));
SetChartOptions(0,chartShowArrows|chartShowDates);
strWeekday = StrMid("SunMonTueWedThuFriSat", SelectedValue(DayOfWeek())*3,3);
Title1= Name() +","+Date()+","+ " TimeFrame: " + Interval(2)+"\n Open "+O +", High " +H +", Low "+L +", Close "+C+ ", "+"(" +WriteVal(ROC(C,1),1.2)+"%)" ;

Display_Bars = ParamToggle("Display Bars","No|Yes",1);
if (Display_Bars) Plot( C, "" , colorWhite, styleBar);
if (TradeTime) Plot( IIf(EA,6,-1e10),"",colorBlueGrey ,styleOwnScale|styleArea|styleNoLabel, -1, 90);

////////////////////// Arrows
belakiaBS = ParamToggle("Arrows Buy-Sell","HIDE|SHOW",1);
if( belakiaBS )
{
PlotShapes(IIf (Buy,shapeUpArrow,shapeNone),colorGreen,0,L,-30);
PlotShapes(IIf (Buy,shapeSmallCircle,shapeNone),colorGreen,0,O,0);
PlotShapes(IIf (Sell,shapeDownArrow,shapeNone),colorRed,0,H,-40);
PlotShapes(IIf (Sell,shapeSmallCircle,shapeNone),colorRed,0,O,0);
}
belakiaSC = ParamToggle("Arrows Short-Cover","HIDE|SHOW",1);
if( belakiaSC )
{
PlotShapes(IIf(Short,shapeSmallDownTriangle,shapeNone),colorRed,0,H,-30);
PlotShapes(IIf (Short,shapeSmallCircle,shapeNone),colorRed,0,O,0);
PlotShapes(IIf(Cover,shapeSmallUpTriangle,shapeNone),colorOrange,0,L,-40);
PlotShapes(IIf (Cover,shapeSmallCircle,shapeNone),colorOrange,0,O,0);
}

////////////////////// Sum Total buy and short positions//YOU MAY OMIT THIS SECTION,BECAUSE THIS SEEMS TO BE APPLICABLE TO NIFTY INDEX.

// Value of one lot of Nifty is approx. Rs.250,000 for which Rs.25000 margin is required.
// commission for 1 lot=Rs250 Stop=12
TotalPosBuy=Cum(Buy); x1=Cum(BuyProfit); x2=Sum(ShortProfit,98);
NumContracts = Param("NumContracts ", 1,1,100,1);
Commission = TickSize*Param("Commission", 250,0,450,1); // 250 per lot
TotalCommisionTrade =TotalPosBuy*NumContracts*Commission ;

TitleSynolo=" Entry Long Trades = "+TotalPosBuy +"\n Num Contracts "+NumContracts + "\nTotal Commision Of Long Trades RS = "+TotalCommisionTrade +
"\n";



EventNum =TotalPosBuy;
FirstVisibleBar = Status( "FirstVisibleBar" );
Lastvisiblebar = Status("LastVisibleBar");
for( b = Firstvisiblebar; b < Lastvisiblebar AND b < BarCount; b++)
{
dist = TickSize*9;
colorBuyProfit = IIf(BuyProfit>0,colorGreen,colorRed);
ColorShortProfit = IIf(ShortProfit >0,colorGreen,colorRed);
////////////////////// PlotText Total Pos Buy appear
TextEventNum = ParamToggle("Event TotalPosBuy","HIDE|SHOW",0); if( TextEventNum )
{
if( Buy ) PlotText("\n\n\n\nEvent\n"+NumToStr(EventNum,1.0,False),b,L,colorWhite);
if( Sell ) PlotText("Event\n"+NumToStr(EventNum,1.0,False),b,H,colorWhite);
}

////////////////////// PlotText we appear gainers / lossers
TextPipsBS = ParamToggle("Plot Buy Pips","HIDE|SHOW",0); if( TextPipsBS )
{
if( Buy ) PlotText( "Buy\n\n" + lastpriceBuy , b, L-dist, colorBrightGreen ); //ColorShortProfit
if( Sell ) PlotText( "Sell\n"+lastpriceSELL +"\n" + WriteVal(BuyProfit ,1.4) , b, H+dist, colorBlack,colorBuyProfit );
}
TextPipsSC = ParamToggle("Plot Short Pips","HIDE|SHOW",0); if( TextPipsSC)
{
if( Short ) PlotText( "\n\n\nShort\n" + lastpriceShort, b, H+dist, colorOrange );
if( Cover ) PlotText( "\n\n\nCover\n"+ lastpriceCover+"\n"+WriteVal(ShortProfit ,1.4), b, L-dist, colorBlack, ColorShortProfit );
}
///////// END ///////////// PlotText we appear gainers / lossers

////////////////////// PlotText we appear the Time of the Trade
myDateTime = DateTime();
TextDateOnChart = ParamToggle("Plot Text Date Time","SHOW TextDate|HIDE TextDate",0);
if( TextDateOnChart )
{
if( Buy ) PlotText("\n\n\n"+NumToStr(myDateTime,formatDateTime) +"", b, H[ b ]-dist, colorLime );
if( Sell ) PlotText("\n\n\n"+NumToStr(myDateTime,formatDateTime)+"" , b, L[ b ]+dist, colorLime );
}

//////// END ////////////// PlotText we appear the Time of the Trade

} // end FirstVisibleBar

Eq = Equity( 1 );
if ( ParamToggle( "Equity", "HIDE|SHOW", 0 ) ) Plot( Eq, "", colorYellow, 1 | styleOwnScale );

Title=" # "+strWeekday+" # "+Title1 + TitleTradeTime+ "\n\n"+TitleSynolo ;

} // end actionIndicator


_SECTION_END();////////////////////// Sum Total buy AND Short positions





// Value of one lot of Nifty is approx.Rs.250,000 for which Rs.25000 margin is required.


// commission for 1 lot=Rs250; Stop=12


TotalPosBuy=Cum(Buy); x1=Cum(BuyProfit); x2=Sum(ShortProfit,98);


NumContracts = Param("NumContracts ", 1,1,100,1);


Commission = TickSize*Param("Commission", 250,1,450,1); // 250 per lot


SumCommisionBuyTrades =TotalPosBuy*NumContracts*Commission ;




TotalPosShort=Cum(Short);

SumCommisionShortTrades =TotalPosShort*NumContracts*Commission ;




TotalCommisionTrade =0;




TitleSynolo=" Entry Long Trades = "+TotalPosBuy + " Entry
Short Trades = "+TotalPosShort +"\n Num Contracts "+NumContracts
+ "\nTotal Commision Of Long
Trades RS = "+SumCommisionBuyTrades +


"\nTotal Commision Of Short
Trades RS = "+SumCommisionShortTrades
+


"\n";

/*
///////////////////////////////pop up stuff ///////////////////////////////
// Call the AFL from Include folder FIRst
#include_once <PopupWindowID.afl>
// samble PopupWindowEx( popupID, bodytext, captiontext, timeout, left, top )
// samble2 PopupWindowEx( "ID:1", "testing", "nomber of alert ", 5, -1, -1 );
LastClose= LastValue(C); // if you like to add this popup will show you

if (LastValue(BuyOK )) PopupWindowEx( " BUY ID:1", "Get Ready to BUY \n"+Name() + " "+ Interval(2)+" : "+ " Last ="+LastClose , "Buy Alert -", 20, 100, 1 ) ; //appear for 20 seconts
PlaySound("c:\\windows\\media\\ding.wav");

if (LastValue(ShortOK )) PopupWindowEx( " SHORT ID:2", "Get Ready to SHORT \n"+Name() + " "+ Interval(2) + " : "+ " Last ="+LastClose , "Short Alert ", 20, 1, 150 ) ;

PlaySound("c:\\windows\\media\\ding.wav");



 

bapu4

Well-Known Member
hI ALL ,
Can any one solve my problem,I have success fully brought the charts oof indian stocks on amibroker after downloading it on this sunday,it shows updated eod charts till last friday thw 6th sept but today (tuesday)eod is not updating.I have selected the market time 9.15-15.30 and a time shift of 6Hrs pl check and correct me if I am wrong .
Regards
 

Similar threads