[Piligrim]

К сожалению полный пример не сохранился, но получается что-то похожее:

program Http;
uses web;
begin
	if web.open('http://tut.by')=-1 then
		debug('1');
	debug(web.get_name(0));
	debug(web.get_name(1));
	debug(web.get_name(2));
	drawText('Hello world!', 0, 0);
	repaint;	
	delay(2000);
end.