Turbo Pascal
 
Szukanie zaawansowane
   
 
Home Rejestracja FAQ Użytkownicy Grupy Galerie  
 
 


Forum Turbo Pascal Strona Główna Pytania Monopol
Wyświetl posty z ostatnich:   
       
Napisz nowy temat  Odpowiedz do tematu Idź do strony Poprzedni  1, 2, 3

Wto 19:05, 25 Kwi 2006
Autor Wiadomość
rafael
Administrator



Dołączył: 07 Lut 2006
Posty: 72
Przeczytał: 0 tematów

Ostrzeżeń: 0/3
Skąd: Pszczyna

Temat postu:

Można wstawiać tylko klamrowe { tekst }. A istredd` zastosował taki komentarz: // , który nie jest dostępny w programie TURBO PASCAL firmy BORLAND.

Post został pochwalony 0 razy
 
Zobacz profil autora
      Do góry  
Pon 17:29, 15 Maj 2006
Autor Wiadomość
Matylda
Początkujący



Dołączył: 01 Kwi 2006
Posty: 7
Przeczytał: 0 tematów

Ostrzeżeń: 0/3
Skąd: Sejny

Temat postu:

Hejka!!
To znowu ja niestety... Wielkie dzięki za pomoc. Informatyk "chciałby", żeby to zapisać prościej, np. nie używając typu record i wszystko zapisać prostszymi funkcjami i pętlami. Nie wiem o co mu chodzi... :)
I jakbyście mieli ochotę napisania mi dalszej części programiku... :) A przynajmniej grafiki. Za 2-3 tygodnie muszę mieć gotowy program...
Jeszcze raz dzięki.
Pozdrawiam,
Matylda


Post został pochwalony 0 razy
 
Zobacz profil autora
      Do góry  

Śro 14:59, 17 Maj 2006
Autor Wiadomość
Arnvald
Początkujący



Dołączył: 23 Mar 2006
Posty: 5
Przeczytał: 0 tematów

Ostrzeżeń: 0/3

Temat postu:

Prościej się nie da. Ja robię obecnie monopol w Delphi i jakbym chciał to zrobić prościej niż robię, to fakt, byłyby same funkcje i pętle, ale pisałbym kilkadziesiąt razy więcej kodu...

Post został pochwalony 0 razy
 
Zobacz profil autora
      Do góry  

Nie 16:02, 21 Maj 2006
Autor Wiadomość
Matylda
Początkujący



Dołączył: 01 Kwi 2006
Posty: 7
Przeczytał: 0 tematów

Ostrzeżeń: 0/3
Skąd: Sejny

Temat postu:

Więc proszę tylko o narysowanie planszy, bo nie wiem jak to zrobić... :(

Post został pochwalony 0 razy
 
Zobacz profil autora
      Do góry  

Śro 0:22, 24 Maj 2006
Autor Wiadomość
PoOm
Początkujący



Dołączył: 23 Maj 2006
Posty: 15
Przeczytał: 0 tematów

Ostrzeżeń: 2/3
Skąd: Thousand thousand miles away..

Temat postu:

zaden normalny informatyk nie zadaje do napisania gier trudniejszych od
"kości" dla licealistów.

a tu pare porad:

INICJALIZACJA TRYBU GRAFICZNEGO
Kopiujesz ta procedurke do programu oraz WPISUJESZ
po slowie kluczowym Uses Graph, pozostale biblioteki.

Kod:

procedure SetGraphMode;
var Sterownik,
    Tryb     :integer;
begin
     Sterownik := Detect;
     InitGraph(Sterownik,Tryb,'BGI');
     GRAPH_ON:=TRUE;
end;{SetGraphMode}


Closegraph <- Standardowa procedura zamkajaca tryb graficzny

Ustawienie koloru:
SetColor(Color);
Np: Setcolor(Red);


Rysowanie:
Line(x1,y1,x2,y2); <-rysowanie linji

Majac te 2 procedury mozna narysowac wszystko....
aby cos wyczyscic to maźnij to na czarno....
(unikniesz efektu migania)....

mozna rowniez wyswietlic jakis tekxt: Outtextxy(x,y,'Text');


Post został pochwalony 0 razy
 
Zobacz profil autora
      Do góry  

Śro 22:34, 31 Maj 2006
Autor Wiadomość
Matylda
Początkujący



Dołączył: 01 Kwi 2006
Posty: 7
Przeczytał: 0 tematów

Ostrzeżeń: 0/3
Skąd: Sejny

Temat postu:

Próbuje zrobić kontrolę blędów przy wpisywaniu danych do tego mojego nieszczęsnego Monopolu...

var
x,y,c,i : integer;
twins : boolean;
player : pl;
ile = array[2..4] of integer;

begin
write ('Podaj ilosc graczy bioracych udzial w grze:');
readln(ile);
if ile > 4 then writeln ('Podaj wlasciwa liczbe graczy - od 2 do 4');
else
for i := 1 to ile do begin
clrscr;
write (gracz',i,'.Podaj imie:');
readln(player[i].imie);
player[i].kasa := 5000;
player[i].lok := 0;
end;
clrscr;
writeln('Jest ',ile,'graczy:');
for i := 1 to ile do
writeln(' - ',player[i].imie);
Writeln('Kazdy gracz otrzymuje 5 000 $');
Writeln('');
Writeln('');
Writeln('Kazdy gracz bedzie losowal ilosc pol, o ktore sie przesunie');
players := ile;
readkey;

...ale oczywiście nie kompiluje i próbuję, ale nie wiem o co chodzi. Muszę zrobić też "planszę w domyśle" w module tekstowym o polach typy record. A także poruszanie się graczy po takiej planszy i kupowanie przez nich pól. Informatyk powiedział, że to proste, ale z książką "Pascal dla początkujących" w ręku tego na pewno nie zrobię...

Jeśli ktoś ma ochotę niech napisze mi monopol w grafice prostymi komendami albo jakikolwiek... Jestem zdesperowana... Blue_Light_Colorz_PDT_13


Post został pochwalony 0 razy
 
Zobacz profil autora
      Do góry  

Nie 22:24, 17 Wrz 2006
Autor Wiadomość
Lord Nozaki
Początkujący



Dołączył: 01 Wrz 2006
Posty: 2
Przeczytał: 0 tematów

Ostrzeżeń: 0/3

Temat postu:

Dopiero się zalogowałem na forum. Jak poszło Matylda z tym zaliczeniem?
Masz to już może z głowy czy problem nadal aktualny?

Dla mnie ten informatyk to jakiś psychol. Quake też można napisać... tylko po co ? A tego w TP się raczej nie pisze.


Post został pochwalony 0 razy
 
Zobacz profil autora
      Do góry  
Napisz nowy temat  Odpowiedz do tematu Idź do strony Poprzedni  1, 2, 3

 
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach


      Do góry  

Strona 3 z 3
Idź do strony Poprzedni  1, 2, 3
Skocz do:  
fora.pl - załóż własne forum dyskusyjne za darmo
Powered by phpBB © 2001, 2002 phpBB Group
Avalanche style by What Is Real © 2004
             
Regulamin