Results 1 to 3 of 3

Thread: My Curser/Help

  1. #1
    Join Date
    Nov 2008
    Posts
    73
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Exclamation My Curser/Help

    Mmk, so I made this script, yes a while back, and yes it's out-dated, but I'd love to up-date it and make it better, I, however lack the necessary skill and knowledge to do so, I am willing to learn and don't want this done for me, so help would be appreciated,
    Thanks
    Goodpeople
    Everytime I post on a Thread It Dies

    http://www.funnytreat.com/pictures/a...ictures_25.gif http://img27.imageshack.us/img27/4518/lolmi1.png



    Favorit Post:
    GoodPeople = PHAILED NOOB
    Thanks Smarterchild

  2. #2
    Join Date
    Mar 2008
    Location
    New Jersey
    Posts
    1,673
    Mentioned
    1 Post(s)
    Quoted
    9 Post(s)

    Default

    first thing to do, hit tools > compile. Then you can find where the first error is, almost always with outdate scripts there are errors. I just did this, and surprisingly, not a single error came up, so I guess the next thing you'd wanna do since there is no errors is just run it and see if there are any bugs. If there are, which you say there is, because you say it needs to updated, you would find what it's messing up on. Then go to that part of the script and see where it's at and try to use better codes. I don't really feel like actually testing the script, but you can. When you do, once you do that, just PM me and I'll help you update those parts, not tell you what to do, but help you learn codes that you can use to make it work better.

    I don't know how else you want me to help, so I just gave ya some instructions on updating it, so yea, once you test it let me know and I'll help you further.

  3. #3
    Join Date
    Jan 2007
    Posts
    834
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Ive scimmed it down a little, you don't need 1 line procedures in the main loop and you never called report in your script. I didn't test it but i guess its for cursing spells on something?? And i also made it (main loop) log in if the player is not logged in. Whats the point of having declare players in there.

    SCAR Code:
    program Cursor;
    {.include SRL/SRL.Scar}
    {.include SRL/SRL/Skill/Magic.scar}


    procedure AntiBan;
    begin
      if not LoggedIn then Exit;
        case(Random(75)) of
          1:HoverSkill('Attack',False);
          7:GameTab(1);
          16:RandomMovement;
          20:HoverSkill('Strength',False);
          24:HoverSkill('Hitpoints', False);
          37:BoredHuman;
          50:Wait(2000 + random(1000));
        end;
    end;


    var
      i : integer;

    procedure DeclarePlayers;
    begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;

      Players[0].Name := '';
      Players[0].Pass := '';
      Players[0].Nick := '';
      Players[0].Active := True;
      Players[0].Integers[0] :=200 ;
    end;

    procedure Clikin;
    var
      I: Integer;
    begin
      if ( I = 10 ) then Nextplayer(False);
      if(not LoggedIn)then exit;
      if not CastOn('curse', 'amorak', 3949474, 10) then
      begin
        WriteLn('Can'#39't Find Whatever it is this scripts supposed to be finding');
        Inc(I);
      end else
      I := 0;
      Wait(RandomRange(2000, 3500));
    end;

    procedure Report;//call this after Clikin
    begin
      ClearDebug;
      Writeln('Good`s Good Curse-Crusher');
      Writeln('by Goodpeople, with help from benjaa');
      Writeln('Worked for '+TimeRunning);
      Writeln('Cursed approx. '+IntToStr(i)+' times');
      Writeln('Thanks for testing');
    end;

    begin
      Setupsrl;
      DeclarePlayers;
      ClearDebug;
      ActivateClient;
      if Not loggedin then
      LoginPLayer;
      makecompass('w')
      repeat
        Clikin;
        Inc(i);
        FindNormalRandoms;
      until(i >= Players[CurrentPlayer].Integers[0]);
      if (i >= Players[CurrentPlayer].Integers[0])then
      begin
      report;
      terminatescript;
    end;
    end.

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
  •