docs: added code documentation to lootItemCommand procedure

FossilOrigin-Name: dcab1a0a8357b6f7d4e1ade8c5956ada6b9fd8a4e8237bc1f8775b10ea66d27f

nim/src/ui/baseslootui.nim

@@ -355,6 +355,18 @@ proc showLootItemInfoCommand(clientData: cint; interp: PInterp; argc: cint;
 proc lootItemCommand(clientData: cint; interp: PInterp; argc: cint;
     argv: cstringArray): TclResults {.sideEffect, raises: [], tags: [
     RootEffect], exportc.} =
+  ## Take or drop the selected item
+  ##
+  ## * clientData - the additional data for the Tcl command
+  ## * interp     - the Tcl interpreter on which the command was executed
+  ## * argc       - the amount of arguments entered for the command
+  ## * argv       - the list of the command's arguments
+  ##
+  ## The procedure always return tclOk
+  ##
+  ## Tcl:
+  ## LootItem actiontype
+  ## actiontype can be: drop, dropall, take, takeall
   var baseCargoIndex, cargoIndex = -1
   if itemIndex < 0:
     baseCargoIndex = itemIndex.abs