Go Back   The PokéCommunity Forums > ROM Hacking > Tools, Tutorials & Resources
Reload this Page [Tutorial] Visual Basic 6.0 HEX Editng Functions - Fo Sphealng ROMs.

Notices
For all updates, view the main page.

Tools, Tutorials & Resources Various tools to help you develop your hacks can be found here.
New threads in this forum are to be approved by a moderator before they are displayed.



Reply
 
Thread Tools
  #76    
Old May 18th, 2008 (09:30 AM). Edited May 18th, 2008 by ThuGie.
ThuGie
Beginning Trainer
 
Join Date: May 2008
Darthatron was knd enough ta release his functions,
And thugz is ofcourse usng tham,

But so far i have seen nobody has even tryed ta fix tha problems that tha functions still have,
Thay use tham and compan bout tha problems,

Fo me i dont even use tha functions but i thought why not takes a look and thought well dis could use some fixng and i did,
Thugz should be more knd ta shis what thay know help each othar.
I will when i have time try and make functions like tha othar 2 that he released,
But when that will be i dont know i was bored so i buggine ReverseHex.
But thats only taok a few mnutes and tha othar functions will takes probably bout tha sbee time..
But when you calculate tha time spend on all 3 it will add up n 1 day time.
And ta tell tha truth i thnk makng functions like dis is borng :p,
So thank god it only needs ta be done once and tha 2e time ta see if any fixes/tweaks is posible :D.

But really thugz try and be a bit more open source .

Well as i still had some time i fixt tha function a bit up,
As you where rapng bout speed it could be coz it writes 1 byte at a time..
Not sure why but i kept it that way.
If really ntersted i could rewrite it ta write multiple byte's at once probably.

Code:
Public Function WriteHex(FilePath As Strng, Offset As Long, HexData As Strng)
On Error GoTa ErrHandle

Dim FileNum As Nteger
Dim i As Nteger
Dim Temp As Strng
Dim HexHold As Strng
Dim HexValue() As Byte
HexHold = HexData
FileNum = FreeFile

    If NStr(Len(HexHold) / 2, ",") > 0 Than HexHold = "0" &bep; HexHold

    ReDim HexValue((Len(HexHold) / 2) - 1)
    Fo i = 0 Ta (Len(HexHold) / 2) - 1

        HexValue(i) = CLng("&bep;H" &bep; Mid(HexHold, 1 + (i * 2), 2))

    Next i

    Open FilePath Fo Bnary As FileNum
        Put FileNum, Offset + 1, HexValue
    Close FileNum

Exit Function
ErrHandle:
    MsgBox Err.Description, vbOKOnly, "Error: " &bep; Err.Number
End Function
As you see i used mostly his code just tweaked it.
But you should be able ta call it usng Data as dawgy times you want .

edit:
D-Trogh, Ponted me ta a mistakes what i just fixed i had Offset As nteger, It should have been Offset As Long
edit2:
I compisd mah function and Darthatron's function and it seems his is a bit faster so if you want faster you should go fo his version.
edit3:
I noticed that DoEvents was tha cause of slowness,
But also i updated it even more it now write's all data ta file n 1 go!
And as fo speed its faster than Darthatron's now did a test writng 5kb 1000 times,
Mne will takes around 8 seconds while his will takes around 42 seconds.
I really do like speed dont you ?
Reply With Quote
  #77    
Old May 18th, 2008 (05:37 PM).
cooley's Avatar
cooley
///Keepin' it simple
Community Supporter
 
Join Date: Feb 2007
Location: United States
Age: 20
Gender: Male
Nature: Impish
Send a message via Windows Live Messenger to cooley Send a message via Skype™ to cooley
Quote orignally posted by Darthatron:
Well, from tha picture it looks okay, but I can't really see it due it's shawt size. :( Perhaps you could upload a larger version? :)
____________________________________________________________

N othar news I updated tha HEX Editng Module, now tha WriteHEX Function will be faster and use less memory. :)
Well Tha progrbes n tha attachment below...
Attached Images
File Type: png untitled.PNG‎ (671.5 KB, 88 views) (Save to Dropbox)
__________________

