The PokéCommunity Forums  

Go Back   The PokéCommunity Forums > ROM Hacking > Tools, Tutorials & Resources
Sign Up Rules/FAQ Live Battle Blogs Mark Forums Read

Notices

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.


Advertise here

Reply
 
Thread Tools
  #76    
Old May 18th, 2008, 09:30 AM
ThuGie
Beginning Trainer
 
Join Date: May 2008

Advertise here
Darthatron was kind enough to release his functions,
And people are ofcourse using them,

But so far i have seen nobody has even tryed to fix the problems that the functions still have,
They use them and compain about the problems,

For me i dont even use the functions but i thought why not take a look and thought well this could use some fixing and i did,
People should be more kind to share what they know help each other.
I will when i have time try and make functions like the other 2 that he released,
But when that will be i dont know i was bored so i made ReverseHex.
But thats only took a few minutes and the other functions will take probably about the same time..
But when you calculate the time spend on all 3 it will add up in 1 day time.
And to tell the truth i think making functions like this is boring :p,
So thank god it only needs to be done once and the 2e time to see if any fixes/tweaks are posible :D.

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

Well as i still had some time i fixt the function a bit up,
As you where talking about speed it could be because it writes 1 byte at a time..
Not sure why but i kept it that way.
If really intersted i could rewrite it to write multiple byte's at once probably.

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

Dim FileNum As Integer
Dim i As Integer
Dim Temp As String
Dim HexHold As String
Dim HexValue() As Byte
HexHold = HexData
FileNum = FreeFile

    If InStr(Len(HexHold) / 2, ",") > 0 Then HexHold = "0" & HexHold

    ReDim HexValue((Len(HexHold) / 2) - 1)
    For i = 0 To (Len(HexHold) / 2) - 1

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

    Next i

    Open FilePath For Binary As FileNum
        Put FileNum, Offset + 1, HexValue
    Close FileNum

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

edit:
D-Trogh, Pointed me to a mistake what i just fixed i had Offset As integer, It should have been Offset As Long
edit2:
I compared my function and Darthatron's function and it seems his is a bit faster so if you want faster you should go for his version.
edit3:
I noticed that DoEvents was the cause of slowness,
But also i updated it even more it now write's all data to file in 1 go!
And as for speed its faster then Darthatron's now did a test writing 5kb 1000 times,
Mine will take around 8 seconds while his will take around 42 seconds.
I really do like speed dont you ?

Last edited by ThuGie; May 18th, 2008 at 03:43 PM.
Reply With Quote
  #77    
Old May 18th, 2008, 05:37 PM
cooley's Avatar
cooley
///Keepin' it simple
 
Join Date: Feb 2007
Location: United States
Age: 19
Gender: Male
Nature: Impish
Send a message via Windows Live Messenger to cooley Send a message via Skype™ to cooley
Quote:
Originally Posted by Darthatron View Post
Well, from the picture it looks okay, but I can't really see it due it's small size. :( Perhaps you could upload a larger version? :)
____________________________________________________________

In other news I updated the HEX Editing Module, now the WriteHEX Function will be faster and use less memory. :)
Well The programs in the 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
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter Tier 2
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 22
Gender: Male
Nature: Modest
Quote:
Originally Posted by ThuGie View Post
Darthatron was kind enough to release his functions,
And people are ofcourse using them,

But so far i have seen nobody has even tryed to fix the problems that the functions still have,
They use them and compain about the problems,

For me i dont even use the functions but i thought why not take a look and thought well this could use some fixing and i did,
People should be more kind to share what they know help each other.
I will when i have time try and make functions like the other 2 that he released,
But when that will be i dont know i was bored so i made ReverseHex.
But thats only took a few minutes and the other functions will take probably about the same time..
But when you calculate the time spend on all 3 it will add up in 1 day time.
And to tell the truth i think making functions like this is boring :p,
So thank god it only needs to be done once and the 2e time to see if any fixes/tweaks are posible :D.

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

Well as i still had some time i fixt the function a bit up,
As you where talking about speed it could be because it writes 1 byte at a time..
Not sure why but i kept it that way.
If really intersted i could rewrite it to write multiple byte's at once probably.

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

