I think this was already made, but U L T R A requested it... I think I got the font right, not sure though... I don't really know how to test it , but it's like 6 lines so it can't be that bad :P It also seems like this would be too easy, but that's similar to PinScreen, so idk.
PLEASE TELL ME IF FONTS ARE WRONG/RIGHT
I tried playing it, but it opened up the globals in another tab and said BEGIN expected in script... idk if it does that in all of them, but yeah if someone could tell me if this works
SCAR Code:
function DuelScreen: Boolean ;
//by isjusme // credits to U L T R A for idea
{.include SRL/SRL.scar}
Var
x, y : Integer ;
begin
Result := FindText(x, y, 'Duelling', upchars, 62, 29, 204, 48);
end;
SCAR Code:
function DuelScreen2: Boolean ;
//by isjusme // credits to U L T R A for idea
{.include SRL/SRL.scar}
Var
x, y : Integer ;
begin
Result := FindText(x, y, 'Are', upchars, 106, 30, 148, 47);
end;
SCAR Code:
function duelAcceptButton: Boolean ;
{.include SRL/SRL.scar}
var
AcceptButton, x, y: Integer;
procedure DTMs;
begin
AcceptButton := DTM := DTMFromString('78DA6354636060E0664005671818F88114231' +
'0FF0702467720430855497373395C0D0880D5B0A2AA3131504355' +
'0392674655E3E96082AA86054888A0AA696BAD4055A387A906045' +
'0D42800093154793D4D451435008C880B6D');
end;
procedure ClickIt;
begin
repeat
If FindDTM(AcceptButton, x, y, 4, 4, 717, 480) then
begin
Mouse(x, y, 5, 5, true);
Wait(2000+random(230));
If DuelScreen2(true) then
If FindDTM(AcceptButton, x, y, 4, 4, 717, 480) then
Mouse(x, y, 5, 5, true);
end;
until(false);
end;
begin
SetupSRL;
DTMs;
ClickIt;
FreeDTM(AcceptButton) ;
end.
I think I should apply for membership with this...