SendText2:
When I use this in my script it types what I want it to but never clicks enter. How do I fix this?
Also I noticed that SendText2 uses SendKeys. I heard SendKeys are detectable. So should I not use SendText2? And if so how do I incorperate the idea of human like misstakes from SendText2 into TypeSend.
SayCurrentLevels:
In this procedure
(I have no idea why it didn't do proper spacing)procedure RandomTalkyAlways; {Hy71194's}
var
I: Integer;
begin
if RT=False then Exit;
begin
case Random(25) of
0: begin
FTWait(1+Random(5));
TypeSend('fight caves!!!');
end;
1: begin
FTWait(5+Random(10));
TypeSend('time for more exp!!');
end;
2: begin
FTWait(3+Random(4));
TypeSend('gona kill jad!');
end;
3: begin
FTWait(4+Random(7));
TypeSend('so close to 99 str!!!');
end;
4: begin
FTWait(5+Random(11));
TypeSend('almost at lvl 100');
end;
5: begin
FTWait(4+Random(10));
TypeSend('att lvls?');
end;
6: begin
FTWait(2+Random(5));
TypeSend('str lvls?');
end;
7: begin
FTWait(5+Random(4));
TypeSend('def lvls?');
end;
8: begin
FTWait(5+Random(8));
TypeSend('hp lvls?');
end;
9: begin
FTWait(4+Random(10));
TypeSend('mage lvls?');
end;
10: begin
FTWait(4+Random(10));
TypeSend('range lvls?');
end;
11: begin
FTWait (4+Random(10));
TypeSend('prayer lvls?');
end;
12: begin
FTWait(4+Random(10));
TypeSend('=P');
end;
13: begin
FTWait(6+Random(14));
TypeSend('im so bored =(');
end;
14: begin
FTWait(1+Random(5));
TypeSend('die monster!');
end;
15: begin
FTWait(4+Random(10));
TypeSend('Im gona beat jad!!');
end;
16: begin
FTWait(4+Random(10));
TypeSend('rs pwns!!');
end;
17: begin
FTWait(3+Random(7));
TypeSend('..huh...');
end;
end;
end;
end;
I wanted to add SayCurrentLevels. The thing is I only wanted to say Att, Str, Def, Range, Mage, Prayer, or Hp levels and also only pick 1 at a time randomly from the code above. I never got that to work out so if someone could tell me how or do it for me I would greatly apprciate it.
Thanks.




Reply With Quote




