Курсовая работа: Разработка информационно-справочной системы "Устройство персонального компьютера"
BAR (100,100, 200, 200);
setfillstyle(1,8);
BAR (105,105,110,110);
BAR (190,105, 195,110);
setfillstyle(1,8);
BAR (130,100,170,140);
setfillstyle(1,15);
BAR (120,150,180,180);
line (130,155,170,155);
line (130,160,170,160);
line (130,165,170,165);
line (130,170,170,170);
outtextxy (120, 190,'SUMSUNG');
{------------------------РИСУЕМ CD----------------------------------------}
setBkcolor(10);
setcolor (15);
setfillstyle(1,6);
bar3D (0,460, 200,477,0,FALSE);
outtextxy (40,465,'ENTER-ВЫБРАТЬ');
bar3D (210,460,400,477,0,FALSE);
outtextxy (240,465,'ВВЕРХ-ДВИЖЕНИЕ ВВЕРХ');
bar3D (420,460,638,477,0,FALSE);
outtextxy (460,465,'ВНИЗ-ДВИЖЕНИЕ ВНИЗ');
SETLINESTYLE(SOLIDLN,0,3); {risuet liniu}
setcolor(12);
setfillstyle(9,14); {wablon zapolnenij i cvet}
bar3d(240, i,500, i+40,0,false); {risuem paralelepiped 1,2,3,4-koordinati; 0-glubina,fals-otobragenie grani}
setcolor(8); {cvet wrifta}
settextstyle(6,0,3); {vivod texsta; 4-kod wrifta; 0-kod napravlenij; 3-kod razmera}