dllfunction GSTNet_effect(functionname, number, &position, &speed);

function GSTNet_effect(functionname, var* number, var* position, var* speed);

PLUGINDIR = ".";
BIND "GSTNet.dll";

#include <acknex.h>

var sResult;

STRING* sGSTNet_HTTPResult[100000]; // allocate memory for results
STRING* sHostname;
STRING* sPath;

//------------------------------------------------------------------
// helper functions
//------------------------------------------------------------------
function GSTNet_HTTPGet(STRING* sHostname, STRING* sPath, STRING* sResult); // returns a requested page
function GSTNet_HTTPBusy(); // returns != 0 if a httprequest is busy

function http()
{
  //var sResult;
  sResult = str_create("#100000");
  GSTNet_HTTPGet("www.nixip.com","/index.php",sResult);

  while(GSTNet_HTTPBusy()){wait(1);}
  diag(sResult);
  str_remove(sResult);
}

//------------------------------------------------------------------
// test panel
//------------------------------------------------------------------
PANEL* GSTNet_panel =
{
	digits(25,25,4,*,1,sResult);
	flags = VISIBLE;
}

function main()
{
	level_load("");
	wait(1);
	on_h=http;
}

Quote:

---

HTTPGet:CallbackGET /index.php HTTP/1.0
Host: www.gstools.de
Connection: close

HTTPRequest:Received 256 bytes
HTTPRequest:Received 512 bytes
HTTPRequest:Received 768 bytes...
Normal exit

---

#include <acknex.h>

STRING* sHostname;
STRING* sPath;
STRING* sResult;
STRING* sTempHost = "Waiting.. Press 'H' key!";

//------------------------------------------------------------------
// helper functions
//------------------------------------------------------------------
function GSTNet_HTTPGet(STRING* sHostname, STRING* sPath, STRING* sResult); // returns a requested page
function GSTNet_HTTPBusy(); // returns != 0 if a http request is busy

function http()
{
  sHostname = str_create("www.gstools.de");
  sPath = str_create("/index.php");
  sResult = str_create("#100000");
  
  GSTNet_HTTPGet(sHostname,sPath,sResult);
  while(GSTNet_HTTPBusy()){wait(1);}
  
  str_cpy(sTempHost," ");
  str_cpy(sTempHost,sHostname);
  
  diag(sResult);
  str_remove(sResult);
  
}

TEXT* GSTNet_debugtxt =
{
	layer=1;
	pos_x = 10;
	pos_y = 10;
	string = ("Hostname:", sTempHost);
	flags=VISIBLE;
}

function main()
{
	level_load("");
	wait(1);
	on_h=http;
}