[Airbag\Renault\Laguna\601 95 88 00  Autoliv (95080)]


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

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

    Group("Описание",5,60,270,85) 
    {
        Label(lb4,"Калькулятор для Renault Laguna\601 95 88 00  Autoliv (95080)",0,15);
        Label(lb5,"Eeprom 95080",0,30);
        Label(lb2,"Чтобы стереть CRASH и ошибки",0,45);
       
        Label(lb3,"нажмите кнопку <Применить>.",0,60);
    }
  Picture(Logo,"Renault.bmp",210,10,0,0); 
}
OnShow
    {
     
     var0 = 0;Var1 =0; Var2 =0x00;
     if(@0x3c0 = 0xff) {Var0 = Var0 + 1;}
     if(@0x3c1 = 0xff) {Var0 = Var0 + 1;}
     if(Var0 != 0) 
       {
        msg.Color = 0x0000FF;
	msg.Bold = 1;
	msg = "Неверный дамп!";
       }
     else
       {
        Var1 =0x360; 
        while(Var1 !=0x361)
        {
         Var2 =Var2 | @Var1; Var1 = var1 + 1;
        }
        
        if(var2 != 0xff) 
         {
          msg.Color = 0x0000FF;
	  msg.Bold = 1;
	  msg = "Обнаружен CRASH!";
         }
         else
         {
          msg.Color = 0xff0000;
	  msg.Bold = 1;
	  msg = "Дамп чистый!";
         }
       }  
    }
OnApply
      {
             
           Var1 = 0x0340;
      while(Var1 != 0x0360)
      {
       @Var1 = 0x00; Var1 = Var1 + 1;
      }
      Var1 = 0x360;
      while(Var1 != 0x3c0)
      {
       @Var1 = 0xFF; Var1 = Var1 + 1;
          }
     
      msg.Color = 0xff00ff;
      msg.Bold = 1;
      msg = "CRASH и ошибки стерты!";
    }