GetHTTPPage is not supposed to redirect, because it just gets a page. You can't compare it to browser, which has heavy libraries to handle all http-request headers.
But you can do...
Simba Code:
program new;
function GetHTTPPage2( client:integer; page:string) : string;
var
re :TRegExpr;
header : string;
pos:integer;
begin
Result := GetHTTPPage(client,page);
header := GetRawHeaders(client);
re.Init();
re.setExpression('Location: ');
if re.Exec(header) then
begin
pos := re.getMatchPos(0)+length(re.getExpression);
re.setExpression('\S+');
if re.ExecPos(pos) then
begin
writeln(re.getMatch(0) );
Result := GetHTTPPage(client, re.getMatch(0));
end else
writeln('GetHTTPPage2: Spaces in url ?!');
end;
end;
var c:integer;
begin
c := InitializeHTTPClient(true);
writeln( GetHTTPPage2(c,'https://www.powerbot.org/community/user/446368-/') );
end.
My Simba doesn't work with https, so I'm getting blank page anyway.