Results 1 to 2 of 2
  1. #1
    ToxLP's Avatar
    Join Date
    Feb 2013
    Gender
    male
    Location
    Maybe
    Posts
    298
    Reputation
    81
    Thanks
    3,092
    My Mood
    Twisted

    Cool AQ TRAINER VB.NET BASIC

    Alright so i see some of you liked my OS Trainer Tutorial so why not make a AQ Trainer - Adventure Quest NOT AQWORLDS!

    So lets start

    Requirements:
    Visual Studio - ANY VERSION DOESN'T MATTER
    basic knowledge of vb.net

    1:CREATE A NEW VB.NET PROJECT


    2:SELECT VISUAL BASIC>WINDOWS FORM APPLICATION


    3:ADD SHOCKWAVE FLASH OBJECT YOU MIGHT NOT HAVE IT CHECK THE PIC

    Click on toolbox

    Right click on ALL WINDOWS FORM>choose items

    This should open up then goto COM COMPONETS CHECK THE REST OF THE IMAGE!
    http://i.imgur.com/lyvMeap.png

    Then scroll down in the toolbox you should see it in there should be the last


    DRAG AND DROP IT IN THERE RESIZE

    Add 2 Buttons drag and drop

    Change the text of button 1 and 2 like this


    Click on the Shockwave object change the name to battleon or what ever you will remember


    So all that is set now for the browser part to get AQ Codes to load the game

    Goto
    http://aq.battleon.com/Build30/game....nchtype=medium

    Right click view source


    So now go back to Visual studio
    double click on the form not the shockwave
    click on any empty part


    So now the game url will be
    Code:
    http://aq.battleon.com/Build30/game.asp?launchtype=medium = base
    So in a code it would be
    Code:
    shockwavename.base = "http://aq.battleon.com/Build30/game.asp?launchtype=medium"
    Now the movie part
    http://aq.battleon.com/Build30/engine/Lore380.swf

    So in code it would be
    Code:
    battleon.Movie = "http://aq.battleon.com/Build30/engine/Lore380.swf"
    Now the flash vars part
    Code:
    battleon.FlashVars = "strGUI=medium&strServer=aq61&strLanguage=&strAutoAd=yes"
    Now the allowScriptAccess


    In code:
    Code:
    battleon.AllowScriptAccess = "sameDomain"
    The rest will be easy

    In Code:
    Code:
           battleon.Loop = False
            battleon.Menu = False
            battleon.CtlScale = "exactFit"
            battleon.BGColor = "333333"


    Now test see if the game loads click on start


    Make sure you can login:


    Now for the hacks add 1 TIMER! drag drop from the toolbox


    Should be like this once dragged and dropped


    Next:
    Douable click on button1 and add these codes


    That code is just to switch the timer on and off k?
    Simple!

    Next GOD MODE:
    Double click on Timer1 the one you added
    add these codes

    Code:
           Dim baseHP As Integer
            baseHP = battleon.GetVariable("_root.player.intBaseHP")
    
            If baseHP > 0 Then
                Call battleon.SetVariable("_root.player.intHP", baseHP)
            Else
                Call battleon.SetVariable("_root.player.intHP", 100)
            End If
    Simple?

    k

    Next INSTANT KILL:
    Double click on button2

    Add this code
    Code:
    Call battleon.SetVariable("_root.monster.intHP", 0)
    What it does?

    It will call the monster HP and set it to 0
    Simple!

    THATS ALL ENJOY!

    EASY HUH?

  2. #2
    I like her, She likes him, He likes me. How about you?
    Former Staff
    Premium Member
    Jhem's Avatar
    Join Date
    Mar 2012
    Gender
    male
    Location
    Anime World.
    Posts
    4,128
    Reputation
    888
    Thanks
    6,042
    My Mood
    Cynical
    Good job man.
    But i think you forgot something.




    • Member since March 20, 2012
    • Donator since March 1, 2014 (thanks to Jov)
    • Contributor since April 10, 2014
    • Minion Other MMORPG Games since August 1, 2015
    • Minion BlackShot since Nov 5, 2015

Similar Threads

  1. [Help] [PREVIEW] PlusMaster - Zombies Trainer ! Vb.net
    By OMGPROD in forum Call of Duty Black Ops 2 Private Server Hacks
    Replies: 0
    Last Post: 10-23-2015, 01:48 PM
  2. [Release] Basic Trainer (with Gamepad Support) [.NET]
    By ZectixV1 in forum Grand Theft Auto 5 (GTA V) Hacks & Cheats
    Replies: 3
    Last Post: 08-05-2015, 12:47 PM
  3. [Help Request] Trainer VB.NET
    By XOIIT in forum Call of Duty Modern Warfare 3 Help
    Replies: 3
    Last Post: 10-26-2012, 05:07 PM
  4. [Help] PTC for vb.net BASICS ??
    By user44 in forum CrossFire Hack Coding / Programming / Source Code
    Replies: 8
    Last Post: 11-24-2010, 03:10 PM
  5. CA Trainers? NO! Net is capped X)
    By iownageXD in forum Combat Arms Hacks & Cheats
    Replies: 23
    Last Post: 08-12-2009, 10:51 AM