ф > Colours $ф Test VDU driver COLOUR support : (6A%=0:X%=1:os%=((є&FFF4)Ђ&FF00)Ѓ256:noBGD%=(os%=28) 25з os%<8 Њ setFL%=8:setBR%=16 ‹ setFL%=16:setBR%=8 <220:M$="||" Fз —M$<>124:яM$ PM$=БM$,2):о … ‡ Z: dг M%=-1 ё 127:з M%=0:л 128 n&з M%>=0:п 22,128+M%:я M$+Г(128+M%) x@с ''Ѕ8;:W%=±+1:SM%=W%<32 Ђ W%>1:WD%=31+16*SM%:з ±:с'Ѕ11;Ѕ11; ‚EA$="MODE "+ГM%+" "+А"- &"+В"0"+Г~(M% Ђ -8),2)+"+"+Г(M% Ђ 7),M%>7) Њ!з M%>=0:с ‰(WD%/2-©A$/2+1);A$ –г rgb%=0 ё 31 0)-setFL%*((rgb%Ђ16)<>0) Є%з noBGD%:ы C% ‹ ы C% ‚ 7:ы 128+C% ґ*с Б" "+В"0"+ГC%,2)+" ",1-SM%,4+2*SM%); ѕ%з (C% Ђ 7)=7:ы 128:ы 7:з SM%:с Ѕ8 ИPз (C% Ђ 7)=7:з W%>39:з rgb%>7:с " ";Б"BrightFlash Br+Fl ",(rgb% Ѓ 8)*6-5,6); Тз (C% Ђ 7)=7:с Ѕ8 Ьн:г C%=32 ё 127 ж&ы C% Ђ 7:з noBGD%=0:ы 135-(C% Ђ 7) рз C%<>127:п C% ‹ п 32 ъз (C% Ђ WD%)=WD%:ы 128:с Ѕ8 н:г C%=0 ё 31 *з (C% Ђ 7)=0:ч:з SM%:г B%=1 ё 8:у A$:н %з noBGD%:ы C% ‹ ы C% ‚ 7:ы 128+C% " у A$:сA$; ,з (C% Ђ 7)=7:ы 128:с Ѕ8 6н:з M%>=0:п 20 ‹ ы 128:ы 7 @)A$=" G R A Y S C A L E " Jз SM%:A$=" GRAY SCALE " TB%=(WD%+1)/4:г A%=0 ё 3 ^7з noBGD%=0:ы 7-(A%Ђ2)*3.5:ы 128+(A%Ђ1)*8+(A%Ђ2)*3.5 hDз noBGD%=0:с БA$,A%*B%+1,(WD%+1)/8);БA$,A%*B%+B%/2+1,(WD%+1)/8); rн:з noBGD%=0:ы 128:ы 7:с |;з SM%:з noBGD%=0:с"Backgd should be"Ѕ8'" named colour" †jз ¬ SM%:с ‰2"Where 8+ colours supported,"'А"backg'nd",noBGD%=0);‰(noBGD%Ђ3);" should be named colour." ђ]з ¬ SM%:з M%>=0:с ‰3"If COLOUR &C0+n supported,"'‰3"border should be colour ";M% Ђ 31;"." љ0з SM%:з M%>=0:с "Border colour=";M% Ђ 31;"." ¤з M%>=0:ы 192+M%:ы 128 ®Gз M%=7:с'" If supported this should be teletext"'Ѕ147;Д38,",")'‰2; ё^з M%=7:г C%=1 ё 7:с Ѕ(128+C%);Б"RED GRN YELWBLUEMGNTCYANWHTE",C%*4-3,4);:н:с'Ѕ149;Д38,",") ВхэҐ<33:з M%=31:M%=95 Мн Ц-Ь Black,Red,Grn,Yel,Blue,Magen,Cyan,White аЬ Bk,Rd,Gn,Yl,Bl,Mg,Cy,Wt я