Results 1 to 2 of 2

Thread: Cant figure how to make it walk to centre and deposit and walk back...

  1. #1
    Join Date
    Jan 2012
    Posts
    9
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default Cant figure how to make it walk to centre and deposit and walk back...

    Any help?
    Code:
    program MTAARENA;
    {$DEFINE SMART8}
    {$i SRL-OSR/Srl.simba}
    {$i SRL-OSR\SRL\skill\magic.simba}   //Editted version I found that was made for osr
    {$i sps/sps-osr.simba}  //Tried to Add walking but didn'really want to work :(
    Procedure DeclarePlayers;
    Begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;
    
      Players[0].Name := '';
      Players[0].Pass := '';
      Players[0].Nick := '';
      Players[0].Active := True;
    End;
    Procedure PickupCubes;
    var x, y: integer;
    begin repeat
    if FindObj(x, y, 'ake-from', 2921394, 10) then
     begin
         Mouse(x, y, 0, 0, true);
         ChooseOption('ake-from');
         wait(500+random(200));
    
    end;Until (invfull)
    end;
    Procedure CastEnchant;
    var count :integer  ;
    
     begin repeat
    castspell('37');
    wait(800+random(200))
    InvMouse(28,1)
     count := count + 1
    Until  count=25
    end;
    
    
    begin
      SetupSRL;
      DeclarePlayers;
      LoginPlayer;
      Pickupcubes;
      castenchant;
    
    end.

  2. #2
    Join Date
    Jan 2012
    Location
    127.0.0.1
    Posts
    702
    Mentioned
    11 Post(s)
    Quoted
    76 Post(s)

    Default

    SPS_BLINDWALK... ...
    http://villavu.com/forum/showthread.php?t=99716
    ps, try the search button next time

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
  •