Results 1 to 6 of 6

Thread: Help noobi here :)

  1. #1
    Join Date
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Help noobi here :)

    [SCAR]Program Tut;

    {.Include SRL\SRL\Misc\Smart.Scar}
    {.Include SRL\SRL.Scar}
    {.Include SRL\SRL\Reflection\Reflection.Scar}

    procedure SetupPlayer;
    begin
    HowManyPlayers := 1;
    NumberOfPlayers(HowManyPlayers);
    CurrentPlayer := 0;
    SRLId := '2670';
    SRLPassword := 'blink182';

    Players[0].Name := '****';
    Players[0].Pass := '****';
    Players[0].Nick := 'ass';
    Players[0].Active := True;
    end;

    Var
    Bank: TPointArray;

    Procedure Setup;
    Begin

    SetArrayLength(Bank, 3);

    Bank[0] := IntToPoint(3034, 3355);
    Bank[1] := IntToPoint(3019, 3361);
    Bank[2] := IntToPoint(3014, 3355);
    End;

    Function WalkToBank: Boolean;
    Begin
    Result := WalkThePath(ToBank);
    End;

    begin
    SmartSetupEx(14, true, true, false);
    SetTargetDC(SmartGetDC);
    SetupSRL;
    Setup;
    LoginPlayer;
    SetAngle(True);
    SetupReflection;
    WalkToBank;
    end.SCAR]



    Oki ive made this with the tut from http://www.villavu.com/forum/showthr...=33551?t=36307..

    When i hit run at this i get the error:

    Line 36: [Error] (16570:11): Unknown identifier 'WalkThePath' in script C:\Users\sondre\Documents\lala\helps.scar


    Now im noob here so help me please and if somone wonder where this one walks, it walks from here:


  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
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  4. #4
    Join Date
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    Function WalkPath(Path: TPointArray; StartTile, FlagD: Integer): Boolean;

    Var
      H, I: Integer;

    Begin
      H := High(Path);

      For I := StartTile To H Do
        If (Not (GoToTile(Path[I].X, Path[I].Y, FlagD))) Then
          Exit;

      Result := True;
    End;

    Where i place this in the script?

  5. #5
    Join Date
    Mar 2008
    Location
    ::1
    Posts
    915
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    I am pretty positive that you place it as the first function/procedure in your script.

    Records and Types Save Code (and make you look better)
    Quote Originally Posted by Wizzup? View Post
    Is it possible to make Runescape a 2D game with this?... That would greatly simplify... Just about anything.

  6. #6
    Join Date
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

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
  •