Dim FileNum As Integer
Dim i As Integer
Dim Temp As String
Dim HexHold As String
Dim HexValue() As Byte
HexHold = HexData
FileNum = FreeFile

    If InStr(Len(HexHold) / 2, ",") > 0 Then HexHold = "0" & HexHold

    ReDim HexValue((Len(HexHold) / 2) - 1)
    For i = 0 To (Len(HexHold) / 2) - 1

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

    Next i

    Open FilePath For Binary As FileNum
        Put FileNum, Offset + 1, HexValue
    Close FileNum

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

edit:
D-Trogh, Pointed me to a mistake what i just fixed i had Offset As integer, It should have been Offset As Long
edit2:
I compared my function and Darthatron's function and it seems his is a bit faster so if you want faster you should go for his version.
edit3:
I noticed that DoEvents was the cause of slowness,
But also i updated it even more it now write's all data to file in 1 go!
And as for speed its faster then Darthatron's now did a test writing 5kb 1000 times,
Mine will take around 8 seconds while his will take around 42 seconds.
I really do like speed dont you ?
Well I feel stupid. Then again I did write the first functions about 4 months ago, I have learned a lot from then. Also I'm sure if I re-wrote them they would be up to standard, then again, I'm too busy right now, if you need a faster function use TheGie's version. For now...

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

EDIT2: After re-writing the WriteHEX Code from scratch I came to realize how bad my old method was. Anyway, I did a Speed Test between my Function and TheGie's. I made each Function run 4000 times. Each 1000 times it would return how fast it was going then at the end it would show the Average, here are the results:
Code:
[Darthatron]
First: 921
Second: 938
Third: 906
Forth: 1047

Average: 953

[TheGie]
First: 1047
Second: 1000
Third: 937
Forth: 953

Average: 984.25
As you can see mine is only slightly faster. I'd also like to note my Computer is VERY slow and these speed should be closer to 500 or 600.

I plan to redo my ReadHEX Function, though I don't think it can get much faster, then again it's pretty sloppy too.
__________________
あなた は しきしゃ です
わたし は ばか です

Last edited by Darthatron; May 18th, 2008 at 09:57 PM. Reason: Another Edit
Reply With Quote
  #79    
Old May 19th, 2008, 01:27 AM
ThuGie
Beginning Trainer
 
Join Date: May 2008
First its not TheGie but ThuGie :D,
Second for the test are you using your rewriten code or the currect one in the package,
Also what kind of test did you do,
I used a bit of a stress test of 5k writing 1000x times,
As size could slow yours down as your writing byte by byte.

And it could be so that yours is faster for smaller sizes but try to run both tests .
Reply With Quote
  #80    
Old May 19th, 2008, 02:10 AM
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter Tier 2
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 22
Gender: Male
Nature: Modest
Quote:
Originally Posted by ThuGie View Post
First its not TheGie but ThuGie :D,
Second for the test are you using your rewriten code or the currect one in the package,
Also what kind of test did you do,
I used a bit of a stress test of 5k writing 1000x times,
As size could slow yours down as your writing byte by byte.

And it could be so that yours is faster for smaller sizes but try to run both tests .
Yes, the test is with my new Function. It writes 1 Byte at a time. It writes 4 by 1000x.

Both Function's run after each other.

Also, sorry about the name I was pretty tired when I wrote everything up.
__________________
あなた は しきしゃ です
わたし は ばか です

Last edited by Darthatron; May 19th, 2008 at 02:31 AM.
Reply With Quote
  #81    
Old May 19th, 2008, 02:16 AM
ThuGie
Beginning Trainer
 
Join Date: May 2008
Ah try and run them seperate,
But also try to 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
 
Join Date: Feb 2007
Location: United States
Age: 19
Gender: Male
Nature: Impish
Send a message via Windows Live Messenger to cooley Send a message via Skype™ to cooley
Darthatron, I need your help with VB 6

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

2. Every time I Write hex back to the ROM then it puts the data one byte ahaed or behind the actual offset. Do you know why? The code is below:


Code:
Option Explicit

Dim sFile As String
___________________________________
Private Sub Command1_Click()
Dim iFileNum As Integer

    iFileNum = FreeFile
    sFile = frmMain.CommonDialog1.FileName

If cmbPoke.Text = "" Then
MsgBox ("Pick a Pokemon please")

Else

