SRL Archive - First Scripts

auto typer/ trade accepter


ummmmm0k

2007-06-20 02:25:08

well this is my first script

what it does is auto types what u put in, then when it gets a trade offer it goes and accepts the trade, then the script ends

[PHP]program SpammerTradeAccepter;
var
x,y: integer;
begin
repeat
Wait(3000+random(500));
sendkeys('Buying Yew Logs 230ea'+chr(13)); //put what you want to type
if(findcolor(x,y,8388736,78,423,117,427)) then
begin
MoveMouseSmoothEx(x,y,20,30,35,25,20);
wait(500+random(200));
ClickMouse(x,y,true);
end;
until(FindColor(x,y,8388736,78,423,117,427));
end.
[/PHP]


heres the updated 1

program SpammerTradeAccepter;
{.include SRL/SRL.scar}
var
i,o: integer;
begin
SetUpSRL;
repeat
Wait(3000+random(500));
TypeSend('Buying dds 70k'); //put what you want to type
if FindColorSpiral(i, o, 8388736, 78, 423, 117, 427) then
Mouse(i, o, 20, 1, true);
until(FindColorSpiral(x, y, 8388736, 78, 423, 117, 427));
end.

Geo

2007-06-20 02:26:33

Use SRL it's much less detectable..



like for example

MoveMouseExSmooth ~ swap it to ~ Mouse in SRL
SendKeys ~ swap it to ~ TypeSend in SRL
ClickMouse = Never use unless you want to be banned..

England155

ummmmm0k

2007-06-20 02:28:56

i know, but today is my first time scripting, i just got done reading some tuts like 1-2 hours ago

ZephyrsFury

2007-06-20 04:22:34

its pretty easy to incorporate SRL. also you need to do is put:

{.include SRL/SRL.scar}

a line below

program SpammerTradeAccepter;

like this:

program SpammerTradeAccepter;
{.include SRL/SRL.scar}

then all you need to do is change some of the functions.


TypeSend('Buying Yew Logs 230ea');
Mouse(x, y, 1, 1, true);

also SRL has a procedure called 'AcceptTrade' that will open the trade screen for you. :) so you don't have to use your method of opening the trade screen. but you need to put

{.include SRL/SRL/misc/trade.scar}

below program SpammerTradeAccepter;

you could also make the text to type a constant near the top of the script so that when people want to say a different message they don't have to look through the script to find the TypeSend part.

also i dont know if this is what you want but the script only says one line then waits for a trade then it will stop after the first trade. so you could make it work in a continuous loop by putting a repeat loop before the talking part and a until(false); at the end of the script. you can also make it accept a certain number of trades by adding 1 to a variable and waiting until that variable reaches a certain number.

Heres an example of what you could do with the new functions:


program SpammerTradeAccepter;
{.include SRL/SRL.scar}

const
TextToType = 'Buying yews 230 ea'; //put what you want to type
Times = 5;

var
c: integer;

begin
repeat
repeat
Wait(3000+random(500));
TypeSend(TextToType);
until(SomeoneTrades);
if (SomeoneTrades) then
begin
c:=c+1;
AcceptTrade;
end;
until(c>=Times);
end.

also why are you posting your scripts is PHP tags?

ummmmm0k

2007-06-20 05:29:41

thanks alot, uhh i did php cause i didnt no what to press lol

the scar noob

2007-06-20 10:35:52

From: ummmmm0k
thanks alot, uhh i did php cause i didnt no what to press lol


if you want an example look at my talker/soundplayer/trade opener at main page (not a section like "first script").
You also can use things as long as you credit properly