added new inventory system with slots

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/DefCore.txt

@@ -0,0 +1,7 @@
+[DefCore]
+id=INVT
+Version=4,9,8
+Category=C4D_StaticBack | C4D_IgnoreFoW | C4D_Foreground | C4D_Parallax | C4D_MouseSelect
+Width=1
+Height=1
+Picture=0,0,64,64

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/DescDE.txt

@@ -0,0 +1 @@
+Inventarsteuerung

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/DescUS.txt

@@ -0,0 +1 @@
+Inventory control

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/Empty.c4d/DefCore.txt

@@ -0,0 +1,10 @@
+[DefCore]
+id=EMPT
+Version=4,9,8,8
+Category=C4D_Object
+Width=64
+Height=64
+Offset=-32,-32
+Picture=0,0,64,64
+Vertices=1
+Collectible=1

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/Empty.c4d/Script.c

@@ -0,0 +1,55 @@
+#strict 2
+
+func Definition(def) {
+  SetProperty("Name", "$Name$", def);
+}
+
+func Departure(object pContainer)
+{
+  Enter(pContainer);
+}
+
+local pMaster;
+local iNumber;
+
+func SetMaster(pNewMaster, iNewNumber)
+{
+  SetCategory(C4D_StaticBack | C4D_IgnoreFoW | C4D_Foreground | C4D_Parallax | C4D_MouseSelect);
+  this["Visibility"] = VIS_None;
+  this["Parallaxity"] = [0,0];
+  pMaster = pNewMaster;
+  iNumber = iNewNumber;
+  SetGraphics(Format("%d", iNumber+1),NUMB,3,GFXOV_MODE_IngamePicture);
+  SetObjDrawTransform(300, 0,-1000*18, 0, 300, 1000*18, 3);
+  SetGraphics("Spot", GetID(), 1, GFXOV_MODE_IngamePicture);
+}
+
+func SetImage(pObj, bool fSelected)
+{
+  if(fSelected)
+  {
+    SetClrModulation(RGB(255), 3); SetGraphics("Spot", GetID(), 1, GFXOV_MODE_IngamePicture);
+  }
+  else
+  {
+    SetClrModulation(HSL(0,0,180), 3); SetGraphics(nil, nil, 1, 0);
+  }
+  if(!pObj)
+  {
+    SetGraphics(nil, nil, 2, 0);
+    SetName(GetID()->GetName());
+    return;
+  }
+  var idID = pObj->GetID();
+  SetGraphics(nil, idID, 2, GFXOV_MODE_IngamePicture);
+  if(fSelected)
+    SetObjDrawTransform(1000, 0, 0, 0, 1000, 0, 2);
+  else
+    SetObjDrawTransform( 600, 0, 0, 0,  600, 0, 2);
+  SetName(pObj->GetName());
+}
+
+func MouseSelection(int iPlr)
+{
+  if(iPlr == GetOwner()) pMaster->SelectNumber(iNumber);
+}

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/Empty.c4d/StringTblDE.txt

@@ -0,0 +1 @@
+Name=Leer

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/Empty.c4d/StringTblUS.txt

@@ -0,0 +1 @@
+Name=Empty

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/Script.c

@@ -0,0 +1,199 @@
+#strict 2
+
+static const INVT_MaxItems = 3;
+static const INVT_MaxTools = 1;
+
+static const INVT_SymbolSize = 64;
+
+local aInventory;
+local aTools;
+local aPictures;
+local iSelection;
+
+func Initialize()
+{
+  // 3 Inventory spaces
+  aInventory = [0,0,0];
+  // 1 Tool space
+  aTools = [0];
+  iSelection = 0;
+  // parallaxity
+  this["Parallaxity"] = [0,0];
+
+  this["Visibility"] = VIS_None;
+  
+  SetPosition(30,-90);
+  
+  SetClrModulation(RGBa(0,0,20,128));
+  SetAction("Inventory");
+  
+  // Create pictures
+  var pPict;
+  var OffX = INVT_SymbolSize/2, OffY = INVT_SymbolSize/2;
+  aPictures = [];
+  for(var iIndex = 0; iIndex < GetLength(aInventory)+GetLength(aTools); iIndex++)
+  {
+    pPict = CreateObject(EMPT, 0, 0, GetOwner());
+    pPict->SetMaster(this, iIndex);
+    aPictures[iIndex] = pPict;
+    pPict->SetPosition(GetX()+OffX, GetY()+OffY);
+    OffX += INVT_SymbolSize;
+    if(iIndex == GetLength(aInventory)-1) OffX += INVT_SymbolSize;
+  }
+  
+  UpdateImage();
+}
+
+func Show(fHide)
+{
+  if(fHide)
+  {
+    for(var pPict in aPictures)
+      pPict["Visibility"] = VIS_None;
+    this["Visibility"] = VIS_None;
+  }
+  else
+  {
+    for(var pPict in aPictures)
+      pPict["Visibility"] = VIS_Owner;
+    this["Visibility"] = VIS_Owner;
+  }
+}
+
+local iOffset;
+func UpdateImage()
+{
+  var iIndex = 0;
+  var pObj;
+  var idID;
+  for(pObj in aInventory)
+  {
+    aPictures[iIndex]->SetImage(pObj, iSelection == iIndex);
+    iIndex++;
+  }
+  for(pObj in aTools)
+  {
+    aPictures[iIndex]->SetImage(pObj, -1-iSelection+GetLength(aInventory)  == iIndex);
+    iIndex++;
+  }
+  return;
+}
+
+func AddTool(object pObj)
+{
+  var iIndex;
+  // Find the first free slot
+  while(iIndex < GetLength(aTools) && aTools[iIndex]) iIndex++;
+  if(iIndex == GetLength(aTools)) return 0;
+  // Add item
+  aTools[iIndex] = pObj;
+  UpdateImage();
+}
+
+func RemTool(object pObj)
+{
+  // Get Index
+  var iIndex;
+  for(var pTest in aTools)
+  {
+    if(pTest == pObj) break;
+    iIndex++;
+  }
+  if(iIndex == GetLength(aTools)) return 0;
+  aTools[iIndex] = 0;
+  UpdateImage();
+}
+
+func AddItem(object pObj)
+{
+  if(pObj->~IsTool()) return AddTool(pObj);
+  var iIndex;
+  // Find the first free slot
+  while(iIndex < GetLength(aInventory) && aInventory[iIndex]) iIndex++;
+  if(iIndex == GetLength(aInventory)) return 0;
+  // Add item
+  aInventory[iIndex] = pObj;
+  UpdateImage();
+}
+
+func FreeSpace(object pObj)
+{
+  var iIndex;
+  if(pObj->~IsTool())
+  {
+    // Find the first free slot
+    while(iIndex < GetLength(aTools) && aTools[iIndex]) iIndex++;
+    if(iIndex == GetLength(aTools)) return 0;
+  }
+  else
+  {
+    // Find the first free slot
+    while(iIndex < GetLength(aInventory) && aInventory[iIndex]) iIndex++;
+    if(iIndex == GetLength(aInventory)) return 0;
+  }
+  return true;
+}
+
+func RemItem(object pObj)
+{
+  if(pObj->~IsTool()) return RemTool(pObj);
+  // Get Index
+  var iIndex;
+  for(var pTest in aInventory)
+  {
+    if(pTest == pObj) break;
+    iIndex++;
+  }
+  if(iIndex == GetLength(aInventory)) return 0;
+  aInventory[iIndex] = 0;
+  UpdateImage();
+}
+
+func GetSelectedObj()
+{
+  // Positiv counts are normal items
+  if(iSelection >= 0) return aInventory[iSelection];
+  // negativ counts are tools
+  else return aTools[-1-iSelection];
+}
+
+func SelectNumber(iIndex)
+{
+  if(iIndex >= GetLength(aInventory)) iIndex = GetLength(aInventory)-iIndex-1;
+  if(iIndex > 0)
+  {
+    if(iIndex >= GetLength(aInventory)) return false;
+    iSelection = iIndex;
+    UpdateImage();
+    return true;
+  }
+  if(-1-iIndex >= GetLength(aTools)) return false;
+  iSelection = iIndex;
+  UpdateImage();
+  return true;
+}
+
+func SelectNext()
+{
+  iSelection++;
+  if(iSelection >= GetLength(aInventory)) iSelection = -GetLength(aTools);
+  UpdateImage();
+}
+
+func Definition(def) {
+    SetProperty("ActMap", {
+Inventory = {
+Prototype = Action,
+Name = "Inventory",
+Procedure = DFA_NONE,
+Length = 1,
+Delay = 0,
+X = 0,
+Y = 0,
+Wdt = 330,
+Hgt = 74,
+OffX = -5,
+OffY = -5,
+},  }, def);
+  SetProperty("Name", "$Name$", def);
+}

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/StringTblDE.txt

