Скажите можно ли в паскаль вставить какую-нибудь картинку.
Без каких-либо сторонних модулей?
var
Screen: array [0..199, 0..319] of byte absolute $A000:$0000;
begin
asm
mov ax, $13
int $10
mov startmode, al
end;
{ура, инициировали графику}
Screen[24, 128] := 15; {закрасили белым пиксел с координатами 128,24}
{что-то ещё делаем}
asm
mov ah, 0
mov al, [startmode]
int $10
end;
{сворачиваем графику в конце работы}