A little help here | TinyTerror's Scripting Forum

Wreyth
Junior Member

Posts: 50

A little help here Jul 19, 2005 0:43:04 GMT -5

Quote

Post by Wreyth on Jul 19, 2005 0:43:04 GMT -5

ok since i don't have the correct FFACT command for getting item info i jsut used what would probly be appropiate and will be changed accordingly as that information comes available.

I was sitting here waiting for the new ffxi update to get over with so i haven't tested this yet but here is a start of a crafting bot using AutoTerror. tanyways not sure if this will work and if not please point me in the right direction

AutoItSetOption("SendKeyDelay", 40)
WinActivate("FFXiApp");

AutoItSetOption("SendKeyDownDelay",40);

FFACTInit();
$MyRecipe= 0
$Crystal="crystal here";
$Item1="blah";
$Item2="blah blah";
$Item3="blah blah blah";

Do
Sleep(10);
Until NumCheck()=1;

Send('^i');
$MyRecipe=$MyRecipe +1

While $MyRecipe=1;
FFACTItemUpdate();
$Item = FFACTItemGetName();

If $Item = $Crystal Then;
Send('{ENTER}');
Sleep(200);
Send('{ENTER}');
Sleep(200);
Send('{ENTER}');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=2;
FFACTItemUpdate();
$Item = FFACTItemGetName();

If $Item = $Item1 Then;
Send('{ENTER}');
Sleep(200);
Send('{RIGHT');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=3;
FFACTItemUpdate();
$Item = FFACTItemGetName();

If $Item = $Item2 Then;
Send('{ENTER}');
Sleep(200);
Send('{RIGHT');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=4;
FFACTItemUpdate();
$Item = FFACTItemGetName();

If $Item = $Item3 Then;
Send('{ENTER}');
Sleep(200);
Send('{RIGHT');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=5;
Send('{RIGHT}');
Sleep(200);
Send('{ENTER}');
Sleep(15000);
Send ("^i");
Sleep(0100);
Send ("{NUMPADADD}");
Sleep (0100);
Send ("{ENTER}");
sleep(0100);
Send ("{UP}");
sleep(0100);
Send ("{ENTER}");
sleep(0100);
Send ("{ESCAPE}");
Sleep (5000);
$MyRecipe=$MyRecipe -5

WEnd
WEnd;

I have the feeling i am scrweing something up lol but it's a start :).

Last Edit: Jul 19, 2005 23:50:53 GMT -5 by Wreyth

i5.photobucket.com/albums/y191/Wreyth/monkey2.bmp [/img] All your Gil are belong to me.

Wreyth
Junior Member

Posts: 50

A little help here Jul 20, 2005 21:13:42 GMT -5

Quote

Post by Wreyth on Jul 20, 2005 21:13:42 GMT -5

ok i tested some stuff out and i THINK this might work:/ only problem is i need the correct command to pull item info from ffact to make it work and see if this is TRULY gonna work... any ideas would be helpful or at least some sort of command string to pull the command iteminfo_itemname command from ffact :/ here is the modified semi working script it starts and runs thru the correct things but gets stuck because of no item info.

AutoItSetOption("SendKeyDelay", 40)
WinActivate("FFXiApp");

AutoItSetOption("SendKeyDownDelay",40);

FFACTInit();
$MyRecipe= 0
$Crystal="Crystal";
$Item1="blah";
$Item2="blah blah";
$Item3="blah blah blah";

Do
Sleep(10);
Until NumCheck()=1;

While $MyRecipe=0;
FFACTItemInfo_ItemName();
$Item = FFACTItemInfo_ItemName();
Send('^i');
$MyRecipe=$MyRecipe +1

WEnd

While $MyRecipe=1;
FFACTItemInfo_ItemName();
$Item = FFACTItemInfo_ItemName();

If $Item = $Crystal Then;
Send('{ENTER}');
Sleep(200);
Send('{ENTER}');
Sleep(200);
Send('{ENTER}');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=2;
FFACTItemInfo_ItemName();
$Item = FFACTItemInfo_ItemName();
If $Item = $Item1 Then;
Send('{ENTER}');
Sleep(200);
Send('{RIGHT');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=3;
FFACTItemInfo_ItemName();
$Item = FFACTItemInfo_ItemName();

If $Item = $Item2 Then;
Send('{ENTER}');
Sleep(200);
Send('{RIGHT');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=4;
FFACTItemInfo_ItemName();
$Item = FFACTItemInfo_ItemName();

