Lockpicking Macro Problem

[Garatau]

Here is the Macro I am using - It's something that Halygon created but that I am trying to modify to perform an additional function.

What it is supposed to do
Continue picking lock until successful, then use key to lock box back. Once box is locked again, continue picking lock (rinse & repeat)

What it is actually doing
It asks to identify "lockeditem" and "key' but then it just keeps locking & unlocking the box

The Code I am using:

//Target object to unlock
promptalias 'lockeditem'
promptalias 'key'

@clearjournal

while not @injournal 'The lock quickly yields' 'system'
if @findtype 0x100e 'any' 'backpack'
useobject 'found'
waitfortarget 1500
target! 'lockeditem'
pause 4000
endif
endwhile
while not @injournal 'This does not appear to be locked.' 'system'
useobject 'key'
waitfortarget 1500
target! 'lockeditem'
endwhile

 

[Experience]

//Target object to unlock
promptalias 'lockeditem'
promptalias 'key'

@clearjournal

while not @injournal 'The lock quickly yields' 'system'
if @findtype 0x100e 'any' 'backpack'
useobject 'found'
waitfortarget 1500
target! 'lockeditem'
pause 4000
endif
endwhile
while @injournal 'This does not appear to be locked.' 'system'
useobject 'key'
waitfortarget 1500
target! 'lockeditem'
@clearjournal
endwhile