SRL Archive - Archive

<!– BEGIN TEMPLATE: formanswers –>
havoc928 - SRL Member Application Form
havoc928

What is the meaning to life?
to become an amazing SCAR scripter!!!!


Where you Referred to SRL? If yes, by whom?
no


Programming Knowledge
BASIC

Other Communitys
Runekeep.net

How Long have You Played Runescape
2 years

Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.

Hello, i am relitvly new to the SRL forums but i am on the scripting road. i have learned a great deal from the kind and helpful people here on these forums. besides SCAR i have experience with other languages such as DARKBASIC its a type of the BASIC programming language. so far i have made a pretty decent power woodcutter. complete with anti-randoms.
i believe i have what it takes to become an SRL member. if you decline my request it is ok. i respect your decision as an experienced member. thank you.



sincerly,
Havoc928

——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted

{.Script Info:
# ScriptName  = TREEKILLER V1.4
# Author      = havoc928
# Description = Chops trees until full inventory then drops
# Version     = v1.4
# Date        =
# Comments    = Start anywhere where there are trees, with an axe weilded
# Autocolor   = no

# Release Comments
// version 1.0 = very simple woodcutter\\
// version 1.1 = added autotalker worked-removed\\
// version 1.2 = added antirandoms untested-removed\\
// version 1.3 = added anti ban working on-removed\\
// version 1.4 = added log droping\\
// version 1.5 = added anti-randoms\\
// version 1.6 = added simple auto respond\\


program simplewc;
{.include SRL/SRL.scar}
{.include SRL\SRL\skill\WoodCutting.scar}
var
c: integer;
var
d: integer;
var
e: integer;
// THE SETUP\\
const tree=5402997; // SET THE TREE COLOR\\// YOU MAY NOT HAVE TO\\
const tree2=5402997; // SET TREE COLOR AGAIN - BAD FAILSAFE\\
const tol=5; // SET THE COLOR FINDING TOLERANCE\\// 5-10 IS GOOD\\
const waiting=5000; // SET TIME TO WAIT BEFORE NEXT CLICK. 1000MS = 1SEC
const offset=5000; // SET THE RANDOM TIME OFFEST FOR CLICKS - RANDOMNESS
// END SETUP\\


  procedure treekiller;
 begin
if (findcolortolerance(x,y,tree,3,3,861, 376,tol))then
 begin
if (findcolortolerance(x,y,tree2,3,3,861, 376,tol))then
     writeln('FOUND COLOR');
end;
// DO NOT TOUCH BELOW\\
  mouse(x,y,0,0,true)
  c:=c+1;
 wait(waiting+random(offset))
end;

procedure respond;
begin
if (InChat('bot'))Then
   TypeSend('im not a bot');

if (InChat('macro'))Then
   TypeSend('im not a bot');
end;

procedure PrintProgressReport;
begin
WriteLn('havoc928 TREEKILLER');
WriteLn('Cut ' + inttostr(c) + ' Logs.');
WriteLn('Dropped ' + inttostr(d) + ' Loads.');
WriteLn('Checked for ' + inttostr(e) + ' Randoms.');
end;

  procedure credits;
 begin
writeln('/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\')
writeln('                 VERSION 1.4                            ')
writeln('CREDIT GOES TO ME HAVOC928 ...FEEL FREE TO DISTRIBUTE')
writeln('I THANK KIKWIT, Pancakes, AND n3ss3s FOR ALL THE HELP')
writeln('SRL FORUMS OWNS ALL THE OTHERS!!!')
writeln('/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\')
 end;
   procedure drop;
  begin
  typesend('WOOT WOOT FINALLY A FULL LOAD')
writeln('DROPING LOGS')
 Dropto(2,28)
d:=d+1
end;

procedure randoms;
begin
findnormalrandoms;
e:=e+1;
end;


begin
setupsrl;
DisguiseScar('iTunes');
credits;
activateclient;
repeat
repeat
respond;
 treekiller;
wait(100)
 randoms;
wait(100)
 printprogressreport;
until(InvCount = 28);
 drop;
 until(false)
end.

——————————————————
<!– END TEMPLATE: formanswers –>

i looked at your script and there are some things i cant find:

- all anty randoms
- some antiban (2 responds is not enough)
- srl standaards (like login procedure)
- and some more

sorry but where looking for some more advanced members. plz keep it up and come back when you got a very good script.

i say your not ready yet. no. but keep it up! its a start :D

^What He Said^
Way to simple.
No Multiplayer
Antirandoms wont work without a nick name.
Missing lots of needed things to get into SRL.
Try making a more advanced script, show some multiplayer, bitmaps, DTMs, and just more than a simple FindColorSpritalTolerance

Good luck next time.