If $Item = $Item3 Then;
Send('{ENTER}');
Sleep(200);
Send('{RIGHT');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

Last Edit: Jul 20, 2005 21:15:30 GMT -5 by Wreyth

i5.photobucket.com/albums/y191/Wreyth/monkey2.bmp [/img] All your Gil are belong to me.

Wreyth
Junior Member

Posts: 50

A little help here Jul 24, 2005 2:00:31 GMT -5

Quote

Post by Wreyth on Jul 24, 2005 2:00:31 GMT -5

ok i got this from another post and need to know how to get this into my crafting script i just need the iteminfo_selected and iteminfo_name i really need to know what command string i use to get thesecan somebody please help

------------------- ItemInfo -------------------
Name: <# iteminfo_itemname #>
Selected: <# iteminfo_selected #>
Max: <# iteminfo_max #>
ItemCnt: <# iteminfo_itemcnt #>
ItemCntAvail: <# iteminfo_itemcntavail #>
PriceDialog CurrentValue: <# iteminfo_pricedialog_currentvalue #>
PriceDialog MaxValue: <# iteminfo_pricedialog_maxvalue #>
PriceDialog CursorPos: <# iteminfo_pricedialog_cursorpos #>
------------------- Inventory -------------------
LastItem: <# inventory_lastitem #>

i5.photobucket.com/albums/y191/Wreyth/monkey2.bmp [/img] All your Gil are belong to me.

Wreyth
Junior Member

Posts: 50

A little help here Jul 24, 2005 14:37:37 GMT -5

Quote

Post by Wreyth on Jul 24, 2005 14:37:37 GMT -5

wow i am the only one posting in this lol What the heck.

anyways it occured to me that i would run into a problem so i had to modify the script once i can get a way to pull item name it should be about done. here is the fixed script before the correct iteminfo command please people gimme some feedback as to what you think or where i am going wrong.

AutoItSetOption("SendKeyDelay", 40)
WinActivate("FFXiApp");

AutoItSetOption("SendKeyDownDelay",40);

FFACTInit();
$MyRecipe= 0
$Crystal="Crystal";
$Item1="blah";
$Item2="blah blah";
$Item3="blah blah blah";

Do
Sleep(10);
Until NumCheck()=1;

While $MyRecipe=0;
FFACTItemInfoSelected();
$Item =FFACTItemInfoSelected();
Send('^i');
$MyRecipe=$MyRecipe +1
WEnd

While $MyRecipe=1;
FFACTItemInfoSelected();
$Item = FFACTItemInfoSelected();

If $Item = $Crystal Then;
Send('{ENTER}');
Sleep(200);
Send('{ENTER}');
Sleep(200);
Send('{ENTER}');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=2;
FFACTItemInfoSelected();
$Item =FFACTItemInfoSelected();
If $Item = $Item1 Then;
Send('{ENTER}');
Sleep(200);
Send('{RIGHT');
Sleep(200);
Send('{ENTER}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=3;
FFACTItemInfoSelected();
$Item = FFACTItemInfoSelected();

If $Item = $Item2 Then;
Send('{ENTER}');
Sleep(200);
Send('{RIGHT');
Sleep(200);
Send('{ENTER}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
$MyRecipe=$MyRecipe +1

ELse
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=4;
FFACTItemInfoSelected();;
$Item = FFACTItemInfoSelected();
If $Item = $Item3 Then;
Send('{ENTER}');
Sleep(200);
Send('{RIGHT');
Sleep(200);
Send('{ENTER}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
Sleep(200);
Send('{LEFT}');
$MyRecipe=$MyRecipe +1

Else
Send('{DOWN}');

EndIf
WEnd

While $MyRecipe=5;
Send('{ESCAPE}');
Sleep(200);
Send('{ESCAPE}');
Sleep(200);
Send('{UP}');
Sleep(200);
Send('{ENTER}');
Sleep(15000);
Send ("^i");
Sleep(0100);
Send ("{NUMPADADD}");
Sleep (0100);
Send ("{ENTER}");
sleep(0100);
Send ("{UP}");
sleep(0100);
Send ("{ENTER}");
sleep(0100);
Send ("{ESCAPE}");
Sleep (5000);
$MyRecipe=$MyRecipe -5

WEnd

i5.photobucket.com/albums/y191/Wreyth/monkey2.bmp [/img] All your Gil are belong to me.