• Log in or sign up for an account here: https://www.sythe.org/login

my first script!!!

radiclerobby

Apprentice

Banned
Joined
Mar 9, 2008
Sythe Gold
0
Messages
720
ok this is my alcer i redid it to make it more human like and it also has anti ban in it this is my first script fixed up bye me so if you think about it its pretty much my second script post what you think about it

also thank you jethr0x for helping me with my errors

Code:
 {/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\}
program MyFirstAlcer;
{.include SRL/SRL.scar}
                      {    setup down there lol made bye radiclerobby   }
                     {VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV}
const
alcs = 2;      // how many times you want to alc this item
antiban = true; // if you want to use the anti ban where it talks
{^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^}
{/\/\/\/\/\/\/\/\/\/\/\/\/\/\  setup right up there/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\}

var
 i:Integer;

procedure nonbanage;
begin
 if (i = 20) THEN
 begin
  typesend('wooo almost done!')
 end else
 if(i = 45) then
 begin
  typesend('not much longer now')
 end else
 if(i =70) then
 begin
  typesend('omg this is taking forever')
 end else
 if(i=200) then
 begin
  typesend('so many alcs to do =(')
 end else
 if(i=325) then
 begin
  typesend('my magic level is profiting off this at least')
 end else
 if(i=450) then
 begin
  typesend('my mage lvl is none of you bussiness lol')
 end;
end;

procedure Alc;
begin
 Mouse(571,360,4,4, true);
 wait(1000+random(300));
 Mouse(579,227,4,4, true);
 wait(1000+random(100));
end;
begin
 ClearDebug;
 i:= 0;
 ActivateClient;
 RandomMovement;
 begin;
  mousespeed:=25+random(5)
  repeat;
  if(antiban = true) then
  begin
   nonbanage;
  end;
  i:= i + 1;
  gametab(7);
  Alc;
  until(i = alcs);
 end;
  begin
   pickupmouse;
  end;
  begin;
   Logout;
  end;
end.
 
Good job on the script, i wont use it as my magic level is 1 :P but it compiles well, and as it works with co-ordinats so i dont think it could be doing anything wrong :)
 
thank you for saying so if there is a script you want i could try to make it for you im just a noob it wont deal with randoms but it will have a anti ban just dont make ur request to hard and i cant promis that u wont get banned tho
 
this is my first script so dont flame me on how its detectable i dont know how to make my scripts undetectable i dont know the little codes for it but if you want to give me a link ill start making undetectable scripts and i'd appreciate it also this doesnt have anti ban or anti random but at beggining it does say 'this is going to take awhile' so it thinks its a human also id like to thank
whocares357
and jethr0x
for helping me bear in mind people this is my first script post what you think about it
Code:
 {/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\}
{Ok this is my first script its very simple and probly detectable but i don't
{know how to make it undetectable constructive idea's are appreciated well here
{it is /\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\}

{ok this is how you set it up drag crosshairs onto runescape, start logged in
{with what you want to alc in your first inventory slot then pick how much u
{want to acl under const change the number to how many times you want to alc
{that item}

program MyFirstAlcer;
{include. SRL/SRL.scar}
const
alcs = 2;      // how many times you want to alc this item
var
i: Integer;

procedure Clickmagebook;
begin
 wait(200+random(500));
 movemouse(743, 183);
 wait(1000+random(700));
 clickmouse(743, 183, true);
end;

procedure Alc;
begin
 wait(500+random(200));
 movemouse(571,360);
 wait(500+random(250))
 clickmouse(571,360, true);
 wait(400+random(300));
end;
procedure Alc2;
begin
 movemouse(579,227);
 wait(200+random(150));
 clickmouse(579,227, true);
 wait(300+random(250))
end;

procedure logout;
begin
 movemouse(752,11);
 wait(200+random(100));
 clickmouse(752,11, true);
 wait(450+random(100));
 movemouse(630, 376);
 wait(2000)
 clickmouse(630, 376, true);
end;
begin
 ClearDebug;
 i:= 0;
 movetotray;
 sendkeys('o geeze this is going to take a long time'+chr(13));
 begin;
  repeat;
  i:= i + 1;
  Clickmagebook;
  Alc;
  Alc2;
  until(i = alcs);
  end;
 begin
  logout;
 end;
end.

very nice for your 1st script! but of course.. i have to show u where u went wront :( :P

1st off.. move mouse + clickmouse = VERY detecable... try using Mouse(x, y, rx, ry, true) or Mousebox ;p
to learn a but more about srl, and what you can do with it, navigate to ur SCAR 3.15/includes/srl/srl/core folder, open some of the files, and see what commands there are!

but nice script again, for ur 1st time. and since u made an attempt before pming me on msn, I will help u in anyway possible ;) i personally would rather people try 1st, then get help, instead of get help while trying :P
 
very GOOD for your first script , my first script was a simple auto talker lol
 
you should indeed do what jethrox said, that would be better... MoveMouse and ClickMouse are pretty outdated..

i know this is a bit oftopic but just wanted to say: im currently working on my first script to :) at the SRL forum, but im having trouble with some things :( mine cant be coordinat based... Click here to go to the topic
 
ok, srry then :P i whas looking at script in this topic, so this must be the old on :)
 
1 little probelm... the alcher counts up, but adding i.. so when it gets to doing alch #20, it will say "almost done"

maybe make a constant, and name it ... HowManyAlchs;

then instead of doing i := i + 1..

do HowManyAlchs := HowManyAlchs - 1;

that way it counts down :P


------

if u want, u can maintain my alcher.
 
The idea of using solid integers with no randomness to say an unrandom phrase isn't very random, and is therefore very detectable, however this is sythe.org, so I doubt anyone cares about the word 'ban'.
 
Back
Top