@@ -0,0 +1 @@
+Name=Inventarsteuerung

planet/Objects.c4d/Clonk.c4d/Inventory.c4d/StringTblUS.txt

@@ -0,0 +1 @@
+Name=Inventory control

planet/Objects.c4d/Clonk.c4d/Script.c

@@ -2,24 +2,29 @@
 
 #strict 2
 
-// Zauberei - benötigt, wenn der Clonk Zielzauber z.B. aus dem Zauberturm zaubert
-// Auch benötigt für den König
-local pAimer;			// Aktive Zielsteuerung; wird abgrbrochen, wenn der Zauberer gestört wird (Nur Fantasypack)
+// Zauberei - ben<EFBFBD>tigt, wenn der Clonk Zielzauber z.B. aus dem Zauberturm zaubert
+// Auch ben<EFBFBD>tigt f<>r den K<>nig
+local pAimer;			// Aktive Zielsteuerung; wird abgrbrochen, wenn der Zauberer gest<EFBFBD>rt wird (Nur Fantasypack)
 local pAimedSpell;		// Zauber, der gezielt wird  (Nur Fantasypack)
 local pAimedSpellOrigin;        // Objekt, das einen Zielzauber initiiert hat. An dieses werden SpellFailed/SpellSucceeded-Nachrichten weitergeleitet
 
+local pInventory;
 
 /* Initialisierung */
 
 protected func Initialize()
 {
+  // Create Inventoryobject
+  pInventory = CreateObject(INVT, 0, 0, GetOwner());
+  CreateContents(EMPT);
+  CreateContents(SHVL);
   // Clonks mit Magiephysikal aus fehlerhaften Szenarien korrigieren
   if (GetID () == CLNK)
     if (GetPhysical ("Magic", 1))
       SetPhysical ("Magic", 0, 1);
   SetAction("Walk");
   SetDir(Random(2));
-  // Broadcast für Spielregeln
+  // Broadcast f<EFBFBD>r Spielregeln
   GameCallEx("OnClonkCreation", this);
   return 1;
 }
@@ -36,10 +41,10 @@ protected func Swimming2()
     SetAction("Swim");
 }
 
-/* Bei Hinzufügen zu der Crew eines Spielers */
+/* Bei Hinzuf<EFBFBD>gen zu der Crew eines Spielers */
 
 protected func Recruitment(int iPlr) {
-  // Broadcast für Crew
+  // Broadcast f<EFBFBD>r Crew
   GameCallEx("OnClonkRecruitment", this, iPlr);
 }
 
