Jump to content

Recommended Posts

Posted

Hi, your script doesn't work here. i think its because of $oGame = ObjCreate("ShockwaveFlash.ShockwaveFlash.1")

so what i have ti install to make that work. i have already the flash/shockwave plugins installed but still not working. :)

Please Help.

Do you thing that we can use .swf in autoit like a GUI ?

Thank's

Posted (edited)

@darkjohn20

Did you try it without the _global ?

Hi, your script doesn't work here. i think its because of $oGame = ObjCreate("ShockwaveFlash.ShockwaveFlash.1")

so what i have ti install to make that work. i have already the flash/shockwave plugins installed but still not working. :)

Please Help.

Do you thing that we can use .swf in autoit like a GUI ?

Thank's

It does work, but the game im using updates its link. Lemme find the new one. ;)

Current link: http://www.maxgames.com/play/age-of-war.html

But it doesnt seem to work anymore. :/

Edited by AlmarM

Minesweeper

A minesweeper game created in autoit, source available.

_Mouse_UDF

An UDF for registering functions to mouse events, made in pure autoit.

2D Hitbox Editor

A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.

Posted

@darkjohn20

Did you try it without the _global ?

I tried "_global.variable", "variable", and "global.variable".

I was looking online and I think I might have read somewhere that global variables can only be edited by another flash object?

Not quite sure, so don't assume this is right xD.

Posted

Hmm, that could be true. I also have no idea how flash works. Never done it. ;)

Minesweeper

A minesweeper game created in autoit, source available.

_Mouse_UDF

An UDF for registering functions to mouse events, made in pure autoit.

2D Hitbox Editor

A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.

Posted

You cannot set AS3 variables that way. SetVariable is for AS2.

Realy? Thanks for telling ;)

Minesweeper

A minesweeper game created in autoit, source available.

_Mouse_UDF

An UDF for registering functions to mouse events, made in pure autoit.

2D Hitbox Editor

A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.

Posted

$GUI = GUICreate("Age of War [AutoIt Var Editing]", 870, 760, -1, -1)
$oGame = ObjCreate("ShockwaveFlash.ShockwaveFlash.1")
$oGameGUI = GUICtrlCreateObj($oGame, 10, 10, 850, 650)
With $oGame
    .bgcolor = "#000000"
    .Movie = @ScriptDir & "\Age of war.swf"
    .Loop = True
    .ScaleMode = 2
    .wmode = "Opaque"
EndWith
$Money = GUICtrlCreateInput("999999999999", 10, 670, 100, 20)
$SetMoney = GUICtrlCreateButton("Set Money", 120, 668, 100)
$TechLevel = GUICtrlCreateInput("5", 10, 700, 100, 20)
$SetTechLevel = GUICtrlCreateButton("Set Tech Level", 120, 698, 100)
$XP = GUICtrlCreateInput("999999999999", 10, 730, 100, 20)
$SetXP = GUICtrlCreateButton("Set XP", 120, 728, 100)
$turretbutt = GUICtrlCreateButton ("Get turret places", 230, 728, 120, 25)
$healthinput = GUICtrlCreateInput("999999999999", 230, 670, 100, 20)
$healthbut = GUICtrlCreateButton ("Health", 340, 668, 120, 25)

GUISetState()
While 1
    $nMsg = GUIGetMsg()
    Select
    Case $nMsg = -3
    Exit
    Case $nMsg = $SetMoney
    $Read_Money = GUICtrlRead($Money)
    $oGame.SetVariable("cash", $Read_Money)
    Case $nMsg = $SetTechLevel
    $Read_TechLevel = GUICtrlRead($TechLevel)
    $oGame.SetVariable("tech_level", $Read_TechLevel)
    Case $nMsg = $SetXP
    $Read_XP = GUICtrlRead($XP)
    $oGame.SetVariable("xp", $Read_XP)
    Case $nMsg = $healthbut
        $Read_health = GUICtrlRead($healthinput)
        $oGame.SetVariable("game.ennemies.ennemybase1.health", $Read_health)
    Case $nMsg = $turretbutt
        $oGame.SetVariable("addons", 3)
    EndSelect
WEnd

Just a small contribution.

Great! Does the enemy base health work? Because I found some enemy variables but they never seemed to be good. :/

Minesweeper

A minesweeper game created in autoit, source available.

_Mouse_UDF

An UDF for registering functions to mouse events, made in pure autoit.

2D Hitbox Editor

A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.

Posted (edited)

So...is there a method to do this in AS3, or can anything else be done?

Thanks!

Start by learning AS3. In some cases you'll need to know AVM2 which is something like Microsoft's IL which AS3 is using. You can start by reading some of this forum tutorials.

Edited by Authenticity
Posted

Start by learning AS3. In some cases you'll need to know AVM2 which is something like Microsoft's IL which AS3 is using. You can start by reading some of this forum tutorials.

Haha, I've been on that forum for years. Will still look more closely.

Posted (edited)

i made a bot for ladderslasher once. its not bugfree yet, but maybe someone wants to play around a little. i found out a lot about itemstats reading etc..

config.ini file:

[Standaard]
Minimumlifepercentage="100"
Minimummanapercentage="85"
Plek="2"
Hit="0"
Spell="1"
Stoplvlup="66"
MaxLifeDiff="10"
LeaveAtLife="15"
DropSleep="1000"
Account="d2jspacc"
Password="pass"
GoldPassword="goldpass"

edit: i see there is a new patch, but i think the old variables will still work.. just try and see.

LS4.0.au3

Edited by cageman
  • 10 months later...
Posted (edited)

Updated and Fixed your original post.

@AlmarM

$GUI = GUICreate("Age of War [AutoIt Var Editing]", 670, 560, -1, -1)
$oGame = ObjCreate("ShockwaveFlash.ShockwaveFlash") ; Removed the .1 in the ShockwaveFlash. (so Flash doesn't focus on the .1 and focuses on the main component.
$oGameGUI = GUICtrlCreateObj($oGame, 10, 10, 650, 450)
With $oGame
$oGame.bgcolor = "#000000"
$oGame.Movie = "http://farm.maxgames.com/ageofwarupdate1MzYx.swf" ; Updated SWF link.
$oGame.Loop = True
$oGame.ScaleMode = 2
$oGame.wmode = "Opaque"
EndWith
$Money = GUICtrlCreateInput("Money here...", 10, 470, 100, 20)
$SetMoney = GUICtrlCreateButton("Set Money", 120, 468, 100)
$TechLevel = GUICtrlCreateInput("Tech Level (1 - 5) here...", 10, 500, 100, 20)
$SetTechLevel = GUICtrlCreateButton("Set Tech Level", 120, 498, 100)
$XP = GUICtrlCreateInput("EXP here...", 10, 530, 100, 20)
$SetXP = GUICtrlCreateButton("Set EXP", 120, 528, 100)
GUISetState()
While 1
$nMsg = GUIGetMsg()
Select
    Case $nMsg = -3
        Exit
    Case $nMsg = $SetMoney
        $Read_Money = GUICtrlRead($Money)
        $oGame.SetVariable("cash", $Read_Money)
    Case $nMsg = $SetTechLevel
        $Read_TechLevel = GUICtrlRead($TechLevel)
        $oGame.SetVariable("tech_level", $Read_TechLevel)
    Case $nMsg = $SetXP
        $Read_XP = GUICtrlRead($XP)
        $oGame.SetVariable("xp", $Read_XP)
EndSelect
WEnd
Edited by Kalin

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...