if d=CGA then SetGraphMode (о);
алып тастасақ, осы адаптермен жабдықталған компьютер экра-нына бірдей екі тікбұрыш салынады. Себебі,
SetFUlPattern (patt2,2);
операторында ағымдағы режим үшін мүмкін емес түс коды жазылған, сондықтан оператор орындалмайды. Бұл айтылғандар SetFillStyle процедурасына қатысты емес. Бұл процедураның Fill параметрі 0 мен 11 диапазонындағы мəндерді қабылдайды:программа CGA – адаптерінің жоғарғы режимінде де дұрыс жұмыс істейтін болады, фон түсінен басқа палитра түстері ақ түске ауыстырылады.
GetFillPatternпроцедурасы SetFillPattern процедурасы орнатқан толтыру үлгісін қайтарады. Тақырыбы: