// se revisa si alguno de los botones fue presionado;
// en el caso de ser presionado, se cambia el valor del bit correspondiente;
bit_1:=(btn_bit_1_presionado==1)?1-bit_1:bit_1;
bit_2:=(btn_bit_2_presionado==1)?1-bit_2:bit_2;
bit_3:=(btn_bit_3_presionado==1)?1-bit_3:bit_3;
bit_4:=(btn_bit_4_presionado==1)?1-bit_4:bit_4;
bit_5:=(btn_bit_5_presionado==1)?1-bit_5:bit_5;
bit_6:=(btn_bit_6_presionado==1)?1-bit_6:bit_6;
bit_7:=(btn_bit_7_presionado==1)?1-bit_7:bit_7;
bit_8:=(btn_bit_8_presionado==1)?1-bit_8:bit_8;
// se asignan los valores de los bits a los botones asociados;
asignar_etiqueta(btn_bit_1,bit_1);
asignar_etiqueta(btn_bit_2,bit_2);
asignar_etiqueta(btn_bit_3,bit_3);
asignar_etiqueta(btn_bit_4,bit_4);
asignar_etiqueta(btn_bit_5,bit_5);
asignar_etiqueta(btn_bit_6,bit_6);
asignar_etiqueta(btn_bit_7,bit_7);
asignar_etiqueta(btn_bit_8,bit_8);
// se limpian las variables, para que se indique que ya no hay ningún botón presionado;
btn_bit_1_presionado:=0;
btn_bit_2_presionado:=0;
btn_bit_3_presionado:=0;
btn_bit_4_presionado:=0;
btn_bit_5_presionado:=0;
btn_bit_6_presionado:=0;
btn_bit_7_presionado:=0;
btn_bit_8_presionado:=0;
// se muestra el resultado en decimal;
asignar_etiqueta(btn_decimal,bit_1*1+bit_2*2+bit_3*4+bit_4*8+bit_5*16+bit_6*32+bit_7*64+bit_8*128);
S
// se cambia la escala para que se vean mejor los botones;
escala:=85;
// se crean los valores iniciales del byte;
bit_8:=0;
bit_7:=1;
bit_6:=1;
bit_5:=0;
bit_4:=1;
bit_3:=0;
bit_2:=1;
bit_1:=1;
// se crean los botones que representan los bits;
btn_bit_1:=crear_boton(3.5,1,1,1);
btn_bit_2:=crear_boton(2.5,1,1,1);
btn_bit_3:=crear_boton(1.5,1,1,1);
btn_bit_4:=crear_boton(0.5,1,1,1);
btn_bit_5:=crear_boton(-0.5,1,1,1);
btn_bit_6:=crear_boton(-1.5,1,1,1);
btn_bit_7:=crear_boton(-2.5,1,1,1);
btn_bit_8:=crear_boton(-3.5,1,1,1);
// se asigna la acción a los bits, para que al ser presionados cambien de cero a uno;
asignar_accion(btn_bit_1,'btn_bit_1_presionado:=1');
asignar_accion(btn_bit_2,'btn_bit_2_presionado:=1');
asignar_accion(btn_bit_3,'btn_bit_3_presionado:=1');
asignar_accion(btn_bit_4,'btn_bit_4_presionado:=1');
asignar_accion(btn_bit_5,'btn_bit_5_presionado:=1');
asignar_accion(btn_bit_6,'btn_bit_6_presionado:=1');
asignar_accion(btn_bit_7,'btn_bit_7_presionado:=1');
asignar_accion(btn_bit_8,'btn_bit_8_presionado:=1');
// se crea un boton para mostrar el valor decimal;
btn_decimal:=crear_boton(0,-1,8,1);
asignar_color(btn_decimal,blanco);
S