Construction Set Skriptthread zum Construction Set

scn name

short init
short EquipDelay
ref Actor

Begin onEquip <player>
 if init == 0
  set Actor to getContainer
  set init to 1
 endif
end

Begin onUnEquip
 if init == 1
  set init to 0
 endif
end

Begin GameMode
 if init == 1
  if getCurrentHealth / getObjectHealth >= 0 && getCurrentHealth / getObjectHealth <= 0.75
   message "Rüstung ist beschädigt!"
   set init to 2
   Actor.addItem aamodiamelionbroken 1
   removeMe
  endif
 elseif init == 2
  if EquipDelay >= 1
   Actor.EquipItem aamodiamelionbroken
   set init to 0
   set EquipDelay to 0
  else
   set EquipDelay to EquipDelay + 1
  endif
 endif
end

scn name

short init
short next
short EquipDelay
ref Actor

Begin onEquip
	if init == 0
		set Actor to getContainer
		set init to 1
	endif
end

Begin onUnEquip
	if next == 1
		set EquipDelay to 1
	endif
	set init to 0
end

Begin GameMode
	if init == 1
		if getCurrentHealth / getObjectHealth >= 0 && getCurrentHealth / getObjectHealth <= 0.75
			message "Rüstung ist beschädigt!"
			set next to 1
			Actor.addItem aamodiamelionbroken 1
			Actor.UnEquipItem <Item-ID>
		endif
	elseif next == 1
		if EquipDelay >= 1
			set EquipDelay to EquipDelay - 1
		elseifEquipDelay == 0
			set next to 0
			Actor.EquipItem aamodiamelionbroken
			removeMe
		endif
	endif
end

scn aaarmorbrokenc

short init
short next
short EquipDelay
long objecthealth
ref Actor

Begin onEquip
	if init == 0
		set Actor to getcontainer
		set init to 1
	endif
end

Begin GameMode
	if init == 1
		if getCurrentHealth / getObjectHealth >= 0 && getCurrentHealth / getObjectHealth <= 0.75
			message "Rüstung ist beschädigt!"
			set next to 1
               set objecthealth to getObjectHealth aamodiamelion
			Actor.addItem aamodiamelionbroken 1
			set init to 0 "den teil hab ich jetzt hier eingefügt da er den begin onUnequip block nicht abgefragt hat"
	          if next == 1
		          set EquipDelay to 1
	          endif
		endif
	elseif next == 1
		if EquipDelay >= 1
			set EquipDelay to EquipDelay - 1
		elseif EquipDelay == 0
			set next to 0
               Actor.UnEquipItem aamodiamelion
			Actor.EquipItem aamodiamelionbroken "habe ich hier hin verschoben da mein char sonst zwischendurch ~ 1 sekunde keine rüssi trägt"
               Actor.SetEquippedCurrentHealth objecthealth 2
		removeMe
		endif
	endif
end