ENs - EUO to LUA Converter written in LUA

[Endless Night]

A big thank you superslayer for teh enourmous feedback you provided.. all issues on that list should now be cleared up.
I will send you a fresh translation.

[Superslayer]

Your welcome Endless, it's a great way to learn the language a bit better especially when you have the original script to compare with, and understand what it being accomplished.

I got the updated script now and am going through it. There are some hanging issues that I had previously just fixed out myself because I saw a better way to do it in my original script. There shouldn't be any hardcore problems, but maybe just some translations that will actually save time in the conversion. I'll do as before and send them over when I finish with your latest and greatest conversion.

[Endless Night]

Discovered new error with set atom... fixed....  fix two break one

[Dixie Wrecked]

Converted code (needs unreleased library file - not finished)

Code: [Select]


dofile('ENs_EUOCommandLibrary.lua')

EUO_DisplayResult=EUO_Display("ok","please target your source container")
UO.TargCurs=1
while UO.TargCurs== 1 do
  Wait(0 * 50) -- Converted to Milliseconds
  end -- for while
g_source_bag=UO.LTargetID

EUO_DisplayResult=EUO_Display("ok","please target your bag to be karate chopped!")
UO.TargCurs=1
while UO.TargCurs== 1 do
  Wait(0 * 50) -- Converted to Milliseconds
  end -- for while
g_target_bag=UO.LTargetID

g_move='UVF_EWF_FWF_GWF'

EUO_FindItem(g_move,'c_,',g_source_bag)
for EUO_FindIndex=1,EUO_FindCnt do
   UO.Drag(EUO_Find[EUO_FindIndex].ID)
   Wait(10 * 50) -- Converted to Milliseconds
   UO.Dropc(g_target_bag)
   Wait(10 * 50) -- Converted to Milliseconds
   end

EUO_DisplayResult=EUO_Display("ok","DONE!!!")

stop()
 

Thank you so much for the conversion!  Since the Command Library is unfinished, I obviously can't actually test the script, but it does give me an idea of how this will work.  And since it seems like you are probably going to have a lot of functions in your library, given the Wait/wait issue, you might just want to have a function called Wait, which I assume could be as simple as:

Code: [Select]

function Wait(a)
 wait(a)
end
This way, if there is a missed 'Wait' rather than 'wait', or if there is a lot of extra coding necessary to make them all be lower case waits, I would think that it would let you use your time much more constructively? 


Also, after seeing this line:

Code: [Select]

g_move='UVF_EWF_FWF_GWF'and seeing the problems that it initially caused for SuperSlayer, perhaps a conversion from the EUO formatted lists would be beneficial?  I don't know how oEUO handles these lists yet, but I am more than willing to learn (and will be looking this info up shortly tonight), so if I can be of any help in this possibility, please let me know and I will do waht I can to help (I know there are a TON of item id's to find and cross-reference, but it can be a somewhat on-going exercise).

[Endless Night]

In the latest version your code Dixes transaltes as bellow.   As far as i am aware thier is no wait issue (desides an accidental capitalization now fixed)...   your original code has a wait 0  thierfor the transalted code has a wait(0)  actually wait (0*50)=wait(0)

whhy the *50 you say .. becuase EUO waits are by 1/20ths where as OEUO are 1/1000's

anyways your code.. and i know abuot the bad formed finditem command.. ", . "  are probably my next target item...  once dealt with will also fix the display  .. which works but is ugely.

Code: [Select]

EUO_DisplayResult=EUO_Display("ok","please".."target".."your".."source".."container")
UO.TargCurs=1
while UO.TargCurs == 1 do
  wait(0 * 50) -- Converted to Milliseconds
  end -- for while
g_source_bag=UO.LTargetID

EUO_DisplayResult=EUO_Display("ok","please".."target".."your".."bag".."to".."be".."karate".."chopped!")
UO.TargCurs=1
while UO.TargCurs == 1 do
  wait(0 * 50) -- Converted to Milliseconds
  end -- for while
g_target_bag=UO.LTargetID

g_move="UVF_EWF_FWF_GWF"

EUO_FindItem(g_move,"c_",..,g_source_bag)
for EUO_FindIndex=1,EUO_FindCnt do
   UO.Drag(EUO_Find[EUO_FindIndex].ID)
   wait(10 * 50) -- Converted to Milliseconds
   UO.Dropc(g_target_bag)
   wait(10 * 50) -- Converted to Milliseconds
   end

EUO_DisplayResult=EUO_Display("ok","DONE!!!")

stop()  


[TrailMyx]

Might be helpful to recommend that someone run the ScriptUO syntax checker before running the converter.  My guess is that a properly structured script will convert easier.

[Scrripty]

Might be helpful to recommend that someone run the ScriptUO syntax checker before running the converter.  My guess is that a properly structured script will convert easier.

*cough* manwinc *cough*

[Endless Night]

Might be helpful to recommend that someone run the ScriptUO syntax checker before running the converter.  My guess is that a properly structured script will convert easier.

for sure for sure.. the translator script just converts commands from one format to another... if the original script is borked the resulting translation will be equally borked...  I may throw in some free additional borking just as a bonus in the transalted version.

Thierfor as TM suggested i highly reckonmend you fix issues found by TMs ScriptUo project in your original script prior to any translations.

[Endless Night]

UPDATE
Knocked out alot of the unfinished library code.

[Endless Night]

Doesnt time fly .. over a month since i looked at this... the project might have gotten a bit forgotten but its not dead.

Implemented into Library file  EUO compatible Journal Commands.

[_C2_]

yay
when they finally get the almost done version.. i want to convert stuff and learn

[Endless Night]

yay
when they finally get the almost done version.. i want to convert stuff and learn

err it is almost done.. lol needs some testers to get me kick started again...

[Scrripty]

You post it up and I'll test the hell out of it.

[_C2_]

same ill test

[Paulonius]

Count me in too EN