Warrock Vb Coding TuT | #1 | |
Join Date: Aug 2008 Posts: 54 |
Ich hoffe ma ich darf das posten hat viel mühe gekostet des alles aufzuschreiben... und ich hoffe es hilft den anfängern etwas... INVISEBEL Button1: NOP(&HADDY, &H1C) Button2: NOP(&HADDY, &H2C) ---------------------------------------------------------------------- STAMINA Timer2: WriteFloatPointer(&HADDY, &H28C, 100) Button3: Timer2.Enabled = True Button4: Timer2.Enabled = False ---------------------------------------------------------------------- SUPERJUMP Timer3: If GetAsyncKeyState(17) Then WriteFloatPointer(&HADDY, &H178, TextBox1.Text) End If Eine Textbox (zahl zwischen 500-1500 reinschreiben) Button5: Timer3.Enabled = True Button6: Timer3.Enabled = False ----------------------------------------------------------------------- NO FALL NO DAMANG Timer4: WriteFloatPointer(&HADDY, &H264, -2000) Button7: Timer4.Enabled = True Button8: Timer4.Enabled = False ----------------------------------------------------------------------- Nospread Timer5: Writememory(&HADDY, 0, 4) Button9: Timer5.Enabled = Ture Button10: Timer5.Enabled = False ----------------------------------------------------------------------- NoRecoil Timer6: WriteFloatPointer(&HADDY, &H02dc, 0) WriteFloatPointer(&HADDY, &H2e0, 0) WriteFloatPointer(&HADDY, &H2e4, 0) Button11: Timer6.Enabled = True Button12: Timer6.Enabled = False ---------------------------------------------------------------------- AntiKick Timer7: NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) Button15: Timer7.Enabled = True Button16: Timer7.Enabled = False ---------------------------------------------------------------------- U.Ammo Timer8: NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) NOP(&HADDY, &H90) Button17: Timer8.Enabled = True Button18: Timer8.Enabled = False ---------------------------------------------------------------------- Crosshair Timer10: Writememory (&HADDY, 1) Button21: Timer10.Enabled = True Button22: Timer10.Enabled = False ---------------------------------------------------------------------- Adrenalien Timer11: WriteLongPointer(&HADDY, &H4C, 65, 4) Button23: Timer11.Enabled = True Button24: Timer11.Enabled = False ---------------------------------------------------------------------- InstantSpawan Timer12: Writememory(&HADDY, 0) Writememory(&HADDY, 0) Button25: Timer12.Enabled = True Button26: Timer12.Enabled = False ---------------------------------------------------------------------- Scop Zoom Timer14: If GetAsyncKeyState(Hotkey) Then Writememory(&HAddy, 1, 4) Else Writememory(&HAddy, 0, 4) End If Button31: Timer14.Enabled = True Button32: Timer14.Enabled = False ---------------------------------------------------------------------- GlassWalls Timer15: If GetAsyncKeyState(4) Then Writememory(&HAddy, 1, 4) Else Writememory(&HAddy, 1166127104, 4) End If Button33: Timer15.Enabled = True Button34: Timer15.Enabled = False ---------------------------------------------------------------------- UND HIER NOCH WICHTIG DAS MODUL http://uploaded.to/?id=2xppdu __________________ |
|
0knower is offline |