VB; Big values

[Eidolon]

Hi there,

I was wondering how I can edit values like in CE but then in VB using (masked)textboxes, which code will I need to use and if I need to set in integer or byte?

Thanks in advance

[Jorndel]

If you think of what I have done here:
https://www.mpgh.net/forum/404-call-d...lf-v1-1-a.html

Or??

Ring Ring: @Anonymouss


Yes or No?
I will go soon so I can't help you when I am gone.

[Eidolon]

Well I meant when you got the basic code

          Dim MylistX As Integer() = {X,X}
          MW3.Hack("iw5mp")
          MW3.SetInt(&HFFFFFFF, MylistX(XXX.XXX))

Or has it to to be bytes instead of int?
And what do I have to fill in/add to this code?

[Jorndel]

Well I meant when you got the basic code

          Dim MylistX As Integer() = {X,X}
          MW3.Hack("iw5mp")
          MW3.SetInt(&HFFFFFFF, MylistX(XXX.XXX))

Or has it to to be bytes instead of int?
And what do I have to fill in/add to this code?

You have created a list of integers.
And inside the MyListX(0) you will put the value you want to use.
Lets say we want to use the FIRST INTEGER in the MyListX List, that the first value of that list is 0.
When we code all lists start by 0 , 1 ,2 , 3 , 4 , 5.....

[Eidolon]

There ain't another way to get those values?

[Jorndel]

There ain't another way to get those values?

Like this?

---------- Post added at 02:24 PM ---------- Previous post was at 02:21 PM ----------

Or like this?


Else I just don't get your question well...

---------- Post added at 02:25 PM ---------- Previous post was at 02:24 PM ----------

BTW, Forgot.
When using the For Each.
It will just replace the existing value on that address. (So you need to increase that too.)

---------- Post added at 02:29 PM ---------- Previous post was at 02:25 PM ----------

You wanted to get those values another way.
Well, you can use a combox.

then it would just to replace the X with : ComboBox1.SelectedIndex - That would return the Value of the selected item in the list of the ComboBox1.
(Right click it and Edit Items. In the Form1.Design)

---------- Post added at 02:31 PM ---------- Previous post was at 02:29 PM ----------

Well, I leave now.
Hope you got some answers.
Else I will be back tomorrow unless someone give you the answer

[Eidolon]

I got a (masked)textbox and the values which are normally in the MylistX, I want to be able to put those values directly in that (masked)textbox which makes sure I don't have to put all those values separately in that MylistX, because else I would have a list of millions of characters and spend hours of time doing that.

---------- Post added at 03:46 PM ---------- Previous post was at 03:34 PM ----------

I got now

            Dim X As Integer
            Dim Mylist8 As Integer() = {Scorebox.Text}
            MW3.Hack("iw5mp")
            X = Scorebox.Text
            MW3.SetInt(&H1CD53F8, Mylist8(Scorebox.Text))

But I get an IndexOutOfRangeException and I don't know how to get it solved, using this code doesn't work...

   Try
            Dim X As Integer
            Dim Mylist8 As Integer() = {Scorebox.Text}
            MW3.Hack("iw5mp")
            X = Scorebox.Text
            MW3.SetInt(&H1CD53F8, Mylist8(Scorebox.Text))
        Catch S As IndexOutOfRangeException
        End Try

[Jorndel]

I got a (masked)textbox and the values which are normally in the MylistX, I want to be able to put those values directly in that (masked)textbox which makes sure I don't have to put all those values separately in that MylistX, because else I would have a list of millions of characters and spend hours of time doing that.

---------- Post added at 03:46 PM ---------- Previous post was at 03:34 PM ----------

I got now

            Dim X As Integer
            Dim Mylist8 As Integer() = {Scorebox.Text}
            MW3.Hack("iw5mp")
            X = Scorebox.Text
            MW3.SetInt(&H1CD53F8, Mylist8(Scorebox.Text))

But I get an IndexOutOfRangeException and I don't know how to get it solved, using this code doesn't work...

   Try
            Dim X As Integer
            Dim Mylist8 As Integer() = {Scorebox.Text}
            MW3.Hack("iw5mp")
            X = Scorebox.Text
            MW3.SetInt(&H1CD53F8, Mylist8(Scorebox.Text))
        Catch S As IndexOutOfRangeException
        End Try

Ah, so you wanted to make something like what I linked you then.
If you just said so, you would have gotten an answer fast.

Well:

Dim X As Integer
            Dim Mylist8 As Integer() = {Scorebox.Text}
            MW3.Hack("iw5mp")
            X = Scorebox.Text
            MW3.SetInt(&H1CD53F8, Mylist8(Scorebox.Text))

But I get an IndexOutOfRangeException and I don't know how to get it solved, using this code doesn't work...

  Try
            Dim X As Integer = Scorebox.Text
           'X Dim Mylist8 As Integer() = {Scorebox.Text} 'You know this is a list Integer. Don't use a list, it will be wrong here. (Sorry, got little time...)
           
MW3.Hack("iw5mp")
MW3.SetInt(&H1CD53F8, X) 'This will do so the value you enter inn the Scorebox the be the value you set this to.

Sorry that I can't explain more now. On school and supposed to do a task.
(But, I do always put time to you guys )

[[MPGH]master131]

I'd help you but your explanation doesn't make sense to me.

[Eidolon]

Look. In CE you search the addresses and edit those values. I want to make exactly the same thing, so the (masked)textbox is equal to the valuebox in the CE table.

---------- Post added at 08:52 AM ---------- Previous post was at 08:22 AM ----------

Thanks alot Jorndel!

[Jorndel]

I'd help you but your explanation doesn't make sense to me.

Yeah, me too

Look. In CE you search the addresses and edit those values. I want to make exactly the same thing, so the (masked)textbox is equal to the valuebox in the CE table.

---------- Post added at 08:52 AM ---------- Previous post was at 08:22 AM ----------

Thanks alot Jorndel!

So you got this solved or?

If you mean to make your own CE.
Then just google it

[Eidolon]

Everything works fine as long as I tested, as a thanks I will add some addresses to the main resources thread.