Daniel
2007-07-20 19:29:20
<!– BEGIN TEMPLATE: formanswers –>
IP-Drowner - SRL Member Application Form
IP-Drowner
What is the meaning to life?
Where you Referred to SRL? If yes, by whom?
yes
Sumilion
Programming Knowledge
SCAR, Pascal.
Other Communitys
MoparIsTheBest
How Long have You Played Runescape
3 years. Played then quit etc, but all together 3 years.
Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.
I would make a good SRL Member as i am as much interested in learning SCAR language than any other.
I am a Member of MoparIsTheBest and have been playing Runescape for at least 3 years. I admire Sumilion and his scripts as they're the most advanced scripts i have seen in ages. I have used SCAR 1.13 and above, so i used it when it was nearly the first released and i started scripting after SCAR 2.03 was released.
My interests are:
Science, Music, SCAR, IT, RS2 Cheating, Freelancer, SpaceForce and using IPB forums.
I would very much like to become a SRL Member because of all it's opportunities. I have developed a Snippet code and a PowerCutter for RS2.
I have been cheating with RS2 for at least 2 years now and enjoy it very much. Wizzup?'s scripts are good and i use them but prefer Sumilions PowerMiner and his other scripts.
~IP-Drowner
——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted
Here are a few examples of the scripts i made:
IP-owerCutter:
I have gained at least 6 level using this from level Woodcutting level 1 - 6. But that was the previous version, but this new and updated version i seem to get a duplicate identifier of '' in my script so i cannot quite work that out.
——————————————————
<!– END TEMPLATE: formanswers –>
IP-Drowner - SRL Member Application Form
IP-Drowner
What is the meaning to life?
Where you Referred to SRL? If yes, by whom?
yes
Sumilion
Programming Knowledge
SCAR, Pascal.
Other Communitys
MoparIsTheBest
How Long have You Played Runescape
3 years. Played then quit etc, but all together 3 years.
Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.
I would make a good SRL Member as i am as much interested in learning SCAR language than any other.
I am a Member of MoparIsTheBest and have been playing Runescape for at least 3 years. I admire Sumilion and his scripts as they're the most advanced scripts i have seen in ages. I have used SCAR 1.13 and above, so i used it when it was nearly the first released and i started scripting after SCAR 2.03 was released.
My interests are:
Science, Music, SCAR, IT, RS2 Cheating, Freelancer, SpaceForce and using IPB forums.
I would very much like to become a SRL Member because of all it's opportunities. I have developed a Snippet code and a PowerCutter for RS2.
I have been cheating with RS2 for at least 2 years now and enjoy it very much. Wizzup?'s scripts are good and i use them but prefer Sumilions PowerMiner and his other scripts.
~IP-Drowner
——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted
Here are a few examples of the scripts i made:
IP-owerCutter:
/////////////////////////////////////////////////////////////////////////////////////////
// //
// PowerCutter Script. //
// Made By: //
// IP-Drowner. //
// Script Version: 1.31 //
/////////////////////////////////////////////////////////////////////////////////////////
{
Information:
If you have paid for this script, then you have been scammed.
This script is Freeware and can be published anywhere without
the author's permission but as long as it is not modified.
Includes SRL, so download SRL for SCAR.
Customized for SCAR DIVI 3.04+. Can be used with any SCAR Divi.
Setup Info:
Setup lines 39-48 and then select the Runescape screen
using the crosshair and the script should do the
rest. If you're using a different resolution then
1024x768 then please manually fill out lines 47-48.
Other Info:
If you need more help setting up, please refer to the
F.A.Q Manual provided.
Any bugs found, please report it immediantely to the
forums you downloaded from.
If the support you find is not in the F.A.Q Manual and
need further assistance preparing and setting up
the script, please post at the forums you downloaded
from. If you require help from the author, please
visit [url]http://moparisthebest.com/smf/[/url] and PM
IP-Drowner.
}
program PowerCutter;
{.include SRL\SRL.scar}
{.include SRL\SRL\skill\Woodcutting.scar}
const
Username = 'Username Here'; //Enter YOUR Username Here.
Password = 'Password Here'; //Enter YOUR Password Here.
LampSkill = woodcutting; //If finds a lamp, which skill do you want it to train?
CompassAngle = n; //Which way do you want to Compass to Face?
RunDirection = n; //Which direction do you want to run if finds a fight?
TreeColour = 0; //The colour of the tree you want to chop.
ClickToPlay = 0; //The colour of the Click To Play button when you log in.
DisguiseName = McAfee SecurityCenter; //Change the name of SCAR for less detection.
X2 = 764; //End of Runescape Screen. Defaults Loaded.
Y2 = 502; //End of Runescape Screen. Defaults Loaded.
var
exuser, log, Chops, Loads, x, y: Integer;
procedure LoginSelectedPlayer;
begin
exuser := BitmapFromString2(False, 'a4700678DA8D8F5D0EC4200' +
'884AF4474A0F8687FB8FF9156A1C9B2694D96872F64D06120223A' +
'CB00691F609541695310F11E49AFC760514C8567CFE6BA1BC8CE8' +
'39BE9E4E17DAF5FBD15F7DC29C6C29BD4A0A5222F9C30EE507446' +
'30BF8FE9F3D7FDB700B8EA550DEDC53979DAA2C221F3671AD9161' +
'9EE697648F9971B23D5DFC9634BBEFAC5ED71E3078EE');
log := BitmapFromString2(False, 'a569D878DA9590C10EC3200C43' +
'7F29234E8123DDC8FF7F5231E590A95AD5F9F01439C1104444AA0' +
'E086CC07A19DC5E89752353016B7B93BEB14B5B72A293CDE97CF2' +
'0CA86CEC0D05CD8004A07B904C9D7EA47675546DBA03FE436777F' +
'1763E265F6F5F67232F3912F4F58607F36BF7C927BBDFFFD2BFFE' +
'010B7');
if(FindBitmap(exuser,x,y)) then
begin
Mouse(x,y,4,4,True);
TypeSend(Username);
Wait(969)
TypeSend(Password);
if(FindBitmap(log,x,y)) then
begin
Mouse(x,y,4,4,True);
Wait(1300)
if(FindColor(x,y,ClickToPlay,0,0,X2,Y2)) then
begin
Mouse(x,y,4,4,True);
end;
end;
end;
end;
procedure FindAndChop;
begin
RandomRClick;
if(FindColor(x,y,TreeColour,0,0,X2,Y2)) then
begin
if(FindEnt(TreeColour)) then
begin
RunAwayDirection(n);
Wait(5000 + Random(290))
RunBack;
end;
Mouse(x,y,5,5,True);
RandomRClick;
Wait(700 + random(1000))
Chops:= Chops + 1;
HoverSkill(woodcutting);
RandomRClick;
MakeCompass(s);
SayCurrentLevels(woodcutting);
end else
begin
Writeln('Sorry, the tree colour you specified could not be found.');
ProgressReport;
LogOut;
TerminateScript;
end;
end;
procedure IsInventoryFull;
begin
if(InvFull) then
begin
DropAllLogs;
MakeCompass(n);
Loads:= Loads + 1;
end;
end;
procedure AntiRandoms;
begin
FindNormalRandoms;
FindForester;
FindMaze;
if(FindFight) then
begin
RunAwayDirection(RunDirection);
end;
FindMime;
FindLamp(LampSkill);
FindScapeRune;
SolveTalkingRandom;
end;
procedure IfAxeIsLost;
begin
FindHead;
end;
procedure ProgressReport;
begin
ClearDebug;
Writeln('///////---Progress Report---\\\\\\\');
Writeln('You have chopped ' + IntToStr(Chops) + ' times.');
Writeln('');
Writeln('You have done ' + IntToStr(Loads) + ' loads.');
Writeln('\\\\\\\---Progress Report---///////');
SRLRandomsReport;
end;
begin
SetupSRL;
DisguiseScar(DisguiseName);
LoginSelectedPlayer;
Wait(10000 + Random(1000));
MakeCompass(CompassAngle:String);
repeat
AntiRandoms;
IfAxeIsLost;
FindAndChop;
AntiRandoms;
IsInventoryFull;
IfAxeIsLot;
AntiRandoms;
ProgressReport;
AntiRandoms;
IfAxeIsLost;
Until(IsFKeyDown(8))
end.I have gained at least 6 level using this from level Woodcutting level 1 - 6. But that was the previous version, but this new and updated version i seem to get a duplicate identifier of '' in my script so i cannot quite work that out.
——————————————————
<!– END TEMPLATE: formanswers –>