Open sFile For Binary As #iFileNum
    Put #iFileNum, &H5FDE, cmbPoke.ListIndex
        
    Close #iFileNum
Unload Me
End If
End Sub

3. I put cmbPoke.ListIndex, how does VB know we're talking about hex? For the pokemon numbers that is. When there aren't any hex values assigned to the Pokemon themselves?

Ex. I click Pikachu(&h19 and no. 25) how does it write 19 back to the rom when it's no. 25 on the 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 them everywhere, but I never know what they mean.
Len is used to calculate the lenght of a string, LenB does the same but it seems a bit faster..

2. Every time I Write hex back to the ROM then it puts the data one byte ahaed or behind the actual offset. Do you know why? The code is below:
do +1 by the offset since it begins at 0.

3. I put cmbPoke.ListIndex, how does VB know we're talking about hex? For the pokemon numbers that is. When there aren't any hex values assigned to the Pokemon themselves?
cmbPoke.ListIndex will result in a integer value of the item selected like if you choose the 2e in line it wil result in 2. so nothing to do with hex.

Ex. I click Pikachu(&h19 and no. 25) how does it write 19 back to the rom when it's no. 25 on the list?
And if your talking about the offset here well &H tells it that you are using Hex.
Reply With Quote
  #84    
Old May 22nd, 2008, 05:42 PM
cooley's Avatar
cooley
///Keepin' it simple
 
Join Date: Feb 2007
Location: United States
Age: 19
Gender: Male
Nature: Impish
Send a message via Windows Live Messenger to cooley Send a message via Skype™ to cooley
Is this correct to write all these bytes next to each other?

Thanks, by the way!

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

Reply With Quote
  #85    
Old May 22nd, 2008, 09:32 PM
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter Tier 2
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 22
Gender: Male
Nature: Modest
Quote:
Originally Posted by cooley View Post
Is this correct to write all these bytes next to each other?

Thanks, by the way!

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

Also, you didn't end your 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 to point out, that while your little HEX module is handing it's easily replaceable.
For dealing with hex values
&H
that reverse hex is just declaring the proper variable
dim byte1 as byte'Handles 1 byte
byte1=&H0C
viewing with a hex editor you'll see 0x
dim integer1 as integer'Handles 2 bytes
integer1=&HFF04
viewing with a hexeditor
04 FF

and the one I guess that reversehex is mainly used for

the long

dim long1 as long'4 bytes usually for a pointer
long1=&h8123456
in a hex editor
56 34 12 08
Get it now?

Readhex is simply reduced to
dim byte1 as byte
open filepath for binary as #1
get #1, offset+1,byte1
or
seek #1, offset+1
get #1, ,byte1
close #1
for integers

just change the byte to integer

for long just change integer or byte to long

to write data to a rom use put instead of get

and to extract the address from a long
just take the 8 off so
offset-&h8000000

make sure if you're pointing a pointer into a rom make sure to add the &H8000000


simple.

And not bloated.
__________________
yes, this is doge.

potato is not here.

bye
Reply With Quote
  #87    
Old May 23rd, 2008, 12:54 AM
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter Tier 2
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 22
Gender: Male
Nature: Modest
Quote:
Originally Posted by interdpth View Post
I'd like to point out, that while your little HEX module is handing it's easily replaceable.
For dealing with hex values
&H
that reverse hex is just declaring the proper variable
dim byte1 as byte'Handles 1 byte
byte1=&H0C
viewing with a hex editor you'll see 0x
dim integer1 as integer'Handles 2 bytes
integer1=&HFF04
viewing with a hexeditor
04 FF

and the one I guess that reversehex is mainly used for

the long

dim long1 as long'4 bytes usually for a pointer
long1=&h8123456
in a hex editor
56 34 12 08
Get it now?

Readhex is simply reduced to
dim byte1 as byte
open filepath for binary as #1
get #1, offset+1,byte1
or
seek #1, offset+1
get #1, ,byte1
close #1
for integers

just change the byte to integer

for long just change integer or byte to long

to write data to a rom use put instead of get

and to extract the address from a long
just take the 8 off so
offset-&h8000000

make sure if you're pointing a pointer into a rom make sure to add the &H8000000


simple.

And not bloated.
Simple for you and I, but not for people who don't understand Visual Basic, or who are only just learning, this is for those people. Thanks for the lesson though, I had no idea each Variant was meant to hold a different amount 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 to program if you don't know variables. If anyone wants i'll teach more
__________________
yes, this is doge.

potato is not here.

bye
Reply With Quote
  #89    
Old May 29th, 2008, 01:46 PM
ℜªℳ's Avatar
ℜªℳ
RAM Corporation |\/| ][ |\/|
 
Join Date: Nov 2007
Gender: Male
Nature: Relaxed
I just got into porgramming 4 days ago so I'm new but I already have C++ down. I'm trying to learn VB and I just have a simple question about your tools(I will ask questions in the future since I'm new in this area). Do I have to use VB6 for this becuz it is very out dated and there has been many recent VBs like VB 2008 which is known as VB9? Also, its not possible for you to give us a free download of VB6 is it? (little infringement won't hurt any1) just joking.

@all- If any1 contacts me via email I can help them get one painlessly (sorry for simple spamming and cheapAd)

I also have another question (sorry for the double post if it shows as so and doesn't merge)...
In the second step when entering the pokeballs I don't see where "style" is to put in the number 2. can any1 help? My tool has index, shortcut, help contextId, and negotiate position (it say none, middle, left, right) and the 4 chk offs. There's no style to writee the number 2 in. Also I have no idea as where I'm supposed to insert the list for the pokemon. Like I said before I just started with visual basic and my friend Akido said its the best for programming so here I am.

Last edited by ℜªℳ; May 29th, 2008 at 03:34 PM. Reason: Your double post has been automatically merged.
Reply With Quote
  #90    
Old May 29th, 2008, 06:08 PM
Darthatron's Avatar
Darthatron
巨大なトロール。
Community Supporter Tier 2
 
Join Date: Jan 2006
Location: Melbourne, Australia
Age: 22
Gender: Male
Nature: Modest
Quote:
Originally Posted by KanouKono View Post
I just got into porgramming 4 days ago so I'm new but I already have C++ down. I'm trying to learn VB and I just have a simple question about your tools(I will ask questions in the future since I'm new in this area). Do I have to use VB6 for this becuz it is very out dated and there has been many recent VBs like VB 2008 which is known as VB9? Also, its not possible for you to give us a free download of VB6 is it? (little infringement won't hurt any1) just joking.

@all- If any1 contacts me via email I can help them get one painlessly (sorry for simple spamming and cheapAd)

I also have another question (sorry for the double post if it shows as so and doesn't merge)...
In the second step when entering the pokeballs I don't see where "style" is to put in the number 2. can any1 help? My tool has index, shortcut, help contextId, and negotiate position (it say none, middle, left, right) and the 4 chk offs. There's no style to writee the number 2 in. Also I have no idea as where I'm supposed to insert the list for the pokemon. Like I said before I just started with visual basic and my friend Akido said its the best for programming so here I am.
Hello. First off let me say, if you know C++ stick with it, as you said VB6 is way outdated, and Vista barely supports it anymore. I'd recommend using the built in File Editing resources for C++.

If you really need help with VB6 I'll help,m but I would seriously recommend sticking with one of the newer versions of the Visual Studio family.
__________________
あなた は しきしゃ です
わたし は ばか です
Reply With Quote
  #91    
Old June 1st, 2008, 02:32 AM
ThuGie
Beginning Trainer
 
Join Date: May 2008
I agree with Darthatron,
If you know a higher lvl language then vb6 stick with 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 unfortanutely there isn't any tutorial on how to create a hack tool with it so I chose to learn VB6 since many ppl use it. wat I now need to know is will the new visual basics work with this same tutorial?
__________________
Let's play a requiem for reality, the most beautiful melody, for reality is dead like what you used to be...

Still spriting behind the curtains. I've tried splicing, I've tried scratching, I've tried pixel overs, I've tried revamps and am 90%+ awesome at it. Now its time for the devamps
Reply With Quote
  #93    
Old September 12th, 2009, 01:33 PM
OM3GA Umbr30n's Avatar
OM3GA Umbr30n
Was Mazot2
 
Join Date: Jun 2009
Location: UK
Age: 16
Gender: Male
Nature: Relaxed
Ive recently searched the microsoft download site looking for VB 6.0 and i found the installer!
http://www.microsoft.com/downloads/d...e-5c21436e6f56
__________________

Flareon's are Red,
Vaporeon's Blue,
Espeon is my concious,
Umbreon is my life-style

~Umbreon

Last edited by Vrai; September 25th, 2009 at 08:44 AM. Reason: apparently this sort of stuff is illegal, so..
Reply With Quote
  #94    
Old September 22nd, 2009, 12:24 PM
madarawolf's Avatar
madarawolf
Espada Cuarta
 
Join Date: Nov 2008
Gender:
When I try to run the program it says there is sometinhg wrong with this line
"Private Sub cmdOpen_Click()
Dim cdgOpen As clsCommonDialog"
I'm not sure whats wrong tho.
if this question is noobish forgive my impudence for I have just started in a programing class and haven't learned too much yet.
__________________
why yes I am made of awsome

Last edited by madarawolf; September 25th, 2009 at 03:39 PM.
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
Finnaly i can make my tools
__________________
This signature has been disabled.
Reason: Spoilers in signature
Please review and fix the issues by reading the signature rules.

You must edit it to meet the limits set by the rules before you may remove the [sig-reason] code from your signature. Removing this tag will re-enable it.

Do not remove the tag until you fix the issues in your signature. You may be infracted for removing this tag if you do not fix the specified issues. Do not use this tag for decoration purposes.
Reply With Quote
  #96    
Old April 7th, 2011, 01:26 PM
SilentCoders
Beginning Trainer
 
Join Date: Mar 2011
Gender: Male
Quote:
Originally Posted by D-Trogh View Post
You don't need to credit me.. Next time just try and read, k?
And, to answer on your question: ReverseHEX(HEXString) will
So ReverseHEX(08123456) will return 56341208

Good Night (2:30AM !!)
how do you add the functions in ?
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: 20
Gender: Male
Nature: Modest
This seems very interesting, but why would I need the comdlg module? There is already one by default in vb6.
__________________
Paired with 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 to insert a file that has been opened with the program into a rom that has been also opened with the program using WriteHEX? Is it possible?
If not, is there any other ways of doing it? Can you please get back to me soon on this as this is the only thing keeping me back from releasing my program.

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

GSH - Owner and Creator of
Pokemon PoisonedPyrite/ParalysisPyrite



GSH - Music creator/hacker 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:
Originally Posted by gamesharkhacker View Post
Does anybody know how to insert a file that has been opened with the program into a rom that has been also opened with the program using WriteHEX? Is it possible?
If not, is there any other ways of doing it? Can you please get back to me soon on this as this is the only thing keeping me back from releasing my program.

Thanks, GSH.
Sounds like that is a major part of your program. Anyways, just use a For...Next loop to store the bytes from the source file and then use the writehex function in another For...Next loop to insert the bytes into the target file making sure to use a base address and using your counter variable as an offset of the base address.
Reply With Quote
  #100    
Old July 29th, 2011, 03:54 AM
jjf_kira
Beginning Trainer
 
Join Date: Apr 2011
Gender: Male
Hey can you give me some code for editing the levels of the selected pokemon?

Hey can you tell me the code for the starter levels?
because if i choose a legendary pokemon its weak because it is low level

Last edited by jjf_kira; July 29th, 2011 at 04:14 AM. Reason: Your double post has been automatically merged.
Reply With Quote
Reply
Quick Reply

Sponsored Links


Advertise here
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
Minimum Characters Per Post: 25



All times are UTC -8. The time now is 04:53 PM.


Style by Nymphadora, artwork by Sa-Dui.
Like our Facebook Page Follow us on Twitter © 2002 - 2014 The PokéCommunity™, pokecommunity.com.
Pokémon characters and images belong to The Pokémon Company International and Nintendo. This website is in no way affiliated with or endorsed by Nintendo, Creatures, GAMEFREAK, The Pokémon Company or The Pokémon Company International. We just love Pokémon.
All forum styles, their images (unless noted otherwise) and site designs are © 2002 - 2014 The PokéCommunity / PokéCommunity.com.
PokéCommunity™ is a trademark of The PokéCommunity. All rights reserved. Sponsor advertisements do not imply our endorsement of that product or service. User generated content remains the property of its creator.