Блок управления для системы кодового контроля с возможностью внутреннего соединения абонентов, страница 8

Если цвет Shape2 красный, то к значению адреса прибавляется цифра два и меняется значение в окне Edit1. Если после нажатия мышью цвет Shape2 не красный то от значения адреса отнимается двойка и меняется значение в окне Edit1. После изменения значений в окне Edit1 проверяется нажатие кнопки мыши над Shape3. Если кнопка мыши не была нажата над Shape2, то сразу проверяется клик мыши над Shape3.

Если цвет Shape3 красный, то к значению адреса прибавляется цифра четыре и меняется значение в окне Edit1. Если после нажатия мышью цвет Shape3 не красный то от значения адреса отнимается четверка и меняется значение в   окне   Edit1.   После изменения значений в окне Edit1 проверяется нажатие кнопки мыши над Shape4. Если кнопка мыши не была нажата над Shape3, то сразу проверяется клик мыши над Shape4.

Если цвет Shape4 красный, то к значению адреса прибавляется цифра восемь и меняется значение в окне Edit1. Если после нажатия мышью цвет Shape4 не красный то от значения адреса отнимается восемь и меняется значение в окне Edit1. После изменения значений в окне Edit1 проверяется нажатие кнопки мыши над Shape5. Если кнопка мыши не была нажата над Shape4, то сразу проверяется клик мыши над Shape5.

Если цвет Shape5 красный, то к значению адреса прибавляется цифра шестнадцать и меняется значение в окне Edit1. Если после нажатия мышью цвет Shape5 не красный то от значения адреса отнимается шестнадцать и меняется значение в окне Edit1. После изменения значений в окне Edit1 проверяется нажатие кнопки мыши над Shape6. Если кнопка мыши не была нажата над Shape5, то сразу проверяется клик мыши над Shape6.

Если цвет Shape6 красный, то к значению адреса прибавляется цифра тридцать два и меняется значение в окне Edit1. Если после нажатия мышью цвет Shape6 не красный, то от значения адреса отнимается тридцать два и меняется значение в окне Edit1. После изменения значений в окне Edit1 проверяется нажатие кнопки мыши над Shape7. Если кнопка мыши не была нажата над Shape6, то сразу проверяется клик мыши над Shape7.

Если цвет Shape7 красный, то к значению адреса прибавляется цифра шестьдесят четыре и меняется значение в окне Edit1. Если после нажатия мышью цвет Shape7 не красный, то от значения адреса отнимается шестьдесят четыре и меняется значение в окне Edit1. После изменения значений   в   окне   Edil1 проверяется нажатие кнопки мыши над Shape8. Есликнопка мыши не быланажата над Shape7, тосразу проверяется клик мыши над Shape8.

Если цвет Shape8 красный, то к значению адреса прибавляется цифра сто двадцать восемь и меняется значение в окне Edit1. Если после нажатия мышью цвет Shape8 не красный, то от значения адреса отнимается сто двадцать восемь и меняется значение в окне Edit1. После изменения значений в окне Edit1 проверяется нажатие кнопки мыши над Shape9. Если кнопка мыши не была нажата над Shape8, то сразу проверяется клик мыши над Shape9.

Если цвет Shape9 красный, то к значению адреса прибавляется цифра двести пятьдесят шесть и меняется значение в окне Edit. Если после нажатия мышью цвет Shape9 не красный, то от значения адреса отнимается двести пятьдесят шесть и меняется значение в окне Edit1. После изменения значений в окне Edit1 проверяется нажатие кнопки мыши над Shape10. Если кнопка мыши не была нажата над Shape9, то сразу проверяется клик мыши над Shape10.

Если цвет Shape10 красный, то к значению адреса прибавляется цифра 512 (пятьсот двенадцать) и меняется значение в окне Edit1. Если после нажатия мышью цвет Shape10 не красный, то от значения адреса отнимается пятьсот двенадцать и меняется значение в окне Edit1. После изменения значений в окне Edit1 проверяется нажатие кнопки мыши над Shape11. Если кнопка мыши не была нажата над Shape10, то сразу проверяется клик мыши над Shape11.

Если цвет Shape11 красный, то к значению адреса прибавляется цифра 2048 (две тысячи сорок восемь) и меняется значение в окне Edit1. Если после нажатия мышью цвет Shape11 не красный, то от значения адреса отнимается пятьсот двенадцать и меняется значение в окне Edit1. После изменения значений в окне   Edit1 проверяется нажатие кнопки мыши над Shape12. Если кнопка мыши не была нажата над Shape11, то сразу проверяется клик мыши над Shape12.