yay this is my first srl script just testing srl out. simple but auto login makes me "Horny" when ever i run it..^^ seeing that ..i made the scriptwhatever -.-
i tried to make as small amout of lines as possible currently 34
Code:program Login; {.include SRL\SRL.scar} var Click:integer; Const Username = 'Mininq4life'; password = 'Mininq4life'; Procedure Bmps; begin Click := BitmapFromString(34, 10, 'z78DA33304000370C6080019' + '0658D9D0C8C0D0CF0AB21DE3462D490274EAA09C8C0C4C2C08890' + '4A4A6CA4C46DE4A9A7858DE4C5E060F60BE56E1B0C7EA196CAD17' + '819CD2FE49563B42BF770A9C45562535E8F505273910AA85B5762' + 'CA02000637C4E4'); end; procedure login; begin wait(600+random(800)) ClickText('Existing user', 357, 242, 955, 575) wait(100+random(100)) Typesend(Username) Typesend(Password) wait(200+random(100)) Mouse(302, 318,8,8,true) repeat wait(100+random(100)) if(findbitmap(click,x,y))then Mouse(x,y,10,10,true) until(false) end; begin SetupSRL; bmps; login; end.






whatever -.-
Reply With Quote

