[Carradio\CITROEN\PU-2294A(C)]

Size(320,410);  

Form {

    HexDigit(Code,"Code",70,15,100,4);
    CheckBox(ResetCounter,"Clear error counter",82,40);
    Label(lb1,"Code calculator for CITROEN :",60,70);
    Label(lb2,"Model:  PU-2294A(C)",10,90);
    Label(lb3,"Sec. Type:  CODE 1111-6666",10,110);
    Label(lb4,"Partnumer: CL0401",10,130);
    Label(lb5,"Manufacturen: CLARION",10,150);
    Label(lb6,"MCU: NEC 784216BGC111",10,170);
    Label(lb7,"EEPROM: 93С46smd rotated",10,190);
    Label(lb8,"Autor:  telik@ukrwest.net   2008",10,210);
    Label(lb9,"Test: SSM (telik@ukrwest.net)",10,230);
    Label(lb10,"Enter code: прямой ввод",10,250);
    Picture(Logo,"clarion.bmp",150,100,0,0);
    Picture(Logo1,"pu2294.bmp",10,270,0,0);
}

OnShow {
	var13 = @0x72; 				// считываем ячейку со счётчиком попыток
	var13 = var13 << 8;			// сдвигаем
	if(var13 != 00) { ResetCounter = 1; }	// проверяем состояние счётчика попыток
    	var10 = @0x70;				// считываем первых 2е цифры кода
    	var11 = @0x71;				// считываем вторых 2е цифры кода
	var10 = var10;				// присваиваем
	var11 = var11 << 8;			// сдвигаем	
	Code = var10 | var11;			// присваиваем коду содержимое
}

OnApply {
      	if(ResetCounter != 0) { @0x72 = 00; }	// проверка и запись счётчика попыток: 00 - норма
}
