Algoritimlash va dasturlash tillari

Rangni boshqarish

Belgilarni o’chib-yonishi, fon, yoritish intensivligi
Matnli rejimlarda ishlashda rangli displey ekranida chiqayotgan belgilar 16 (0-15) ta ranglardan birortasini qabul qilishi mumkin. Ekran foni 8 (0-7) ta rangdan birortasini qabul qilishi mumkin. Belgilar rangini o’rnatish uchun TextColor , fon uchun esa TextBackGround protseduralari xizmat kiladi.
Belgilarni o’chib-yonishini tashkillash imkniyati xam mavjud..
Monoxrom displeylar bilan ishlashda faqat ikkita qora va oq ranglardan foydalanish mumkin, lekin Turbo Pascal tilida belgilarni ekranga chiqarish uchun qo’shimcha imkoniyatlar mavjud:
begilar yoritish intensivligi bilan farqlanishi mumkin;
Oq randagi belgilar qora fo’nga , yoki teskarisi bo’lishi mumkin;
belgilarni ekranda yoritilish intensivligi ko’tarilib- pasayib turishi mumkin (bunga belgilarni o’chib-yonish xususiyati deyiladi).
80x25 o’lchovli matn rejimi ekranga 2000 (80*25 = 2000) ta belgini chiqarish imkoniyatiga ega. Xar bitta belgi uchun xotirada 2 bayt joy ajratiladi:
1 tasi begining o’zi uchun va
1 tasi belgining rang atributi uchun.
Shunga ko’ra, ekran buferining umumiy xotirasi 2000*2=4000 bayt bo’ladi. Amalda bu kiymat (adres qulayligi uchun) 4096 bayt = 4 Kbayt ga teng.
Simvollar va fonlar diapazoni mosligiga ko’ra , standart protseduralarning qiymat parametrlari quyidagicha o’rnatiladi:

TextColor(Color:byte) - chiqayotgan belgilar rangini o’rnatadi;

TextBackGround(Color:byte) - fon rangini o’rnatadi.

Parametrlar qiymati konstantalar bilan (masalan, Yellow,Red ) yoki ularning son qiymatlari bilan berilishi mumkin.

Misol.
TextColor(Yellow);
TextBackGround(Red);
Write('Kizil fonda sarik rang');
Reversiv tasvirlarni xam ekranga chiqarish mumkin, buning uchun fon rangi bilan belgi rangi o’rnini almashtirish zarur. Yuqoridagi keltirilgan misol uchun reversiv tasvir quyidagi komandalar orqali teriladi: