Program!

[Wiceps]

Witam!
W jakim programie jest napisany ten kod?

program DzwigniaManas;
var
i: Integer;


procedure manas;
var
mf_x, mf_y, i: Integer;
begin
i:=0

begin
i:= i + 1;
if(i>=0) then
begin
MoveMouse(mf_x, mf_y)
wait(50);
ClickMouse(mf_x, mf_y, False);
wait(100 + Random(100));

end;


procedure dzwignia;
var
x, y: Integer;
begin

end;
end;


begin
repeat
i:=0

until(false)
end.

Usunełem część kodu. Kod był stworzony do programu SCAR. Chyba to delphi ale nie jestem pewnien. I mam też drugie pytanie.
Jaki kod dorobić by był program z tego i było by [START] [ STOP] ?

 

[kanar123]

1. tak to jest delphi... xD

2. pocztaj...

http://4programmers.net/Delphi/Repeat

 

[Wiceps]

<div class='quotetop'>CYTAT(kanar123 @ 27.05.2008, 16:22) <{POST_SNAPBACK}></div>

1. tak to jest delphi... xD

2. pocztaj...

http://4programmers.net/Delphi/Repeat

[/b]

A jak zrobić przykładowo coś takiego:

Naciskam START i se powtarza to , a jak naciskam STOP to stopuje.
Skróty:
START = crtl+F1
STOP = crtl+F2

Umiałbyś coś takiego zrobić?

 

[kanar123]

trzeba wstawic w timer i potem dac do butonów
START =timer1.enabled=true;
STOP =timer2.enabled=false;
napisz na gg jak cos