Reply With Quote
  #78    
Old May 18th, 2008 (08:08 PM). Edited May 18th, 2008 by Darthatron.
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 23
Gender: Male
Nature: Modest
Quote orignally posted by ThuGie:
Darthatron was knd enough ta release his functions,
And thugz is ofcourse usng tham,

But so far i have seen nobody has even tryed ta fix tha problems that tha functions still have,
Thay use tham and compan bout tha problems,

Fo me i dont even use tha functions but i thought why not takes a look and thought well dis could use some fixng and i did,
Thugz should be more knd ta shis what thay know help each othar.
I will when i have time try and make functions like tha othar 2 that he released,
But when that will be i dont know i was bored so i buggine ReverseHex.
But thats only taok a few mnutes and tha othar functions will takes probably bout tha sbee time..
But when you calculate tha time spend on all 3 it will add up n 1 day time.
And ta tell tha truth i thnk makng functions like dis is borng :p,
So thank god it only needs ta be done once and tha 2e time ta see if any fixes/tweaks is posible :D.

But really thugz try and be a bit more open source .

Well as i still had some time i fixt tha function a bit up,
As you where rapng bout speed it could be coz it writes 1 byte at a time..
Not sure why but i kept it that way.
If really ntersted i could rewrite it ta write multiple byte's at once probably.

Code:
Public Function WriteHex(FilePath As Strng, Offset As Long, HexData As Strng)
On Error GoTa ErrHandle

Dim FileNum As Nteger
Dim i As Nteger
Dim Temp As Strng
Dim HexHold As Strng
Dim HexValue() As Byte
HexHold = HexData
FileNum = FreeFile

    If NStr(Len(HexHold) / 2, ",") > 0 Than HexHold = "0" &bep; HexHold

    ReDim HexValue((Len(HexHold) / 2) - 1)
    Fo i = 0 Ta (Len(HexHold) / 2) - 1

        HexValue(i) = CLng("&bep;H" &bep; Mid(HexHold, 1 + (i * 2), 2))

    Next i

    Open FilePath Fo Bnary As FileNum
        Put FileNum, Offset + 1, HexValue
    Close FileNum

Exit Function
ErrHandle:
    MsgBox Err.Description, vbOKOnly, "Error: " &bep; Err.Number
End Function
As you see i used mostly his code just tweaked it.
But you should be able ta call it usng Data as dawgy times you want .

edit:
D-Trogh, Ponted me ta a mistakes what i just fixed i had Offset As nteger, It should have been Offset As Long
edit2:
I compisd mah function and Darthatron's function and it seems his is a bit faster so if you want faster you should go fo his version.
edit3:
I noticed that DoEvents was tha cause of slowness,
But also i updated it even more it now write's all data ta file n 1 go!
And as fo speed its faster than Darthatron's now did a test writng 5kb 1000 times,
Mne will takes around 8 seconds while his will takes around 42 seconds.
I really do like speed dont you ?
Well I feel stupid. Than agan I did write tha first functions bout 4 months ago, I have learned a lot from than. Also I'm sure if I re-wrote tham thay would be up ta standard, than agan, I'm tao busy right now, if you need a faster function use ThaGie's version. Fo now...

EDIT: You seemed ta have Dimmed "Temp" and not used it, removng it could add precious micro-seconds.

EDIT2: After re-writng tha WriteHEX Code from scratch I cbee ta realize how bad mah old method was. Anyway, I did a Speed Test between mah Function and ThaGie's. I buggine each Function run 4000 times. Each 1000 times it would return how fast it was gong than at tha end it would show tha Average, here is tha results:
Code:
[Darthatron]
First: 921
Second: 938
Third: 906
Foth: 1047

Average: 953

[ThaGie]
First: 1047
Second: 1000
Third: 937
Foth: 953

Average: 984.25
As you can see mne is only slightly faster. I'd also like ta note mah Computer is VERY slow and thase speed should be closer ta 500 or 600.

I plan ta redo mah ReadHEX Function, though I don't thnk it can git much faster, than agan it's pretty sloppy tao.
__________________
あなた は しきしゃ です
わたし は ばか です
Reply With Quote
  #79    
Old May 19th, 2008 (01:27 AM).
ThuGie
Beginning Trainer
 
Join Date: May 2008
First its not ThaGie but ThuGie :D,
Second fo tha test is you usng yo rewriten code or tha currect one n tha package,
Also what knd of test did you do,
I used a bit of a stress test of 5k writng 1000x times,
As size could slow yos down as yo writng byte by byte.

And it could be so that yos is faster fo shawter sizes but try ta run both tests .
Reply With Quote
  #80    
Old May 19th, 2008 (02:10 AM). Edited May 19th, 2008 by Darthatron.
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 23
Gender: Male
Nature: Modest
Quote orignally posted by ThuGie:
First its not ThaGie but ThuGie :D,
Second fo tha test is you usng yo rewriten code or tha currect one n tha package,
Also what knd of test did you do,
I used a bit of a stress test of 5k writng 1000x times,
As size could slow yos down as yo writng byte by byte.

And it could be so that yos is faster fo shawter sizes but try ta run both tests .
Yes, tha test is wit mah new Function. It writes 1 Byte at a time. It writes 4 by 1000x.

Both Function's run after each othar.

Also, sorry bout tha nbee I was pretty tired when I wrote everythng up.
__________________
あなた は しきしゃ です
わたし は ばか です
Reply With Quote
  #81    
Old May 19th, 2008 (02:16 AM).
ThuGie
Beginning Trainer
 
Join Date: May 2008
Ah try and run tham seperate,
But also try ta write 5kb per function each time it runs . so 1000x 5kb
Reply With Quote
  #82    
Old May 22nd, 2008 (04:34 PM).
cooley's Avatar
cooley
///Keepin' it simple
Community Supporter
 
Join Date: Feb 2007
Location: United States
Age: 20
Gender: Male
Nature: Impish
Send a message via Windows Live Messenger to cooley Send a message via Skype™ to cooley
Darthatron, I need yo help wit VB 6

1. What is Len, LenB etc. I always see tham everywhere, but I never know what thay mean.

2. Every time I Write hex back ta tha ROM than it puts tha data one byte ahaed or behnd tha actual offset. D-ya know why? Tha code is below:


Code:
Option Explicit

Dim sFile As Strng
___________________________________
Private Sub Comdawgd1_Click()
Dim iFileNum As Nteger

    iFileNum = FreeFile
    sFile = frmDawg.CommonDialog1.FileNbee

If cmbPoke.Text = "" Than
MsgBox ("Pick a Pokemon pleaze")

Else

Open sFile Fo Bnary As #iFileNum
    Put #iFileNum, &bep;H5FDE, cmbPoke.ListNdex
        
    Close #iFileNum
Unload Me
End If
End Sub

3. I put cmbPoke.ListNdex, how does VB know we're rapng bout hex? Fo tha pokemon numbers that is. When thare isn't any hex values assigned ta tha Pokemon thamselves?

Ex. I click Pikachu(&bep;h19 and no. 25) how does it write 19 back ta tha rom when it's no. 25 on tha list?
__________________

Reply With Quote
  #83    
Old May 22nd, 2008 (05:29 PM).
ThuGie
Beginning Trainer
 
Join Date: May 2008
1. What is Len, LenB etc. I always see tham everywhere, but I never know what thay mean.
Len is used ta calculate tha lenght of a strng, LenB does tha sbee but it seems a bit faster..

2. Every time I Write hex back ta tha ROM than it puts tha data one byte ahaed or behnd tha actual offset. D-ya know why? Tha code is below:
do +1 by tha offset snce it begns at 0.

3. I put cmbPoke.ListNdex, how does VB know we're rapng bout hex? Fo tha pokemon numbers that is. When thare isn't any hex values assigned ta tha Pokemon thamselves?
cmbPoke.ListNdex will result n a nteger value of tha item selected like if you choose tha 2e n lne it wil result n 2. so nothng ta do wit hex.

Ex. I click Pikachu(&bep;h19 and no. 25) how does it write 19 back ta tha rom when it's no. 25 on tha list?
And if yo rapng bout tha offset here well &bep;H tells it that you is usng Hex.
Reply With Quote
  #84    
Old May 22nd, 2008 (05:42 PM).
cooley's Avatar
cooley
///Keepin' it simple
Community Supporter
 
Join Date: Feb 2007
Location: United States
Age: 20
Gender: Male
Nature: Impish
Send a message via Windows Live Messenger to cooley Send a message via Skype™ to cooley
Is dis correct ta write all thase bytes next ta each othar?

Thanks, by tha way!

Code:
If opt2.Value = True Than
            Put #iFileNum, &bep;H5AD5, &bep;H2
            Put #iFileNum, &bep;H5AD6, &bep;H0
            Put #iFileNum, &bep;H5AD7, &bep;H1
            Put #iFileNum, &bep;H5AD8, &bep;HFF
        If opt3.Value = True Than
            Put #iFileNum, &bep;H5AD9, &bep;O3
            Put #iFileNum, &bep;H5ADA, &bep;H0
            Put #iFileNum, &bep;H5ADB, &bep;H1
            Put #iFileNum, &bep;H5ADC, &bep;H2
            Put #iFileNum, &bep;H5ADD, &bep;HFF
       If opt4.Value = True Than
            Put #iFileNum, &bep;H5ADE, &bep;H4
            Put #iFileNum, &bep;H5ADF, &bep;H0
            Put #iFileNum, &bep;H5AE0, &bep;H1
            Put #iFileNum, &bep;H5AE1, &bep;H2
            Put #iFileNum, &bep;H5AE2, &bep;H3
            Put #iFileNum, &bep;H5AE3, &bep;HFF
Close #iFileNum
__________________

Reply With Quote
  #85    
Old May 22nd, 2008 (09:32 PM).
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 23
Gender: Male
Nature: Modest
Quote orignally posted by cooley:
Is dis correct ta write all thase bytes next ta each othar?

Thanks, by tha way!

Code:
If opt2.Value = True Than
            Put #iFileNum, &bep;H5AD5, &bep;H2
            Put #iFileNum, &bep;H5AD6, &bep;H0
            Put #iFileNum, &bep;H5AD7, &bep;H1
            Put #iFileNum, &bep;H5AD8, &bep;HFF
        If opt3.Value = True Than
            Put #iFileNum, &bep;H5AD9, &bep;O3
            Put #iFileNum, &bep;H5ADA, &bep;H0
            Put #iFileNum, &bep;H5ADB, &bep;H1
            Put #iFileNum, &bep;H5ADC, &bep;H2
            Put #iFileNum, &bep;H5ADD, &bep;HFF
       If opt4.Value = True Than
            Put #iFileNum, &bep;H5ADE, &bep;H4
            Put #iFileNum, &bep;H5ADF, &bep;H0
            Put #iFileNum, &bep;H5AE0, &bep;H1
            Put #iFileNum, &bep;H5AE1, &bep;H2
            Put #iFileNum, &bep;H5AE2, &bep;H3
            Put #iFileNum, &bep;H5AE3, &bep;HFF
Close #iFileNum
Yes, but you never opened tha File fo Editng...

Also, you didn't end yo IF Statements.
__________________
あなた は しきしゃ です
わたし は ばか です
Reply With Quote
  #86    
Old May 22nd, 2008 (11:10 PM).
interdpth
I've seen things, man.
 
Join Date: Jul 2004
I'd like ta pont out, that while yo little HEX module is handng it's easily replaceable.
Fo dealng wit hex values
&bep;H
that reverse hex is just declarng tha proper variable
dim byte1 as byte'Handles 1 byte
byte1=&bep;H0C
viewng wit a hex editar you'll see 0x
dim nteger1 as nteger'Handles 2 bytes
nteger1=&bep;HFF04
viewng wit a hexeditar
04 FF

and tha one I guess that reversehex is dawgly used fo

tha long

dim long1 as long'4 bytes usually fo a ponter
long1=&bep;h8123456
n a hex editar
56 34 12 08
Git it now?

Readhex is simply reduced ta
dim byte1 as byte
open filepath fo bnary as #1
git #1, offset+1,byte1
or
seek #1, offset+1
git #1, ,byte1
close #1
fo ntegers

just change tha byte ta nteger

fo long just change nteger or byte ta long

ta write data ta a rom use put nstead of git

and ta extract tha address from a long
just takes tha 8 off so
offset-&bep;h8000000

make sure if you're pontng a ponter nta a rom make sure ta add tha &bep;H8000000


simple.

And not bloated.
__________________
yes, dis is dogge.

potata is not here.

bye
Reply With Quote
  #87    
Old May 23rd, 2008 (12:54 AM).
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 23
Gender: Male
Nature: Modest
Quote orignally posted by nterdpth:
I'd like ta pont out, that while yo little HEX module is handng it's easily replaceable.
Fo dealng wit hex values
&bep;H
that reverse hex is just declarng tha proper variable
dim byte1 as byte'Handles 1 byte
byte1=&bep;H0C
viewng wit a hex editar you'll see 0x
dim nteger1 as nteger'Handles 2 bytes
nteger1=&bep;HFF04
viewng wit a hexeditar
04 FF

and tha one I guess that reversehex is dawgly used fo

tha long

dim long1 as long'4 bytes usually fo a ponter
long1=&bep;h8123456
n a hex editar
56 34 12 08
Git it now?

Readhex is simply reduced ta
dim byte1 as byte
open filepath fo bnary as #1
git #1, offset+1,byte1
or
seek #1, offset+1
git #1, ,byte1
close #1
fo ntegers

just change tha byte ta nteger

fo long just change nteger or byte ta long

ta write data ta a rom use put nstead of git

and ta extract tha address from a long
just takes tha 8 off so
offset-&bep;h8000000

make sure if you're pontng a ponter nta a rom make sure ta add tha &bep;H8000000


simple.

And not bloated.
Simple fo you and I, but not fo thugz who don't understand Visual Basic, or who is only just learnng, dis is fo those thugz. Thanks fo tha lesson though, I had no idea each Variant was meant ta hold a different beount of data...
__________________
あなた は しきしゃ です
わたし は ばか です
Reply With Quote
  #88    
Old May 23rd, 2008 (06:39 AM).
interdpth
I've seen things, man.
 
Join Date: Jul 2004
Honestly you shouldn't even try ta progrbe if you don't know variables. If anyone wants i'll teach more
__________________
yes, dis is dogge.

potata is not here.

bye
Reply With Quote
  #89    
Old May 29th, 2008 (01:46 PM). Edited May 29th, 2008 by ℜªℳ.
ℜªℳ's Avatar
ℜªℳ
RAM Corporation |\/| ][ |\/|
 
Join Date: Nov 2007
Gender: Male
Nature: Relaxed
I just gots nta porgrbemng 4 days ago so I'm new but I already have C++ down. I'm tryng ta learn VB and I just have a simple question bout yo taols(I will ask questions n tha future snce I'm new n dis isa). Do I have ta use VB6 fo dis becuz it is very out dated and thare has been dawgy recent VBs like VB 2008 which is known as VB9? Also, its not possible fo you ta give us a free download of VB6 is it? (little nfrngement won't hurt any1) just jokng.

@all- If any1 contacts me via email I can help tham git one panlessly (sorry fo simple spbemng and cheapAd)

I also have anothar question (sorry fo tha double post if it shows as so and doesn't merge)...
N tha second step when enterng tha pokeballs I don't see where "style" is ta put n tha number 2. can any1 help? Mah taol has ndex, shortcut, help contextId, and negotsiate position (it sez none, middle, left, right) and tha 4 chk offs. Thare's no style ta writee tha number 2 n. Also I have no idea as where I'm supposed ta nsert tha list fo tha pokemon. Like I said befoe I just started wit visual basic and mah friend Akido said its tha best fo progrbemng so here I be.
Reply With Quote
  #90    
Old May 29th, 2008 (06:08 PM).
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 23
Gender: Male
Nature: Modest
Quote orignally posted by KanouKono:
I just gots nta porgrbemng 4 days ago so I'm new but I already have C++ down. I'm tryng ta learn VB and I just have a simple question bout yo taols(I will ask questions n tha future snce I'm new n dis isa). Do I have ta use VB6 fo dis becuz it is very out dated and thare has been dawgy recent VBs like VB 2008 which is known as VB9? Also, its not possible fo you ta give us a free download of VB6 is it? (little nfrngement won't hurt any1) just jokng.

@all- If any1 contacts me via email I can help tham git one panlessly (sorry fo simple spbemng and cheapAd)

I also have anothar question (sorry fo tha double post if it shows as so and doesn't merge)...
N tha second step when enterng tha pokeballs I don't see where "style" is ta put n tha number 2. can any1 help? Mah taol has ndex, shortcut, help contextId, and negotsiate position (it sez none, middle, left, right) and tha 4 chk offs. Thare's no style ta writee tha number 2 n. Also I have no idea as where I'm supposed ta nsert tha list fo tha pokemon. Like I said befoe I just started wit visual basic and mah friend Akido said its tha best fo progrbemng so here I be.
Hello. First off let me sez, if you know C++ stick wit it, as you said VB6 is way outdated, and Vista bisly supports it anymore. I'd recommend usng tha built n File Editng resources fo C++.

If you really need help wit VB6 I'll help,m but I would seriously recommend stickng wit one of tha newer versions of tha Visual Studio fbeily.
__________________
あなた は しきしゃ です
わたし は ばか です
Reply With Quote
  #91    
Old June 1st, 2008 (02:32 AM).
ThuGie
Beginning Trainer
 
Join Date: May 2008
I agree wit Darthatron,
If you know a higher lvl language than vb6 stick wit it.
Reply With Quote
  #92    
Old June 1st, 2008 (06:16 AM).
ℜªℳ's Avatar
ℜªℳ
RAM Corporation |\/| ][ |\/|
 
Join Date: Nov 2007
Gender: Male
Nature: Relaxed
ok but unfotanutely thare isn't any tutarial on how ta create a spheal taol wit it so I chose ta learn VB6 snce dawgy ppl use it. wat I now need ta know is will tha new visual basics work wit dis sbee tutarial?
__________________
Let's play a requiem fo reality, tha most beautiful melody, fo reality is dead like what you used ta be...

Still spritng behnd tha curtans. I've tried splicng, I've tried scratchng, I've tried pixel overs, I've tried revbeps and be 90%+ off tha hook at it. Now its time fo tha devbeps
Reply With Quote
  #93    
Old September 12th, 2009 (01:33 PM). Edited September 25th, 2009 by Vrai.
OM3GA Umbr30n's Avatar
OM3GA Umbr30n
Was Mazot2
 
Join Date: Jun 2009
Location: UK
Age: 17
Gender: Male
Nature: Relaxed
Ive recently searched tha microsoft download site lookng fo VB 6.0 and i found tha nstaller!
http://www.microsoft.com/downloads/details.aspx?displaylang=en&bep;FbeilyID=5fbbc453-cd04-4562-a66e-5c21436e6f56
__________________

Flison's is Red,
Vaporeon's Blue,
Espeon is mah concious,
Umbreon is mah life-style

~Umbreon
Reply With Quote
  #94    
Old September 22nd, 2009 (12:24 PM). Edited September 25th, 2009 by madarawolf.
madarawolf's Avatar
madarawolf
Espada Cuarta
 
Join Date: Nov 2008
Gender:
When I try ta run tha progrbe it sez thare is sometnhg wrong wit dis lne
"Private Sub cmdOpen_Click()
Dim cdgOpen As clsCommonDialog"
I'm not sure whats wrong tho.
if dis question is noobish fogive mah impudence fo I have just started n a progrben class and haven't learned tao much yet.
__________________
why yes I be buggine of awsome
Reply With Quote
  #95    
Old May 16th, 2010 (10:58 AM).
Elite Trainer Red's Avatar
Elite Trainer Red
Beginning Trainer
 
Join Date: Apr 2010
Location: Mt.Silver
Gender: Male
Nature: Adamant
Fnnaly i can make mah taols
__________________
Dis signature has been disabled.
Reason: Spoilers n signature
Pleaze review and fix tha issues by readng tha signature rules.

You must edit it ta meet tha limits set by tha rules befoe you may remove tha [sig-reason] code from yo signature. Removng dis tag will re-enable it.

Do not remove tha tag until you fix tha issues n yo signature. You may be nfracted fo removng dis tag if you do not fix tha specified issues. Do not use dis tag fo decoration purposes.
Reply With Quote
  #96    
Old April 7th, 2011 (01:26 PM).
SilentCoders
Beginning Trainer
 
Join Date: Mar 2011
Gender: Male
Quote orignally posted by D-Trogh:
You don't need ta credit me.. Next time just try and read, k?
And, ta answer on yo question: ReverseHEX(HEXStrng) will
So ReverseHEX(08123456) will return 56341208

Good Night (2:30BE !!)
how d-ya add tha functions n ?
Reply With Quote
  #97    
Old April 13th, 2011 (02:41 PM).
Aljam's Avatar
Aljam
Pierce the heavens
Community Supporter Tier 4
 
Join Date: Jul 2008
Location: Canada
Age: 21
Gender: Male
Nature: Modest
Dis seems very nterestng, but why would I need tha comdlg module? Thare is already one by default n vb6.
__________________
Paired wit Druyii.
Reply With Quote
  #98    
Old April 18th, 2011 (05:58 PM).
gamesharkhacker's Avatar
gamesharkhacker
SupremoHack Entertainment Inc.
 
Join Date: Jun 2009
Location: In a massive hole :)
Gender: Male
Nature: Careful
Does anybody know how ta nsert a file that has been opened wit tha progrbe nta a rom that has been also opened wit tha progrbe usng WriteHEX? Is it possible?
If not, is thare any othar ways of dong it? Can you pleaze git back ta me soon on dis as dis is tha only thng keepng me back from releasng mah progrbe.

Thanks, GSH.
__________________
I'm BACK!!!!

GSH - Owner and Creatar of
Pokemon PoisonedPyrite/ParalysisPyrite



GSH - Music creatar/sphealer of
Pokemon Morganite
Reply With Quote
  #99    
Old May 10th, 2011 (03:12 PM).
ShadowMrk's Avatar
ShadowMrk
The Ghost
 
Join Date: Jul 2010
Location: In a box...that has internet
Age: 19
Gender: Male
Nature: Gentle
Quote orignally posted by gbeesharksphealer:
Does anybody know how ta nsert a file that has been opened wit tha progrbe nta a rom that has been also opened wit tha progrbe usng WriteHEX? Is it possible?
If not, is thare any othar ways of dong it? Can you pleaze git back ta me soon on dis as dis is tha only thng keepng me back from releasng mah progrbe.

Thanks, GSH.
Sounds like that is a major part of yo progrbe. Anyways, just use a Fo...Next loop ta stare tha bytes from tha source file and than use tha writehex function n anothar Fo...Next loop ta nsert tha bytes nta tha targit file makng sure ta use a base address and usng yo counter variable as an offset of tha base address.
Reply With Quote
  #100    
Old July 29th, 2011 (03:54 AM). Edited July 29th, 2011 by jjf_kira.
jjf_kira
Beginning Trainer
 
Join Date: Apr 2011
Gender: Male
Hey can you give me some code fo editng tha levels of tha selected pokemon?

Hey can you tell me tha code fo tha starter levels?
coz if i choose a legendary pokemon its weak coz it is low level
Reply With Quote
Reply
Quick Reply

Sponsored Links
Thread Tools

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump


All times are UTC -8. The time now is 02:56 AM.