33 lines
649 B
Plaintext
33 lines
649 B
Plaintext
scn EBxOnMiddleClick
|
|
|
|
int iKeyID
|
|
ref rItem
|
|
ref rBottle
|
|
|
|
begin function { iKeyID }
|
|
|
|
if iKeyID != 258 ; not middle click
|
|
return
|
|
endif
|
|
|
|
set rItem to GetSelectedItemRef
|
|
|
|
if IsFormValid rItem
|
|
if rItem.GetType == 47 ; ingestible
|
|
|
|
set rBottle to call EBxGetBottleByDrink rItem
|
|
|
|
if IsFormValid rBottle
|
|
set rItem to rItem.GetBaseObject
|
|
playerRef.RemoveItem rItem 1 1
|
|
playerRef.AddItem rBottle 1 1
|
|
PlaySound ITMBottleDown 1
|
|
MessageExAlt 1 ($rBottle + " " + $(GetStringSetting "sAddItemtoInventory")) ; ShowMessage causes CTD in MenuMode 1002
|
|
RefreshItemsList
|
|
endif
|
|
|
|
endif
|
|
endif
|
|
|
|
end
|