[Immo\Honda\Immo_0D28J_PCF7931]
!Калькулятор для Honda Accord, 
!MCU - HC705B16(0D28J)
!в буфер программы должен быть загружен файл еепром 
! размером 256 байт
!
!
!  CPI  2008 
!
!
Size(345,220); 
Form{	
        Group("Syncro ECU",5,70,130,36){Label(login," ",0,13);}	
        Group("Информация",140,70,200,36){Label(message," ",0,13);}        
        Group("Описание",5,5,250,58) 	
               { Label(lb1,"Honda MCU:HC705B16(0D28J)",0,12);
        	 Label(lb2,"данные для PCF7931 (тип 33)",0,25);
                 Label(lb3," FF FF F5 xx xx xx xx xx FF FF F5 xx xx xx xx xx",0,38);}
	Group("Key1 PCF7931",5,110,165,40) 	{Label(message1," ",0,16);}
	Group("Key2 PCF7931",175,110,165,40)	{Label(message2," ",0,16);}
	
       
        Picture(Picture1,"honda.bmp",268,10,0,0);
	{Label(msg," ",0,158);}

OnShow {msg.Color=0x00FF00; msg.Bold=1;	msg="CPI";
  
	
        var0=0;
	
	
	if(@0x10=0xFF){var0=var0+1;} if(@0x1A=0xFF){var0=var0+1;}
	if(var0=2){message.bold=1; message.Color=0x0000FF; message="Неверный дамп !";}
         var0=0;	
        if(@0x36=0x55){Var0=var0+1;} if(@0x37=0xFF){Var0=var0+1;} 
  	if(var0!=2){message.Bold=1; message.Color=0x0000FF; message="Cделайте swap bytes!!! !";
	message1.Bold=1; message1.Color=0x000FFF; message1="Не опознан !";
	message2.Bold=1; message2.Color=0x000FFF; message2="Не опознан !";}
	
else
     {
      
//

  var21=0; while(var21!=10000){var21=var21+1;}
	message.Color=0x000FFF; message.Bold=1; var20=0; 
	while(var20!=101){message=" Обработка данных : "+#i.Var20+"%"; var21=0; while(var21!=1000){var21=var21+1;} var20=var20+1;}
	message.Color=0xFF0000; message.Bold=1; message="Please WAIT."; var21=0; while(var21!=10000){var21=var21+1;}
   

     //
        message.Bold=1; message.Color=0xFF0000; message="Готово."; var21=0; while(var21!=10000){var21=var21+1;}
       
        login.Bold=1; login.Color=0xFFF000; login=""  +#b.@0x2E  +#b.@0x2F  ;	
                  
        message1.Bold=1; message1.Color=0xFF00FF; 
        message1="" +#b.@0x10 +#b.@0x11  +#b.@0x12 +#b.@0x13  +#b.@0x14;
    
        message2.Bold=1; message2.Color=0xFF00FF;         
        message2="" +#b.@0x15 +#b.@0x16  +#b.@0x17 +#b.@0x18  +#b.@0x19;

        //
	
	}}
On Apply


  
    