Board.KolibriOS.org
https://board.kolibrios.org/

FreePascal
https://board.kolibrios.org/viewtopic.php?f=33&t=1020
Page 7 of 7

Author:  Doczom [ Mon Apr 26, 2021 1:58 am ]
Post subject:  Re: FreePascal

Попытался скомпилить модуль test_web_unit.pp(самопальная реализация 74 сисфункции), такая же ошибка, но данный модуль 100% компилировался и работал при компиляторе 130518 (когда консоли не было)

Author:  Doczom [ Mon Apr 26, 2021 1:58 am ]
Post subject:  Re: FreePascal

Попытался скомпилить модуль test_web_unit.pp(самопальная реализация 74 сисфункции), такая же ошибка, но данный модуль 100% компилировался и работал при компиляторе 130518 (когда консоли не было)

Author:  bw [ Mon Apr 26, 2021 11:28 am ]
Post subject:  Re: FreePascal

doserr #153 это koserr #2 или koserr > #8.
К сожалению, сейчас не могу этим заниматься.
Инструкция по сборке есть в README.

p.s. Попробуй кросскомпиляцию из винды или линуха.

..bw

Author:  Doczom [ Mon May 03, 2021 7:00 pm ]
Post subject:  Re: FreePascal

а в RTL есть загрузчик библиотек?

Author:  bw [ Tue May 04, 2021 3:44 pm ]
Post subject:  Re: FreePascal

Загрузку DLL я не делал.
Вещь хорошая, но руки не дошли пока.

..bw

Author:  Doczom [ Sat May 08, 2021 12:01 am ]
Post subject:  Re: FreePascal

кстати, мелькала на форуме новость о новом формате исполняемых файлов .kx , неплохо бы было такое и в паскаль добавить может его будет проще из PE получать

Author:  bw [ Sat May 08, 2021 12:45 pm ]
Post subject:  Re: FreePascal

Ничего интересного я в этом формате не нашёл. Там вроде пару байт можно сэкономить, зачем-то.
Я искал в нём возможность работы с секциями (не COM-подобный формат, а EXE) и ресурсами (двоичные данные, которые загружаются опционально), но безуспешно.

..bw

Author:  Coldy [ Sat May 08, 2021 2:06 pm ]
Post subject:  Re: FreePascal

Привет!
Формат KX планируется другой.
Подробности особенностей развития формата тут http://board.kolibrios.org/viewtopic.php?f=2&t=4398&p=76561#p76561.
Например, будет единый формат таблицы импорта, чтобы загрузка и связывание библиотек проходили автоматически, а не с помощью колеса в каждом приложении. Это уже сейчас работает как описано в этом сообщении http://board.kolibrios.org/viewtopic.php?f=1&t=1839&start=75#p76483
Но в последнем комите я прикрутил расширение из своего заголовка KX к существующему MENUET01, но пока не работает автосборка.
Последние обсуждения по этой теме начиная с этого сообщения http://board.kolibrios.org/viewtopic.php?f=24&t=4391#p76580. В этом же сообщении по ссылке можно посмотреть формат нового заголовка KX.

Author:  Doczom [ Thu May 27, 2021 8:36 pm ]
Post subject:  Re: FreePascal

а чем является пример RAY.pp ? и можно ли на его основе сделать 3д игру или часть игры?

Author:  bw [ Fri May 28, 2021 12:13 am ]
Post subject:  Re: FreePascal

Не понял вопроса.
Это какая-то старая ДОСовская демка. У меня такого хлама накопилось прилично.
В оригинальном исходнике, есть такой комментарий в конце:
Code:
 SI> Sam

Bye !
                Alex

---
 * Origin: Love's Secret Domain Station (2:5025/32.13)

Игру можно сделать хоть из коробка спичек, но это вопрос не ко мне, к сожалению :-(.

..bw

Author:  Doczom [ Mon Jun 14, 2021 10:06 pm ]
Post subject:  Re: FreePascal

Hello, do you know why loading libraries migth not work?

Author:  Doczom [ Mon Jun 14, 2021 10:20 pm ]
Post subject:  Re: FreePascal

Попытался сделать загрузку console.obj
Что-то вроде работает, загрузка вроде прошла, но что-то потом идёт не по плану и прога падает.
Вопрос в следующем, может ли компилятор как-то неправильно работать с адресами?

код тестовой программы
Code:
{$mode objfpc}
{$smartlink on}
{$apptype gui}
uses test_crt;
begin
   if load_console(@test_crt.lib_name)<>-1 then begin
   start_console('Prived ');
   writeln('Medved');
   end
   else begin
        asm
          movl $63,%eax
          movl $1,%ebx
          movb $43,%cl
          int $0x40
        end;
     end;
end.


Извините за предыдущие сообщение, отправлял через нетсёрф в кос.
данный код компилировал старой вариацией компилятора, в которой не было консоли

Attachments:
test_crt.pp [6.82 KiB]
Downloaded 12 times

Author:  bw [ Tue Jul 20, 2021 9:11 am ]
Post subject:  Re: FreePascal

Извиняюсь за задержку.
Ошибки в твоём коде. Исправил парочку, с остальным сам справишься.
В модуле `test_crt` поставил ключ `{$H+}`, возможно не оптимальный вариант, но я не хотел заморачиваться со строками. Что он дает и чем отличаются `String`, `ShortString` и `AnsiString`, если не знаешь, найдёшь в официальной документации.

Attachments:
board-t1020-p76755.tar.bz2 [33.05 KiB]
Downloaded 2 times

Page 7 of 7 All times are UTC+03:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/