Results 1 to 3 of 3

Thread: 2 Question

  1. #1
    Join Date
    Jan 2007
    Posts
    16
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default 2 Question

    #1 Amount.scar
    SRL v31

    I get Compiles but then i get this [Runtime Error] : Exception: Access violation at address 006D72AA in module 'scar.exe'. Read of address 00000000 in line 294 in script C:\Program Files\SCAR 3.15\includes\SRL/SRL/Core/Amount.scar

    SCAR Code:
    program New;
    Var CopperO,TinO,TMined:Integer;
    Var CopperDTM,TinDTM,BarDTM:integer;
    {.include SRL/SRL.scar}


    Procedure Load;
    begin
      CopperDTM := DTMFromString('78DA637465606078CD80026ED79831B002694' +
           '620FE0F048C9E40C63D0634C0884402697B207197801A7320F184' +
           '801A1320F199801A5B20F183801A5F20F196809A0020F108BF1A0' +
           '05C7B0EFC');

      TinDTM := DTMFromString('78DA63CC67606078CD8002BA1AEAC1342394C' +
           'F5809241E32A001465435E540E22D01357940E22B01357140E233' +
           '01351940E2310135207FDDC3AF06009F400B02');

      BarDTM := DTMFromString('78DA639CCAC0C0F090010D302291407A31907' +
           '84A404D2790784B849A8F04D42C00124F08A8990924BE12503307' +
           '487CC2AF0600C9870AA4');
    end;


    Procedure CountO;
    begin
    CopperO:= CountItemsIn('inv', 'dtm',CopperDTM, []);
    Writeln('Copper Mined='+InttoStr(CopperO))
    TinO:= CountItemsIn('inv', 'dtm',TinDTM, []);
    Writeln('Tin Mined='+IntToStr(TinO));
    TMined:= TMined+ CopperO + TinO;
    end;

    begin
      SetupSRL;
    ActivateClient;
    Wait(1000+Random(500));
    CountO;
    end.



    #2 RaidalWalk
    it there any way to make it scan out instead of in?

  2. #2
    Join Date
    Aug 2007
    Location
    in a random little world
    Posts
    5,778
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

  3. #3
    Join Date
    Sep 2008
    Location
    Not here.
    Posts
    5,422
    Mentioned
    13 Post(s)
    Quoted
    242 Post(s)

    Default

    SCAR Code:
    program New;
    Var CopperO,TinO,TMined:Integer;
    Var CopperDTM,TinDTM,BarDTM:integer;
    {.include SRL/SRL.scar}
     
     
    Procedure Load;
    begin
      CopperDTM := DTMFromString('78DA637465606078CD80026ED79831B002694' +
           '620FE0F048C9E40C63D0634C0884402697B207197801A7320F184' +
           '801A1320F199801A5B20F183801A5F20F196809A0020F108BF1A0' +
           '05C7B0EFC');
     
      TinDTM := DTMFromString('78DA63CC67606078CD8002BA1AEAC1342394C' +
           'F5809241E32A001465435E540E22D01357940E22B01357140E233' +
           '01351940E2310135207FDDC3AF06009F400B02');
     
      BarDTM := DTMFromString('78DA639CCAC0C0F090010D302291407A31907' +
           '84A404D2790784B849A8F04D42C00124F08A8990924BE12503307' +
           '487CC2AF0600C9870AA4');
    end;
     
     
    Procedure CountO;
    begin
    CopperO:= CountItemsIn('inv', 'dtm',CopperDTM, []);
    Writeln('Copper Mined='+InttoStr(CopperO))
    TinO:= CountItemsIn('inv', 'dtm',TinDTM, []);
    Writeln('Tin Mined='+IntToStr(TinO));
    TMined:= TMined+ CopperO + TinO;
    end;
     
    begin
      SetupSRL;
    ActivateClient;
    Wait(1000+Random(500));
    Load;
    CountO;
    end.
    that is what shut said...

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. i has a question
    By Solkrieg in forum OSR Help
    Replies: 5
    Last Post: 10-30-2008, 08:20 AM
  2. tab 5 question
    By dvdcrayola in forum OSR Help
    Replies: 4
    Last Post: 07-04-2008, 06:43 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
  •