Code:
scn aaarmorbrokenc 

short init 
short next 
short EquipDelay 
long objecthealth 
ref Actor 

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

Begin GameMode 
    if init == 1 
        if (( getEquippedCurrentHealth 2 / getObjectHealth aamodiamelion ) >= 0 ) && (( getequippedCurrentHealth 2 / getObjectHealth aamodiamelion ) <= 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 
              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 
			Actor.setEquippedCurrentHealth objecthealth 2 
			removeMe 
        endif 
    endif 
end
Sry hatte die 2 vergessen