/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
Skriv til hukommelsen.
Fra : Yocal


Dato : 12-06-02 13:40

Hejsa.

Jeg sidder og lejer med lidt Offset Hacking (af spil!!). Men jeg kunne godt
tænke mig at vide hvordan jeg gør følgende:

Finder adressen:

Offset=0x42409e
Len=0x6

Hvor dette står:

OldData=0f8537010000

Og udskifter med dette:

NewData=909090909090

I hukommelsen... Nogen der kan lave en kort forklaring/ex. på det? Så ville
jeg være meget glad

// Yoc




 
 
Thor (12-06-2002)
Kommentar
Fra : Thor


Dato : 12-06-02 22:01

Utestet, skudt fra hoften:

const
Offset=$42409e;
len = 6;
OldData : array [0..len-1] of byte =
($0f,$85,$37,$01,$00,$00)
newdata : array [0..len-1] of byte =
($90,$90,$90,$90,$90,$90);

var buf : array [0..5000000] of byte;
f : file;
size : integer;

begin
assignfile(f, 'spilkopi.exe');
reset(f, 1);
blockread(f, buf, sizeof(buf), size);
if size = sizeof(buf) then error; {->Gør buf større}
for i := 0 to len-1 do
begin
if buf[offset+i] <> olddata[i] then error; {-Det er ikke det rigtige
sted der hackes}
buf[offset + i] := newdest[i];
end;
rewrite(f);
blockwrite(f, buf, size);
closefile(f);
end.

Venlig hilse Thomas Riedel

"Yocal" <swdata@image.dk> wrote in message
news:3d07411f$0$263$edfadb0f@dspool01.news.tele.dk...
> Hejsa.
>
> Jeg sidder og lejer med lidt Offset Hacking (af spil!!). Men jeg kunne
godt
> tænke mig at vide hvordan jeg gør følgende:
>
> Finder adressen:
>
> Offset=0x42409e
> Len=0x6
>
> Hvor dette står:
>
> OldData=0f8537010000
>
> Og udskifter med dette:
>
> NewData=909090909090
>
> I hukommelsen... Nogen der kan lave en kort forklaring/ex. på det? Så
ville
> jeg være meget glad
>
> // Yoc
>
>
>



Yocal (13-06-2002)
Kommentar
Fra : Yocal


Dato : 13-06-02 18:54

Hej

Kunne jeg få dig til at lave eksemplet og sende det til mig? Jeg har prøvet
at lave det ud fra din ex. kode - men synes ikek at det virker.

Mvh.

Yocal.


"Thor" <thr@image.danmark> wrote in message
news:GDON8.33561$N46.1369823@news010.worldonline.dk...
> Utestet, skudt fra hoften:
>
> const
> Offset=$42409e;
> len = 6;
> OldData : array [0..len-1] of byte =
> ($0f,$85,$37,$01,$00,$00)
> newdata : array [0..len-1] of byte =
> ($90,$90,$90,$90,$90,$90);
>
> var buf : array [0..5000000] of byte;
> f : file;
> size : integer;
>
> begin
> assignfile(f, 'spilkopi.exe');
> reset(f, 1);
> blockread(f, buf, sizeof(buf), size);
> if size = sizeof(buf) then error; {->Gør buf større}
> for i := 0 to len-1 do
> begin
> if buf[offset+i] <> olddata[i] then error; {-Det er ikke det rigtige
> sted der hackes}
> buf[offset + i] := newdest[i];
> end;
> rewrite(f);
> blockwrite(f, buf, size);
> closefile(f);
> end.
>
> Venlig hilse Thomas Riedel
>
> "Yocal" <swdata@image.dk> wrote in message
> news:3d07411f$0$263$edfadb0f@dspool01.news.tele.dk...
> > Hejsa.
> >
> > Jeg sidder og lejer med lidt Offset Hacking (af spil!!). Men jeg kunne
> godt
> > tænke mig at vide hvordan jeg gør følgende:
> >
> > Finder adressen:
> >
> > Offset=0x42409e
> > Len=0x6
> >
> > Hvor dette står:
> >
> > OldData=0f8537010000
> >
> > Og udskifter med dette:
> >
> > NewData=909090909090
> >
> > I hukommelsen... Nogen der kan lave en kort forklaring/ex. på det? Så
> ville
> > jeg være meget glad
> >
> > // Yoc
> >
> >
> >
>
>



