XProfan

cls
long hHBox=create("htmlWin",hWnd,"",6,,,width(hwnd),height(hwnd))
htmlWin("navigate",hHBox,"https://xprofan.de")
waitInput
end

proc __xpse__endofprogram__

    PARAMETERS exitcode&
    REM {{SOMEEXTRAENDCOMMAND}}
    case %pcount=1 : end exitcode&
    end

endproc

CLS
var HHBOX&=CREATE("htmlWin",%HWND,"",6,0,0,WIDTH(%HWND),HEIGHT(%HWND))
HTMLWIN("navigate",HHBOX&,"https://xprofan.de")
WAITINPUT
__xpse__endofprogram__