[Dashboard\Mitsubishi\Pajero\Pajero 3.2DID 2008 ECU]

Size(280,200); // ширина и высота

Form
{
    Group("Информация",10,15,170,40)
    {
        Label(msg," ",0,17);
    }

    Group("Описание",5,60,270,85) 
    {
        Label(lb4,"Калькулятор Mitsubishi Pajero 3.2DID 2008 ECU.",0,15);
        Label(lb5,"Eprom 93c86 ",0,30);
        Label(lb2,"Чтобы сделать пробег 0",0,45);
       
        Label(lb3,"нажмите кнопку <Применить>.",0,60);
    }
  Picture(Logo,"Mitsubishi.bmp",200,8,0,0); 
}  OnShow
    {
     
     var0 = 0;Var1 =0; Var2 =0x00;
     if(@0x20 = 0xFF) {Var0 = Var0 + 1;}
     if(@0x24 = 0xFF) {Var0 = Var0 + 1;}
     if(Var0 != 0) 
       {
        msg.Color = 0x0000FF;
	msg.Bold = 1;
	msg = "Неверный дамп!"; }
    else
    {
      Var1 =0x20; 
        while(Var1 !=0x24)
        {
         Var2 =Var2 | @Var1; Var1 = var1 + 1;
        }
        
        if(var2 != 0x00) 
         {
          
    }
         else
         {
          msg.Color = 0xff0000;
	  msg.Bold = 1;
	  msg = "Дамп OK!";
         }
       }  
    }                    
    
   
OnApply
    {
      Var1 = 0xE4;
      while(Var1 != 0xE8)
      {
       @Var1 = 0x00; Var1 = Var1 + 1;
      } Var1 = 0x20C;
      while(Var1 != 0x210)
      {
       @Var1 = 0x00; Var1 = Var1 + 1;
      }Var1 = 0x258;
      while(Var1 != 0x25c)
      {
       @Var1 = 0x00; Var1 = Var1 + 1;
      }Var1 = 0x324;
      while(Var1 != 0x328)
      {
       @Var1 = 0x00; Var1 = Var1 + 1;
      }Var1 = 0xE8;
      while(Var1 != 0xEC)
      {
       @Var1 = 0xff; Var1 = Var1 + 1;
      } Var1 = 0x210;
      while(Var1 != 0x214)
      {
       @Var1 = 0xff; Var1 = Var1 + 1;
      }Var1 = 0x25c;
      while(Var1 != 0x260)
      {
       @Var1 = 0xff; Var1 = Var1 + 1;
      }Var1 = 0x328;
      while(Var1 != 0x32C)
      {
       @Var1 = 0xff; Var1 = Var1 + 1;
      }
     
      msg.Color = 0xff00ff;
      msg.Bold = 1;
      msg = "Пробег записан 0!";
    }