Fix my practiced code, help me to get the value at D1 when the current chat is H1

And here is my code:

//+------------------------------------------------------------------+
//|                                       Basic Learning Modules.mq4 |
//|                        Copyright 2022, MetaQuotes Software Corp. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2022, MetaQuotes Software Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict


//1.Basic Setting
//2.Basic detect Enter & Exit
//3.Simple EA by EMA crossover & RSI

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
   
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+

//1.Basic Settng
// Define global variables
extern int Profit_target=200;//extern可在外面改動數值
extern int Stop_loss=100;
extern int fastema = 24;
extern int slowema = 60;
input int Magic_num = 0001;
extern double Lot_size = 10;



//2.Basic detect Enter & Exit


void OnTick()
  {
//---
   // Get the profit target price and the stop loss price
   double Long_TakeProfitLevel = Bid + Profit_target*Point; //0.0001
   double Long_StopLossLevel = Bid - Stop_loss*Point;
   double Short_TakeProfitLevel = Ask - Profit_target*Point; //0.0001
   double Short_StopLossLevel = Ask + Stop_loss*Point;   
   
   // Check if the long condition happen and place order accordingly
   if (Enter_long()&& OrdersTotal()==0 ) //if more the one signal, could be Enter_long1, Enter long2 or Signal1, Signal2... //OrdersTotal depend on strategy
   {   
  
   Open_Enter_long(Lot_size,Long_TakeProfitLevel,Long_StopLossLevel,"First_Enter");  

   }
   else if (Exit_long() && OrdersTotal()>0)
   {
      Close_Exit_long("Close_Exit_long");
   }
   
   // Check if the short condition happen and place order accordingly
   if (Enter_short()&& OrdersTotal()==0 ) //if more the one signal, could be Enter_long1, Enter long2 or Signal1, Signal2... //OrdersTotal depend on strategy
   {   
  
   Open_Enter_short(Lot_size,Short_TakeProfitLevel,Short_StopLossLevel,"First_Enter");  

   }
   else if (Exit_short() && OrdersTotal()>0)
   {
      Close_Exit_short("Close_Exit_short");
   }   
   
  }



//3.EMA position in 1D chat

double get_daily_ma(int value, int mode,int shift=0){
   return iMA(NULL,1440,value,0,mode,PRICE_CLOSE,shift);
}

double daily_fast_ema_1 = get_daily_ma(fastema,1,1);
double daily_slow_ema_1 = get_daily_ma(slowema,1,1);

bool daily_ok_long()
{
  bool result=false;

  
  if ((daily_fast_ema_1 > daily_slow_ema_1)  && OrdersTotal()==0 )
  {
     result=true;
  }
  else
  {
    result=false;
  }
  
  return(result);
}



bool daily_ok_short()
{
  bool result=false;

  
  if ((daily_fast_ema_1 < daily_slow_ema_1)  && OrdersTotal()==0 )
  {
     result=true;
  }
  else
  {
    result=false;
  }
  
  return(result);
}





//4.Simple EA by EMA crossover in current chat

// Function used to calculate the current EMAs, should be Global 

double get_ma(int value, int mode,int shift=0){
   return iMA(NULL,0,value,0,mode,PRICE_CLOSE,shift);
}


//Global variables to use in Enter & Exit checking

double fast_ema_1 = get_ma(fastema,1,1);
double fast_ema_2 = get_ma(fastema,1,2);
double slow_ema_1 = get_ma(slowema,1,1);
double slow_ema_2 = get_ma(slowema,1,2);


  
// Function to check if enter long condition happen
bool Enter_long()
{
  bool result=false;

 
  if ((fast_ema_1 >= slow_ema_1 && fast_ema_2 < slow_ema_2)  && OrdersTotal()==0 )
  {
     result=true;
  }
  else
  {
    result=false;
  }
  
  return(result);
}


bool Enter_short()
{
  bool result=false;

  // sma20_0 > sma50_0 && sma20_1 < sma50_1 && rsi9 <=RSI_lower && OrdersTotal()==0
  if (( slow_ema_1 >= fast_ema_1 &&  slow_ema_2 < fast_ema_2)  && OrdersTotal()==0 )
  {
     result=true;
  }
  else
  {
    result=false;
  }
  
  return(result);
}


// Function to check if exit long condiftion happens

bool Exit_long()
{
  bool result=false;

  
  if ((fast_ema_1 <= slow_ema_1 && fast_ema_2 > slow_ema_2)  && OrdersTotal()>0)
  {
     result=true;
  }
  else
  {
    result=false;
  }
  
  return(result);
}


// Function to check if exit short // Function to check if exit long condiftion happens

bool Exit_short()
{
  bool result=false;

  
  if ((slow_ema_1 <= fast_ema_1 && slow_ema_2 > fast_ema_2) && OrdersTotal()>0)
  {
     result=true;
  }
  else
  {
    result=false;
  }
  
  return(result);
} 



// Function to place long order 
void Open_Enter_long(double lot,double profit_target, double stop_loss,string COMMENT)
  {
//---
      int ticket=OrderSend(NULL , OP_BUY, lot, Ask, 10, stop_loss, profit_target);
  
      
      if (ticket<0)
         {      
         Print("OrderSelect returned the error of ",GetLastError());
         }      
  }
  
// Function to exit long order

void Close_Exit_long(string COMMENT)
{
 
   for (int i=OrdersTotal()-1;i>=0;i--)
   {
      if (OrderSelect(i,SELECT_BY_POS)&& OrderType()==OP_BUY)
      {
         bool result=OrderClose(OrderTicket(),OrderLots(),Bid,10,Red);
         if (result==false)
         {
           Print("Orders could not be closed due to the error "+string(GetLastError()));
         }       
         
      
      }
     else if (OrderSelect(i,SELECT_BY_POS)&& OrderType()==OP_SELL)
      {
         bool result=OrderClose(OrderTicket(),OrderLots(),Ask,10,Red);
         if (result==false)
         {
           Print("Orders could not be closed due to the error "+string(GetLastError()));
         }       
         
      
      }
     
   }
   Print("Orders close due to:"+COMMENT); 
 

}

// Function to place short order 
void Open_Enter_short(double lot,double profit_target, double stop_loss,string COMMENT)
  {
//---
      int ticket=OrderSend(NULL , OP_SELL, lot, Bid, 10, stop_loss, profit_target);
  
      
      if (ticket<0)
         {      
         Print("OrderSelect returned the error of ",GetLastError());
         }      
  }
  
// Function to exit short order

void Close_Exit_short(string COMMENT)
{
 
   for (int i=OrdersTotal()-1;i>=0;i--)
   {
      if (OrderSelect(i,SELECT_BY_POS)&& OrderType()==OP_SELL)
      {
         bool result=OrderClose(OrderTicket(),OrderLots(),Ask,10,Red);
         if (result==false)
         {
           Print("Orders could not be closed due to the error "+string(GetLastError()));
         }       
         
      
      }
     else if (OrderSelect(i,SELECT_BY_POS)&& OrderType()==OP_BUY)
      {
         bool result=OrderClose(OrderTicket(),OrderLots(),Bid,10,Red);
         if (result==false)
         {
           Print("Orders could not be closed due to the error "+string(GetLastError()));
         }       
         
      
      }
     
   }
   Print("Orders close due to:"+COMMENT); 
 

}


//+------------------------------------------------------------------+

i am not good at coding, i hope you can give me simple description on important line of code to tell how or why you need to fix it , and the code must be testable by backtest , then i can check it faster and pay you faster, and both of us win-wn.