my first script!!!

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 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

 

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

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

 

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

 

he actually did its looking like comepetition for my alcher :S!

 

ok, srry then i whas looking at script in this topic, so this must be the old on

 

kk peeps this is my alcer revised hope u like it

 

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


------

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'.