Results 1 to 12 of 12

Thread: script laags!!

  1. #1
    Join Date
    Aug 2008
    Location
    !!LOL!!
    Posts
    247
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default script laags!!

    SCAR Code:
    program HACKNCRACK1;
    {.include srl/srl.scar}
    var
      TroutDTM,SalmonDTM,i,x,y: Integer;
      DTMsLoaded : boolean;

    procedure LoadDTMS;
    begin
      if not DTMsLoaded then
      begin
        SalmonDTM := DTMFromString('78DA639CC6C4C0F09C010C982114C3AE8A6C0' +
           '61120CD08C4FF8180B103A8E61D031A60442281F442A09A1B04D4' +
           '2C01AAB94F40CD3422EC02A9B9835F0D00742D0EB3');
        TroutDTM := DTMFromString('78DA639CC6C4C0F09C0105ECDDBC89811F483' +
           '302F17F20605C08547383010D30229140BA03A8E61D0135D3816A' +
           'DE12500372CF1DFC6A00B39B0DA8');
        DTMsLoaded := true;
      end;
    end;

    procedure freeing;
    begin
    if DTMsLoaded then
    FreeDTM(TroutDTM);
    FreeDTM(SalmonDTM);
    end;

    procedure dropping;
    begin
      for i := 3 to 28 do
        dropitem(i);
    end;

    procedure checkfortrouts;
    begin
      repeat
       if findDTM(TroutDTM,x,y,MIx1,MIy1,MIx2,MIy2) then
        begin
         Mouse(x, y, 5, 5, false);
         isuptext('out');
         Wait(50 + Random(50));
         ChooseOption('rop');
        end;
      until (findDTM(TroutDTM,x,y,MIx1,MIy1,MIx2,MIy2) or loggedin = false);
    end;

    procedure checkforsalmons;
    begin
      repeat
       if findDTM(SalmonDTM,x,y,MIx1,MIy1,MIx2,MIy2) then
        begin
         Mouse(x, y, 5, 5, false);
         Wait(50 + Random(50));
         ChooseOption('rop');
        end;
      until (findDTM(SalmonDTM,x,y,MIx1,MIy1,MIx2,MIy2) or loggedin = false);
    end;

    procedure mainloop;
     begin
      cleardebug;
      setupsrl;
      activateclient;
     end;

    begin
      mainloop;
      LoadDTMS;
      dropping;
      checkfortrouts;
      wait(150+random(50));
      checkforsalmons; <---here the script laags and doesnt stop laaging plz help!!
      freeing;
    end.

  2. #2
    Join Date
    Oct 2008
    Location
    behind you!
    Posts
    1,688
    Mentioned
    2 Post(s)
    Quoted
    40 Post(s)

    Default

    change checkforsalmons to this :

    SCAR Code:
    procedure checkforsalmons;
    begin
      repeat
        Wait(200);
        if findDTM(SalmonDTM, x, y, MIx1, MIy1, MIx2, MIy2) then
        begin
          Mouse(x, y, 5, 5, false);
          Wait(50 + Random(50));
          ChooseOption('rop');
        end;
      until (findDTM(SalmonDTM,x,y,MIx1,MIy1,MIx2,MIy2) or (not LoggedIn));
    end;
    Hi

  3. #3
    Join Date
    May 2008
    Posts
    1,345
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Also, add a Wait(1); in there.

    ~Sandstorm

  4. #4
    Join Date
    Aug 2008
    Location
    !!LOL!!
    Posts
    247
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Tickyy View Post
    change checkforsalmons to this :

    SCAR Code:
    procedure checkforsalmons;
    begin
      repeat
        Wait(200);
        if findDTM(SalmonDTM, x, y, MIx1, MIy1, MIx2, MIy2) then
        begin
          Mouse(x, y, 5, 5, false);
          Wait(50 + Random(50));
          ChooseOption('rop');
        end;
      until (findDTM(SalmonDTM,x,y,MIx1,MIy1,MIx2,MIy2) or (not LoggedIn));
    end;
    nope still laggs!!=S

  5. #5
    Join Date
    Oct 2008
    Location
    behind you!
    Posts
    1,688
    Mentioned
    2 Post(s)
    Quoted
    40 Post(s)

    Default

    Quote Originally Posted by Sandstorm View Post
    Also, add a Wait(1); in there.

    ~Sandstorm
    Well, The script usually lags at Repeating loop.. so You won't need the wait.

    Quote Originally Posted by hackncrack1 View Post
    nope still laggs!!=S
    Well then make another DTM, and try it again.
    Hi

  6. #6
    Join Date
    Aug 2008
    Location
    !!LOL!!
    Posts
    247
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Sandstorm View Post
    Also, add a Wait(1); in there.

    ~Sandstorm
    where exactly is there??

  7. #7
    Join Date
    Oct 2008
    Location
    behind you!
    Posts
    1,688
    Mentioned
    2 Post(s)
    Quoted
    40 Post(s)

    Default

    at your mainloop :

    SCAR Code:
    begin
      mainloop;
      LoadDTMS;
      freeing; // Change freeing to this place
      dropping;
      checkfortrouts;
      wait(150+random(50));
      checkforsalmons;
    end.
    Hi

  8. #8
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    There should be a not statement at the beginning of here .

    SCAR Code:
    until ( Not{<--!!!} findDTM(SalmonDTM,x,y,MIx1,MIy1,MIx2,MIy2)) or (loggedin = false);

  9. #9
    Join Date
    Aug 2008
    Location
    !!LOL!!
    Posts
    247
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    guys ur only telling me wat to do can u plz explain!!!!

  10. #10
    Join Date
    Aug 2008
    Location
    !!LOL!!
    Posts
    247
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    nauman i tried ur technique it worked(plz explain and thx) and tickyy it
    access violated when i put freeing over there!!! but thx for ur time!!!

  11. #11
    Join Date
    Oct 2008
    Location
    behind you!
    Posts
    1,688
    Mentioned
    2 Post(s)
    Quoted
    40 Post(s)

    Default

    Lol naum...

    Quote Originally Posted by hackncrack1 View Post
    (plz explain and thx)
    Well...

    Like you can see what you've made is a repeating stuff that will never end...
    it'll always find the dtm... and always try to repeat the stuff again and again and that causes the lag

    but the Not will stop it so... Until not FindDTM.
    So it will stop after it can't find the dtm.
    Hi

  12. #12
    Join Date
    Aug 2008
    Location
    !!LOL!!
    Posts
    247
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    aah ty tickyy!!

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
  •