Witam, chciałem dodać do swojej konsolowej gry wczytywanie postaci.
Napotkał mnie jednak problem z konwersją danych, gdy sprawdzałem samą konwersje to działało,
jednak po dodaniu jej do kodu, program gdy ma konwertować licznby wysypuje się.
Sprawdzałem również na samych liczbach i jest tak samo.
begin
clrscr;
x:=0;
assign(plik,'C:\p\ustawienia.txt');
reset(plik);
while not eof(plik) do
begin
read(plik,ustawienia);
if x=0 then
begin
y:=(Byte(ustawienia[0]));
imie:= Copy(ustawienia, 6, y);
end;
if x=1 then
begin
y:=(Byte(ustawienia[0]));
silas:= copy(ustawienia, 6, y);
val(silas, sila, xx);
end;
inc(x);
end;
close(plik);
end;
plik TXT wygląda tak
nick Michal
sila 3
Pozdrawiam,
Michalk001