Thor (13-06-2002)
Kommentar
Fra : Thor


Dato : 13-06-02 20:08

OK her:

const
Offset=$42409e;
len = 6;
OldData : array [0..len-1] of byte =
($0f,$85,$37,$01,$00,$00);
newdata : array [0..len-1] of byte =
($90,$90,$90,$90,$90,$90);

var buf : array [0..5000000] of byte;
f : file;
size, i : integer;

procedure TForm1.Button1Click(Sender: TObject);

begin
assignfile(f, 'spilkopi.exe');
reset(f, 1);
blockread(f, buf, sizeof(buf), size);
if size = sizeof(buf) then halt; {->Gør buf større}
for i := 0 to len-1 do
begin
if buf[offset+i] <> olddata[i] then halt; {-Det er ikke det rigtige
sted der hackes}
buf[offset + i] := newdata[i];
end;
rewrite(f);
blockwrite(f, buf, size);
closefile(f);
end;


"Yocal" <swdata@image.dk> wrote in message
news:3d08dc2e$0$44151$edfadb0f@dspool01.news.tele.dk...
> Hej
>
> Kunne jeg få dig til at lave eksemplet og sende det til mig? Jeg har
prøvet
> at lave det ud fra din ex. kode - men synes ikek at det virker.
>
> Mvh.
>
> Yocal.
>
>
> "Thor" <thr@image.danmark> wrote in message
> news:GDON8.33561$N46.1369823@news010.worldonline.dk...
> > Utestet, skudt fra hoften:
> >
> > const
> > Offset=$42409e;
> > len = 6;
> > OldData : array [0..len-1] of byte =
> > ($0f,$85,$37,$01,$00,$00)
> > newdata : array [0..len-1] of byte =
> > ($90,$90,$90,$90,$90,$90);
> >
> > var buf : array [0..5000000] of byte;
> > f : file;
> > size : integer;
> >
> > begin
> > assignfile(f, 'spilkopi.exe');
> > reset(f, 1);
> > blockread(f, buf, sizeof(buf), size);
> > if size = sizeof(buf) then error; {->Gør buf større}
> > for i := 0 to len-1 do
> > begin
> > if buf[offset+i] <> olddata[i] then error; {-Det er ikke det rigtige
> > sted der hackes}
> > buf[offset + i] := newdest[i];
> > end;
> > rewrite(f);
> > blockwrite(f, buf, size);
> > closefile(f);
> > end.
> >
> > Venlig hilse Thomas Riedel
> >
> > "Yocal" <swdata@image.dk> wrote in message
> > news:3d07411f$0$263$edfadb0f@dspool01.news.tele.dk...
> > > Hejsa.
> > >
> > > Jeg sidder og lejer med lidt Offset Hacking (af spil!!). Men jeg kunne
> > godt
> > > tænke mig at vide hvordan jeg gør følgende:
> > >
> > > Finder adressen:
> > >
> > > Offset=0x42409e
> > > Len=0x6
> > >
> > > Hvor dette står:
> > >
> > > OldData=0f8537010000
> > >
> > > Og udskifter med dette:
> > >
> > > NewData=909090909090
> > >
> > > I hukommelsen... Nogen der kan lave en kort forklaring/ex. på det? Så
> > ville
> > > jeg være meget glad
> > >
> > > // Yoc
> > >
> > >
> > >
> >
> >
>
>



Bjarke Freund-Hansen (05-07-2002)
Kommentar
Fra : Bjarke Freund-Hansen


Dato : 05-07-02 20:59

On Thu, 13 Jun 2002 21:07:55 +0200, "Thor" <thr@image.danmark> wrote:

>"Yocal" <swdata@image.dk> wrote in message
>news:3d07411f$0$263$edfadb0f@dspool01.news.tele.dk...

>>Jeg sidder og lejer med lidt Offset Hacking (af spil!!). Men jeg kunne godt
>>tænke mig at vide hvordan jeg gør følgende:
<snip>
>>I hukommelsen... Nogen der kan lave en kort forklaring/ex. på det? Så ville
>>jeg være meget glad

>OK her:
<snip>
>begin
> assignfile(f, 'spilkopi.exe');
> reset(f, 1);
<snip>

_Hukommelsen_ sagde han, det du har gang i er at redigere i selve
filen.
--

Greetings
Bjarke Freund-Hansen

{ICQ: 36155647 | e-mail: rocekiller@impsoft.dk}

Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408847
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste