Para's VanillaTool [Rework]

[Paraly]

Originally Posted by Diavolakos

Paraly is it possible to make Vanilla "write" something in a txt file and even better add more contents to an existing txt (like append it in the end of the file or overwrite it etc)?

I have 64 chars and I would love to have something like a database in an excel sheet of all my chars' items and materials. Being able to save all the item contents in my inventory and quest inventory for every char I have would be awesome.

If it is too hard to make I understand.

Otherwise a simple command to append some text in the end of the existing file, or a command that writes into a file, overriding it if it exists would be awesome.

Something like this:

FileWrite=Filename.txt,Text here including variables etc;
FileAppend=Filename.txt,Text here including variables etc;

Now I am not sure how we could implement the "tab" ascii into this, but lets not make it too complicated.

FileWrite would delete all and simply save this only, we would use it to initialize it if we make a new entry and we want to start fresh with the file.

FileAppend would be used to add content.

And in the filename.txt we could use it in the format of a variable probably? so we could make the file have the name of the char?

~~~

All this if it is possible to make it. the file will be saved in the same folder Vanilla is for simplicity.

Try

LogWrite=%VANILLATOOL\Logs\%DAY-%MONTH-%YEAR--Scriptlog.txt,%HOUR:%MIN:%SEC -- ScriptLine: %Line -- Just looted a mob,+;

LogWrite=[Path],[Text],[State];

state can whether be "+" to add text to the file or "r" to rewrite the file

[Diavolakos]

Originally Posted by Paraly

Try

LogWrite=%VANILLATOOL\Logs\%DAY-%MONTH-%YEAR--Scriptlog.txt,%HOUR:%MIN:%SEC -- ScriptLine: %Line -- Just looted a mob,+;

LogWrite=[Path],[Text],[State];

state can whether be "+" to add text to the file or "r" to rewrite the file

Looks like this below code did nothing, I made a Logs folder and aPoppyLetter.txt in there (since the "r" didn't make one) and it still did nothing.

Unless I wrote the command wrongly

#IF=%FirstTime,;
UseSpeed=1;
#ENDIF

_IFInventoryContains=186000481,1; Poppy's Letter
_GetInventoryItemHandle=186000481;

_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],1; <-- saves the playername in %Var1

LogWrite=%VANILLATOOL\Logs\PoppyLetter.txt, %Var1  - %VarItemAmount,+;

#ENDIF

I also tried a simple one and it didn't write anything to the file

LogWrite=%VANILLATOOL\Logs\PoppyLetter.txt,Testing,+;

[Paraly]

Originally Posted by Diavolakos

Looks like this below code did nothing, I made a Logs folder and aPoppyLetter.txt in there (since the "r" didn't make one) and it still did nothing.

Unless I wrote the command wrongly

#IF=%FirstTime,;
UseSpeed=1;
#ENDIF

_IFInventoryContains=186000481,1; Poppy's Letter
_GetInventoryItemHandle=186000481;

_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],1; <-- saves the playername in %Var1

LogWrite=%VANILLATOOL\Logs\PoppyLetter.txt, %Var1  - %VarItemAmount,+;

#ENDIF

I also tried a simple one and it didn't write anything to the file

LogWrite=%VANILLATOOL\Logs\PoppyLetter.txt,Testing,+;

I executed my code already test wise and it did work fine, remember you need at least 2 lines if you try this command as stand alone

[Diavolakos]

Originally Posted by Paraly

I executed my code already test wise and it did work fine, remember you need at least 2 lines if you try this command as stand alone

Yes the command itself alone written twice writes the text twice.

My mistake is that I used the IfInventoryContains while trying to see an item in quest inventory, I also realized that _GetInventoryItemHandle command also works for inventory items only.

So my code was correct, I should have used IfQuestInventoryContains and find another way to count the amount of Q items I have.

Is there a way to make this command change a line? Because it only writes in continuous row.

[Paraly]

Originally Posted by Diavolakos

Yes the command itself alone written twice writes the text twice.

My mistake is that I used the IfInventoryContains while trying to see an item in quest inventory, I also realized that _GetInventoryItemHandle command also works for inventory items only.

So my code was correct, I should have used IfQuestInventoryContains and find another way to count the amount of Q items I have.

Is there a way to make this command change a line? Because it only writes in continuous row.

Like at WaitForResponse you can use "/n" for a new line

