Weight Change Stage Script

short i
short size
short tempCount
ref container
ref item
ref tempItem
float contWeight
float itemWeight

set container to PNxCUtilWeight.container

Label 210

if container != 0 && isFormValid container

	set i to 0
	set size to container.getNumItems

	Label 211

	if i < size
		set item to container.getInventoryObject i
		set contWeight to container.GetWeight
		set itemWeight to item.GetWeight

		if isFormValid item

			if (contWeight > 0)

				if (item != 0) && (listGetFormIndex PNxCWeightChangedList item == -1) && (listGetFormIndex PNxCWeightIgnoredList item == -1) && (isQuestitem item == 0)

					if (itemWeight > contWeight)
						set tempCount to player.GetItemCount item
						player.RemoveItem item tempCount 1
						SetWeight contWeight item
						player.AddItem item tempCount 1

						set tempItem to TempCloneForm item
						ListAddForm PNxCWeightTempFormList tempItem
						ListAddForm PNxCWeightOrigFormList item

					endif

					listAddForm PNxCWeightChangedList item

					if (IsQuestItem item) && (item.GetWeight > 0)
						set tempCount to player.GetItemCount item
						player.RemoveItem item tempCount 1
						setWeight 0 item
						player.AddItem item tempCount 1

						set tempItem to TempCloneForm item
						ListAddForm PNxCWeightTempFormList tempItem
						ListAddForm PNxCWeightOrigFormList item

					endif

				endif

			endif

		endif

		set i to i + 1
		goto 211
	endif

	set container to apple
	set container to getNextRef
	goto 210
endif