NightHawk12
2013-04-03 12:18:36
How Long have You Played Runescape?
8 Year(s)
Are you affilated in anyway with Jagex LTD?
No
Were you Referred to SRL?
What is your general programming knowledge?
I'm actually a Software Engineering and Computer Science dual major, I know a variety of languages with my strong suits being c++ and java. I've been messing around with Simba and Pascal for a little while now, learning the basics.
Are you a member of any other communities?
Powerbot, although not really active at all on there. However, I have a strong feeling this site will be different. Just love the interaction with the community.
Tell us about yourself…
Please show us one (or multiple) of your scripts.
8 Year(s)
Are you affilated in anyway with Jagex LTD?
No
Were you Referred to SRL?
What is your general programming knowledge?
I'm actually a Software Engineering and Computer Science dual major, I know a variety of languages with my strong suits being c++ and java. I've been messing around with Simba and Pascal for a little while now, learning the basics.
Are you a member of any other communities?
Powerbot, although not really active at all on there. However, I have a strong feeling this site will be different. Just love the interaction with the community.
Tell us about yourself…
From: NightHawk12
Hello, my name is Steven - Although you can call me NightHawk. As mentioned above, I'm a university student at the University of Virginia, dual majoring in Software Engineering and Computer Science. I've been playing runescape on and off since 2005. As many oldschool players, I quit around 2010-2011'sh, a little while before EoC was released. I played EoC for about 2 days, and was horribly disgusted. However, now that 2007 is back I am… ecstatic to say the least! While I haven't been involved with the community much at all, I plan to as I am quite fascinated with programming in general and as much as I disagree with some tendencies of pascal, I find it quite fun to play around with on my spare time from my studies.
Anywho, after playing around with simba a lot, creating some basic scripts, and watching hours upon hours of tutorials, I would like to join this community, maybe release some of my scripts (Although, they're probably not the prettiest as of right now).
To the bottom is one of my scripts I messed around with. Did some research on some other scripts, decided to make one of my own, put 3 anti leeches in it as well in case I would ever release, even though you don't need them anymore. The script worked fine for me, although of course you have to monitor it, as all it takes is one random and boom.
Please show us one (or multiple) of your scripts.
program GhoulKiller;
{$Define SMART}
{$i SRL/SRL.simba}
{$i P07Include.simba}
var
x, y: Integer;
Combat1, num1, num2, attnum: Integer;
//There are 3 anti-leeches. If you can't figure them out, then.. Good luck.
const
FightExp = 4;
Name = 'houl';
MC = 9485500;
MC2 = 1645337;
ABan1 = 'Defense';
ABan2 = 'Hitpoints';
procedure P07_DeclarePlayers;
begin
P07_PlayerName := '';
P07_PlayerPass := '';
end;
procedure GhoulStart;
begin
P07_AutoRetaliate(true);
P07_CombatStance(FightExp);
P07_MakeCompassWest;
P07_MakeCameraAngleHigh;
P07_SetRun(true);
end;
procedure Kill;
var x, y: Integer;
begin
wait(100 + random(250))
if P07_FindObjCustom(x,y, ['ttack', Name], [MC, MC2], 6) then
begin
if combat1 = (0) then
begin
P07_MouseBox(X, Y, X, Y, mouse_left);
wait(random(250));
end;
end;
end;
procedure Combat;
begin
Combat1 := 1;
begin
if (FindColor(X, Y, 65280, 220, 110, 330, 220)) then
begin
WriteLn('Die Ghoul!');
end
else Combat1 := 0;
end;
end;
Procedure Antiban;
Begin
Case Random(60) Of
1: HoverSkill(skill_attack, false);
3: Boredhuman;
4: Wait(2500 + random(4500));
5: PickUpMouse;
6: RandomMovement;
7: RandomRClick;
8: MakeCompass('random');
end;
end;
begin
P07_DeclarePlayers;
thisisareallybadantileech
SetupSRL();
thisoneisevenworse
SetupP07Include;
howabouthisone
ClearDebug;
writeln('Help me, Jesus! Help me, Jewish God! Help me, Allah! Help me, Tom Cruise!');
writeln('Tom Cruise, use your witchcraft to get the fire off me!');
if (not P07_LoggedIn) then
P07_LogInPlayer;
GhoulStart;
repeat
if (not P07_LoggedIn) then
begin
P07_LogInPlayer;
GhoulStart;
end;
Combat;
if Combat1 = 0 then
Kill;
Antiban;
until (false)
end.