Nowe posty

xx Dystrybucja pod HP Omen (6)
Wczoraj o 23:30:08
xx [Poradnik] Wyszukiwanie Sterowników (2)
Wczoraj o 21:08:23
lamp Problem z Linux Lite po instalacji (0)
Wczoraj o 19:50:30
xx Ile pingwinów? (1)
Wczoraj o 08:59:24
xx konfiguracja pale moon (0)
2024-03-24, 21:53:42
xx Plasma 6 w Neonie ssie trochę mniej ... (10)
2024-03-23, 02:38:11
xx problem z instalacja sterowników do karty sieciowej (3)
2024-03-18, 18:10:16
xx Plik abc.001 (1)
2024-03-17, 17:48:27
xx Zlecę dopracowanie programu w MatLab (0)
2024-03-13, 15:28:40
xx Linux Mint 21.3 XFCE brak dźwieku po paru minutach (karta muzyczna zintegrowana) (5)
2024-03-12, 23:07:01

Autor Wątek: graficzny instalator ati  (Przeczytany 4140 razy)

Arial

  • Gość
graficzny instalator ati
« dnia: 2005-09-16, 21:28:28 »
kod zrodlowy:
Program Earth(INPUT, OUTPUT, Plik);

TYPE

zapis = RECORD

Nazwa  : Integer;
Data   : REAL;
Gracz  : Integer;
END;

CONST

FileName = \\'/home/arial/pascal/text.txt\\';

VAR

Plik :TEXT;
zawartosc :STRING[80];
tekst     :INTEGER;  
P         :TEXT;
Nazwa     :INTEGER;
Data      :Real;
Gracz     :Integer;

PROCEDURE zapis (VAR Gracz :zapis; VAR P :SmallInt);
BEGIN
WITH Gracz DO
BEGIN
zapis.Nazwa := Nazwa;
zapis       := Data;
zapis       := Gracz;
END;
With zapis DO
Writeln (P, Nazwa:3, Data:20, Gracz:10)
END;  

BEGIN

ASSIGN (Plik, \\'/home/arial/pascal/text.txt\\');
REWRITE (Plik);
RESET (Plik);
Readln (Plik,zawartosc);
WRITELN (zawartosc);
Writeln (\\'wpisz nazwe:\\');
Readln  (Nazwa);
Writeln (\\'wpisz date :\\');
Readln  (Data);
Writeln (\\'wpisz nazwe gracza :\\');
Readln  (Gracz);
zapis(Plik, Nazwa, Data, Gracz)
END.

kompilator (free pascal kompiler) wywala error:
pr1.pas(26,17) Error: overloaded identifier \\"zapis\\" isn\\'t a function
pr1.pas(30,1) Error: Variable identifier expected
pr1.pas(31,1) Error: Variable identifier expected
pr1.pas(31,16) Error: Incompatible types: got \\"Double\\" expected \\"zapis\\"
pr1.pas(32,1) Error: Variable identifier expected
pr1.pas(32,16) Error: Incompatible types: got \\"SmallInt\\" expected \\"zapis\\"
pr1.pas(51,11) Fatal: Syntax error, \\")\\" expected but \\",\\" found
pr1.pas(51,11) Error: Compilation aborted
Error: /usr/bin/ppc386 returned an error exitcode (normal if you did not specifiy a source file to be compiled)

anarcho

  • Gość
graficzny instalator ati
« Odpowiedź #1 dnia: 2005-09-16, 21:42:53 »
nie mozesz miec tej samej nazwy rekordu i nazwy procedury \\"zapis\\".

Pozatym radze zacząć korzystać z kompilatora borlanda Kylix 3 Open cos jak Delphi Personal na windows.

Arial

  • Gość
graficzny instalator ati
« Odpowiedź #2 dnia: 2005-09-16, 21:59:15 »
2005-09-16 21:42:53 anarcho napisał:

> nie mozesz miec tej samej nazwy rekordu i nazwy procedury \\"zapis\\".
 >
 > Pozatym radze zacząć korzystać z kompilatora borlanda Kylix 3 Open cos jak Delphi Personal na
 > windows.

Dzx za pomoc i porady, ale naadal cos jest nie tak kod wyglada teraz tak:
Program Earth(INPUT, OUTPUT, Plik);

TYPE

zapis = RECORD

Nazwa  : Integer;
Data   : REAL;
Gracz  : Integer;
END;

CONST

FileName = \\'/home/arial/pascal/text.txt\\';

VAR

Plik :TEXT;
zawartosc :STRING[80];
tekst     :INTEGER;  
P         :TEXT;
Nazwa     :INTEGER;
Data      :Real;
Gracz     :Integer;

PROCEDURE zapisplk (VAR Gracz :Integer; VAR P :TEXT);
BEGIN
WITH Gracz DO
BEGIN
zapis.Nazwa := Nazwa;
zapis       := Data;
zapis       := Gracz;
END;
With zapis DO
Writeln (P, Nazwa:3, Data:20, Gracz:10)
END;  

BEGIN

ASSIGN (Plik, \\'/home/arial/pascal/text.txt\\');
REWRITE (Plik);
RESET (Plik);
Readln (Plik,zawartosc);
WRITELN (zawartosc);
Writeln (\\'wpisz nazwe:\\');
Readln  (Nazwa);
Writeln (\\'wpisz date :\\');
Readln  (Data);
Writeln (\\'wpisz nazwe gracza :\\');
Readln  (Gracz);
zapisplk(Plik, Nazwa, Data, Gracz)
END.

co tym razem lamer taki jak ja zrobil nie tak ?

Arial

  • Gość
graficzny instalator ati
« Odpowiedź #3 dnia: 2005-09-17, 10:34:17 »
uporzadkowalem troche kod, jest juz lepiej, ale nadal nie moge skompilowac :( od wyglada tak:

PROGRAM gracz(INPUT,OUTPUT,Plik);
TYPE
Rek_gracz = RECORD
nazwa     :STRING[20];
nazwa_plan:STRING[30];
END;
gracz = record
imie   :string[25];
nick   :string[15];
planeta:string[25];
END;
VAR
Plik   :TEXT;
gracze :gracz;
re_racz:Rek_gracz;
player :STRING[20]
planet :STRING[20]
PROCEDURE zapis (VAR F :TEXT; VAR P :TEXT;);
BEGIN
 WITH gracze DO
 BEGIN
re_racz.nazwa := nazwa;
re_racz.nazwa_plan := planeta;
END;
With re_racz DO
WRITELN (P, nazwa:nazwa, planeta:planeta);
END;
ASSIGN (Plik, \\'/home/arial/pascal/text.txt\\'); REWRITE (Plik);
BEGIN
Write (\\'podaj nazwe gracza:\\');
Readln(player);
Write (\\'podaj nazwe planety:\\');
Readln(planet);
zapis (Plik, player, planet)
END;
CLOSE (Plik);
END.

kompilator:

Compiling pr2.pas
pr2.pas(7,9) Error: Duplicate identifier \\"gracz\\"
pr2.pas(14,14) Fatal: Syntax error, \\".\\" expected but \\";\\" found
pr2.pas(14,14) Error: Compilation aborted
Error: /usr/bin/ppc386 returned an error exitcode (normal if you did not specifiy a source file to be compiled)

greg000

  • Gość
graficzny instalator ati
« Odpowiedź #4 dnia: 2005-09-17, 11:40:31 »
Czytasz wogole co ci kompilator za beldy podaje ?
Pisze przeciez np:
 > pr2.pas(7,9) Error: Duplicate identifier \\"gracz\\"
co oznacza ze masz dwa razy te sama nazwe zadeklarowana.
 Jezeli twoj program sie \\"gracz\\" nazywa to dlaczego pod ta sama nazwa deklarujesz zmienna, tak nie moze byc :)

Ponadto ma byc:

ROCEDURE zapis (VAR F :TEXT; VAR P :TEXT);
a nie  
ROCEDURE zapis (VAR F :TEXT; VAR P :TEXT;);
--
masz

 WITH gracze DO
BEGIN
re_racz.nazwa := nazwa;
re_racz.nazwa_plan := planeta;
END;

a nie zadeklarowales zmiennej \\"nazwa\\" w rekordzie \\"gracze\\"
--
masz

With re_racz DO
               WRITELN (P, nazwa:nazwa, planeta:planeta);
          END;

1. brak \\'begin\\' po \\'do\\'
2. \\'nazwa:nazwa\\' co to ma oznaczac bo zle zapisane,
3. to samo z \\'planeta:planeta\\'
moze mialy byc :

With re_racz DO
   begin
       WRITELN (P, \\'nazwa:\\',nazwa, \\'planeta:\\',planeta);
    end;

To narazie tyle co mi sie w oko rzucilo.

Pozdr

chmooreck

  • Gość
graficzny instalator ati
« Odpowiedź #5 dnia: 2005-09-17, 20:31:33 »
Arial czy ty na prawde myslisz, ze bedziemy ci tu debugowali twoje programy ?

matulik

  • Gość
graficzny instalator ati
« Odpowiedź #6 dnia: 2005-09-16, 20:40:26 »
witam. sciagnolem grafczny instalator do kart graficznych ati
(ati-driver-installer-8.16.20-i386.run). odpalam go (w x'ach) dwukliknieciem i zamiast instalatora uruchamia mi sie gedit i pisze ze nie moze otworzyc tego pliku (blebleble). jak wiec mam go wlaczyc?? OS SuSE 9.3 Gnome 2.10. pozdrawiam

Maciek_Rutecki

  • Gość
graficzny instalator ati
« Odpowiedź #7 dnia: 2005-09-16, 22:33:02 »
2005-09-16 20:40:26 matulik napisał:

> witam. sciagnolem grafczny instalator do kart graficznych ati
 > (ati-driver-installer-8.16.20-i386.run). odpalam go (w x'ach) dwukliknieciem i zamiast
 > instalatora uruchamia mi sie gedit i pisze ze nie moze otworzyc tego pliku (blebleble). jak
 > wiec mam go wlaczyc?? OS SuSE 9.3 Gnome 2.10. pozdrawiam
 >

Moze typ mime pliku jest skojarzony z Gedit? Uruchom go z konsoli ./ati-dri...... Ponadto nadaj prawa do uruchomienia (man chmod) jesli ich nie ma (moze sa tylko do odczytu).

--
Maciek

PS. Jakis miesiac temu pojawil sie post odnosnie ATI wraz z rozwiazaniem, poszukaj.