sScreenShot_m

//+------------------------------------------------------------------+
//|                                                  sScreenShot.mq4 |
//|                                            Dmitry Zhebrak,© 2010 |
//|                                       mailto: necronfx@gmail.com |
//+------------------------------------------------------------------+
#property copyright "Dmitry Zhebrak,© 2010"
#property link      "mailto: necronfx@gmail.com"

#property show_inputs
extern string  file_name="";//èìÿ ôàéëà
extern string  prefix="";//ïðåôèêñ ê èìåíè ôàéëà, åñëè íàäî
extern bool    LinkDateToName=false;//ïðè true ïåðåä èìåíåì ôàéëà äîáàâëÿåòñÿ ñåãîäíÿøíÿÿ äàòà  
extern string  DirToSaveOnDrive="d:\Ñêðèíøîòû\\"; //ñîáñòâåííî êàòàëîã êóäà ñîõðàíÿåì ñêðèíøîò
extern bool    play_sound=true;//ïðè true âêëþ÷àåì çâóêè
extern int     size_x=800;//Øèðèíà ñêðèíøîòà â ïèêñåëàõ.
extern int     size_y=600;//Âûñîòà ñêðèíøîòà â ïèêñåëàõ.
extern int     start_bar=-1;//Íîìåð ïåðâîãî âèäèìîãî áàðà íà ñêðèíøîòå. Åñëè óêàçàíî çíà÷åíèå 0, òî ñêðèíøîò ñíèìàåòñÿ ñ òåêóùåãî ïåðâîãî âèäèìîãî áàðà. Åñëè çíà÷åíèå íå óêàçàíî, èëè óêàçàíî îòðèöàòåëüíîå çíà÷åíèå, òî äåëàåòñÿ ñêðèíøîò êîíöà ãðàôèêà ñ ó÷¸òîì ïðàâîãî îòñòóïà.
extern int     shart_scale=-1;//Ìàñøòàá ãðàôèêà, âûâîäèìîãî íà ñêðèíøîò. Ìîæåò ïðèíèìàòü çíà÷åíèå îò 0 äî 5. Åñëè çíà÷åíèå íå óêàçàíî, èëè óêàçàíî îòðèöàòåëüíîå çíà÷åíèå, òî èñïîëüçóåòñÿ òåêóùèé ìàñøòàá ãðàôèêà.
extern int     chart_mode=-1;//Âèä îòîáðàæåíèÿ ãðàôèêà. Ìîæåò ïðèíèìàòü çíà÷åíèÿ: CHART_BAR (0 - ïîñëåäîâàòåëüíîñòü áàðîâ), CHART_CANDLE (1 - ÿïîíñêèå ñâå÷è), CHART_LINE (2 - ëèíèÿ ïî öåíàì çàêðûòèÿ). Åñëè çíà÷åíèå íå óêàçàíî, èëè óêàçàíî îòðèöàòåëüíîå çíà÷åíèå, òî ãðàôèê âûâîäèòñÿ â ñâîåì òåêóùåì âèäå.
extern string  sound_name="ok";//èìÿ çâóêîâîãî ôàéëà

#import "kernel32.dll"
   int MoveFileA(string FromFileName,string ToFileName);
#import

//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
  {
//----
string name,txt;
int h;
if(file_name!="")name=file_name+".gif";
else name=StringConcatenate(TimeToStr(TimeCurrent(), TIME_DATE)," ",Hour(),".",Minute(),"  ",Symbol(),"_"+GetNameTF(Period())+".gif");
if(LinkDateToName) name=StringConcatenate(TimeToStr(TimeCurrent(), TIME_DATE)," "+file_name+".gif");
   if(!IsStopped())
    {
     h=WindowScreenShot(prefix+" "+name,size_x,size_y,shart_scale,chart_mode);
      if(!h)
       {
        Alert("Îøèáêà ñîçäàíèÿ ñêðèíøîòà #"+GetLastError()+""); 
         if(play_sound)
         PlaySound("timeout.wav");
       } 
      else
       { 
        if(play_sound)
         PlaySound(sound_name+".wav");
       }  
    }
  MoveFile(prefix+" "+name);
//----
   return(0);
  }
//+------------------------------------------------------------------+
//+----------------------------------------------------------------------------+
//|  Àâòîð    : Êèì Èãîðü Â. aka KimIV,  http://www.kimiv.ru                   |
//+----------------------------------------------------------------------------+
//|  Âåðñèÿ   : 01.09.2005                                                     |
//|  Îïèñàíèå : Âîçâðàùàåò íàèìåíîâàíèå òàéìôðåéìà                             |
//+----------------------------------------------------------------------------+
//|  Ïàðàìåòðû:                                                                |
//|    TimeFrame - òàéìôðåéì (êîëè÷åñòâî ñåêóíä)      (0 - òåêóùèé ÒÔ)         |
//+----------------------------------------------------------------------------+
string GetNameTF(int TimeFrame=0) {
  if (TimeFrame==0) TimeFrame=Period();
  switch (TimeFrame) {
    case PERIOD_M1:  return("M1");
    case PERIOD_M5:  return("M5");
    case PERIOD_M15: return("M15");
    case PERIOD_M30: return("M30");
    case PERIOD_H1:  return("H1");
    case PERIOD_H4:  return("H4");
    case PERIOD_D1:  return("Daily");
    case PERIOD_W1:  return("Weekly");
    case PERIOD_MN1: return("Monthly");
    default:         return("Unknown Period");
  }
}
int MoveFile(string FileName)
 {
  int res;
  string FolderFrom;
  FolderFrom=StringConcatenate(TerminalPath(),"\experts\files\\");
  Print(StringConcatenate(TerminalPath(),"\experts\files\\",FileName));
  if(!IsDllsAllowed())
   {
     Alert("Âûçîâ ôóíêöèé èç DLL çàïðåùåí"); 
     return(0); 
   }  
  res=MoveFileA(FolderFrom+FileName,DirToSaveOnDrive+FileName);
  if(res==0)Print("Îøèáêà ïåðåìåùåíèÿ ôàéëà "+FileName+"");
 }