That should return the item amount of what ever quest item you have (haven't tried it though)

_SetVar=SearchedItemID,140020201; <-- Quest Item ID here
#EXECUTE=CheckInvSlot;
WaitForResponse=You got %Var[SearchedItemAmount] of %Var[SearchedItemID];


start_CheckInvSlot;

_SetVar=Round,0;
_SetVar=SearchedItemAmount,0;

#DO=90000;

_Calc[DynamicSlotOffset]=%Var[Round]*8;
MemWrite=%AddrFreeMem20,0,BYTE;

_IFMemPtrRead=%AddrFrameID[17],0x510/0x3B8/%Var[DynamicSlotOffset]/0x9C,DWORD,=%Var[SearchedItemID];
MemWrite=%AddrFreeMem20,1,BYTE;
_MemPtrReadVar=%AddrFrameID[17],0x510/0x3B8/%Var[DynamicSlotOffset]/0xA8,DWORD,SearchedItemAmount;
#ENDIF

#IF=%Var[Round],>101;
MemWrite=%AddrFreeMem20,2,BYTE;
#ENDIF

_Calc[Round]=%Var[Round]+1;

_UNTILMemRead=%AddrFreeMem20,BYTE,>0;

_Calc[Round]=%Var[Round]-1;


_IFMemRead=%AddrFreeMem20,BYTE,=2;
_SetVar=SearchedItemAmount,-1;
#ENDIF

end_CheckInvSlot;

Edit: ok tried it and it's working fine

[JoshuaPL]

Originally Posted by Paraly

Like at WaitForResponse you can use "/n" for a new line

That should return the item amount of what ever quest item you have (haven't tried it though)

_SetVar=SearchedItemID,140020201; <-- Quest Item ID here
#EXECUTE=CheckInvSlot;
WaitForResponse=You got %Var[SearchedItemAmount] of %Var[SearchedItemID];


start_CheckInvSlot;

_SetVar=Round,0;
_SetVar=SearchedItemAmount,0;

#DO=90000;

_Calc[DynamicSlotOffset]=%Var[Round]*8;
MemWrite=%AddrFreeMem20,0,BYTE;

_IFMemPtrRead=%AddrFrameID[17],0x510/0x3B8/%Var[DynamicSlotOffset]/0x9C,DWORD,=%Var[SearchedItemID];
MemWrite=%AddrFreeMem20,1,BYTE;
_MemPtrReadVar=%AddrFrameID[17],0x510/0x3B8/%Var[DynamicSlotOffset]/0xA8,DWORD,SearchedItemAmount;
#ENDIF

#IF=%Var[Round],>101;
MemWrite=%AddrFreeMem20,2,BYTE;
#ENDIF

_Calc[Round]=%Var[Round]+1;

_UNTILMemRead=%AddrFreeMem20,BYTE,>0;

_Calc[Round]=%Var[Round]-1;


_IFMemRead=%AddrFreeMem20,BYTE,=2;
_SetVar=SearchedItemAmount,-1;
#ENDIF

end_CheckInvSlot;

Edit: ok tried it and it's working fine

This will come in handy for me, thanks

[triton_0020]

I run para acount manager and close inmediately, use win 10 64x

[Inzinbelth]

Im trying to open by Acc manager and close inmediately, like triton_0020

[Diavolakos]

Originally Posted by triton_0020

I run para acount manager and close inmediately, use win 10 64x

Originally Posted by Inzinbelth

Im trying to open by Acc manager and close inmediately, like triton_0020

It happened to me a couple of times but I closed my pc and everything, restarted it all and then it seemed to work. Dunno what caused this.

[Paraly]

Originally Posted by triton_0020

I run para acount manager and close inmediately, use win 10 64x

Your ID wasn't changed yet, that means your home PC wasn't activated till now

Originally Posted by Inzinbelth

Im trying to open by Acc manager and close inmediately, like triton_0020

Like above you are not activated then, send me your unique-ID which you get from this and your PayPal email by private message

[Diavolakos]

Paraly, Vanila still closes at some points for a strange reason. I do not know what causes this, but it started yesterday after the reset and when I am running kumuki.


OK I found there was a collision in my entry function in the ifs and elses.

[rr1]

is the tool working?

[Paraly]

Originally Posted by rr1

is the tool working?

Yes, it is working

[hueaion]

Originally Posted by Paraly

Yes, it is working

I ask because have some troubles, when I try open "Account Manager" this just pop up for a little bit later then exit, open and close the program very fast. Can you help me?

[Paraly]

Originally Posted by hueaion

I ask because have some troubles, when I try open "Account Manager" this just pop up for a little bit later then exit, open and close the program very fast. Can you help me?

send me a private message with these informations:

-PayPal email
-Previous Unique-ID
-New Unique-ID (Can be checked with this )