Results 1 to 12 of 12

Thread: DropAllLogs;

  1. #1
    Join Date
    May 2007
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default DropAllLogs;

    Hey, having a little problem with a script im trying to make..
    Well, i was trying to call the procedure: DropAllLogs; and got this
    error:
    Code:
    Line 60: [Error] (14831:1): Unknown identifier 'DropAllLogs' in script C:\Documents and Settings\Ben\Desktop\logs.scar
    So i looked in the WoodCutting.scar include(located in "Includes/SRL/SRL/Skill")

    And there was no procedure for DropAllLogs; in there ;\

    Can anyone help me out with this? :S

  2. #2
    Join Date
    Mar 2007
    Posts
    3,681
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    did u write

    SetupSRL; on beggining?

  3. #3
    Join Date
    Oct 2006
    Location
    Texas
    Posts
    1,450
    Mentioned
    1 Post(s)
    Quoted
    1 Post(s)

    Default

    What version of SRL is it?


    Edit* if you are using srl 3.7 then they took out Drop All Logs procedure out.

  4. #4
    Join Date
    Mar 2007
    Location
    Netherlands->Amersfoort.
    Posts
    1,615
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    You can also use the commant:

    DropTo(1, 28);
    That will drop evertything form invent slot 1 to invent slot 28. (you can put other nummers in it)

  5. #5
    Join Date
    May 2007
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    umm, i think it'd be 3.7.
    When i downloaded SCAR, it came with it as an update.
    I downloaded Divi 3.06..

    And if i do have 3.7, would i be able to just download
    another version of srl and put the procedure into my script?
    giving credit to starblaster, of course.

    [EDIT]
    @rikjess - Thanks, ill try that if i can't just use the old version of srl ;]

  6. #6
    Join Date
    May 2006
    Posts
    1,230
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    just copy the procedure from srl 3.6 and put it in your script =p

  7. #7
    Join Date
    Mar 2007
    Posts
    276
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    try This out...

    SCAR Code:
    Procedure Dropage;
    begin
      if(IsAxeWeilded = true)then
      begin
        DropAll;
      end;
      if(IsAxeWeilded = false)then
      begin
        Dropto(2,28);
      end;
    end;

    Make A const like this

    SCAR Code:
    const
    IsAxeWeilded = false; // Change to True If Axe Is Weilded


    Someone: 'Who the hell is TooManySitUps?'

    Boreas: 'Switch the first and last letter of my name, what do you get?'

    Someone: 'Um, SoreAb?'

    Boreas: 'And how do you get that?'

    Someone: 'From Too Many Sit Ups!! Haha, Boreas you are so clever!'

    Boreas: 'Ya he's like my evil twin that takes over when I'm being really sarcastic, or playing devil's advocate.'

  8. #8
    Join Date
    May 2007
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    hmm, i would, but i can't do it that way ;\
    im just gonna have to kinda do it manually with DTMs.
    It's cause im making a Oak Cutter/Fire Lighter and the
    tinderbox will be in the inv aswell as the possibility of
    a pickaxe and its just a bit argh cause DropTo; doesn't
    want to work for me now :\

  9. #9
    Join Date
    Mar 2007
    Posts
    276
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Try this...

    SCAR Code:
    Procedure Dropage;

    begin
      if (InvFull) then
      begin
      GameTab(4);
        repeat
          If FindDtm(OakLog, x, y,MIX1,MIY1,MIX2,MIY2)then
          Mouse(x,y,2,2,false)
          ChooseOption(x,y,'rop');
        until(not(FindDTM(OakLog,x,y,MIX1,MIY1,MIX2,MIY2)))
          TotalLogs:= TotalLogs + 28 ;
          FreeDTM(Oaklog)
      end;
    end;


    Someone: 'Who the hell is TooManySitUps?'

    Boreas: 'Switch the first and last letter of my name, what do you get?'

    Someone: 'Um, SoreAb?'

    Boreas: 'And how do you get that?'

    Someone: 'From Too Many Sit Ups!! Haha, Boreas you are so clever!'

    Boreas: 'Ya he's like my evil twin that takes over when I'm being really sarcastic, or playing devil's advocate.'

  10. #10
    Join Date
    May 2007
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    hmm, im having a bit of trouble with DTMs now -.-'
    they're working with little pictures but not with larger ones. ;\

    should i just try using a bitmap instead?

  11. #11
    Join Date
    Mar 2007
    Posts
    276
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    bitmaps are normally for letters in the upper left hand corner, Stick with DTM's for inventory items


    Someone: 'Who the hell is TooManySitUps?'

    Boreas: 'Switch the first and last letter of my name, what do you get?'

    Someone: 'Um, SoreAb?'

    Boreas: 'And how do you get that?'

    Someone: 'From Too Many Sit Ups!! Haha, Boreas you are so clever!'

    Boreas: 'Ya he's like my evil twin that takes over when I'm being really sarcastic, or playing devil's advocate.'

  12. #12
    Join Date
    May 2007
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Just before i go into my next problem, i've only just scripting started if you haven't realized that already ;]

    I've gotten pretty much everything working properly apart from the actual cutting of the trees..
    I've gotten it to look for the colours and then click, but when there's
    nothing there it just keeps clicking where the last one was and basically walks away from the trees..

    here's the script so far:
    SCAR Code:
    {


                  Oak Cutter/Fire Lighter
                        by i3each
                          v1.0a


                                                      }



    program oakCutter_fireLighter;

    {.include SRL\SRL.scar}
    {.include SRL\SRL\skill\Firemaking.scar}

    //.notes: Make sure inventory ONLY contains a tinderbox
    //and an axe equipped, unless you don't care about the
    //progress report. ;]
    //
    //
    //  Start off logged OUT ;]

    const
    playerName   = 'i3each'; //username
    passWord     = 'omg@password'; //password
    oakColour    = 5408686;   //oak's colour
    oakColour2   = 3493968;   //another part of the oak(backup)
    method       = 'powerCut';   //lightLogs(cut then light) or powerCut(power cutter)
    //Don't Change Past Here ;]
    oakXp        = '37.5';
    lightXp      = '';




    var
    Loads: Integer;
    loadsDone: Integer;
    oakLogs: Integer;

    procedure progressReport;
    begin
      WriteLn('progress goes report here')
    end;

    begin

      Loads:= 50; //Change to amount of loads you want done.
      loadsDone:= 0; //Don't change

      if((Findcolor(x, y, oakColour, 1, 1, 518, 340)) or (Findcolor(x, y, oakColour2, 1, 1, 518, 340))) then
        begin
          if(method = 'lightLogs') then
            {begin
              WriteLn('Light Logs');       //lighting of logs, start after power is all good.
            end}

          else if(method = 'powerCut') then
            begin
              WriteLn('Power Cutting');
              repeat
                if(not(InvFull)) then
                  begin
                    Wait(1000+random(1000));
                    Wait(random(3000)+random(3000)+random(3000));
                    MMouse(x, y, 0, 0);
                    Mouse(x, y, 0, 0, True);
                  end
                else if(InvFull) then
                  begin
                    loadsDone := loadsDone + 1;
                    GameTab(4);
                    oakLogs := DTMFromString('78DA63AC666460286740017509960CFF81345' +
                             '086E13F1030B663AA81C8C248205D0B64D51050934F849A2A202B' +
                             '8B809A26202B13BF1A0034E80BCD');
                      if(FindDtm(oakLogs, x, y, 1, 1, 730, 455)) then
                        begin
                        repeat
                          Wait(200+random(2000));
                          Mouse(x, y, 2, 2, False);
                          ChooseOption(x, y, 'rop');
                          WriteLn('Dropping Logs');
                        until(not(FindDtm(oakLogs, x, y, 1, 1, 730, 455)));
                        end
                      else
                        begin
                        WriteLn('DTM not found :(');
                        end
                    progressReport;
                  end
                else
                  WriteLn('Error.');
              until(loadsDone > Loads);
            end
          else
            begin
              WriteLn('Error: No method selected');
            end
        end
      else
        begin
          WriteLn('Error: Cannot find colours, please select new ones ;[');
        end
    end.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. DropAllLogs
    By A G E N T in forum Research & Development Lounge
    Replies: 2
    Last Post: 10-18-2008, 12:56 AM
  2. DropAllLogs
    By boss01 in forum OSR Help
    Replies: 1
    Last Post: 05-28-2008, 08:10 AM

Posting Permissions

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