Hello

i want to code a unlimited ammo tool for mw3

but its not working what am i doing wrong?

Public Class Form1
Dim m As New WriterClass
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
m.Process_Handle("iw5mp")
m.WriteInteger(&H1382118, NumericUpDown1.Value)
m.Process_Handle("iw5mp")
m.WriteInteger(&H138213C, NumericUpDown1.Value)
m.Process_Handle("iw5mp")
m.WriteInteger(&H1382130, NumericUpDown1.Value)
m.Process_Handle("iw5mp")
m.WriteInteger(&H1382124, NumericUpDown1.Value)
End Sub
End Class

help me please :3