『スタパライフ』エージェント Ver1.01 openstpl.r

   0:#include <awlib.h>
   1:
   2:int main()
   3:{
   4:    str url,mbox;
   5:    LEGDATA *leg;
   6:    str path;
   7:    char buffer[1024];
   8:    
   9:    path = getenv("DATA_DIR") + "\\stpl\\user.dat";
  10:    leg = leg_open(path, lmOpenRead);
  11:    if(leg) {
  12:        path = "/common";
  13:        leg_readstring(leg, path + "/url", buffer, 1024, "");
  14:        url = buffer;
  15:        leg_readstring(leg, path + "/mbox", buffer, 1024, "");
  16:        mbox = buffer;
  17:    }
  18:    leg_close(leg);
  19:    spawnl(P_NOWAIT, "browser\\unibrowser.pas", "browser\\unibrowser.pas", "-C","stpl\\stplpad.pas","-com","-R","stpl\\stplpad.pas","-re","-D","stpl","-P","stpl","-U",url,"-H",url,"-T","スタパライフ",mbox,NULL); return 0;
  20:}