Курсовая работа: Игровая программа

Menu_item:=1;

end;

if (xpos>-0.3)and(ypos>0.15)and

(xpos<0.3)and(ypos>0.15)and

(xpos<0.3)and(ypos<0.35)and

(xpos>-0.3)and(ypos<0.35)then begin

if Menu_item<>2 then

PlaySound('Sound\Select_MainMenu.wav',0,SND_ASYNC);

Menu_item:=2;

end;

if (xpos>-0.3)and(ypos>-0.1)and

(xpos<0.3)and(ypos>-0.1)and

(xpos<0.3)and(ypos<0.1)and

(xpos>-0.3)and(ypos<0.1)then begin

if Menu_item<>3 then

PlaySound('Sound\Select_MainMenu.wav',0,SND_ASYNC);

Menu_item:=3;

end;

if (xpos>-0.3)and(ypos>-0.5)and

(xpos<0.3)and(ypos>-0.5)and

(xpos<0.3)and(ypos<-0.3)and

(xpos>-0.3)and(ypos<-0.3)then begin

if Menu_item<>4 then

PlaySound('Sound\Select_MainMenu.wav',0,SND_ASYNC);

Menu_item:=4;

end;

{if Selected_Menu_item='Start' then

begin

if

К-во Просмотров: 921
Бесплатно скачать Курсовая работа: Игровая программа