VSOH - Advanced Crafting Bot v1.1 : VGExtreme Programs

[beergeek]

I checked the acbuser file and the HKs are still set for Ctrl+shift. Inside of vanguard my hks are still set to Ctrl + Shift also. I can either click on the Hk button with the mouse or hit the keys myself and it will load the items into the crafting table, but the bot itself is failing to do so.

I am still getting the problem where vg extreme is losing hold of the vanguard window on start up. Right now Im running windows vista, which Im not very fond of but I am just getting that little popup screen of Vanguard when VGExtreme finds it instead of getting it to take control of the window itself.

I just redid the acduserdata file to make sure nothing was changed on it. I am still getting the same problem.

going to attatch my init and include file incase anyone can make sense of this. I can't figure out why it is not doing that step.

Thanks in advance if anyone can get me fixed up. ^^

The init and include files don't have anything helpful to your problem.

When crafting begins, is the bot correctly hitting the hotkeys for the actions? If so, it is using the same command syntax as hitting the hotkey for adding utilities. Make sure you have your utility hotkeys on CTRL-SHIFT-8 and CTRL-SHIFT-9 (one is a setup for refining, the other finishing). If you only have one set up, it won't work at one of the tables.

I don't run vista; i think it's a P.O.S. and won't use it until at least 1 year and 1 service pack have been released, so can't help with vista-specific problems. The code that grabs the VG window was not written by me; it was taken from the radar script. When you talk about a little vanguard pop up box, I have no idea what you're talking about.

[darkling263]

hi, i have a problem, every time i try to start the script, it shows me an error message.
Error: Line: 1413, Char: 0 :: File not Find
its in the acbinclude.vbs file.
i did all steps in the manual and i tried it 3 times, but every time the the. and if i download the files new and copy then to the folders and start the script without configure it, it shows me the same.

[beergeek]

hi, i have a problem, every time i try to start the script, it shows me an error message.
Error: Line: 1413, Char: 0 :: File not Find
its in the acbinclude.vbs file.
i did all steps in the manual and i tried it 3 times, but every time the the. and if i download the files new and copy then to the folders and start the script without configure it, it shows me the same.

Posting "Error: Line: 1413" doesn't help me much since there's no functionality in the debugger for me to see exactly what line is giving the error.

For errors such as this, I need the vbs file name (which you gave) and the few lines of code before the error, including the error line itself. When the error occurs, the cursor will be placed at the point of error.

[darkling263]

sorry for my englisch but i hope u can understand me ^^

here is the code:

acbinclude.vbs line 1358 to 1412

Sub Start_Crafting()
if debugState then debugLog "sub Start_Crafting " end if
If Crafting_State = 0 Then
currentToolBag = -1
VGSendText HK11
DoSleep(500)
if NOT tableChecked then
determineTableType
end if
resetCraft
DoSleep(2000)
Mouse.RMouseClick WB_X, WB_Y, 1, 1
if debugState and debugLevel >= 5 then debugLog "Open table..." end if
DoSleep(1000)
End If
If Crafting_State = 4 Then
if debugState and debugLevel >= 5 then debugLog "Recipe book open identified" end if
if makingRealItems then
VGsendCommand "/refinesetrecipe " & chr(34) & recipeName & chr(34)
DoSleep(1500)
Mouse.LMouseClick OK_X, OK_Y, 1, 1
else
Mouse.LMouseClick RL_X, RL_Y, 1, 1
Mouse.LMouseClick WO_X, WO_Y, 1, 1
Mouse.LMouseClick OK_X, OK_Y, 1, 1
end if
DoSleep(1000)
if makingRealItems and addDust then
VGsendCommand "/refineadditem " & chr(34) & dustName & chr(34)
end if
if isFinishing then
VGsendText HK9
if debugState then debugLog "finishing utilities added" end if
else
VGsendText HK8
if debugState then debugLog "refining utilities added" end if
end if
DoSleep(1000)
Mouse.LMouseClick OK_X, OK_Y, 1, 1
DoSleep(2000)
End If
If (Crafting_State <> 3) Then
Mouse.LMouseClick CN_X, CN_Y, 1, 1
if NOT makingRealItems then
MovetoTM
If buyUtilities Then
MovetoUM
End If
MovetoCT
end if
if NOT buyUtilities then
OKtoContinue = False
end if
End if
End Sub


