openclonk/planet/Objects.ocd/Structures.ocd/Loom.ocd/Script.c

107 lines
2.3 KiB
C

/*-- Loom --*/
#include Library_Structure
#include Library_Ownable
#include Library_Producer
#include Library_LampPost
local animWork;
local meshAttach;
public func LampPosition(id def) { return [GetCalcDir()*11,2]; }
func Initialize()
{
animWork = PlayAnimation("Working", 1, Anim_Const(0));
return _inherited(...);
}
func Construction(object creator)
{
SetAction("Wait");
return _inherited(creator, ...);
}
public func IsHammerBuildable() { return true; }
/*-- Production --*/
public func IsProduct(id product_id)
{
return product_id->~IsLoomProduct();
}
private func ProductionTime(id product) { return _inherited(product, ...) ?? 140; }
public func PowerNeed() { return 40; }
private func FxIntWorkAnimTimer(object target, proplist effect, int timer)
{
if(effect.paused == true) return 1;
var tickAmount = 50;
var animSpot = GetAnimationPosition(animWork);
//-50 is to dodge around an engine crash. If it reaches (near) the end of the
//animation, it dies for some reason. :(
var animLength = GetAnimationLength("Working") - 50;
//loop anim
if(animSpot + tickAmount > animLength){
SetAnimationPosition(animWork, Anim_Const(animSpot + tickAmount - animLength));
}
//otherwise, advance animation
else SetAnimationPosition(animWork, Anim_Const(animSpot + tickAmount));
}
local workEffect;
public func OnProductionStart(id product)
{
workEffect = AddEffect("IntWorkAnim", this, 1,1,this);
return _inherited(product, ...);
}
public func OnProductionHold(id product)
{
workEffect.paused = true;
return _inherited(product, ...);
}
public func OnProductionContinued(id product)
{
workEffect.paused = false;
return _inherited(product, ...);
}
public func OnProductionFinish(id product)
{
RemoveEffect(nil, this, workEffect);
return _inherited(product, ...);
}
func Definition(def){
SetProperty("MeshTransformation", Trans_Rotate(25, 0,1,0), def);
SetProperty("PictureTransformation", Trans_Rotate(65,0,1,0), def);
return _inherited(def, ...);
}
local ActMap = {
Wait = {
Prototype = Action,
Name = "Wait",
Procedure = DFA_NONE,
Directions = 2,
FlipDir = 1,
Length = 1,
Delay = 0,
FacetBase=1,
NextAction = "Wait",
},
};
local Name = "$Name$";
local Description ="$Description$";
local ContainBlast = true;
local BlastIncinerate = 100;
local FireproofContainer = true;
local HitPoints = 70;
local Components = {Wood = 3, Metal = 1, Rock = 1};