Skocz do zawartości

problem z grą w Pascalu


pager

Rekomendowane odpowiedzi

mam taki problem. Umiem i wyczailem jak zrobic, aby "hero" chodzil. Teraz chce aby spadaly na niego bomby( z samej gory, czyli y=1, z losowo wybranego miejsca x). Od paru dni sie mecze i nic z tego. Syf,kiła i mogiła ;P

Probowalem z komendami random i itd. Dlatego prosze o pomoc. z gory dziex.

Oto kod samego poruszania sie "hero".

 

uses crt;
var x,y:byte;
c:char;
i:integer;

begin
x:=40;
y:=24;
clrscr;
gotoxy(40,24);
write('|-O-|');
repeat
c:=readkey;
if byte(c)=0 then

begin
c:= readkey;
case byte(c) of
75:x:= x-1 ;
77:x:= x+1;
end;

clrscr;
if x=1 then writeln('koniec');
if x=76 then writeln('koniec');
end;
begin
gotoxy(x,y);
write('|-O-|');
end;

if c=#27
then halt;
until 1=0;
begin
end;
end.

Odnośnik do komentarza
Udostępnij na innych stronach

Jak nie umiesz zrobić pętli to po co zabierasz się za grę w pascalu :P ? Zresztą, najłatwiej ci będzie jak zrobisz parę procedur: jedną do poruszania postacią, drugą do spadania bomby i je zapętlisz w while czy tam repeat. Wtedy bomba i tak będzie spadać, a ty będziesz za każdym razem dodawać do tej wartości Y w gotoxy(); a tamtą powinieneś zamalowywać na czarno, lub co każdy ruch powinieneś ekran czyścić. Nie chce mi się robić ci przykładu za bardzo, bo nie dość, że to trochę pracochłonne, to na dodatek, zrobię ci wtedy 4/5 gry ;p .

Odnośnik do komentarza
Udostępnij na innych stronach

Jeśli chcesz dodać odpowiedź, zaloguj się lub zarejestruj nowe konto

Jedynie zarejestrowani użytkownicy mogą komentować zawartość tej strony.

Zarejestruj nowe konto

Załóż nowe konto. To bardzo proste!

Zarejestruj się

Zaloguj się

Posiadasz już konto? Zaloguj się poniżej.

Zaloguj się
  • Ostatnio przeglądający   0 użytkowników

    • Brak zarejestrowanych użytkowników przeglądających tę stronę.
×
×
  • Dodaj nową pozycję...