this was meant for the help section, but it wont post for some reason.....

Public Class GlobalMembersBase
    'original coded line: void __cdecl PushToConsole(String szCommand)
	Public Shared Sub PushToConsole(ByVal szCommand As String)
        Dim LTClient As UInteger = CUInt(&H3781BE50) ' 0x3777DDAC is value found in Cshell.dll but not work more
		Dim CONoff As IntPtr = (IntPtr)*CUInt(LTClient + &H208)

		__asm
        Dim szCommand As New push()
			Dim CONoff As New call()
			Dim esp As New add()
        add(1)
	End Sub
	Public Shared Function IsGameReadyForHook() As Boolean
		If GetModuleHandle("d3d9.dll") IsNot Nothing AndAlso GetModuleHandle("ClientFX.fxd") IsNot Nothing AndAlso GetModuleHandle("CShell.dll") IsNot Nothing Then
			Return True
		End If

		Return False
	End Function
	Shared Sub Main()
		Do While Not GlobalMembersBase.IsGameReadyForHook()
			Sleep(20)
		Loop
		Dim boxes As Boolean = False
		Dim fog As Boolean = False
		Dim speed As Boolean = False
		Dim spread As Boolean = False
		Dim tracers As Boolean = False
		Dim showfps As Boolean = False
		Dim unlockcursor As Boolean = False
		Dim drawgun As Boolean = False
		Dim sjump As Boolean = False
		GlobalMembersBase.PushToConsole("FallDamageMinHeight 0.000000") ' not work
		GlobalMembersBase.PushToConsole("FallDamageMaxHeight 0.000000") ' not work
		GlobalMembersBase.PushToConsole("FallDamageMax 0.000000") ' not work
		Do
			If GetAsyncKeyState(VK_NUMPAD1)<0 Then
				If boxes Then
					GlobalMembersBase.PushToConsole("ModelDebug_DrawBoxes 0")
					GlobalMembersBase.PushToConsole("SkelModelStencil 0")
					boxes = False
				Else
					GlobalMembersBase.PushToConsole("ModelDebug_DrawBoxes 1") ' Box ESP
					GlobalMembersBase.PushToConsole("SkelModelStencil 1") ' Satelite Chams
					boxes = True
				End If
			End If
			If GetAsyncKeyState(VK_NUMPAD2)<0 Then
				If fog Then
					GlobalMembersBase.PushToConsole("FogEnable 1")
					fog = False
				Else
					GlobalMembersBase.PushToConsole("FogEnable 0") ' No Fog
					fog = True
				End If
			End If
			If GetAsyncKeyState(VK_NUMPAD3)<0 Then
				If speed Then
					GlobalMembersBase.PushToConsole("BaseMoveAccel 3000.000000") ' Speed Default
					GlobalMembersBase.PushToConsole("StartAccel 500.000000")
					GlobalMembersBase.PushToConsole("MaxAccel 3000.000000")
					GlobalMembersBase.PushToConsole("AccelInc 6000.000000")
					GlobalMembersBase.PushToConsole("WalkVel 70.000000")
					GlobalMembersBase.PushToConsole("FRunVel 285.000000")
					GlobalMembersBase.PushToConsole("BRunVel 285.000000")
					GlobalMembersBase.PushToConsole("SRunVel 285.000000")
					GlobalMembersBase.PushToConsole("DuckVel 50.000000")
					speed = False
				Else
					GlobalMembersBase.PushToConsole("BaseMoveAccel 3000.000000") ' Speed Hack
					GlobalMembersBase.PushToConsole("StartAccel 3000.000000")
					GlobalMembersBase.PushToConsole("MaxAccel 3000.000000")
					GlobalMembersBase.PushToConsole("AccelInc 3000.000000")
					GlobalMembersBase.PushToConsole("WalkVel 3000.000000")
					GlobalMembersBase.PushToConsole("FRunVel 3000.000000")
					GlobalMembersBase.PushToConsole("BRunVel 3000.000000")
					GlobalMembersBase.PushToConsole("SRunVel 3000.000000")
					GlobalMembersBase.PushToConsole("DuckVel 3000.000000")
					speed = True
				End If
			End If
			If GetAsyncKeyState(VK_NUMPAD4)<0 Then
				If spread Then
					GlobalMembersBase.PushToConsole("PerturbRotationEffect 3.000000")
					GlobalMembersBase.PushToConsole("PerturbIncreaseSpeed 3.000000")
					GlobalMembersBase.PushToConsole("PerturbDecreaseSpeed 9.000000")
					GlobalMembersBase.PushToConsole("PerturbWalkPercent 0.500000")
					spread = False
				Else
					GlobalMembersBase.PushToConsole("PerturbRotationEffect  0.000000") ' No Spread
					GlobalMembersBase.PushToConsole("PerturbIncreaseSpeed 0.000000")
					GlobalMembersBase.PushToConsole("PerturbWalkPercent 0.000000")
					GlobalMembersBase.PushToConsole("PerturbFiringIncreaseSpeed 0.000000")
					spread = True
				End If
			End If
			If GetAsyncKeyState(VK_NUMPAD5)<0 Then
				If tracers Then
					GlobalMembersBase.PushToConsole("ShowFirePath 0")
					tracers = False
				Else
					GlobalMembersBase.PushToConsole("ShowFirePath 1") ' Bullet Tracers
					tracers = True
				End If
			End If
			If GetAsyncKeyState(VK_NUMPAD6)<0 Then
				If sjump Then
					GlobalMembersBase.PushToConsole("JumpVel 330.000000")
					sjump = False
				Else
					GlobalMembersBase.PushToConsole("JumpVel 660.000000") ' Super Jump
					sjump = True
				End If
			End If
			If GetAsyncKeyState(VK_NUMPAD7)<0 Then
				If showfps Then
					GlobalMembersBase.PushToConsole("ShowFps 0")
					showfps = False
				Else
					GlobalMembersBase.PushToConsole("ShowFps 1") ' Show FPS
					showfps = True
				End If
			End If
			If GetAsyncKeyState(VK_NUMPAD8)<0 Then
				If unlockcursor Then
					GlobalMembersBase.PushToConsole("CursorCenter 1")
					unlockcursor = False
				Else
					GlobalMembersBase.PushToConsole("CursorCenter 0") ' Lock Cursor in center and Unlock
					unlockcursor = True
				End If
			End If
			If GetAsyncKeyState(VK_NUMPAD9)<0 Then
				If drawgun Then
					GlobalMembersBase.PushToConsole("drawguns 1")
					drawgun = False
				Else
					GlobalMembersBase.PushToConsole("drawguns 0") ' No Weapon
					drawgun = True
				End If
			End If
			If GetAsyncKeyState(VK_UP)<0 Then
				GlobalMembersBase.PushToConsole("CamMaxPosYOffset 200.000000")
				GlobalMembersBase.PushToConsole("DuckDownCamOffSet 1000.000000") ' Virtual Jump or CamPosition
			End If
			If GetAsyncKeyState(VK_DOWN)<0 Then
				GlobalMembersBase.PushToConsole("CamMaxPosYOffset -1000.000000") ' Virtual Down or CamPosition
				GlobalMembersBase.PushToConsole("DuckDownCamOffSet -13.000000")
			End If
			If GetAsyncKeyState(VK_ADD)<0 Then
                GlobalMembersBase.PushToConsole("PlayerGravity 800") ' Fly
			End If
			If GetAsyncKeyState(VK_SUBTRACT)<0 Then
				GlobalMembersBase.PushToConsole("PlayerGravity -800") ' NoFly
			End If
			If GetAsyncKeyState(VK_MULTIPLY)<0 Then
				GlobalMembersBase.PushToConsole("PlayerGravity 0") ' Hover
			End If
			Sleep(200)
		Loop
	End Sub

    'original code line: Integer APIENTRY DllMain(IntPtr hModule, UInteger ul_reason_for_call, IntPtr  lpReserved)
	Public Shared Function DllMain(ByVal hModule As IntPtr, ByVal ul_reason_for_call As UInteger, ByVal lpReserved As IntPtr) As Integer
		Select Case ul_reason_for_call
		Case DLL_PROCESS_ATTACH
			CreateThread(Nothing, 0, (LPTHREAD_START_ROUTINE) And main, Nothing, 0, Nothing)
		Case DLL_THREAD_ATTACH, DLL_THREAD_DETACH, DLL_PROCESS_DETACH
		End Select
		Return 1
	End Function
