| View previous topic :: View next topic |
| Author |
Message |
ups2000ups
I post too much
![]() Reputation: 0
Joined: 31 Jul 2006
Posts: 2471
|
 Posted: Sat Nov 03, 2007 1:14 am Post subject: Read 4byte address? |
 |
|
well down here i trying to update the value for a 4byte address
some1 can tell me whats wrong?
when i trying to update the value it update into a "byte" value
im sorry for begging alot right now but i trying to learn (i learn best when i work with it)
| Code: |
procedure TForm1.Button12Click(Sender: TObject);
var address:dword;
value3: dword;
x:dword;
newvalue:string;
begin
address:=StrToInt('$'+edit2.text);
case combobox2.ItemIndex of
2: //4 byte
begin
readprocessmemory(processhandle,pointeR(Address),@value3,4,x);
newvalue:=intTostr(x);
edit3.Text:=newvalue;
end;
end;
end;
|
_________________
dont complain about my english...
1*1 = 2?
Last edited by ups2000ups on Mon Nov 05, 2007 11:46 am; edited 3 times in total |
|
| Back to top |
|
 |
HomerSexual
Grandmaster Cheater Supreme
 Reputation: 5
Joined: 03 Feb 2007
Posts: 1657
|
| Posted: Sat Nov 03, 2007 7:16 am Post subject: |
|
|
make another timer 
you can have like 20000000000000 timers
_________________
|
|
| Back to top |
|
|
ups2000ups
I post too much
![]() Reputation: 0
Joined: 31 Jul 2006
Posts: 2471
|
|
| Back to top |
|
|
appalsap
Moderator
 Reputation: 0
Joined: 27 Apr 2006
Posts: 6753
Location: Pakistan
|
| Posted: Sat Nov 03, 2007 9:13 am Post subject: |
|
|
No, because timers happen in the same thread you use to process window messages. Create another thread.
_________________
|
|
| Back to top |
|
|
slippppppppp
Grandmaster Cheater
 Reputation: 0
Joined: 08 Aug 2006
Posts: 929
|
| Posted: Sat Nov 03, 2007 10:31 am Post subject: |
|
|
Or you can use 2 Timers. try this:
| Code: |
Implementation
var
x, skill1, skill2, skill3, skill4, skill5 : integer;
procedure form1.oncreate;
begin
x := 0;
skill1 := 0;
skill2 := 0;
skill3 := 0;
skill4 := 0;
skill5 := 0;
end;;
Procedure Form1.Timer1(sender:Tobject);
begin
x := strtoint(autoskillsleep.text);
timer2.interval:=x;
if autoskill1.checked = true then
begin
skill1 := 1;
end;
if autoskill2.checked = true then
begin
skill2 := 1;
end;
if autoskill3.checked = true then
begin
skill3 := 1;
end;
if autoskill4.checked = true then
begin
skill4 := 1;
end;
if autoskill5.checked = true then
begin
skill5 := 1;
end;
end;
procedure Form1.timer2(sender:Tobject);
begin
if skill1 = 1 then
begin
PostKeyEx32(ORD('1'), [], FALSE);
end;
if skill1 = 2 then
begin
PostKeyEx32(ORD('2'), [], FALSE);
end;
if skill1 = 3 then
begin
PostKeyEx32(ORD('3'), [], FALSE);
end;
if skill1 = 4 then
begin
PostKeyEx32(ORD('4'), [], FALSE);
end;
if skill1 = 5 then
begin
PostKeyEx32(ORD('5'), [], FALSE);
end;
|
Hopefully, you know how to make the disable part.[/code]
|
|
| Back to top |
|
|
DeletedUser14087
I post too much
![]() Reputation: 2
Joined: 21 Jun 2006
Posts: 3069
|
| Posted: Sat Nov 03, 2007 10:34 am Post subject: |
|
|
| ups2000ups wrote: | | blankrider wrote: | make another timer
you can have like 20000000000000 timers |
ya but the source look better with only 1 for 1 function .... |
i lol'd
|
|
| Back to top |
|
|
The Dami3n
Master Cheater
 Reputation: 1
Joined: 15 Nov 2006
Posts: 441
Location: Mulkerolandia
|
| Posted: Sat Nov 03, 2007 10:42 am Post subject: |
|
|
| Kaspersky wrote: | | ups2000ups wrote: | | blankrider wrote: | make another timer
you can have like 20000000000000 timers |
ya but the source look better with only 1 for 1 function .... |
i lol'd |
I also lol'd, its true that good looking source is kl kl, but what about program which works, which one you want?
|
|
| Back to top |
|
|
DeletedUser14087
I post too much
![]() Reputation: 2
Joined: 21 Jun 2006
Posts: 3069
|
| Posted: Sat Nov 03, 2007 11:02 am Post subject: |
|
|
The reason i lol'd is because "the source look better with only 1 for 1 function"
what does it matter if the src has 1 or 5 timers ? since when srcs are suppose to be looking good  ?
|
|
| Back to top |
|
|
HomerSexual
Grandmaster Cheater Supreme
Reputation: 5
Joined: 03 Feb 2007
Posts: 1657
|
| Posted: Sat Nov 03, 2007 11:16 am Post subject: |
|
|
Sources should always be as clean and simple as possible, but that should NEVER get in the way of making a functional program. I highly doubt anyone other than you will ever actually analyze the source, and since you coded it, you understand it.
_________________
|
|
| Back to top |
|
|
DeletedUser14087
I post too much
![]() Reputation: 2
Joined: 21 Jun 2006
Posts: 3069
|
| Posted: Sat Nov 03, 2007 11:38 am Post subject: |
|
|
| blankrider wrote: | | Sources should always be as clean and simple as possible, but that should NEVER get in the way of making a functional program. I highly doubt anyone other than you will ever actually analyze the source, and since you coded it, you understand it. |
Correct, and i my mine tidy, for example:
GGFixer was coded (V4.4) in 3 Days, every day i have to update and fix some stuff make it tidy and small as i could.
The source is clean and understoodable.
|
|
| Back to top |
|
|
XxOsirisxX
Grandmaster Cheater Supreme
 Reputation: 0
Joined: 30 Oct 2006
Posts: 1597
|
| Posted: Sat Nov 03, 2007 11:58 am Post subject: |
|
|
Just put another timer, it dose'nt matter that the source looks "ugly", you can adjust it. But lol, in the program will not appeir the timers, so what the big deal putting another one?
Add 2 Timers.
_________________
|
|
| Back to top |
|
|
ups2000ups
I post too much
![]() Reputation: 0
Joined: 31 Jul 2006
Posts: 2471
|
|
| Back to top |
|
|
UnLmtD
Grandmaster Cheater
 Reputation: 0
Joined: 13 Mar 2007
Posts: 894
Location: Canada
|
| Posted: Sun Nov 04, 2007 8:39 am Post subject: |
|
|
Appalsap answered your question by the way.
_________________
|
|
| Back to top |
|
|
samuri25404
Grandmaster Cheater
 Reputation: 7
Joined: 04 May 2007
Posts: 955
Location: Why do you care?
|
| Posted: Sun Nov 04, 2007 10:18 am Post subject: |
|
|
| Code: |
timername.Disable
/
timername.Enabled = false
|
o.o
|
|
| Back to top |
|
|
Flyte
Peanuts!!!!
 Reputation: 6
Joined: 19 Apr 2006
Posts: 1887
Location: Canada
|
| Posted: Sun Nov 04, 2007 1:53 pm Post subject: |
|
|
| Kaspersky wrote: | | The source is clean and understoodable. |
This now has a place in my signature, maybe for about a week. 
|
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
