Вот скрипт get_text:

//Скрипт вытащил из справки)) А потом переделал...

//И тем не менее by zxc76 )))
site=argument0;
site_sl=argument1;

sockId = dll39_tcp_connect(site,80,0);
if (!sockId)

show_message("Не реал подключится к"+string(site));

dll39_set_format(sockId,dll39_format_text,chr(13) + chr(10));

newLine = chr(13) + chr(10);
dll39_buffer_clear(0);
dll39_write_chars("GET "+site_sl+" HTTP/1.0" + newLine,0);
dll39_write_chars("Host: "+site + newLine,0);
dll39_message_send(sockId,0,0,0);
processHeader = true;
while(processHeader)
{
dll39_message_receive(sockId,0,0);
firstWord = dll39_read_sep(newLine,0);
switch(firstWord)
{
case "": //blank line
processHeader = false;
break;

//read important stuff from header...
}
}

dll39_set_format(sockId,dll39_format_none,'');
retVal = "";
while(1)
{
size = dll39_message_receive(sockId,6000,0);
if(size > 0)
retVal += dll39_read_chars(size,0);
else break;
}
dll39_socket_close(sockId);
return retVal;

Применение:

вот например, сейчас вытащим содержимое вот этой страницы:

http://epi.webservis.ru/into.txt

ставим в степ:

if(keyboard_check_pressed(vk_enter)){//при нажатие Enter
text=geta_texta("epi.webservis.ru"/into.txt");

show_message(text);
}