SRL Archive - Archive

tarlcabot1 - SRL Member Application Form

tarlcabot1

2008-04-06 01:25:28

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

What is the meaning to life?

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

Programming Knowledge
C

Other Communitys

How Long have You Played Runescape

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

Hi I love to use scar for autoing in many different games Ive even built a lil fishing prog for WOW that would fish for me while I watched Stargate or G4 and may other games are a shoe in for scar but RS is the one that really got me into scripting

Thanks everyone who made scar and many srl recourses easily adaptable to most other games and by reading scar scripts Ive learned many techniques for better scripting Ive even learned about polymorphism a concept that i just couldn't get before using scar.

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

 
{
 this script is for fallen sword it will walk the map looking for corupt knights
 to farm carnage set pieces uses finddtm to move around the map efficiently and
 attack corupt knights wait states set up for my boo hiss AOL DIALUP in the more
 advanced version I nest the find dtm's in loops to click the buttons as soon as
 they load on the screen wait a second to let the screen finnish loading and
 refind the dtm's to click

 1 you must already be sitting on the enterance to the area
 2 you must have the screen set up to high (24 bit) color and be using firefox
   maxamized with anoth
}
program carnagehunterbasic;
var x,y :integer;

////////////////////////////////////////////////////////////////////////////////
// click X direction button
////////////////////////////////////////////////////////////////////////////////
procedure NE;
var dir :integer;
begin
 dir := DTMFromString('78DA6354606260A862644006BF58217C9828E' +       '30E20EB31AA9A65D552A86AB663AAB9384B0E55CD364C3557E7CA' +       'A3AAD98AA9E6F8645954355B30D534274BA3A80100FC5C107E');
 if finddtm(dir,x,y,307,336,580,813) then
 begin
  movemouse(x,y);
  clickmouse(x,y,true);
  // let screen refresh
  wait(9000+random(3000));
 end;
end;

////////////////////////////////////////////////////////////////////////////////
// click X direction button
////////////////////////////////////////////////////////////////////////////////
procedure E;
var dir :integer;
begin
 dir := DTMFromString('78DA635466626078CAC8800CFE3341689828E' +       '30E20EB31AA9A65D552A86AB663AAB9384B0E55CD364C3557E7CA' +       'A3AAD982A9A639591A450D00091D0DDA');
if finddtm(dir,x,y,307,336,580,813)then
 begin
  movemouse(x,y);
  clickmouse(x,y,true);
  // let screen refresh
  wait(9000+random(3000));
 end;
end;

////////////////////////////////////////////////////////////////////////////////
// click X direction button
////////////////////////////////////////////////////////////////////////////////
procedure SE;
var dir :integer;
begin
 dir := DTMFromString('78DA635464626008006224F09F1142432906C' +       '61D40D663461435CBAAA550D56CC7547371961CAA9A6D986AAECE' +       '954755B31553CDF1C9B2A86AB660AA694E9646510300DB6D1056');
if finddtm(dir,x,y,307,336,580,813)then
 begin
  movemouse(x,y);
  clickmouse(x,y,true);
  // let screen refresh
  wait(9000+random(3000));
 end;
end;

////////////////////////////////////////////////////////////////////////////////
// click X direction button
////////////////////////////////////////////////////////////////////////////////
procedure S;
var dir :integer;
begin
 dir := DTMFromString('78DA63DCCAC8C010C8C4800CFE41694618BD0' +       '3C87ACC88A26659B514AA9AED986A2ECE924355B30D53CDD5B9F2' +       'A86AB662AA393E591655CD164C35CDC9D2286A00563E10E8');
if finddtm(dir,x,y,307,336,580,813)then
 begin
  movemouse(x,y);
  clickmouse(x,y,true);
  // let screen refresh
  wait(9000+random(3000));
 end;
end;

////////////////////////////////////////////////////////////////////////////////
// click X direction button
////////////////////////////////////////////////////////////////////////////////
procedure SW;
var dir :integer;
begin
 dir := DTMFromString('78DA63F46164600860624006FFA134238CDE0' +        '2643D664451D39C2C8DAA662BA69AE3936551D56CC3547375AE3C' +       'AA9AED986A2ECE924355B30353CDB26A2954353B31D5F85809A2A' +       '8010065C212B6');
if finddtm(dir,x,y,307,336,580,813)then
 begin
  movemouse(x,y);
  clickmouse(x,y,true);
  // let screen refresh
  wait(9000+random(3000));
 end;
end;

////////////////////////////////////////////////////////////////////////////////
// click X direction button
////////////////////////////////////////////////////////////////////////////////
procedure W;
var dir :integer;
begin
 dir := DTMFromString('78DA63F4626460780AC448E03F3F0B9886893' +       '26E01B21EA3AA694E964655B31553CDF1C9B2A86AB661AAB93A57' +       '1E55CD764C351767C9A1AAD981A96659B5148A1A005C441124');
