Results 1 to 14 of 14

Thread: paste problem

  1. #1
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default paste problem

    Hi as you know, when ppl post their script they put on the thread so u may copy and paste it to simba. but my problem is when i paste it in simba its all on line 1

    so i get:
    line 1 sdpfjiasdiofjasdopfhopasdfhpuoawehfuopasdhfopasdhf phoasddfia(very long)

    instead of:
    line 1 gasdfas
    line 2 asdsdf
    line 3 fasfasdf
    line 4 fdasfadfs
    line 5 fasdfnhojoy
    etc

    how can i make the text to be pated vertically instead of horizontally?

    Thank you

  2. #2
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    so basically when i paste the script, the whole script is on line 1

  3. #3
    Join Date
    Sep 2007
    Location
    British Columbia, Canada
    Posts
    4,047
    Mentioned
    1 Post(s)
    Quoted
    2 Post(s)

    Default

    are you using *simba% setupsrl; */simba*

    Make sure * is replaced with [ and % is replaced with %

    like this
    Simba Code:
    setupsrl;

  4. #4
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    and how i check and change it?

  5. #5
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    @main is there a specific file i must open to change the stuff u saying?

  6. #6
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    or a specific place where i must paste ur simba code?

  7. #7
    Join Date
    Jan 2008
    Location
    10° north of Hell
    Posts
    2,035
    Mentioned
    65 Post(s)
    Quoted
    164 Post(s)

    Default

    Quote Originally Posted by Main View Post
    are you using *simba% setupsrl; */simba*

    Make sure * is replaced with [ and % is replaced with %

    like this
    Simba Code:
    setupsrl;

    =) Here ya go....

    [simba]
    program _;
    begin
    end.
    [/simba]

    Dg's Small Procedures | IRC Quotes
    Thank Wishlah for my nice new avatar!
    Quote Originally Posted by IRC
    [22:12:05] <Dgby714> Im agnostic
    [22:12:36] <Blumblebee> :O ...you can read minds

  8. #8
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    and i paste this in 'new tab' then click play?

    (thanks for the time u taking trying to help me,by the way)
    Last edited by ogustuce; 02-14-2012 at 01:10 AM.

  9. #9
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    can enyone tell me what to do with those infos plz?

  10. #10
    Join Date
    Jan 2008
    Location
    10° north of Hell
    Posts
    2,035
    Mentioned
    65 Post(s)
    Quoted
    164 Post(s)

    Default

    Nothing said would help you....

    Are you using Linux or Windows? I'm going to guess Windows.

    I wouldn't know why you have this problem but give as much information you can. In legible English please.

    Simba tags are used for posting Simba scripts to this forum and have nothing to do with copying a script. You may just need to download the attachment (if there is one).

    Dg's Small Procedures | IRC Quotes
    Thank Wishlah for my nice new avatar!
    Quote Originally Posted by IRC
    [22:12:05] <Dgby714> Im agnostic
    [22:12:36] <Blumblebee> :O ...you can read minds

  11. #11
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    ok, im trying to use the fix from b00lshit posted here
    http://villavu.com/forum/showthread.php?t=72161&page=14

    so what i do is highlight the code,copy and paste it in a 'new tab' in simba.

    is there something im doing wrong?

    (and yes, im using windows, windows 7)

  12. #12
    Join Date
    Jan 2008
    Location
    10° north of Hell
    Posts
    2,035
    Mentioned
    65 Post(s)
    Quoted
    164 Post(s)

    Default

    Simba Code:
    program MatsGuildAltarPro;
    {$DEFINE SMART}
    {$i srl/srl.Simba}
    {$i sps/sps.simba}

    var
      GAltar, Herb, IncenseRight, IncenseLeft, IncenseLeftBack, MountGlory, x, y, Bone: Integer;
      AFound: Extended;
      TeleTab, InfernAsh, Bones, Door: Integer;

    const
      BoneType = ('bone');

    procedure WalkingtoBank;
    var
      ToBank: TPointArray;
    begin
      Wait(700 + Random(200));
      SPS_Setup(RUNESCAPE_SURFACE, ['10_6', '10_5', '11_5', '11_6', '9_6', '9_5']);
      ToBank := [Point(4186, 2678), Point(4186, 2680), Point(4188, 2682), Point(4191, 2682), Point(4195, 2682), Point(4200, 2682), Point(4205, 2682), Point(4208, 2679), Point(4208, 2675)];
      SPS_WalkPath(ToBank);
    end;

    procedure DeclarePlayers;
    begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;
      Players[0].Name := '';
      Players[0].Pass := '' Players[0].Active := True;
      Players[0].Pin := '';
      Players[0].Integers[1] := 10000;
    end;

    procedure SetDTM;
    begin
      TeleTab := DTMFromString('mwQAAAHic42RgYHBhYmBwA+JAIPYBYlMgtgFiL6gYCD8CqrsOxE+h9AMg/gTFr4D4LhCvWrwISDLhxZIMhAEjERgOAPw+DME=');
      InfernAsh := DTMFromString('mrAAAAHic42BgYEgC4nQgzoLiOCCOAOJYIE4B4iNAvB9KH4BiEPs0EJ8AYl52ViDJhBNLMuAHjAQwDAAA4VsJgw==');
      Bones := DTMFromString('mbQAAAHicY2VgYOBjZGAQB2JJIOYAYmEgzgCKFwJxFhDnAnEqEFfVNzC0dnUzJGdkMMQmJjGUVdcwSALF0TEjFgwGAFmMCc4=');
      Herb := DTMFromString('mlwAAAHicY2dgYDjCyMCwFYjPM0LYZ4F4NxCfBOLpQPkZQDwRiOdB2ZOAeC4Q80TyAUkmrFiSATdgxIOhAADKQAow');
      Door := DTMFromString('m6wAAAHic42ZgYJBgZGD4AaQtgbQkEItB+cZAWh+I9YCYCYj/A8U8QeqA2ApKRwBxJJR2AWI/KO0LxNHBbgyNuWEM1RlBDLGh7gyRgS4MFan+DEUJ3gxlyX4MJUm+YDkQWxKonljMSAJGAgCPcxSX');
      MountGlory := DTMFromString('mggAAAHicY2NgYPAFYj8gDgJiDyjtBcSaQKwLxBpQrAfE2kC8qC+X4e8vVYaKRDMwG4YlgXLYMCMODAEA1LwNEg==');
      IncenseRight := DTMFromString('mggAAAHicY2NgYFBjZGDQAmIVINYDYg0gVgTiHqBcAxBXA3EzEE8F4glA/PTJQ4YnWxUYnI1VGTzMNBi+f//G8O7NMwZ+oBw2zIgDQwAAkjMPzw==');
      IncenseLeft := DTMFromString('mrAAAAHic42BgYOCEYn4gZgdiISBmZYAALiAWBmIZIJYEYnEgFgBiNqg8ExA/f/6MIdzRgOHbl08MX169ZJg0oY3h3gZ5BnsDZTCWhOrFhRkJYBgAAIBxDzE=');
      IncenseLeftBack := DTMFromString('mggAAAHicY2NgYMgG4lwgTgLiBCi7BIgnAHENEDcAcQsQTwPiSUD84sUzBnsDFQYfK22GYHt9hm9fPzMsXDCfgR8ohw0z4sAQAADQFA+T');
      GAltar := DTMFromString('mlwAAAHicY2dgYHgPxBeBmJsRwr4MZb8D0h1AXAHFk4B4FhBPB+JqIL6xS47h6eN7DK9ePWd4/foVQ4iDPoOnuQbDokWrGCSB8rgwIx4MBQA0YRYm');
    end;

    procedure FindingDoor;
    begin
      wait(600 + random(50));
      if FindDTMRotated(Door, X, y, MSX1, MSY1, MSX2, MSY2, - Pi / 4, Pi / 4, Pi / 60, aFound) then
      begin
        MMouse(X, y, 5, 5);
        Wait(200 + Random(50));
        if IsUpText('Door') then
        begin
          CLickMouse2(True);
        end
        else
          FindingDoor;
        Wait(1000 + Random(50));
      end
      else
        FindingDoor;
    end;

    procedure OpeningDoor;
    begin
      if FindNormalRandoms then
      begin
        Logout;
        TerminateScript;
      end
      else
        FindingDoor;
      Flag;
      RadialWalkTolerance(8230043, - 1, 1, 25, - 1, 0, 15);
      Flag;
      Wait(600 + random(50));
    end;

    function NPCBankFinder(x, y: Integer): Boolean;
    var
      CTS, I: Integer;
      TPA: TPointArray;
      ATPA: array of TPointArray;
    begin
      CTS := GetColorToleranceSpeed;
      ColorToleranceSpeed(2);
      SetColorSpeed2Modifiers(0.09, 0.69);
      FindColorsSpiralTolerance(MSCX, MSCY, TPA, 4007983, MSX1, MSY1, MSX2, MSY2, 14);
      ColorToleranceSpeed(CTS);
      ATPA := TPAToATPAEx(TPA, 15, 15);
      for I := 0 to High(ATPA) do
      begin
        MiddleTPAEx(ATPA[i], x, y);
        MMouse(x, y, 2, 2);
        if (IsUpTextMultiCustom(['ank'])) then
        begin
          Result := True;
          GetMousePos(x, y);
          Break;
        end;
      end;
    end;

    procedure Banking;
    var
      HerbRun, DoorRun: integer;
    begin
      if FindNormalRandoms then
      begin
        Logout;
        TerminateScript;
      end
      else if NPCBankFinder(x, y) then
      begin
        if IsUpText('ank') then
          ClickMouse2(False);
        Wait(100 + Random(50));
        ChooseOption('Bank Banker');
        Wait(4000 + Random(50));
        if PinScreen then
          InPin(Players[CurrentPlayer].Pin);
        if BankScreen then
        begin
          if FindDTM(Herb, X, Y, MBX1, MBY1, MBX2, MBY2) then
          begin
            if not FindDTM(Herb, X, Y, MIX1, MIY1, MIX2, MIY2) then
            begin
              MMouse(X, Y, 5, 5);
              repeat
                Inc(HerbRun);
                ClickMouse2(True);
                Wait(300 + Random(50));
              until (HerbRun = 2);
            end
            else
            begin
              FindDTM(Herb, X, Y, MBX1, MBY1, MBX2, MBY2);
              MMouse(X, Y, 5, 5);
              ClickMouse2(True);
            end;
          end;
          if BoneType = ('Ash') then
            Bone := InfernAsh
          else
            Bone := Bones;
          if FindDTM(Bone, X, Y, MBX1, MBY1, MBX2, MBY2) then
          begin
            MMouse(X, Y, 5, 5);
            ClickMouse2(False);
            Wait(100 + Random(50));
            ChooseOption('All');
          end
          else
          begin
            Writeln('Could not find ' + BoneType);
            TerminateScript;
          end;
          CloseBank;
          if FindDTM(TeleTab, X, Y, MIX1, MIY1, MIX2, MIY2) then
          begin
            MMouse(X, Y, 5, 5);
            ClickMouse2(True);
            repeat
              Wait(50 + Random(50));
            until (FindDTMRotated(Door, X, y, MSX1, MSY1, MSX2, MSY2, - Pi / 4, Pi / 4, Pi / 60, aFound));
          end;
        end
        else
          Banking;
      end
      else
        Banking;
    end;

    procedure Using;
    begin
      if BoneType = ('Ash') then
        Bone := InfernAsh
      else
        Bone := Bones;
      if FindDTM(Bone, x, y, MIX1, MIY1, MIX2, MIY2) then
      begin
        MMouse(X, y, 5, 5);
        Wait(150 + Random(50));
        if IsUpText('ashes') or IsUpText('one') then
          ClickMouse2(False);
        Wait(250 + Random(50));
        ChooseOption('Use');
        Wait(121 + Random(52));
      end;
      if FindDTMRotated(GAltar, X, y, MSX1, MSY1, MSX2, MSY2, - Pi / 4, Pi / 4, Pi / 60, aFound) then
      begin
        MMouse(X, y, 5, 5);
        Wait(300 + Random(50));
        if IsUpText('Altar') then
          CLickMouse2(True);
      end;
      repeat
        Wait(50 + Random(50));
      until (FindDTM(Bone, x, y, McX1, McY1, McX2, McY2));
    end;

    procedure Glory;
    begin
      if FindDTMRotated(MountGlory, X, y, MSX1, MSY1, MSX2, MSY2, - Pi / 4, Pi / 4, Pi / 60, aFound) then
      begin
        MMouse(X, y, 5, 5);
        Wait(150 + Random(50));
        if IsUpText('let') then
          ClickMouse2(True)
        else
          Glory;
        repeat
          Wait(50 + Random(50));
        until (FindNPCChatText('Edgeville', ClickLeft));
      end;
      Wait(500 + Random(100));
    end;

    procedure Giving;
    begin
      Using;
      if BoneType = ('Ash') then
        Bone := InfernAsh
      else
        Bone := Bones;
      if FindDTM(Bone, x, y, McX1, McY1, McX2, McY2) then
      begin
        MMouse(X, y, 5, 5);
        Wait(100 + Random(50));
        if IsUpText('Offer All') then
          ClickMouse2(True);
      end
      else
        Giving;
    end;

    function IsPraying: Boolean;
    begin
      if (averagePixelShift(IntToBox(234, 50, 289, 185), 50, 250) > 200) then
      begin
        Result := True;
        Writeln('Pixel Shifting');
      end
      else
      begin
        Wait(1000);
        if (averagePixelShift(IntToBox(234, 50, 289, 185), 50, 250) > 200) then
          Result := True
        else
          Result := False;
      end;
    end;

    function Praying: Boolean;
    begin
      if BoneType = ('Ash') then
        Bone := InfernAsh
      else
        Bone := Bones;
      if FindDTM(Bone, x, y, MIX1, MIY1, MIX2, MIY2) then
      begin
        if ClickContinue(True, True) then
        begin
          Giving;
        end;
        if IsPraying then
          Result := True
      end
      else
      begin
        Wait(1000);
        if FindDTM(Bone, x, y, MIX1, MIY1, MIX2, MIY2) then
        begin
          if not isPraying then
            Giving;
        end
        else
          Result := False;
      end;
    end;

    procedure IncesRight;
    begin
      if FindDTMRotated(IncenseRight, X, y, MSX1, MSY1, MSX2, MSY2, - Pi / 4, Pi / 4, Pi / 60, aFound) then
      begin
        MMouse(X, y, 5, 5);
        Wait(150 + Random(50));
        if IsUpText('Light') then
          CLickMouse2(True)
        else
          IncesRight;
      end
      else
        IncesRight;
    end;

    procedure InceLeft;
    begin
      if FindDTMRotated(IncenseLeft, X, y, MSX1, MSY1, MSX2, MSY2, - Pi / 4, Pi / 4, Pi / 60, aFound) then
      begin
        MMouse(X, y, 5, 5);
        Wait(150 + Random(50));
        if IsUpText('Light') then
          CLickMouse2(True)
        else
          InceLeft;
      end
      else
      begin
        Writeln('Failed to Find Incense Left Using Back Up DTM');
        if FindDTMRotated(IncenseLeftBack, X, y, MSX1, MSY1, MSX2, MSY2, - Pi / 4, Pi / 4, Pi / 60, aFound) then
        begin
          MMouse(X, y, 5, 5);
          Wait(150 + Random(50));
          if IsUpText('Light') then
            CLickMouse2(True)
          else
            InceLeft;
        end;
      end;
    end;

    procedure WastingLotsofGPs;
    begin
      if FindNormalRandoms then
      begin
        Logout;
        TerminateScript;
      end
      else
        IncesRight;
      Wait(3000 + Random(50));
      InceLeft;
      Wait(3000 + Random(50));
      Giving;
      Wait(45000 + Random(50));
      Glory;
    end;

    procedure FreDTM;
    begin
      FreeDTM(InfernAsh);
      FreeDTM(Bones);
      FreeDTM(Herb);
      FreeDTM(TeleTab);
      FreeDTM(Door);
      FreeDTM(GAltar);
      FreeDTM(MountGlory);
      FreeDTM(IncenseLeft);
      FreeDTM(IncenseLeftBack);
      FreeDTM(IncenseRight);
    end;

    begin
      MouseSpeed := RandomRange(14, 16);
      smart_server := 16;
      smart_members := false;
      smart_signed := true;
      smart_superDetail := false;
      SetupSRL;
      SetDTM;
      DeclarePlayers;
      LoginPlayer;
      ClickNorth(SRL_ANGLE_HIGH);
      SetRun(True);
      repeat
        Wait(500 + Random(50));
        WalkingtoBank;
        Banking;
        OpeningDoor;
        WastingLotsofGPs;
      until (not Loggedin);
      FreDTM;
    end.

    Dg's Small Procedures | IRC Quotes
    Thank Wishlah for my nice new avatar!
    Quote Originally Posted by IRC
    [22:12:05] <Dgby714> Im agnostic
    [22:12:36] <Blumblebee> :O ...you can read minds

  13. #13
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    yes, this is what i highlight, right click copy, then paste itin a new tab in simba.
    and when i paste it, the whole script is on line 1

    (all scripts i try to copy like this end up being on line1,i mean the whole code is on line 1 )

  14. #14
    Join Date
    Feb 2012
    Posts
    224
    Mentioned
    1 Post(s)
    Quoted
    8 Post(s)

    Default

    THANK YOU for the attached file
    Last edited by ogustuce; 02-14-2012 at 02:05 AM.

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
  •