the cursor is placed at the beginning of the end sub line. the strange thing is, there is NO line 1413. I posted the hole last sub block from code because it looks like the compiler hase a problem within this last code block. btw its the unchanged file i can download on the forst page from this thread. so if u open it, u have 100% the same file as me

[darkling263]

i just saw, in the main file is this in the first part of the code

ImportScript ".\includes\Navigation.vbs"
ImportScript ".\includes\VGService.vbs"
ImportScript ".\includes\VGCrafting.vbs"
ImportScript ".\includes\VGExtraOffsets.vbs"

the only file i have is the VGExtraOffsets.vbs the 3 are missing.

[darkling263]

ok, im sorry it was my fault, i havent installed vgextrem. but now it shows an other problem.

file: acbinit.vbs
Error: Line: 24, Char: 4 :: Object needed: 'VG'

Sub Init()
if debugState then debugLog "sub Init " end if
VG.Log.EnableLiveChatLog()
LastPauseKeyState = GetAsyncKeyState(KeyPause)
LastShutdownKeyState = GetAsyncKeyState(KeyShutdown)
tableChecked = False
If (myTradeskill = "Mineralogy") OR _
(myTradeskill = "Carpentry") then
myArchetype = "Artificing"
myRefiningSkill = "Forming"

cursor is standing in front of VG.Log.EnableLiveChatLog()

[beergeek]

Delete all your exhume and vgextreme files except updatevgextreme and run that file. You require some file updates.

[darkling263]

ohh ok big thanks, i did it and it look better and the program is loading much more files. but now he has an error in the vgcrafting.vbs. he goes to the last code line and saya file not found. ;(

Edit: found the missing file. now i have a problem with pathing, but im working on it. thanks for ur help i will write a new message if i have another problem, but i hope it will work now

[darkling263]

im sorry, but all i do, i cant get it to work ;(

acbinclude.vbs

ERROR: Path not found: ::: Line:1890 Char:4

sub clearBuffer()
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(Logpath, ForReading)
strSearchString = objFile.ReadAll
objFile.Close
arrLines = Split(strContents, vbCrLf)
Set objFile = objFSO.OpenTextFile(Logpath, ForWriting)
For i = 0 to UBound(arrLines) - 1
objFile.WriteLine arrLines(i)
Next
objFile.WriteLine ("Clearing Log")
objFile.Close
End sub

cursor stand in third line Set objFile = objFSO.OpenTextFile(Logpath, ForReading)

[beergeek]

im sorry, but all i do, i cant get it to work ;(

acbinclude.vbs

ERROR: Path not found: ::: Line:1890 Char:4

...
cursor stand in third line Set objFile = objFSO.OpenTextFile(Logpath, ForReading)

At the top of the acbuserdata.vbs, there's a declaration logpath = "path". Make sure you put in there the explicit path to the VGLogDump.log file in your exhume directory.

So for example, if you installed exhume under program files on your D drive, it should read:

Logpath = "D:\Program Files\Exhume\VGLogDump.log"


EDIT: I'm not sure if this will work, but try putting in there "./VGLogDump.log" if you have the crafting bot installed directly in your exhume folder. If the bot is in a subfolder, put an extra dot in front.

[officers]

I can't seem to get the pause feature to work. Do I need to make a key to it or something?

[darkling263]

ok it works and he is crafting. but he dont switch between the toolbelts. so if he is useing the toolbelt 1 and he needs something what is in toolbelt 2, he dont switch them. but yes, wrote in the acbuserdata.vbs where the tools are.

[ve_necro]

Not sure where you are situated Officer (I use a UK mapped keyboard), but the key 2 left of the ENTER key with @/' on it is the pause button. I switched them so F12 was pause and that key was end script.

[officers]

Not sure where you are situated Officer (I use a UK mapped keyboard), but the key 2 left of the ENTER key with @/' on it is the pause button. I switched them so F12 was pause and that key was end script.

How did you switch them?

[beergeek]

Not sure where you are situated Officer (I use a UK mapped keyboard), but the key 2 left of the ENTER key with @/' on it is the pause button. I switched them so F12 was pause and that key was end script.

How did you switch them?

the definitions are at the top of acbinit.vbs. You can set them to whatever you want; I just used two out-of-the-way keys on a US keyboard that aren't used by VG.