End Class

#include <windows.h>
void __cdecl PushToConsole( const char* szCommand )
{
    DWORD *LTClient = ( DWORD* )( 0x3718BF20 ); // 0x3777DDAC is value found in Cshell.dll but not work more
    void* CONoff = ( void* )*( DWORD* )( *LTClient + 0x208 );

    __asm
    {
        push szCommand;
        call CONoff;
        add esp, 4;
    }
}
bool IsGameReadyForHook()
{
    if( GetModuleHandle( "d3d9.dll"     ) != NULL 
     && GetModuleHandle( "ClientFX.fxd" ) != NULL 
     && GetModuleHandle( "CShell.dll"   ) != NULL )
        return true;

    return false;
}
void main()
{
    while (!IsGameReadyForHook()){
        Sleep(20);
    }
    bool boxes = false;
    bool fog = false;
    bool speed = false;
    bool spread = false;
    bool tracers = false;
    bool showfps = false;
    bool unlockcursor = false;
    bool drawgun = false;
    bool sjump = false;
    PushToConsole("FallDamageMinHeight 0.000000"); // not work
    PushToConsole("FallDamageMaxHeight 0.000000"); // not work
    PushToConsole("FallDamageMax 0.000000"); // not work
    while(true){
        if(GetAsyncKeyState(VK_NUMPAD1)<0){
            if(boxes){
                PushToConsole("ModelDebug_DrawBoxes 0"); 
                PushToConsole("SkelModelStencil 0"); 
                boxes = false;
            } else {
                PushToConsole("ModelDebug_DrawBoxes 1"); // Box ESP
                PushToConsole("SkelModelStencil 1"); // Satelite Chams
                boxes = true;
            }
        }
        if(GetAsyncKeyState(VK_NUMPAD2)<0){
            if(fog){
                PushToConsole("FogEnable 1");
                fog = false;
            } else {
                PushToConsole("FogEnable 0"); // No Fog
                fog = true;
            }
        }
        if(GetAsyncKeyState(VK_NUMPAD3)<0){
            if(speed){
                PushToConsole("BaseMoveAccel 3000.000000"); // Speed Default
                PushToConsole("StartAccel 500.000000");
                PushToConsole("MaxAccel 3000.000000");
                PushToConsole("AccelInc 6000.000000");
                PushToConsole("WalkVel 70.000000");
                PushToConsole("FRunVel 285.000000");
                PushToConsole("BRunVel 285.000000");
                PushToConsole("SRunVel 285.000000");
                PushToConsole("DuckVel 50.000000");
                speed = false;
            } else {
                PushToConsole("BaseMoveAccel 3000.000000"); // Speed Hack
                PushToConsole("StartAccel 3000.000000");
                PushToConsole("MaxAccel 3000.000000");
                PushToConsole("AccelInc 3000.000000");
                PushToConsole("WalkVel 3000.000000");
                PushToConsole("FRunVel 3000.000000");
                PushToConsole("BRunVel 3000.000000");
                PushToConsole("SRunVel 3000.000000");
                PushToConsole("DuckVel 3000.000000");
                speed = true;
            }
        }
        if(GetAsyncKeyState(VK_NUMPAD4)<0){
            if(spread){
                PushToConsole("PerturbRotationEffect 3.000000");
                PushToConsole("PerturbIncreaseSpeed 3.000000");
                PushToConsole("PerturbDecreaseSpeed 9.000000");
                PushToConsole("PerturbWalkPercent 0.500000");
                spread = false;
            } else {
                PushToConsole("PerturbRotationEffect  0.000000"); // No Spread
                PushToConsole("PerturbIncreaseSpeed 0.000000"); 
                PushToConsole("PerturbWalkPercent 0.000000"); 
                PushToConsole("PerturbFiringIncreaseSpeed 0.000000");
                spread = true;
            }
        }
        if(GetAsyncKeyState(VK_NUMPAD5)<0){
            if(tracers){
                PushToConsole("ShowFirePath 0");
                tracers = false;
            } else {
                PushToConsole("ShowFirePath 1"); // Bullet Tracers
                tracers = true;
            }
        }
        if(GetAsyncKeyState(VK_NUMPAD6)<0){
            if(sjump){
                PushToConsole("JumpVel 330.000000");
                sjump = false;
            } else {
                PushToConsole("JumpVel 660.000000"); // Super Jump
                sjump = true;
            }
        }
        if(GetAsyncKeyState(VK_NUMPAD7)<0){
            if(showfps){
                PushToConsole("ShowFps 0");
                showfps = false;
            } else {
                PushToConsole("ShowFps 1"); // Show FPS
                showfps = true;
            }
        }
        if(GetAsyncKeyState(VK_NUMPAD8)<0){
            if(unlockcursor){
                PushToConsole("CursorCenter 1");
                unlockcursor = false;
            } else {
                PushToConsole("CursorCenter 0"); // Lock Cursor in center and Unlock
                unlockcursor = true;
            }
        }
        if(GetAsyncKeyState(VK_NUMPAD9)<0){
            if(drawgun){
                PushToConsole("drawguns 1");
                drawgun = false;
            } else {
                PushToConsole("drawguns 0"); // No Weapon
                drawgun = true;
            }
        }
        if(GetAsyncKeyState(VK_UP)<0){
            PushToConsole("CamMaxPosYOffset 200.000000");
            PushToConsole("DuckDownCamOffSet 1000.000000"); // Virtual Jump or CamPosition
        }
        if(GetAsyncKeyState(VK_DOWN)<0){
            PushToConsole("CamMaxPosYOffset -1000.000000"); // Virtual Down or CamPosition
            PushToConsole("DuckDownCamOffSet -13.000000");
        }
        if(GetAsyncKeyState(VK_ADD)<0){
            PushToConsole("PlayerGravity +800"); // Fly
        }
        if(GetAsyncKeyState(VK_SUBTRACT)<0){
            PushToConsole("PlayerGravity -800"); // NoFly
        }
        if(GetAsyncKeyState(VK_MULTIPLY)<0){
            PushToConsole("PlayerGravity 0"); // Hover
        }
        Sleep(200);
    }
}
BOOL APIENTRY DllMain( HMODULE hModule,
                       DWORD  ul_reason_for_call,
                       LPVOID lpReserved
                     )
{
    switch (ul_reason_for_call)
    {
    case DLL_PROCESS_ATTACH:
        CreateThread(NULL, 0, (LPTHREAD_START_ROUTINE)&main, NULL, 0,NULL);
        break;
    case DLL_THREAD_ATTACH:
    case DLL_THREAD_DETACH:
    case DLL_PROCESS_DETACH:
        break;
    }
    return TRUE;
}