if finddtm(dir,x,y,307,336,580,813)then
 begin
  movemouse(x,y);
  clickmouse(x,y,true);
  // let screen refresh
  wait(9000+random(3000));
 end;
end;

////////////////////////////////////////////////////////////////////////////////
// click X direction button
////////////////////////////////////////////////////////////////////////////////
procedure NW;
var dir :integer;
begin
 dir := DTMFromString('78DA63F4616460A8046224F0979B134CC3441' +       '9B700598F50D5182A0AA0AAD98AA926C2590855CD364C35A55152' +       'A86A7660AAB1D6E34755B313538DA2AC208A1A00BF460CA8');
if finddtm(dir,x,y,307,336,580,813)then
 begin
  movemouse(x,y);
  clickmouse(x,y,true);
  // let screen refresh
  wait(9000+random(3000));
 end;
end;

////////////////////////////////////////////////////////////////////////////////
// click X direction button
////////////////////////////////////////////////////////////////////////////////
procedure N;
var dir :integer;
begin
 dir := DTMFromString('78DA63DCCAC8C05006C448609114279886893' +       '282D43C425513E12C84AA661BA69AD2282954353B30D558EBF1A3' +       'AAD989A946515610D39CC7A86A9655A3DA0500083D0DA0');
if finddtm(dir,x,y,307,336,580,813)then
 begin
  movemouse(x,y);
  clickmouse(x,y,true);
  // let screen refresh
  wait(9000+random(3000));
 end;
end;

////////////////////////////////////////////////////////////////////////////////
// find corupt knight, attack, back to world view, and repair.
////////////////////////////////////////////////////////////////////////////////
procedure cor;
var back,fix,target :integer;
begin
back := DTMFromString('78DA8DD24B0AC2301485E1C40DC64D681295D' +       'A161CFB1A288203C181A0A04B697DAD44ABE026AC0307B72790D3' +       '61F9F8737B1B6D5A4A75B40A3DFFB7BA4D9AAE349FFB481A8326D' +       '87191CECF78A293448C218CAB4D9F30BD88B14427AD8D95A62A53' +       '348EE8F84827237698A3795D86681CD1B1914E86063A63E21E4ED' +       '03C4B2FCD14FFFBFBDAD8CF8CB81B7334F05D0B34D5399166499C' +       'B522665E13F36CD03C8A81345B629E1D61F681799A331F88CE913' +       '0A7C05937B9E72FECA13EDB');
fix  := DTMFromString('78DA639CCFC8C0D0CDC4800C16452B8169462' +       '89F710E90D58BAAE6DDE31BA86A40E6F4A1AAF9FFFF3FAA9A0540' +       'D604026AE663AAF9F1F92DA67BD0D45C9B2986A206000E521549');
target := DTMFromString('78DA630C606660E8636440068BF3ACC0344C9' +       '411A4A69708353DA86A96146351D38DAA6659A93DA69A2E22D474' +       'A2AA5953E584A9A60355CDDA46174C35ED44A8694355B3BEC5035' +       '54D0D13034333AA1AA3736AA86A7880E64C405503037035BC4035' +       'FD44A8E923A0860F33BEB0AAE926424D17116A3A8950D34E84BFD' +       'A8850D34A400D289C5BF0AB01005BAE1D2F');

finddtm(target,x,y,600,351,921,815);
// check to make sure screen is still in the same place
if getcolor(x,y) = 3829411 then
 begin
  movemouse(x,y);
  clickmouse(x,y,true);
  // let screen refresh
  wait(7000+random(9000));
  finddtm(back,x,y,560,333,686,376);
  if getcolor(x,y)= 0 then
   begin
    movemouse(x,y);
    clickmouse(x,y,true);
    // let screen refresh
    wait(9000+random(3000));
   end;
  finddtm(fix,x,y,392,635,436,788);
  if getcolor(x,y)= 2251682 then
   begin
    movemouse(x,y);
    clickmouse(x,y,true);
    // let screen refresh
    wait(9000+random(3000));
   end;
 end;
end;
////////////////////////////////////////////////////////////////////////////////
// map walker
////////////////////////////////////////////////////////////////////////////////

procedure coruptknight;
begin
cor;
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
w;cor;w;cor;
n;cor;n;cor;n;cor;
nw;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;
e;cor;
s;cor;
w;cor;
se;cor;
w;cor;w;cor;
n;cor;n;cor;n;cor;n;cor;
w;cor;
nw;cor;nw;cor;nw;cor;nw;
cor;n;cor;n;cor;
w;cor;w;cor;w;cor;w;cor;w;cor;w;cor;w;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
e;cor;e;cor;
n;cor;
w;cor;
ne;cor;
w;cor;
nw;cor;
n;cor;n;cor;
ne;cor;
e;cor;e;cor;
n;cor;n;cor;
ne;cor;
s;cor;s;cor;s;cor;s;cor;
w;cor;
s;cor;s;cor;
ne;cor;
s;cor;s;cor;
ne;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;
e;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
e;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;
e;

