how do I use a copy function e.g. CTRL+C, CTRL+V macro... Is is possible to make in pascal?
how do I use a copy function e.g. CTRL+C, CTRL+V macro... Is is possible to make in pascal?
SCAR Code:program New;
procedure hit(key:integer);
begin
keydown(key);
sleep(10);
keyup(key);
end;
begin
activateclient;
repeat
hit(40);
hit(40);
hit(40);
hit(40);
hit(40);
hit(40);
hit(40);
hit(40);
//hit(35);
hit(13);
keydown(17); //
keydown(86); // paste
sleep(10); //
keyup(86); //
keyup(17); //
repeat
wait(10);
until isfkeydown(12);
until false;
end.
down 8
//end
enter
ctrl v
I forgot what that does exactly. Once moparisthebest.com is online, search for tut by kylegut3 in tut section for keycode list. Or look in janilabo's package.
I think I use the above script for formatting this
SCAR Code:procedure boreastitle;
begin
beforeboreastitle;
writeln(' ');
writeln(' ');
writeln(' ');
writeln(' ');
writeln(' ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_ ');
writeln('/ ');
writeln(' ');
writeln(' ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('__ ');
writeln('_/ ');
writeln(') ');
writeln(' ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('___ ');
writeln('__/ ');
writeln(' ) ');
writeln('/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('____ ');
writeln('___/ ');
writeln(' ) ');
writeln('_/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_____ ');
writeln(' ___/ ');
writeln('_ ) ');
writeln('__/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('______ ');
writeln(' ___/ ');
writeln('__ ) ');
writeln('___/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_______ ');
writeln('_ ___/ ');
writeln('(__ ) ');
writeln('____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('________ ');
writeln('/_ ___/ ');
writeln('_(__ ) ');
writeln('/____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln(' ________ ');
writeln('`/_ ___/ ');
writeln('/_(__ ) ');
writeln(' /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_ ________ ');
writeln(' `/_ ___/ ');
writeln(' /_(__ ) ');
writeln('/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('__ ________ ');
writeln('_ `/_ ___/ ');
writeln('/ /_(__ ) ');
writeln('_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('___ ________ ');
writeln('__ `/_ ___/ ');
writeln('_/ /_(__ ) ');
writeln(',_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('____ ________ ');
writeln(' __ `/_ ___/ ');
writeln('/_/ /_(__ ) ');
writeln('_,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_____ ________ ');
writeln(' __ `/_ ___/ ');
writeln(' /_/ /_(__ ) ');
writeln('__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('______ ________ ');
writeln('\ __ `/_ ___/ ');
writeln('/ /_/ /_(__ ) ');
writeln('\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_______ ________ ');
writeln(' \ __ `/_ ___/ ');
writeln('_/ /_/ /_(__ ) ');
writeln('/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('________ ________ ');
writeln('_ \ __ `/_ ___/ ');
writeln('__/ /_/ /_(__ ) ');
writeln('_/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_________ ________ ');
writeln(' _ \ __ `/_ ___/ ');
writeln(' __/ /_/ /_(__ ) ');
writeln('__/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('__________ ________ ');
writeln(' _ \ __ `/_ ___/ ');
writeln(' __/ /_/ /_(__ ) ');
writeln('___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('___________ ________ ');
writeln('/ _ \ __ `/_ ___/ ');
writeln('/ __/ /_/ /_(__ ) ');
writeln('\___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('____________ ________ ');
writeln('_/ _ \ __ `/_ ___/ ');
writeln(' / __/ /_/ /_(__ ) ');
writeln(' \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_____________ ________ ');
writeln('__/ _ \ __ `/_ ___/ ');
writeln(' / __/ /_/ /_(__ ) ');
writeln(' \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('______________ ________ ');
writeln('___/ _ \ __ `/_ ___/ ');
writeln(' / __/ /_/ /_(__ ) ');
writeln(' \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_______________ ________ ');
writeln(' ___/ _ \ __ `/_ ___/ ');
writeln('/ / __/ /_/ /_(__ ) ');
writeln(' \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('________________ ________ ');
writeln(' ___/ _ \ __ `/_ ___/ ');
writeln(' / / __/ /_/ /_(__ ) ');
writeln('/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_________________ ________ ');
writeln('_ ___/ _ \ __ `/_ ___/ ');
writeln(' / / __/ /_/ /_(__ ) ');
writeln('_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('__________________ ________ ');
writeln('\_ ___/ _ \ __ `/_ ___/ ');
writeln('/ / / __/ /_/ /_(__ ) ');
writeln('/_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('___________________ ________ ');
writeln(' \_ ___/ _ \ __ `/_ ___/ ');
writeln(' / / / __/ /_/ /_(__ ) ');
writeln('//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('____________________ ________ ');
writeln('_ \_ ___/ _ \ __ `/_ ___/ ');
writeln('/ / / / __/ /_/ /_(__ ) ');
writeln('_//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_____________________ ________ ');
writeln('__ \_ ___/ _ \ __ `/_ ___/ ');
writeln('_/ / / / __/ /_/ /_(__ ) ');
writeln('__//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('______________________ ________ ');
writeln(' __ \_ ___/ _ \ __ `/_ ___/ ');
writeln('/_/ / / / __/ /_/ /_(__ ) ');
writeln('___//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln('_______________________ ________ ');
writeln(' __ \_ ___/ _ \ __ `/_ ___/ ');
writeln(' /_/ / / / __/ /_/ /_(__ ) ');
writeln('____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ');
writeln(')_______________________ ________ ');
writeln('| __ \_ ___/ _ \ __ `/_ ___/ ');
writeln('/ /_/ / / / __/ /_/ /_(__ ) ');
writeln('\____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln('_ ');
writeln(' )_______________________ ________ ');
writeln(' | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln('// /_/ / / / __/ /_/ /_(__ ) ');
writeln(' \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln('__ ');
writeln('_ )_______________________ ________ ');
writeln(' | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln(' // /_/ / / / __/ /_/ /_(__ ) ');
writeln('/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln('___ ');
writeln('__ )_______________________ ________ ');
writeln('_ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln('/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln('_/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln('____ ');
writeln(' __ )_______________________ ________ ');
writeln('__ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln('_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln('__/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln('_____ ');
writeln('/ __ )_______________________ ________ ');
writeln(' __ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln('/_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln('___/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln('______ ');
writeln('_/ __ )_______________________ ________ ');
writeln('/ __ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln(' /_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln('____/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln('_______ ');
writeln('__/ __ )_______________________ ________ ');
writeln('_/ __ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln('/ /_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln('_____/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln('________ ');
writeln('___/ __ )_______________________ ________ ');
writeln('__/ __ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln('_/ /_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln('/_____/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ________ ');
writeln(' ___/ __ )_______________________ ________ ');
writeln(' __/ __ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln(' _/ /_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln(' /_____/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ________ ');
writeln(' ___/ __ )_______________________ ________ ');
writeln(' __/ __ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln(' _/ /_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln(' /_____/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ________ ');
writeln(' ___/ __ )_______________________ ________ ');
writeln(' __/ __ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln(' _/ /_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln(' /_____/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ________ ');
writeln(' ___/ __ )_______________________ ________ ');
writeln(' __/ __ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln(' _/ /_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln(' /_____/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
cleardebug;
beforeboreastitle;
writeln(' ________ ');
writeln(' ___/ __ )_______________________ ________ ');
writeln(' __/ __ | __ \_ ___/ _ \ __ `/_ ___/ ');
writeln(' _/ /_/ // /_/ / / / __/ /_/ /_(__ ) ');
writeln(' /_____/ \____//_/ \___/\__,_/ /____/ ');
writeln(' ');
wait(2);
i think you could do this, but it is detectable.
i know that doesen't hold the ctrl until you press v, just read the SRL manual, its probably got something in there on how to hold keys.SCAR Code:procedure Type;
begin
SendKeysVB('ctrl')
wait(50+random(50));
SendKeys('v');
end;
every key on your keyboard has an ASCII number and every ctrl+ combination has a number. The code for ctrl+c is 3 and for ctrl+v its 22 so for a copy function it would be this:
SCAR Code:TypeSend(chr(3));
and for paste it would be:
SCAR Code:TypeSend(chr(22));
I will be writing a tut on this soon and i hope this helped.
There are currently 1 users browsing this thread. (0 members and 1 guests)