@@ -76,7 +81,7 @@ protected func ControlLeft()
   if (Control2Effect("ControlLeft")) return 1;
   // Steuerung an Pferd weiterleiten
   if (IsRiding()) return GetActionTarget()->~ControlLeft(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -96,7 +101,7 @@ protected func ControlLeftReleased()
 {
   // Steuerung an Pferd weiterleiten
   if (IsRiding()) return GetActionTarget()->~ControlLeftReleased(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -106,7 +111,7 @@ protected func ControlRight()
   if (Control2Effect("ControlRight")) return 1;
   // Steuerung an Pferd weiterleiten
   if (IsRiding())  return GetActionTarget()->~ControlRight(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -114,7 +119,7 @@ protected func ControlRightReleased()
 {
   // Steuerung an Pferd weiterleiten
   if (IsRiding()) return GetActionTarget()->~ControlRightReleased(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -127,7 +132,7 @@ protected func ControlUp()
   // Bei JnR Delfinsprung
   if(GetPlrCoreJumpAndRunControl(GetController()))
     DolphinJump();
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -135,7 +140,7 @@ protected func ControlUpReleased()
 {
   // Steuerung an Pferd weiterleiten
   if (IsRiding()) return GetActionTarget()->~ControlUpReleased(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -148,7 +153,7 @@ protected func ControlUpDouble()
 
 private func DolphinJump()
 {
-  // nur wenn an Meeresoberfläche
+  // nur wenn an Meeresoberfl<EFBFBD>che
   if(!InLiquid()) return 0;
   if(GBackSemiSolid(0,-1)) return 0;
   // Nicht wenn deaktiviert (z.B. Ohnmacht)
@@ -170,7 +175,7 @@ protected func ControlDown()
   if (Control2Effect("ControlDown")) return 1;
   // Steuerung an Pferd weiterleiten
   if (IsRiding())  return GetActionTarget()->~ControlDown(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -178,7 +183,7 @@ protected func ControlDownReleased()
 {
   // Steuerung an Pferd weiterleiten
   if (IsRiding()) return GetActionTarget()->~ControlDownReleased(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -188,7 +193,7 @@ protected func ControlDownSingle()
   if (Control2Effect("ControlDownSingle")) return 1;
   // Steuerung an Pferd weiterleiten
   if (IsRiding())  return GetActionTarget()->~ControlDownSingle(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -198,7 +203,7 @@ protected func ControlDownDouble()
   if (Control2Effect("ControlDownDouble")) return 1;
   // Steuerung an Pferd weiterleiten
   if (IsRiding())  return GetActionTarget()->~ControlDownDouble(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -208,7 +213,7 @@ protected func ControlDig()
   if (Control2Effect("ControlDig")) return 1;
   // Steuerung an Pferd weiterleiten
   if (IsRiding())  return GetActionTarget()->~ControlDig(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -216,7 +221,7 @@ protected func ControlDigReleased()
 {
   // Steuerung an Pferd weiterleiten
   if (IsRiding()) return GetActionTarget()->~ControlDigReleased(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -224,7 +229,7 @@ protected func ControlDigSingle()
 {
   // Steuerung an Pferd weiterleiten
   if (IsRiding())  return GetActionTarget()->~ControlDigSingle(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -234,7 +239,7 @@ protected func ControlDigDouble()
   if (Control2Effect("ControlDigDouble")) return 1;
   // Steuerung an Pferd weiterleiten
   if (IsRiding())  return GetActionTarget()->~ControlDigDouble(this);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -251,7 +256,7 @@ protected func ControlThrow()
       SetAction("RideThrow");
       return 1;
     }
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -259,7 +264,7 @@ protected func ControlUpdate(object self, int comdir, bool dig, bool throw)
 {
   // Steuerung an Pferd weiterleiten
   if(IsRiding()) return GetActionTarget()->~ControlUpdate(self, comdir, dig, throw);
-  // Keine überladene Steuerung
+  // Keine <EFBFBD>berladene Steuerung
   return 0;
 }
 
@@ -283,7 +288,7 @@ protected func ControlCommand(szCommand, pTarget, iTx, iTy, pTarget2, Data)
       return 1;
     }
   }
-  // Kein überladenes Kommando
+  // Kein <EFBFBD>berladenes Kommando
   return 0;
 }
 
@@ -297,7 +302,7 @@ private func RedefinePhysical(szPhys, idTo)
       physCurr    = GetPhysical(szPhys);
   // Neuen Wert berechnen
   var physNew; if (physDefTo) physNew=BoundBy(physDefTo-physDefFrom+physCurr, 0, 100000);
-  // Neuen Wert für den Reset immer temporär setzen, selbst wenn keine Änderung besteht, damit der Reset richtig funktioniert
+  // Neuen Wert f<EFBFBD>r den Reset immer tempor<6F>r setzen, selbst wenn keine <20>nderung besteht, damit der Reset richtig funktioniert
   SetPhysical(szPhys, physNew, PHYS_StackTemporary);
   // Fertig
   return 1;
@@ -328,14 +333,14 @@ protected func FxIntRedefineStart(object trg, int num, int tmp, id idTo)
   RedefinePhysical("Magic", idTo);
   RedefinePhysical("Float", idTo);
   /*if (GetRank()<4) RedefinePhysical("CanScale", idTo);
-  if (GetRank()<6) RedefinePhysical("CanHangle", idTo);*/ // z.Z. können es alle
+  if (GetRank()<6) RedefinePhysical("CanHangle", idTo);*/ // z.Z. k<EFBFBD>nnen es alle
   RedefinePhysical("CanDig", idTo);
   RedefinePhysical("CanConstruct", idTo);
   RedefinePhysical("CanChop", idTo);
   RedefinePhysical("CanSwimDig", idTo);
   RedefinePhysical("CorrosionResist", idTo);
   RedefinePhysical("BreatheWater", idTo);
-  // Damit Aufwertungen zu nicht-Magiern keine Zauberenergie übrig lassen
+  // Damit Aufwertungen zu nicht-Magiern keine Zauberenergie <EFBFBD>brig lassen
   if (GetPhysical("Magic")/1000 < GetMagicEnergy()) DoMagicEnergy(GetPhysical("Magic")/1000-GetMagicEnergy());
   // Echtes Redefine nur bei echten Aufrufen (hat zu viele Nebenwirkungen)
   if (tmp) return FX_OK;
@@ -366,9 +371,9 @@ protected func FxIntRedefineStop(object trg, int num, int iReason, bool tmp)
   ResetPhysical("Walk");
   ResetPhysical("Breath");
   ResetPhysical("Energy");
-  // Keine Rückänderung bei temporären Aufrufen oder beim Tod/Löschen
+  // Keine R<EFBFBD>ck<EFBFBD>nderung bei tempor<6F>ren Aufrufen oder beim Tod/L<>schen
   if (tmp || iReason) return;
-  // Damit Aufwertungen von nicht-Magiern keine Zauberenergie übrig lassen
+  // Damit Aufwertungen von nicht-Magiern keine Zauberenergie <EFBFBD>brig lassen
   if (GetPhysical("Magic")/1000 < GetMagicEnergy()) DoMagicEnergy(GetPhysical("Magic")/1000-GetMagicEnergy());
   // OK; alte Definition wiederherstellen
   Redefine(EffectVar(1, trg, num));
@@ -384,11 +389,11 @@ public func Redefine2(idTo)
 
 public func Redefine(idTo)
 {
-  // Aktivitätsdaten sichern
+  // Aktivit<EFBFBD>tsdaten sichern
   var phs=GetPhase(),act=GetAction();
   // Umwandeln
   ChangeDef(idTo);
-  // Aktivität wiederherstellen
+  // Aktivit<EFBFBD>t wiederherstellen
   var chg=SetAction(act);
   if (!chg) SetAction("Walk");
   if (chg) SetPhase(phs);
@@ -532,10 +537,10 @@ protected func Put()
 
 protected func Death(int iKilledBy)
 {
-  // Info-Broadcasts für sterbende Clonks
+  // Info-Broadcasts f<EFBFBD>r sterbende Clonks
   GameCallEx("OnClonkDeath", this, iKilledBy);
   
-  // Der Broadcast könnte seltsame Dinge gemacht haben: Clonk ist noch tot?
+  // Der Broadcast k<EFBFBD>nnte seltsame Dinge gemacht haben: Clonk ist noch tot?
   if (GetAlive()) return;
   
   // den Beutel fallenlassen
@@ -573,7 +578,7 @@ protected func DeepBreath()
   
 protected func CheckStuck()
 {                   
-  // Verhindert Festhängen am Mittelvertex
+  // Verhindert Festh<EFBFBD>ngen am Mittelvertex
   if(!GetXDir()) if(Abs(GetYDir()) < 5)
     if(GBackSolid(0, 3))
       SetPosition(GetX(), GetY() + 1);
@@ -644,7 +649,7 @@ public func ContextHome(pCaller)
 
 public func ContainedCall(string strFunction, object pTarget)
 {
-  // Erst das betreffende Gebäude betreten, dann die Zielfunktion aufrufen 
+  // Erst das betreffende Geb<EFBFBD>ude betreten, dann die Zielfunktion aufrufen 
   SetCommand(this, "Call", pTarget, this, 0, 0, strFunction);
   AddCommand(this, "Enter", pTarget);
 }
@@ -654,26 +659,26 @@ public func ContainedCall(string strFunction, object pTarget)
 protected func ControlSpecial2()
 {
   [$CtrlMenuDesc$|Image=CXTX]
-  // In einem Gebäude oder Fahrzeug: das Kontextmenü des Gebäudes öffnen
+  // In einem Geb<EFBFBD>ude oder Fahrzeug: das Kontextmen<65> des Geb<65>udes <20>ffnen
   if (Contained())
     if ((Contained()->GetCategory() & C4D_Structure) || (Contained()->GetCategory() & C4D_Vehicle))
     {
       SetCommand(this,"Context",0,0,0,Contained());
       return ExecuteCommand();
     }
-  // Fasst ein Objekt an: Kontextmenü des angefassten Objekts öffnen
+  // Fasst ein Objekt an: Kontextmen<EFBFBD> des angefassten Objekts <20>ffnen
   if (GetAction() == "Push")
   {
     SetCommand(this,"Context",0,0,0,GetActionTarget());
     return ExecuteCommand();
   }
-  // Trägt ein Objekt: Kontextmenü des ersten getragenen Objekts öffnen
+  // Tr<EFBFBD>gt ein Objekt: Kontextmen<65> des ersten getragenen Objekts <20>ffnen
   if (Contents(0))
   {
     SetCommand(this,"Context",0,0,0,Contents(0));
     return ExecuteCommand();
   }
-  // Ansonsten das Kontextmenü des Clonks öffnen
+  // Ansonsten das Kontextmen<EFBFBD> des Clonks <20>ffnen
   SetCommand(this,"Context",0,0,0,this);
   return ExecuteCommand();
 }
@@ -699,7 +704,7 @@ public func ControlCommandAcquire(target, x, y, target2, def)
     AddCommand ("Get", obj, 0, 0, 0, 40);
     return 1;
   }
-  // Gebäude suchen worin man's herstellen kann  
+  // Geb<EFBFBD>ude suchen worin man's herstellen kann  
   if (obj = GetProducerOf (def)) {
     AddCommand ("Call", this, 0, 0, 0, 0, "AutoProduction", 0, 1);
     obj -> ~HowToProduce (this, def);
@@ -755,7 +760,58 @@ public func Drink(object pDrink)
   if (GetActMapVal("Name", "Drink"))
     SetAction("Drink");
   // Vorsicht: erstmal nichts mit pDrink machen,
-  // die Potions löschen sich meist selber...
+  // die Potions l<>schen sich meist selber...
+}
+
+/* New collection behavior */
+public func Collection2(object pObj)
+{
+  if(pObj->GetID() != EMPT)
+    pInventory->AddItem(pObj);
+  // HACK: only to hide the engine inventory
+  pObj->SetClrModulation(RGBa(Random(255),Random(255),Random(255),255));
+  UpdateInventorySelection();
+}
+
+public func Ejection(object pObj)
+{
+  if(pObj->GetID() != EMPT)
+  {
+    pInventory->RemItem(pObj);
+    // Try to get next item
+    var i;
+    do
+    {
+      pInventory->SelectNext();
+      i++;
+    }
+    while(!pInventory->GetSelectedObj() && i<4)
+  }
+  // HACK: only to hide the engine inventory
+  pObj->SetClrModulation(RGB(255,255,255));
+  UpdateInventorySelection();
+}
+
+/* Inventorychange */
+
+protected func CrewSelection(bool fDeselect, bool fCursorOnly)
+{
+  pInventory->Show(GetCursor(GetOwner()) != this);
+}
+
+protected func ControlSpecial()
+{
+  pInventory->SelectNext();
+  UpdateInventorySelection();
+}
+
+private func UpdateInventorySelection()
+{
+  var pObj = pInventory->GetSelectedObj();
+  if(!pObj) pObj = FindContents(EMPT);
+  var iSave;
+  while(ScrollContents() != pObj && iSave < 10) iSave++;
+//  if(iSave == 10) Log("ERROR: Inventory doesn't match");
 }
 
 /* Einsammeln */
@@ -763,7 +819,7 @@ public func Drink(object pDrink)
 public func RejectCollect(id idObject, object pObject)
 {
   // Objekt kann gepackt werden
-  // automatisches Packen aber nur wenn die Paktteile nicht extra gezählt werden
+  // automatisches Packen aber nur wenn die Paktteile nicht extra gez<EFBFBD>hlt werden
   if(!IsSpecialItem(pObject)) if(pObject->~JoinPack(this)) return 1;
     
   // Objektaufnahme mit Limit verhindern, wenn bereits genug getragen
@@ -773,7 +829,7 @@ public func RejectCollect(id idObject, object pObject)
   var i, iCount;
   if(i = IsSpecialItem(pObject))
   {
-    // Noch genug Platz für das ganze Packet?
+    // Noch genug Platz f<EFBFBD>r das ganze Packet?
     if(GetSpecialCount(GetMaxSpecialCount(i-1))+Max(pObject->~PackCount(),1)<=GetMaxSpecialCount(i-1, 1)) return 0;
     iCount = GetMaxSpecialCount(i-1, 1)-GetSpecialCount(GetMaxSpecialCount(i-1));
     // Ansonten so viel wie geht rein
@@ -781,15 +837,15 @@ public func RejectCollect(id idObject, object pObject)
     else return 1;
   }
   
-  return GetNonSpecialCount()>=MaxContentsCount();
+  return !pInventory->FreeSpace(pObject);//GetNonSpecialCount()>=MaxContentsCount();
 }
 
 /* Itemlimit */
-public func MaxContentsCount() { return 1; }
+public func MaxContentsCount() { return 3; }
 
 public func GetMaxSpecialCount(iIndex, fAmount)
 {
-  // Hier könnten Spezialbehandlungen von Itemgruppen definiert werden
+  // Hier k<EFBFBD>nnten Spezialbehandlungen von Itemgruppen definiert werden
   // wie z.B. zu dem Inventar noch 30 Pfeile aufnehmen (siehe auch Ritter)
   //  if(iIndex == 0) { if(fAmount) return(30); return("IsArrow"); }
 }
@@ -799,13 +855,13 @@ private func GetObjectCount(idObj)
   { 
   var idUnpackedObj; 
   if (idUnpackedObj = idObj->~UnpackTo()) 
-    // Auch verschachtelte Pakete mitzählen 
+    // Auch verschachtelte Pakete mitz<EFBFBD>hlen 
     return GetObjectCount(idUnpackedObj) * (idObj->~PackCount()||1);
   // Ansonsten ist es nur ein Objekt 
   return 1; 
   }
 
-/* Spezialgegenstände im Inventar zählen */ 
+/* Spezialgegenst<EFBFBD>nde im Inventar z<>hlen */ 
 private func GetSpecialCount(szTest) 
   { 
   var iCnt, pObj; 
@@ -818,7 +874,7 @@ private func GetSpecialCount(szTest)
     if(pObj->~UnpackTo())
       if(DefinitionCall(pObj->~UnpackTo(), szTest))
         iCnt += GetObjectCount(pObj); 
-  // Wert zurückgeben 
+  // Wert zur<EFBFBD>ckgeben 
   return iCnt; 
   }
   
@@ -844,13 +900,13 @@ private func IsSpecialItem(pObj)
 private func GetNonSpecialCount() 
   { 
   var iCnt, pObj; 
-  // Inventar einzeln auf nicht-Spezial überprüfen 
+  // Inventar einzeln auf nicht-Spezial <EFBFBD>berpr<EFBFBD>fen 
   for(var i = 0; pObj = Contents(i); i++)
-    // Spezialitems nicht zählen
+    // Spezialitems nicht z<EFBFBD>hlen
     if(!IsSpecialItem(pObj))
         iCnt++;
    
-  // Wert zurückgeben 
+  // Wert zur<EFBFBD>ckgeben 
   return iCnt; 
   } 
 
@@ -866,14 +922,14 @@ public func DescendVehicle()
 {
   var pOldVehicle = GetActionTarget();
   SetAction("Walk");
-  // Feststecken nach Absteigen? Dann besser direkt beim Gefährt absteigen.
+  // Feststecken nach Absteigen? Dann besser direkt beim Gef<EFBFBD>hrt absteigen.
   if (Stuck()) if (pOldVehicle)
   {
     var x=GetX(), y=GetY();
     SetPosition(pOldVehicle->GetX(), pOldVehicle->GetY());
     if (Stuck())
     {
-      // Das Gefährt steckt auch? Dann hilft es alles nichts. Zurück zum Ursprungsort.
+      // Das Gef<EFBFBD>hrt steckt auch? Dann hilft es alles nichts. Zur<75>ck zum Ursprungsort.
       SetPosition(x,y);
     }
   }  
@@ -884,7 +940,7 @@ public func DescendVehicle()
 
 private func Control2Effect(string szControl)
   {
-  // Von Effektzahl abwärts zählen
+  // Von Effektzahl abw<EFBFBD>rts z<>hlen
   var i = GetEffectCount(nil, this), iEffect;
   var res;
   while (i--)
@@ -962,14 +1018,14 @@ public func GetComboArrow()
   return 0;
   } 
 
-/* Pfeile im Inventar zählen */ 
+/* Pfeile im Inventar z<EFBFBD>hlen */ 
 private func GetArrowCount() 
   {
    return GetSpecialCount("IsArrow");
   }
 
 
-/* Zauberei - benötigt, wenn der Clonk Zielzauber z.B. aus dem Zauberturm zaubert */
+/* Zauberei - ben<EFBFBD>tigt, wenn der Clonk Zielzauber z.B. aus dem Zauberturm zaubert */
 
 public func SpellFailed(id idSpell, object pByCaller)
 {
@@ -977,12 +1033,12 @@ public func SpellFailed(id idSpell, object pByCaller)
   var pSpellOrigin = pAimedSpellOrigin;
   pAimedSpellOrigin = 0;
   if (pSpellOrigin && pSpellOrigin != this)
-    // Auch bei nicht erfolgreicher Umleitung abbrechen: Das zaubernde Objekt hat im Normalfall die Zutaten/Zauberenergie für den
-    // Zauber bereit gestellt, und diese sollten nicht an den Clonk zurück gegeben werden
+    // Auch bei nicht erfolgreicher Umleitung abbrechen: Das zaubernde Objekt hat im Normalfall die Zutaten/Zauberenergie f<EFBFBD>r den
+    // Zauber bereit gestellt, und diese sollten nicht an den Clonk zur<EFBFBD>ck gegeben werden
     return (pSpellOrigin->~SpellFailed(idSpell, this));
-  // Magieenergie zurückgeben
+  // Magieenergie zur<EFBFBD>ckgeben
   DoMagicEnergy(idSpell->GetDefValue(), true);
-  // Alchemische Zutaten zurückgeben
+  // Alchemische Zutaten zur<EFBFBD>ckgeben
   if(ObjectCount(ALCO)) IncreaseAlchem(idSpell);
 }
 
@@ -994,11 +1050,11 @@ public func SpellSucceeded(id idSpell, object pByCaller)
   if (pSpellOrigin && pSpellOrigin != this)
     // Auch bei nicht erfolgreicher Umleitung abbrechen: Das zaubernde Objekt hat im Normalfall das Magietraining schon erledigt
     return (pSpellOrigin->~SpellSucceeded(idSpell, this));
-  // Globaler Aufruf für Zauber
+  // Globaler Aufruf f<EFBFBD>r Zauber
   OnClonkSucceededSpell(idSpell);
 }
 
-// Der Clonk kann von sich aus nicht zaubern und hat keine Aktivitäten dafür
+// Der Clonk kann von sich aus nicht zaubern und hat keine Aktivit<EFBFBD>ten daf<61>r
 private func SetMagicAction(id idForSpell) {}
 private func SetCastAction() {}
 private func EndMagicAction() {}