[Airbag\Volkswagen\VW8 Siemens (951600]

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

Form
{
   
   
    Group("Идентификация",5,60,270,40)
    {
        Label(part," ",0,15);
        
    }
    Group("Информация",10,15,170,40)
    {
        Label(msg," ",0,17);
    }

    Group("Описание",5,105,270,85) 
    {
        Label(lb4,"Калькулятор для SRS Volkswagen VW8.",0,15);
        Label(lb5,"Siemens. ЕЕПРОМ 95160",0,30);
        Label(lb2,"Чтобы стереть CRASH и ошибки",0,45);
       
        Label(lb3,"нажмите кнопку <Применить>.",0,60);
    }
  Picture(Logo,"Vw.bmp",200,8,0,0); 
}
OnShow
    {
     part = "PART No: "+#c.@0x3df+#c.@0x3e0+#c.@0x3e1+" "+#c.@0x3e2+#c.@0x3e3+#c.@0x3e4+" "+#c.@0x3e5+#c.@0x3e6+#c.@0x3e7+#c.@0x3e8+
     "  DATE: "+#c.@0x3ad+#c.@0x3ae+"."+#c.@0x3b0+#c.@0x3b1+"."+#c.@0x3b3+#c.@0x3b4;
     var0 = 0; Var1 =0; Var2 =0xff; Var3 =0; Var4 = 0; Var5 = 0; Var6 =0;
     if(@0x3df != 0x31) {Var0 = Var0 + 1;}
     if(@0x3e0 != 0x4b) {Var0 = Var0 + 1;}
     if(Var0 != 0) 
       {
        msg.Color = 0x0000FF;
	msg.Bold = 1;
	msg = "Неверный дамп!";
       }
     else
       {
        Var1 =0x00; 
        while(Var1 !=0x94)
        {
         Var2 =Var2 & @Var1; Var1 = var1 + 1;
        }
        Var1 =0x2c8; 
        while(Var1 !=0x3a5)
        {
         Var2 =Var2 & @Var1; Var1 = var1 + 1;
        }

        if(var2 != 0xff) 
         {
          msg.Color = 0x0000FF;
	  msg.Bold = 1;
	  msg = "ОШИБКИ!";
         }
         else
         {
          msg.Color = 0xff0000;
	  msg.Bold = 1;
	  msg = "дамп чистый!";
         }
       }  
    }
OnApply
    {
      Var10 = 0x00;
      while(Var10 != 0x94)
      {
       @Var10 = 0xFF; Var10 = Var10 + 1;
      }
      Var10 = 0x2c8;
      while(Var10 != 0x3a6)
      {
       @Var10 = 0xFF; Var10 = Var10 + 1;
      }
      Var10 = 0x2b0;
      while(Var10 != 0x2c8)
      {
       @Var10 = 0x00; Var10 = Var10 + 1;
      }

      msg.Color = 0xff00ff;
      msg.Bold = 1;
      msg = "Ошибки стерты!";
    }