Results 1 to 3 of 3

Thread: Object Dtm Partially working?

  1. #1
    Join Date
    Dec 2011
    Posts
    733
    Mentioned
    2 Post(s)
    Quoted
    7 Post(s)

    Default Object Dtm Partially working?

    I have been begginning a Nat Running script, but been running into a strange error in the OBJDTM extension.

    Code:
    Error: Exception: "" is an invalid integer at line 810
    the script:

    Code:
    program new;
    {$DEFINE SMART}
    {$i srl/srl.simba}
    {$i ObjectDTM\ObjDTMInclude.simba}
    
    const
      debug = true;
    
    var AREA_GraahkTele,AREA_Altar,AREA_InAltar:String;
    procedure DeclarePlayers;
    begin
      HowManyPlayers := 1
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;
      with Players[0] do
      begin
        Name := '';
        Pass := '';
        Active := true;
        Member := true
      end;
    end;
    
    procedure debugText(words:String);
    begin
      if debug then writeln(words);
    end;
    
    procedure setAreas;
    begin
      //AREA_GraahkTele := '80:80:8:1:7:95:71:1:7:101:86:1:7:117:83:1:7:120:95:1:7:129:75:3:7:103:95:3:7:115:56:3:7:87:71:10:54:80:61:66:76:59:97:60:109:74:111:88:107:113:85:122:64:115:56:94';
      AREA_InAltar := '66:53:10:1:7:90:98:1:7:105:90:1:7:109:78:1:7:113:58:1:7:113:43:1:7:86:114:1:7:121:106:3:7:129:75:3:7:37:91:3:7:142:67';
    end;
    
    procedure walkToAltar;
    var
      DTMs:TStringArray;
      i:Integer;
    begin
          debugText('Walking to altar...');
          DTMs := ['135:61:5:1:7:90:83:1:7:105:78:1:7:51:71:2:7:75:119:3:7:102:52',
          '136:80:7:3:7:108:90:3:7:52:72:1:7:94:101:1:7:90:114:1:7:83:125:1:7:59:110:1:7:110:105',
          '141:83:6:1:7:70:62:1:7:66:78:1:7:66:94:1:7:117:53:1:7:98:53:1:7:97:45',
          '101:35:10:1:7:57:58:1:7:65:50:1:7:73:42:1:7:49:34:1:7:64:22:1:7:37:51:1:7:37:59:3:7:116:58:3:7:108:66:3:7:112:78',
          '134:61:6:1:7:119:69:1:7:82:49:1:7:58:91:3:7:101:107:3:7:93:116:3:7:97:128',
          '135:90:7:1:7:70:95:1:7:79:103:1:7:95:103:3:7:88:95:1:7:32:75:3:7:101:95:1:7:32:62',
          '107:111:9:3:7:105:66:3:7:92:74:3:7:96:91:3:7:80:58:3:7:75:37:1:7:66:87:1:7:71:108:1:7:79:116:1:7:41:100',
          '90:81:9:1:7:53:87:1:7:44:79:1:7:39:57:3:7:71:62:3:7:67:45:3:7:79:36:3:7:110:57:3:7:118:53:3:7:123:70'];
      for i:=0 to length(DTMs)-1 do
        ObjDTM_Walk(DTMs[i],20,150,40,true);
    end;
    
    procedure MouseAltar;
    var altarCols:TIntegerArray;
    x,y:integer;
    begin
      altarCols := [5242264,6280345,4976543];
      FindObjCustom(x,y,['nter', 'ltar'],altarCols,4);
      mouse(x,y,1,1,true);
      //wait till inside
      while not ObjDTM_Walk(AREA_InAltar,20,150,40,true) do wait(125+random(25));
    
    end;
    
    
    procedure CraftRunes;
    begin
      ObjDTM_Walk(AREA_InAltar,15,15,40,true);
    end;
    
    begin
    
      Smart_Members := true;
      Smart_Server := 100;
      Smart_Signed := false;
      Smart_SuperDetail := false;
    
      SetupSRL;
      LoadObjects;
    
      ClickNorth(SRL_ANGLE_HIGH);
      repeat
          //walkToAltar;
          MouseAltar;
          CraftRunes;
      until false;
    end.
    Anyone else had problems with ObjectDTM?

  2. #2
    Join Date
    Dec 2011
    Location
    Hyrule
    Posts
    8,662
    Mentioned
    179 Post(s)
    Quoted
    1870 Post(s)

    Default

    Quote Originally Posted by m34tcode View Post
    I have been begginning a Nat Running script, but been running into a strange error in the OBJDTM extension.

    Code:
    Error: Exception: "" is an invalid integer at line 810
    the script:

    Code:
    program new;
    {$DEFINE SMART}
    {$i srl/srl.simba}
    {$i ObjectDTM\ObjDTMInclude.simba}
    
    const
      debug = true;
    
    var AREA_GraahkTele,AREA_Altar,AREA_InAltar:String;
    procedure DeclarePlayers;
    begin
      HowManyPlayers := 1
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;
      with Players[0] do
      begin
        Name := '';
        Pass := '';
        Active := true;
        Member := true
      end;
    end;
    
    procedure debugText(words:String);
    begin
      if debug then writeln(words);
    end;
    
    procedure setAreas;
    begin
      //AREA_GraahkTele := '80:80:8:1:7:95:71:1:7:101:86:1:7:117:83:1:7:120:95:1:7:129:75:3:7:103:95:3:7:115:56:3:7:87:71:10:54:80:61:66:76:59:97:60:109:74:111:88:107:113:85:122:64:115:56:94';
      AREA_InAltar := '66:53:10:1:7:90:98:1:7:105:90:1:7:109:78:1:7:113:58:1:7:113:43:1:7:86:114:1:7:121:106:3:7:129:75:3:7:37:91:3:7:142:67';
    end;
    
    procedure walkToAltar;
    var
      DTMs:TStringArray;
      i:Integer;
    begin
          debugText('Walking to altar...');
          DTMs := ['135:61:5:1:7:90:83:1:7:105:78:1:7:51:71:2:7:75:119:3:7:102:52',
          '136:80:7:3:7:108:90:3:7:52:72:1:7:94:101:1:7:90:114:1:7:83:125:1:7:59:110:1:7:110:105',
          '141:83:6:1:7:70:62:1:7:66:78:1:7:66:94:1:7:117:53:1:7:98:53:1:7:97:45',
          '101:35:10:1:7:57:58:1:7:65:50:1:7:73:42:1:7:49:34:1:7:64:22:1:7:37:51:1:7:37:59:3:7:116:58:3:7:108:66:3:7:112:78',
          '134:61:6:1:7:119:69:1:7:82:49:1:7:58:91:3:7:101:107:3:7:93:116:3:7:97:128',
          '135:90:7:1:7:70:95:1:7:79:103:1:7:95:103:3:7:88:95:1:7:32:75:3:7:101:95:1:7:32:62',
          '107:111:9:3:7:105:66:3:7:92:74:3:7:96:91:3:7:80:58:3:7:75:37:1:7:66:87:1:7:71:108:1:7:79:116:1:7:41:100',
          '90:81:9:1:7:53:87:1:7:44:79:1:7:39:57:3:7:71:62:3:7:67:45:3:7:79:36:3:7:110:57:3:7:118:53:3:7:123:70'];
      for i:=0 to length(DTMs)-1 do
        ObjDTM_Walk(DTMs[i],20,150,40,true);
    end;
    
    procedure MouseAltar;
    var altarCols:TIntegerArray;
    x,y:integer;
    begin
      altarCols := [5242264,6280345,4976543];
      FindObjCustom(x,y,['nter', 'ltar'],altarCols,4);
      mouse(x,y,1,1,true);
      //wait till inside
      while not ObjDTM_Walk(AREA_InAltar,20,150,40,true) do wait(125+random(25));
    
    end;
    
    
    procedure CraftRunes;
    begin
      ObjDTM_Walk(AREA_InAltar,15,15,40,true);
    end;
    
    begin
    
      Smart_Members := true;
      Smart_Server := 100;
      Smart_Signed := false;
      Smart_SuperDetail := false;
    
      SetupSRL;
      LoadObjects;
    
      ClickNorth(SRL_ANGLE_HIGH);
      repeat
          //walkToAltar;
          MouseAltar;
          CraftRunes;
      until false;
    end.
    Anyone else had problems with ObjectDTM?
    When I made my nat script objdtm was more unreliable than sps. you can get sps to work pretty much full proof, although you should have a back up as well

  3. #3
    Join Date
    Dec 2011
    Posts
    733
    Mentioned
    2 Post(s)
    Quoted
    7 Post(s)

    Default

    The ObjBTM walking is actually very good. Ill try out SPS. Thanks

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •