ok Here we go. I used the Fkey function in this one too. I was going to try to find some other things to add to it but not too many people appreciated it so here it is
SCAR Code:
{.Script Info:
# ScriptName = RS Hoe 1.0
# Author = Buckleyindahouse
# Description = This is for all those lazy people like me.
# Version = 1.0
# Date = 12/16/06
# Comments = Not Really any randoms yet. So just chill and watch.
/Script Info}
program autodropper;
{.include srl/srl.scar}
const
//IF YOU WANT TO SPECIFY WHAT TO POSITION TO DROP THEN GO TO LINE: 188
Spam='What you want to spam';//this is what u want to spam.
username='Arch U 4Life';//put username for autologin feature.
Password='Pass';//Put password for autologin feature.
howmanyalchs=1;//how many alchs you want to do.
Version='1.0';//NO TOUCHIE
var
Alchtimes: integer; spamtimes: integer; droptimes: integer;Login: integer;
var
Logged: integer;
procedure ClickBMPS;
begin
Mouse(x,y,2,2,True);
wait(150+random(150));
WriteLn('Clicked Bmp');
end;
Procedure LoadBitmaps;
Begin
Login := BitmapFromString(136, 32, 'z78DAED5CD172DC380CFBA5' +
'DDB5374D1F936BF3FF9FD4BB3A0FF4D0800051CCBD249D6A325E5' +
'952B7840850A4EEDB7DBF3FEFFFDC7F3D6EDFED77FBDDF2F6F6FE' +
'DF9FFB5FD4ECBFF68FE7DBFEBABF3DF7E3F7E7CBF3C7CB16DBC1A' +
'7C7081DED316F6AB7B7ED7DDFF7C7BF7F7FE776FBBD7DEC3FE3EF' +
'47FFF8167A7EFA348CA3B479CC531B3FE53D8FF6657BDD6FDB63D' +
'BB6F7652D9F5159C3F124F689CF630BD6F0F8F9787B7C1C2D5F6D' +
'ECC95BFE567D1684978C05B78DD65E1F610E4D173D019A3E9F041' +
'B862810B003FB1CAB9AC35DB4CFB09293AD462C2848E4E8C888A8' +
'8C863E3591CED1D181CDF829F72F03CB0C5840FD3BFC4E69CCB87' +
'E8E08843B84CDDC468CA04F5DC42134211B88B69A777B8E0E64E7' +
'D9837044289F667F2478A8393F62B7610D112F796F3F71308E236' +
'499C9BF20BF037D01F5500B781DF20275EF666244E272D9BFE4FE' +
'CAFF3E6A3973EB637DEEAA14DFC139A43CBEE45F82ADEA9C4A514' +
'0837783C5DAE840769E6CF5B47B4FED0036529047CB36835030A7' +
'2FD0FE4F77D1CF36AA3F777697B3159818D4539C61E6D5BA78015' +
'CCBDDDB4B0A056890923789562AF3CCB57C2F7B04F47CE041D01E' +
'8EF6C9AC7AF8AE9E145C2922A12B2377B7477106C59BC8B3487AD' +
'FE43F86C7E16C84337F853521659DBCD532BC207424EEA46B7C43' +
'A7201BC8E8E016A2EFFC6B23757AF4CF8D16225F33151F43FE652' +
'ED265F02264DB4817735BCA7E27BF851814478ACBB2C2BCA7B874' +
'7D4CC14F49DA5957E2323F59A0AC5DCDA5A81EC5DB1662680A5E1' +
'A4F58103A2AA73CB2BD956C18E125C79CEB18414C46E1752E5B43' +
'116C61B401829076587A52E38EDC8D9701D74ABBF7320C7256A6C' +
'77575FE533943E1EB513C0ED70E191D8A32E20CAD7EDAE26A90A9' +
'0855DDE62BED1C5E1052D69E487E083F92B52B3A485755AED7D0E' +
'3C6F9FC14F4413DD13720C59C395EE64E3F0316144BAED8791F46' +
'90DEAF587807978BB8B8D19FCAA9DF8545E51D1BF885137275F5C' +
'1ED10F02EE447169CE6543276F8A702CB5A6BCF1DFEA58297F63C' +
'318A17AE172E76E96CE70207D3ADF16285C02BF1313FE78D48998' +
'AAA413E8614CAD7B43496EB5A7837E39A8B27AF3AA7B0158A8E17' +
'3D172BF5478C4EB1EA38E6002F69AEC97D1EE5B371168770C1FD5' +
'7471E6647BEA89C0F53E1811C2F93CA4538AF31E25A60F7BEB0F0' +
'233FF9EFFF32E245A7E769AE13A30BCF078A096081ABAA38D7614' +
'57C961CDDE533C26840B2DBD35BC1979D9E276F3B586DB2B48E9E' +
'6EAE5707C7D3F1026DDBCC7ED1FD17D72F794CF4CD67A583D0E72' +
'A26DEFFC2BF84BD17AD53E91F6791A21F0135799C8C08FE1CFD64' +
'3CA275A2F5E4B7FE2FED2FE5F3BB6704C877089996CA1928E7636' +
'864F8CD07DEC247D6BD06B231B4332B58D3FB23FBE4DC09F587DC' +
'52F76B088F605EFE3D40FB47E7380514E8AD9DCF2F7B878EF8585' +
'6258A7FC9AC1EE225CC0EF770EA01F59840FD39B44F7A2668E02E' +
'617FCE5FE8BE1EF994AFD4F893F9C9C877808C94B591B4E35D68D' +
'5610D3A1F8BA819E0257952D45F894818EFAEC211CDF377F9D8C5' +
'690EC5A9C2DF62FEB38217E86550CE4F5B84E184173D7A59CF433' +
'6F1C27D87C4ED814E47B637D81B297FAB606D8E1729F686AC1432' +
'22D35FE85E06E9FDE8EF0C6DD2902760F8178A886579EF727B137' +
'E720C0AC6A600BB40CFE1D968FA1E50CF3C667C57799E3502D73B' +
'F024315A17FD97F21995FED25BD10E058DAF447DEBF13443BF500' +
'FA2648BB5549428A329F95A42FDBE9151E3E6C0CC9D1C81DC8341' +
'CC01DDDA913390954CFEEEFA7D3D6B9A624739DF774F458D7A319' +
'D9BE91956AE1529F757289835F31B616519AFE86FAB5046317083' +
'FFE79812CF1646D6ABDC0FD38126D7C2394343DA47607450EFAFB' +
'AC92145B1EC3C7CDD4329C8D27780BE9BA0E49C9CACDC0D1DE156' +
'28A32A5DA4A315D550F74A951A349ED5E0D6CEE87ABF60B1F649A' +
'5523B5CB977A20F17736B48992D30BA2528AC0B7B164EFCB9C691' +
'B237EB4899E34808B3CA5D3753E738102FDC963A76E68A55F31A9' +
'38AA76BF326A5DBFF787DBA9E458CAC2BE56DC26A6BA57EDFBD01' +
'40B90D40A9802BCC659CEF23EBA26A62D0B37CD7168F6C0FB44FE' +
'50698297494FE457A2D00D502F6ED4CF5FBF45C0615B3B2DDFA7D' +
'54A166D684BA1103989F6CC69AEC2A4237AF5ED13595AA2E25F2A' +
'67C3F61072ED5234FED3983189792B7ACD4FB77DC49EB56652AAA' +
'A4A13673329F5FB69C0A762E544C9BBD191139D787F231F53B349' +
'2EF984410676E0A6A74EFA370A1F20DB192F697EF0770EBF71768' +
'8DB28E1EE4E1D4798E50DD3FA8DF5762868B6EF69BBBF35CBA8D3' +
'9D50B2831BA65B5FC6D27F25F53BF5FBA0DAFFBC41F61B35229A9' +
'EB0E97C5097735DB765E460D676BEEBD1F128E4C44544EEABFA67' +
'EFF0FF25259D1');
logged := BitmapFromString(143, 34, 'z78DAED5DD1721A310CFC2' +
'5E00E9A3C9204FEFF939A621E74A35B79D792691E42A79E8C31BE' +
'A3D5DE4A2B59397E1EBF4E87E3EFF83BFE8ECCB81CD7E3F9F0F1E' +
'F8F9D6F33EB715DD6AFE7F8B5DECFD7F56DBD9ED7F6F3F972FE73' +
'59ECD879B7ED30636CD775E3725D3ED6753D7DFFBDF971B92DF7F' +
'5DDFEDCD6DB4FA1F9CDBB661F66F47B6E46FB6EBCB28D97E56D3D' +
'2CA765593ECAC6F88ACC3DB419BBC6CEDB11DCC3E9FD743DDDDB1' +
'8DFAD5D198FF1A7AAAE6231A522CBA3461D2D2EF23B8CE16E6725' +
'C0DD73C6583BC40B8132B8A6DDD51842AD259B3BD958B5450D83D' +
'918471E3B99DDD0BBE23321C6D10C14FB353BC87ACCF09CD5B161' +
'831AB47E0697A5F6B4F71F63072114A1D88F164DE85D159B0877C' +
'85AAC557B0689718410E15929C60EF3AEE73882F5C6B8491EDD3D' +
'A8C8F27CB1F10063C4211B769C85B80CF24BC87A055E2562963C6' +
'38A68A23C49CF597E3D6327688CFDC6793EA77A570C1FC51E2CBD' +
'BFC059661E7296B16ADEA36322B5CE678D6DCB3842887056BD618' +
'4A167858C29C492DEBA105EC6E220C429C4937913A5AA57573DC6' +
'841F08E3BED8BFF5773B0F59C0D353F9221549815829C550D69E6' +
'92FB7D6DBF42C83E63BAC8478013D7B7D741633858B34531A0B1F' +
'C1A90C82941386A1E8AB080A06C359A2F725B058EC0BC5110AE3B' +
'321ADC0316019B2108E9CE7C6AB16423C85ACC5E328B6259E4D6A' +
'554A5EF9549552C45F4338CA73D698CA277865080528D28FADCE7' +
'399FF14F2DF624CA93E9EB9EE46BDCFEF49701FA506F0DA02ED1D' +
'1568056A6CC844670C83A7F5C32A644DCC58211C65B266B465A6A' +
'C1D21CB2BF37934213F8AF12A555F11E9FCC46E1D9B44314E69E6' +
'4BDDF9E720ABE3E9394628436BEC13F2EA37EF7D657252F1FD302' +
'C16C7381E474C0417FB87F9EC951A2B25D4B9620CCED006FFFD3F' +
'2E2AB210A6A6E482012308F95C265EE3A33F95897875DD67AEC11' +
'AB412FD0B50CA7C8CACB1BCB3410D63F31944CC43D3A082D190F5' +
'18335898EE4986B9DD4CBE75C7F63C7E01D7DCCD4B8892628B055' +
'E1FF35419CC8E65EAAFE277091F6F86E5D7A2EC35C89A5E1F18EB' +
'21615CB3F3E4F79F253C40DE6E2DB20E8F17623AE609B0C1D490A' +
'208BD411449BD660C156F150BAFF1F7E2EA0E0A599FEBEDFC7E3E' +
'7D7B72375973A8AD44E2ABAAC4AA86AA9A228FD90EB29085ABDC8' +
'1FCDED88744578C397146A5EE8C8A62BABA29E38566F2590D53CF' +
'712CC222F25F82A6C75B7EAB7567A22A467BE7F16B66769015332' +
'38A74BCD6E734F0D8C7B377222884BEEA8351455E889A7C8D5FAD' +
'8729788386B3040F10D86D8127C9F04B9CF9452A1CC36B0C8BC5C' +
'80A239D3B78A1C8A5B3DED9FFC1BCFC1DEEECE3AB980894159C76' +
'C9D422BE44CD2840568BB31EF892732E888F885A5C39FBEC50432' +
'10B453A457EA64716B243BFB2BD76B8865F6FFC2E84538FA69D7D' +
'5CF6AAC3B6F99A465491C82005E5C5D278499DCF0A150CA18242B' +
'4FC32DD0330178FAC4E0E57ACB665382B66B7FC3C4262B32506A1' +
'76FD4E7D549512E2EC1CD6FAFE57D5A22C9FD5D8AA8D8071A06D2' +
'7AA7607750FC72614C7F135186225128CB3E895C2BC8AB8C777E4' +
'11C7EBA5052A87612EBEBA6F87B95005D7E4E84F5530048D375FD' +
'34E208BF2F790BAAED6200D552251C80AB58E3CB254CE42888B6B' +
'20CB14FBF8BC095DE934BB96A31859C479C3B2D316B5D92EB56E3' +
'C54AAF9DA8C3BF1B23BA3351BE501E0117DAA5994C05968FD2B33' +
'5C8928A9D8570CF36B55AA7BCC4A4C95E094134FCC6E4C9D1ED10' +
'743A88F323307E2C5AC4728EEC447C64AD16E76DE32C5661E59FE' +
'EC3E187C057E8832A60643CD47E7396B471BE43D43BEB24E3D39C' +
'2748C61D02D7A89F08C64AC754C3BBF4FA991B12FE4F5B4B8F21C' +
'D939D3BB6906EE542CC4FE218AD1687F72D01BACED9D82143CFEF' +
'407CF7A0C06F967C5BC7E6E84A7CAABF1420E97E909C39C08E6A3' +
'9BDA884C3D4D19579EA867BB66281809DB9673C4CCC9FA4CA7977' +
'9081ABB0757A7A4C6651DCB8FF587B86720537B1FF71098D00783' +
'D22E983E544379B182382BB6BA194FFB8CFDC7FA79863DA731143' +
'FA2B80C3E81F98A746487AE2A03668D993E186A270DA6AB067396' +
'3371ADB87E5E46566C8761D4D35999EEAD17EBFF9D182DD39D690' +
'847A96FC49F40096316B9C75A5EC153FD3726424498422ABD780E' +
'7AAC6FE1609CC5779D65D486B1F380993ADB447E4A562DC26E18A' +
'9D3FA434FA78EBEC7D4C0337D336674C0564F2233D1D3B4F3C829' +
'64E57BEEF1395C86954AFBB408A7ECF35E5FA686CAF7C108FBD85' +
'3588BFD46065F3CA3319E583ACF45A919749F8D32645DCF9F978B' +
'AD752F8889D2CA40A7AA2AEF65115D323A7D3018BDB4A8E7E7D86' +
'F6DA0BAC4BB532A8355EE633D31A6554DFC843E184F643DC654FD' +
'C3ECAA8CF09CD4E0E9603E3E527D48FE448C583792C157EC2BAA9' +
'D768ACF95A4AB297E5A1F8CCBF1B25C6E4F7CA97DD75F59BF94C7' +
'D1900D53FDCDC64E53C63D9AD2DF85FF76144F8D75C378491F8C8' +
'E9A27E6AA6A91D546EAF95CE58FD55A0BD09053BFDF2AEC86546C' +
'CF28C6193BE7CBDB3C3FBE840BAA7ECBD58C335972DDA0F106FF0' +
'2C05ECF31');
end;
procedure dropper;
begin
if(IsFKeydown(5)) then
begin
DisguiseScar('Now Dropping You Lazy Bastard');
mousespeed:=5;
dropto(2,28);
droptimes:= droptimes + 1;
DisguiseScar('Done Dropping');
end;
end;
procedure spammer;
begin
if(isfkeydown(6)) then
begin
DisguiseScar('Now Spamming');
wait(2000);
typesend(spam);
spamtimes:= spamtimes + 1;
DisguiseScar('Done Spamming You Line');
end;
end;
procedure highalch;
begin
if(isfkeydown(7)) then
begin
DisguiseScar('Now High Alching');
gametab(7);
repeat
mouse(711,372,5,5,true)
wait(2000+random(700));
mouse(711,372,5,5,true)
AlchTimes:=AlchTimes + 1;
until(Alchtimes = Howmanyalchs)
DisguiseScar('Done High Alching');
end;
end;
procedure lowalch;
begin
if(isfkeydown(8)) then
begin
gametab(7);
DisguiseScar('Now Low Alching');
repeat
mouse(708,294,5,5,true)
wait(2000+random(500));
mouse(708,294,5,5,true)
Alchtimes:=AlchTimes + 1;
until(Alchtimes = Howmanyalchs)
DisguiseScar('Done Low Alching');
end;
end;
procedure Lazy;
begin
if(isfkeydown(9)) then
begin
DisguiseScar('Now Loging In');
if(FindBitmap(Login,x,y)) then
begin
ClickBMPS;
typesend(username);
wait(500+random(150));
typesend(password);
wait(500+random(100));
if(FindBitmap(Logged,x,y)) then
begin
wait(1500+random(1500));
ClickBMPS;
DisguiseScar('Done Loging In');
end;
end;
end;
end;
procedure credits;
begin
ClearDebug;
DisguiseScar('Showing Credits');
writeln('This Script Was Made By Buckleyindahouse');
writeln('This Is My Version Of RS Bitch ');
writeln('You Are Using Buckleyindahouse RS Hoe 1.0');
DisguiseScar('No More Credits');
wait(1000);
DisguiseScar('Scar Your Autoing Friend');
end;
procedure ReportStats;
begin
cleardebug;
DisguiseScar('Now Show Your Report :)');
Writeln('You Have Been Using RS Bitch For'+(timerunning));
writeln('You Have Alched:'+IntToStr(Alchtimes)+'Times');
Writeln('You have Spammed You Line For:'+IntToStr(SpamTimes)+'Times');
Writeln('You Have Auto Dropper You Inventory:'+IntToStr(Droptimes)+'Times');
Writeln('REMEMBER I AM NOT RESPONSIBLE IF YOU GET BANNED AND HAVE FUN');
DisguiseScar('Done Showing Your Report!');
end;
////////////////////////////MAIN LOOP\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
begin
SetupSRL;
credits;
wait(1500);
activateclient;
LoadBitmaps;
repeat
dropper;
spammer;
highalch;
lowalch;
lazy;
until(False)
ReportStats;
end.