s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
ne;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;
se;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;
sw;cor;
w;cor;w;cor;w;cor;w;cor;
s;cor;s;cor;
e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;
e;cor;
n;cor;n;cor;
w;cor;w;cor;
s;cor;s;cor;
ne;cor;
end;
////////////////////////////////////////////////////////////////////////////////
// MAIN
////////////////////////////////////////////////////////////////////////////////
begin
coruptknight;
end.

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

P1nky

2008-04-06 01:36:22

sorry i dont understand this?…

no

its not related to rs?

Runescapian321

2008-04-06 01:42:03

It looks like its for another game. If it's for RS, you use clickmouse and movemouse instead of Mouse. Along with that, you don't have multiplayer or any walking involved. All it seems like is finding and clicking DTMs/colors.

But it's probably for another game right? I don't think that's allowed, I'll go check…

EDIT: Hmm, can't find anything about that. Either way, sorry, no.

Sir R. M8gic1an

2008-04-06 03:16:37

there's no rule against not being RS related, but it still is too simple anyway. no failsafes for example.

~RM

EvilChicken!

2008-04-06 03:27:41

No, missing standards, not using SRL. Read tuts and apply again in a month. Nice attempt though, I want to see more from you.

Someone close this?

n3ss3s

2008-04-06 04:21:03


procedure coruptknight;
begin
cor;
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
w;cor;w;cor;
n;cor;n;cor;n;cor;
nw;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;
e;cor;
s;cor;
w;cor;
se;cor;
w;cor;w;cor;
n;cor;n;cor;n;cor;n;cor;
w;cor;
nw;cor;nw;cor;nw;cor;nw;
cor;n;cor;n;cor;
w;cor;w;cor;w;cor;w;cor;w;cor;w;cor;w;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
e;cor;e;cor;
n;cor;
w;cor;
ne;cor;
w;cor;
nw;cor;
n;cor;n;cor;
ne;cor;
e;cor;e;cor;
n;cor;n;cor;
ne;cor;
s;cor;s;cor;s;cor;s;cor;
w;cor;
s;cor;s;cor;
ne;cor;
s;cor;s;cor;
ne;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;
e;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
e;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;
e;
 
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
ne;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;
se;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;
sw;cor;
w;cor;w;cor;w;cor;w;cor;
s;cor;s;cor;
e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;
e;cor;
n;cor;n;cor;
w;cor;w;cor;
s;cor;s;cor;
ne;cor;
end;

You hand obfuscate your C programs too? :rolleyes:

Read the requirements here.

You may apply again after one month, and if you do, make sure your script fulfills the requirements.

Santa_Clause

2008-04-06 04:39:35

From: n3ss3s


procedure coruptknight;
begin
cor;
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
w;cor;w;cor;
n;cor;n;cor;n;cor;
nw;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;
e;cor;
s;cor;
w;cor;
se;cor;
w;cor;w;cor;
n;cor;n;cor;n;cor;n;cor;
w;cor;
nw;cor;nw;cor;nw;cor;nw;
cor;n;cor;n;cor;
w;cor;w;cor;w;cor;w;cor;w;cor;w;cor;w;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
e;cor;e;cor;
n;cor;
w;cor;
ne;cor;
w;cor;
nw;cor;
n;cor;n;cor;
ne;cor;
e;cor;e;cor;
n;cor;n;cor;
ne;cor;
s;cor;s;cor;s;cor;s;cor;
w;cor;
s;cor;s;cor;
ne;cor;
s;cor;s;cor;
ne;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;
e;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
e;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;
e;
 
s;cor;s;cor;s;cor;s;cor;s;cor;s;cor;
ne;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;
se;cor;
s;cor;s;cor;s;cor;s;cor;s;cor;
sw;cor;
w;cor;w;cor;w;cor;w;cor;
s;cor;s;cor;
e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;e;cor;
n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;n;cor;
e;cor;
n;cor;n;cor;
w;cor;w;cor;
s;cor;s;cor;
ne;cor;
end;

You hand obfuscate your C programs too? :rolleyes:

Read the requirements here.

You may apply again after one month, and if you do, make sure your script fulfills the requirements.

That's not obfuscating…it's called not knowing what a repeat/until is…

Richard

2008-04-06 05:25:31

Sorry, missing too much stuff. No

Metagen

2008-04-06 23:32:05

errr wtf?

P1nky

2008-04-07 00:10:57

From: Rasta Magician
there's no rule against not being RS related, but it still is too simple anyway. no failsafes for example.

~RM

uh yes there is

Wizzup?

2008-04-07 04:27:26

Hello Tarlcabot1!

For what game did you make a script, World of Warcraft?
If you want to get into SRL-Member's I would suggest making a RuneScape script, it will increase your chances of getting in.
Maybe read some tutorials about For To Do, While and Repeat Until loops. It might be usefull.

I am afraid you are not getting in this time… Feel free to apply after two weeks. :)

~Wizzup?