scn CWxFnUpgrade

int iMode

begin function { iMode }

	if CWxVersion < 1

		print "Cyberware: initializing"

		set CWxVersion to 1

		if player.hasPerk ImplantAgilityPerk
			AddFormToFormList CWxPreInstallPerks ImplantAgilityPerk
			player.RemovePerk ImplantAgilityPerk
			player.dispel ImplantAgilityBoost
			player.addItem CWxImplantReflexBooster 1
		endif

		if player.hasPerk ImplantCharismaPerk
			AddFormToFormList CWxPreInstallPerks ImplantCharismaPerk
			player.RemovePerk ImplantCharismaPerk
			player.dispel ImplantCharismaBoost
			player.addItem CWxImplantEmpathySynthesizer 1
		endif

		if player.hasPerk ImplantDTPerk
			AddFormToFormList CWxPreInstallPerks ImplantDTPerk
			player.RemovePerk ImplantDTPerk
			player.dispel ImplantDTBoost
			player.addItem CWxImplantSubDermalArmor 1
		endif

		if player.hasPerk ImplantEndurancePerk
			AddFormToFormList CWxPreInstallPerks ImplantEndurancePerk
			player.RemovePerk ImplantEndurancePerk
			player.dispel ImplantEnduranceBoost
			player.addItem CWxImplantNociceptionRegulator 1
		endif

		if player.hasPerk ImplantIntelligencePerk
			AddFormToFormList CWxPreInstallPerks ImplantIntelligencePerk
			player.RemovePerk ImplantIntelligencePerk
			player.dispel ImplantIntelligenceBoost
			player.addItem CWxImplantLogicCoProcessor 1
		endif

		if player.hasPerk ImplantLuckPerk
			AddFormToFormList CWxPreInstallPerks ImplantLuckPerk
			player.RemovePerk ImplantLuckPerk
			player.dispel ImplantLuckBoost
			player.addItem CWxImplantProbabilityCalculator 1
		endif

		if player.hasPerk ImplantPerceptionPerk
			AddFormToFormList CWxPreInstallPerks ImplantPerceptionPerk
			player.RemovePerk ImplantPerceptionPerk
			player.dispel ImplantPerceptionBoost
			player.addItem CWxImplantOpticsEnhancer 1
		endif

		if player.hasPerk ImplantRegenPerk
			AddFormToFormList CWxPreInstallPerks ImplantRegenPerk
			player.RemovePerk ImplantRegenPerk
			player.dispel ImplantRegenBoost
			player.addItem CWxImplantMonocyteBreeder 1
		endif

		if player.hasPerk ImplantStrengthPerk
			AddFormToFormList CWxPreInstallPerks ImplantStrengthPerk
			player.RemovePerk ImplantStrengthPerk
			player.dispel ImplantStrengthBoost
			player.addItem CWxImplantHypertrophyAccelerator 1
		endif

		if player.GetItemCount CWxImplantsAllList
			SetObjectiveDisplayed CWxImplantSurgeonQuest 10 1
		endif

	endif

end