func FxReleaseClonkFadeOutTimer (object pTarget, int iEffectNumber, int iEffectTime) {
// Ausfaden
if (!GetClrModulation (pTarget)) SetClrModulation(RGB(255, 255, 255), pTarget);
SetClrModulation(DoRGBaValue(GetClrModulation(pTarget), Min(15, 255-GetRGBValue(GetClrModulation(pTarget),0)), 0), pTarget);
// Wenn Overlay extra moduliert wird, auch extra ausfaden
if (GetObjectBlitMode (pTarget) & 4) SetColorDw(DoRGBaValue(GetColorDw(pTarget), Min(15, 255-GetRGBValue(GetColorDw(pTarget),0)), 0), pTarget);
if(GetRGBValue(GetColorDw(pTarget), 0) == 255 || GetRGBValue(GetClrModulation(pTarget), 0) == 255)
return (-1);
}
global func SetObjAlpha(int byAlpha,object pObj) {
var dwClrMod=GetClrModulation(pObj);
if (dwClrMod == 0) dwClrMod = RGBa(255,255,255,0);
dwClrMod = SetRGBaValue(dwClrMod,byAlpha,0);
return SetClrModulation(dwClrMod, pObj);
}
func SetIcon(number)
{
markerindex = number;
SetGraphics(Format("%d", number), Icon_Number, 1, GFXOV_MODE_Base);
SetObjDrawTransform(350, 0, 2000, 0, 350, 2000, 1);
SetClrModulation(RGBa(255, 255, 255, 160) , 1);
}
func ChargeStop(proplist params)
{
SetAction("Idle");
var angle = params.new_angle;
SetVelocity(angle, Speed-10, 10);
Sound("sawblade_launch", false, 100);
AddEffect("CheckEnemies", this, 1,1, this);
SetLightRange(30, 70);
SetLightColor(RGB(150, 150, 150));
AddEffect("Life", this, 20, LifeTime, this);
/*if(GetXDir() > 0)
SetRDir(15);
else
SetRDir(-15);*/
SetClrModulation(RGBa(255,255,255,255));
Sound("sawloop", false, 20, nil, 1);
AddEffect("Rotate", this, 1, 1, this);
}
global func BlackWhite()
{
var pO;
for(pO in FindObjects(Find_NoContainer()))
{
SetClrModulation(HSL(0,0,0),pO);
}
func FxPointingTimer(object target, int index, int time) {
if(time > PT0D_Duration) {
RemoveObject(target);
return -1;
}
var clonk = GetCursor(EffectVar(0, target, index));
var obj = EffectVar(1, target, index);
var msg = EffectVar(2, target, index);
// Zeiger hat kein Ziel mehr? Löschen.
if(!obj) {
RemoveObject(target);
return -1;
}
var ang = Angle(GetX(clonk), GetY(clonk), GetX(obj), GetY(obj)) - 90;
var dst = Min(PT0D_Distance, Distance(GetX(clonk), GetY(clonk), GetX(obj), GetY(obj)) / 2);
SetR(ang + 90, target);
SetPosition(GetX(clonk) + Cos(ang, dst), GetY(clonk) + Sin(ang, dst), target);
var r, g, b, a;
SplitRGBaValue(GetClrModulation(target), r, g, b, a);
a = EvalEase(alphaEase, Min(254, time));
SetClrModulation(RGBa(r, g, b, a), target);
Message("<c %x>%s</c>", target, RGBa(r, g, b, 255 - a), msg);
return true;
}
global func FxRenaniteTimer(object pTarget)
{
if(GetEffect("Genuced",pTarget))
{
RemoveEffect("Genuced",pTarget);
SetClrModulation(0,pTarget);
}
return(1);
}
func Launch(object clonk, int x, int y)
{
var params = {
angle = Angle(0,0,x,y),
cl = clonk
};
clonk->Charge(this, "ChargeStop", Charge_dur, params);
SetAction("Travel");
SetClrModulation(RGBa(255,255,255,0));
}
// Sets the object's transparency.
global func SetObjAlpha(int by_alpha)
{
var clr_mod = GetClrModulation();
if (!clr_mod)
clr_mod = by_alpha << 24;
else
clr_mod = clr_mod & 16777215 | by_alpha << 24;
return SetClrModulation(clr_mod);
}
func FxFadeAwayTimer(target, effect, time)
{
if(time*2 > 250)
{
RemoveObject();
return -1;
}
SetClrModulation(RGBa(255, 255, 255, 255 - time*2));
SetObjDrawTransform(1000 - time * 3, 0, -(time * 2) * 700, 0, 1000 - time * 3);
}
protected func Initialize()
{
SetClrModulation(Color());
// In den Hintergrund versetzen
SetCategory(C4D_StaticBack());
// Bei Fertigstellung an anderen Teilen ausrichten
CastlePartAdjust();
// Objekte im Umkreis ihre Überprüfungen durchführen lassen
CastlePartInitialize();
// Fertig
return(1);
}
func FxFadeAwayTimer(target, effect, time)
{
var t2 = Max(0, time - 200);
if(t2*2 > 250)
{
RemoveObject();
return -1;
}
var x_pos = (t2 * 4) * 700;
if(time < 100)
x_pos = ((100 - time) * 1000);
SetObjDrawTransform(1000 - t2, 0, x_pos, 0, 1000 - t2);
SetObjDrawTransform(1000 - t2, 0, x_pos, 0, 1000 - t2, 0, 1);
if(t2 == 0) return 1;
SetClrModulation(RGBa(255, 255, 255, 255 - t2*2));
SetClrModulation(RGBa(255, 255, 255, 255 - t2*2), 1);
return 1;
}
func Initialize()
{
this.Plane=301+Random(230);
SetPosition(GetX(),GetY()+10);
var graphic = Random(3);
if(graphic)
SetGraphics(Format("%d",graphic));
size = 1;
buriedtime = 0;
waterpos = [0,0];
SetObjDrawTransform(10,0,0,0,10);
maxsize=150+Random(30);
SetR(Random(360));
SetClrModulation(RGBa(235+Random(20),235+Random(20),235+Random(20),255-Random(30)));
AddEffect("MossGrow", this, 100, 20, this, this.ID);
}
global func FxNaniteTimer(object pTarget)
{
if(GetEffect("Genuced",pTarget))
{
RemoveEffect("Genuced",pTarget);
SetClrModulation(0,pTarget);
}
if(GetAction(pTarget) eq "Lie")
{
RemoveEffect("Nanite",pTarget);
RemoveEffect("Renanite",pTarget);
ResetPhysical(pTarget);
return(-1);
}
pTarget -> DoEnergy(1);
SetPhysical("Energy", 300000, PHYS_StackTemporary, pTarget);
return(1);
}
/* Langsam verschwinden */
func FadeMeOut() {
SetClrModulation(RGBa(255,255,255,alpha++));
if(alpha==255) return(RemoveObject());
return(1);
}
global func DoDmg(int iDmg, int iType, object pTarget, int iPrecision, int dmgplayer, id idKillIcon, int iKillAttachment)
{
//Existenz bestätigen
if(!pTarget)
if(!(pTarget = this))
return;
if(!iPrecision)
iPrecision = 10;
var dmg, dmgdealer = dmgplayer-1;
if(dmgdealer < 0)
dmgdealer = GetController(pTarget);
var red = pTarget->~OnDmg(iDmg, iType);
dmg = iDmg*(100-red)*iPrecision;
if(!dmg || red == 100) return;
//Killer setzen
if(this && pTarget->GetOCF() & OCF_CrewMember || dmgplayer)
SetKiller(dmgdealer, pTarget);
if(GetOCF(pTarget) & OCF_CrewMember)
{
if(!idKillIcon && this)//Kein Killicon?
{
idKillIcon = this->~GetKillIcon();
if(!idKillIcon)
idKillIcon = GetID(this);
if(idKillIcon->~IsClonk())
idKillIcon = 0;
}
if(!idKillIcon)
{
if(iType)
{
if(iType == DMG_Fire)
idKillIcon = GSAM;
else if(iType == DMG_Explosion)
idKillIcon = BOOM;
else if(iType == DMG_Energy)
idKillIcon = ENAM;
else if(iType == DMG_Bio)
idKillIcon = GLOB;
else if(iType == DMG_Projectile)
idKillIcon = STAM;
}
else
idKillIcon = KAMB;
}
pTarget->~KillIcon(idKillIcon);
pTarget->~KillAttachment(iKillAttachment, true);
}
//Schaden machen
var pFrom;
if(pTarget != this)
pFrom = this;
if(!pFrom) pFrom = GetCrew(dmgdealer);
//Wird gerade eingeblendet: Entfernen
if(GetEffect("FadeIn4K", this))
{
EffectVar(0, this, GetEffect("FadeIn4K", this)) = 0;
SetClrModulation(RGBa(255, 255, 255, 0), this);
}
pTarget->~LastDamageType(iType);
pTarget->~OnHit(dmg/1000, iType, pFrom);
if(GetCategory(pTarget) & C4D_Living)
return DoEnergy(-dmg, pTarget, true, 0, dmgplayer);
return DoDamage(dmg/1000, pTarget, 0, dmgplayer);
}
func Initialize()
{
SetAction("Travel");
SetClrModulation(RGBa(0,0,0,0));
}
func InitializeObjects()
{
var Grass001 = CreateObjectAbove(Grass, 396, 1149);
Grass001->SetClrModulation(0xffa08060);
var Grass002 = CreateObjectAbove(Grass, 232, 1181);
Grass002->SetClrModulation(0xffa08060);
var Grass003 = CreateObjectAbove(Grass, 228, 1180);
Grass003->SetClrModulation(0xffa08060);
var Tree_Coniferous_Burned001 = CreateObject(Tree_Coniferous_Burned, 17, 1097);
Tree_Coniferous_Burned001->SetR(10);
var Tree_Coniferous001 = CreateObject(Tree_Coniferous, 415, 1117);
Tree_Coniferous001->SetR(10);
Tree_Coniferous001->SetClrModulation(0xffc08060);
var Branch001 = CreateObject(Branch, 241, 1176);
Branch001->SetR(17);
var Fern001 = CreateObjectAbove(Fern, 312, 1432);
Fern001->SetClrModulation(0xffa08060);
var LargeCaveMushroom001 = CreateObjectAbove(LargeCaveMushroom, 1355, 1451);
LargeCaveMushroom001->SetClrModulation(0xffcddfdf);
var LargeCaveMushroom002 = CreateObject(LargeCaveMushroom, 1308, 1384);
LargeCaveMushroom002->SetR(180);
LargeCaveMushroom002->SetClrModulation(0xffdae7dc);
var LargeCaveMushroom003 = CreateObjectAbove(LargeCaveMushroom, 1411, 1447);
LargeCaveMushroom003->SetClrModulation(0xffe9d5dd);
var LargeCaveMushroom004 = CreateObject(LargeCaveMushroom, 1420, 1374);
LargeCaveMushroom004->SetR(160);
LargeCaveMushroom004->SetClrModulation(0xffeaedfb);
var Branch002 = CreateObject(Branch, 1430, 1417);
Branch002->SetR(-25);
var Lichen001 = CreateObjectAbove(Lichen, 1387, 1440);
Lichen001->SetAction("Grown");
var Lichen002 = CreateObjectAbove(Lichen, 1310, 1456);
Lichen002->SetAction("Grown");
var Lichen003 = CreateObjectAbove(Lichen, 1466, 1415);
Lichen003->SetAction("Grown");
var Trunk001 = CreateObject(Trunk, 217, 1159);
Trunk001->SetR(-10);
var EnvPack_Bag001 = CreateObjectAbove(EnvPack_Bag, 846, 885);
EnvPack_Bag001->SetClrModulation(0xffa0a0a0);
CreateObjectAbove(EnvPack_Bag, 840, 888);
CreateObjectAbove(EnvPack_Bag, 844, 888);
CreateObjectAbove(EnvPack_BridgeRustic, 1096, 673);
CreateObjectAbove(EnvPack_Candle, 1054, 672);
CreateObjectAbove(EnvPack_Candle, 1054, 575);
CreateObjectAbove(EnvPack_Candle, 1185, 616);
CreateObjectAbove(EnvPack_Candle, 1531, 448);
CreateObjectAbove(EnvPack_Candle, 1362, 432);
CreateObjectAbove(EnvPack_CandleSmall, 1556, 432);
CreateObjectAbove(EnvPack_Crate, 1017, 576);
CreateObjectAbove(EnvPack_FenceRustic, 1111, 728);
CreateObjectAbove(EnvPack_FenceRustic, 1089, 735);
CreateObjectAbove(EnvPack_Guidepost, 315, 1167);
CreateObjectAbove(EnvPack_Lantern, 894, 488);
CreateObjectAbove(EnvPack_Lantern, 1291, 472);
CreateObjectAbove(EnvPack_Painting, 1235, 537);
CreateObjectAbove(EnvPack_Rail, 1121, 672);
CreateObjectAbove(EnvPack_Scarecrow, 204, 1185);
CreateObject(EnvPack_TreeTrunks, 788, 888);
CreateObjectAbove(EnvPack_WineBarrel, 1438, 552);
CreateObjectAbove(EnvPack_WineBarrel, 1455, 553);
CreateObjectAbove(EnvPack_Candle, 1471, 552);
g_king = CreateObjectAbove(Clonk, 1568, 431);
g_king->SetDir(DIR_Right);
g_king->SetCon(200);
g_king->SetClrModulation(0xffff8000);
g_king->SetObjectBlitMode(GFX_BLIT_Additive);
g_king->SetName("Hörx");
g_king.MaxEnergy = 200000;
g_king->DoEnergy(150);
g_king.StaticSaveVar = "g_king";
AI->AddAI(g_king);
AI->SetGuardRange(g_king, 1185, 342, 415, 136);
AI->SetEncounterCB(g_king, "EncounterKing");
var Goal_Assassination001 = CreateObject(Goal_Assassination);
Goal_Assassination001->SetVictim(g_king);
CreateObject(Rule_TeamAccount);
CreateObject(Rule_NoPowerNeed);
var LargeCaveMushroom005 = CreateObjectAbove(LargeCaveMushroom, 1334, 1459);
LargeCaveMushroom005->SetClrModulation(0xffd0dbdf);
var LargeCaveMushroom006 = CreateObjectAbove(LargeCaveMushroom, 1396, 1451);
LargeCaveMushroom006->SetClrModulation(0xffe7e6f0);
var LargeCaveMushroom007 = CreateObjectAbove(LargeCaveMushroom, 1426, 1437);
LargeCaveMushroom007->SetClrModulation(0xffcfcbe5);
var Fern002 = CreateObject(Fern, 276, 1442);
Fern002->SetCon(22);
g_ruin1 = CreateObject(Ruin_WoodenCabin, 97, 1150);
g_ruin1->SetR(16);
g_ruin1.StaticSaveVar = "g_ruin1";
g_ruin2 = CreateObjectAbove(Ruin_Windmill, 353, 1145);
g_ruin2.StaticSaveVar = "g_ruin2";
g_ruin3 = CreateObjectAbove(Ruin_ChemicalLab, 267, 1180);
g_ruin3.StaticSaveVar = "g_ruin3";
CreateObjectAbove(Foundry, 238, 1287);
var Chest002 = CreateObjectAbove(Chest, 1475, 1415);
var Chest006 = CreateObjectAbove(Chest, 1574, 583);
var Chest005 = CreateObjectAbove(Chest, 823, 887);
var Chest001 = CreateObjectAbove(Chest, 856, 887);
var Chest003 = CreateObjectAbove(Chest, 1032, 575);
var Chest004 = CreateObjectAbove(Chest, 136, 103);
var StoneDoor001 = CreateObject(StoneDoor, 940, 652);
StoneDoor001->SetComDir(COMD_Down);
var StoneDoor002 = CreateObject(StoneDoor, 1348, 508);
StoneDoor002->SetComDir(COMD_Down);
StoneDoor002->DoDamage(170);
var StoneDoor003 = CreateObject(StoneDoor, 1347, 412);
StoneDoor003->SetComDir(COMD_Down);
StoneDoor003->DoDamage(170);
var SpinWheel001 = CreateObjectAbove(SpinWheel, 961, 672);
SpinWheel001->SetSwitchTarget(StoneDoor001);
var SpinWheel002 = CreateObjectAbove(SpinWheel, 1367, 527);
SpinWheel002->SetSwitchTarget(StoneDoor002);
var SpinWheel003 = CreateObjectAbove(SpinWheel, 1384, 471);
SpinWheel003->SetSwitchTarget(StoneDoor003);
CreateObject(Column, 1197, 551);
CreateObject(Column, 1218, 463);
CreateObjectAbove(Idol, 1080, 575);
var SteamEngine001 = CreateObjectAbove(SteamEngine, 1529, 585);
var Flagpole001 = CreateObjectAbove(Flagpole, 135, 1182);
Flagpole001->SetNeutral(true);
g_elev2 = CreateObjectAbove(Elevator, 1366, 614);
g_elev2.StaticSaveVar = "g_elev2";
g_elev2->CreateShaft(477);
g_elev2->SetCasePosition(1079);
g_elev1 = CreateObjectAbove(Elevator, 167, 1184);
g_elev1.StaticSaveVar = "g_elev1";
g_elev1->SetClrModulation(0xffa08060);
g_elev1->CreateShaft(95);
g_elev1->SetCasePosition(1267);
var Catapult001 = CreateObjectAbove(Catapult, 697, 887);
Catapult001->SetRDir(-7);
var Lorry001 = CreateObject(Lorry, 149, 1314);
Lorry001->SetR(24);
var Lorry002 = CreateObject(Lorry, 1425, 1244);
Lorry002->SetR(-36);
CreateObjectAbove(Airship_Burnt, 38, 1152);
var Cannon001 = CreateObject(Cannon, 788, 669);
Cannon001->SetR(30);
g_cannon = CreateObjectAbove(Cannon, 994, 471);
g_cannon.StaticSaveVar = "g_cannon";
CreateObjectAbove(Cannon, 1336, 336);
var Clonk001 = CreateObjectAbove(Clonk, 673, 887);
Clonk001->SetName("Horst");
AI->AddAI(Clonk001);
AI->SetHome(Clonk001, 670, 878, DIR_Left);
AI->SetGuardRange(Clonk001, 400, 800, 500, 150);
AI->SetAllyAlertRange(Clonk001, 60);
AI->SetEncounterCB(Clonk001, "EncounterOutpost");
Clonk001->SetDir(DIR_Left);
var Clonk002 = CreateObjectAbove(Clonk, 710, 886);
Clonk002->SetName("Hanniball");
AI->AddAI(Clonk002);
AI->SetHome(Clonk002, 709, 877, DIR_Left);
AI->SetGuardRange(Clonk002, 634, 809, 233, 104);
AI->SetAllyAlertRange(Clonk002, 60);
Clonk002->SetDir(DIR_Left);
var Clonk003 = CreateObjectAbove(Clonk, 781, 670);
Clonk003->SetDir(DIR_Right);
Clonk003->SetName("Twonky");
AI->AddAI(Clonk003);
AI->SetHome(Clonk003, 781, 663, DIR_Right);
AI->SetGuardRange(Clonk003, 481, 511, 600, 300);
var Clonk004 = CreateObjectAbove(Clonk, 1010, 670);
Clonk004->SetDir(DIR_Right);
Clonk004->SetName("Sven");
AI->AddAI(Clonk004);
AI->SetHome(Clonk004, 1010, 663, DIR_Right);
AI->SetGuardRange(Clonk004, 773, 619, 501, 78);
var Clonk005 = CreateObjectAbove(Clonk, 984, 671);
Clonk005->SetDir(DIR_Right);
Clonk005->SetName("Luki");
AI->AddAI(Clonk005);
AI->SetHome(Clonk005, 985, 663, DIR_Right);
AI->SetGuardRange(Clonk005, 773, 621, 596, 146);
var Clonk006 = CreateObjectAbove(Clonk, 1372, 1244);
Clonk006->SetColor(0xffff0000);
Clonk006->SetName("Anna");
Clonk006->SetSkin(1);
AI->AddAI(Clonk006);
AI->SetHome(Clonk006, 1370, 1237, DIR_Left);
AI->SetGuardRange(Clonk006, 1150, 1140, 320, 150);
AI->SetAllyAlertRange(Clonk006, 170);
Clonk006->SetDir(DIR_Left);
var Clonk007 = CreateObjectAbove(Clonk, 1448, 1246);
Clonk007->SetColor(0xffff0000);
Clonk007->SetName("Cindy");
Clonk007->SetSkin(1);
AI->AddAI(Clonk007);
AI->SetGuardRange(Clonk007, 1150, 1140, 320, 150);
AI->SetAllyAlertRange(Clonk007, 170);
AI->SetEncounterCB(Clonk007, "EncounterCave");
Clonk007->SetDir(DIR_Left);
g_farmer = CreateObjectAbove(Clonk, 307, 1167);
g_farmer->SetColor(0xff0000);
g_farmer->SetClrModulation(0xffffa020);
g_farmer->SetName("Farmer");
g_farmer.StaticSaveVar = "g_farmer";
g_farmer->SetDir(DIR_Left);
var Clonk008 = CreateObjectAbove(Clonk, 1197, 550);
Clonk008->SetDir(DIR_Right);
Clonk008->SetName("Sabrina");
Clonk008->SetSkin(1);
AI->AddAI(Clonk008);
AI->SetHome(Clonk008, 1196, 542, DIR_Right);
AI->SetGuardRange(Clonk008, 955, 472, 415, 299);
var Clonk009 = CreateObjectAbove(Clonk, 1265, 551);
Clonk009->SetName("Laura");
Clonk009->SetSkin(1);
AI->AddAI(Clonk009);
AI->SetHome(Clonk009, 1266, 541, DIR_Left);
AI->SetGuardRange(Clonk009, 966, 391, 383, 283);
Clonk009->SetDir(DIR_Left);
var Clonk010 = CreateObjectAbove(Clonk, 1286, 470);
Clonk010->SetDir(DIR_Right);
AI->AddAI(Clonk010);
AI->SetHome(Clonk010, 1287, 464, DIR_Right);
AI->SetGuardRange(Clonk010, 987, 312, 367, 313);
var Clonk011 = CreateObjectAbove(Clonk, 1092, 574);
Clonk011->SetDir(DIR_Right);
Clonk011->SetName("Wolfgang");
AI->AddAI(Clonk011);
AI->SetHome(Clonk011, 1092, 567, DIR_Right);
AI->SetGuardRange(Clonk011, 792, 416, 600, 300);
var Clonk012 = CreateObjectAbove(Clonk, 1069, 574);
Clonk012->SetDir(DIR_Right);
Clonk012->SetName("Hans");
AI->AddAI(Clonk012);
AI->SetHome(Clonk012, 1069, 566, DIR_Right);
AI->SetGuardRange(Clonk012, 769, 416, 600, 300);
var Clonk013 = CreateObjectAbove(Clonk, 1018, 470);
Clonk013->SetDir(DIR_Right);
Clonk013->SetName("Joki");
AI->AddAI(Clonk013);
AI->SetHome(Clonk013, 1019, 462, DIR_Right);
AI->SetGuardRange(Clonk013, 848, 293, 498, 319);
var Clonk014 = CreateObjectAbove(Clonk, 285, 1182);
Clonk014->Kill(Clonk014, true);
Clonk014->SetDir(DIR_Right);
Clonk014->SetColor(0xffff0000);
var Clonk015 = CreateObjectAbove(Clonk, 208, 1183);
Clonk015->Kill(Clonk015, true);
Clonk015->SetDir(DIR_Right);
Clonk015->SetColor(0xffff0000);
g_cannoneer = CreateObjectAbove(Clonk, 1000, 471);
g_cannoneer.StaticSaveVar = "g_cannoneer";
g_cannoneer->SetDir(DIR_Left);
g_cannoneer->SetName("Brutus");
g_cannoneer->SetAlternativeSkin("Guard");
var Clonk016 = CreateObjectAbove(Clonk, 1317, 334);
Clonk016->SetName("Archibald");
AI->AddAI(Clonk016);
AI->SetGuardRange(Clonk016, 978, 231, 391, 244);
Clonk016->SetDir(DIR_Left);
CreateObject(Rock, 879, 1002);
CreateObjectAbove(Rock, 262, 1182);
CreateObjectAbove(Rock, 140, 1183);
CreateObjectAbove(Rock, 48, 1151);
CreateObject(Rock, 154, 1205);
CreateObject(Rock, 154, 1205);
CreateObjectAbove(Rock, 241, 1287);
CreateObject(Rock, 338, 1256);
CreateObject(Rock, 661, 1392);
CreateObjectAbove(Rock, 813, 887);
CreateObject(Rock, 893, 1290);
CreateObject(Rock, 1248, 1087);
CreateObject(Rock, 1334, 1011);
CreateObject(Rock, 1268, 932);
CreateObject(Rock, 1298, 795);
CreateObject(Rock, 1501, 932);
CreateObject(Rock, 1473, 675);
CreateObject(Rock, 1367, 654);
CreateObject(Rock, 1505, 1162);
CreateObject(Rock, 1482, 1049);
CreateObject(Rock, 1402, 1447);
CreateObject(Rock, 1025, 1392);
CreateObject(Rock, 742, 1521);
CreateObject(Rock, 712, 1350);
CreateObject(Rock, 1047, 1206);
Clonk006->CreateContents(Rock, 3);
CreateObject(Coal, 59, 1345);
CreateObject(Coal, 156, 1369);
CreateObject(Coal, 243, 1554);
CreateObject(Coal, 61, 1494);
CreateObject(Coal, 140, 1379);
SteamEngine001->CreateContents(Coal, 3);
CreateObject(Ore, 227, 1365);
CreateObjectAbove(Ore, 64, 1421);
CreateObject(Ore, 264, 1453);
CreateObject(Ore, 462, 1478);
CreateObject(Ore, 77, 1485);
CreateObject(Ore, 1481, 1448);
CreateObject(Ore, 1438, 1463);
CreateObject(Ore, 1566, 1561);
CreateObject(Nugget, 1079, 1216);
CreateObject(Nugget, 1244, 1138);
CreateObject(Nugget, 1156, 1163);
CreateObject(Nugget, 1127, 1165);
CreateObjectAbove(Wood, 19, 1135);
CreateObjectAbove(Wood, 749, 1056);
CreateObjectAbove(Wood, 168, 1512);
Lorry001->CreateContents(Wood, 30);
Chest001->CreateContents(Wood, 5);
CreateObjectAbove(Wood, 346, 1456);
CreateObjectAbove(Wood, 336, 1456);
Lorry002->CreateContents(Wood, 5);
Chest002->CreateContents(Wood, 7);
Chest003->CreateContents(Wood, 5);
CreateObjectAbove(Wood, 167, 1512);
CreateObjectAbove(Wood, 177, 1512);
CreateObjectAbove(Wood, 511, 1497);
Lorry001->CreateContents(Loam);
CreateObjectAbove(Loam, 199, 1287);
CreateObjectAbove(Loam, 283, 1431);
CreateObjectAbove(Loam, 372, 1391);
CreateObjectAbove(Loam, 415, 1431);
CreateObjectAbove(Loam, 484, 1487);
CreateObjectAbove(Loam, 511, 1502);
CreateObject(Loam, 37, 1271);
CreateObjectAbove(Loam, 200, 1583);
CreateObjectAbove(Loam, 356, 1559);
CreateObject(Loam, 314, 1228);
CreateObject(Loam, 921, 1284);
CreateObject(Loam, 1042, 1389);
CreateObject(Loam, 1180, 1575);
CreateObjectAbove(Loam, 1481, 1415);
CreateObjectAbove(Loam, 1527, 1406);
CreateObject(Loam, 958, 980);
CreateObject(Loam, 1267, 893);
CreateObject(Loam, 892, 825);
CreateObjectAbove(Loam, 1393, 1103);
CreateObject(Loam, 1462, 1076);
CreateObjectAbove(Loam, 1501, 1415);
Chest001->CreateContents(Loam, 3);
Chest004->CreateContents(Loam, 5);
var GoldBar001 = CreateObject(GoldBar, 1293, 1235);
GoldBar001->SetR(22);
Lorry002->CreateContents(GoldBar, 2);
CreateObjectAbove(Airship, 931, 495);
Clonk001->CreateContents(Sword);
Clonk007->CreateContents(Sword);
Clonk004->CreateContents(Sword);
Clonk005->CreateContents(Sword);
Clonk012->CreateContents(Sword);
Clonk010->CreateContents(Sword);
g_king->CreateContents(Sword);
Clonk002->CreateContents(Sword);
Clonk001->CreateContents(Arrow, 2);
Chest005->CreateContents(Arrow);
Clonk013->CreateContents(Arrow, 2);
var Arrow006 = Clonk003->CreateContents(Arrow);
Arrow006->SetInfiniteStackCount();
Clonk001->CreateContents(Bow);
Chest005->CreateContents(Bow);
Clonk003->CreateContents(Bow);
Clonk013->CreateContents(Bow);
g_king->CreateContents(Bow);
CreateObjectAbove(Boompack, 135, 1324);
CreateObjectAbove(Boompack, 1498, 1414);
CreateObjectAbove(Boompack, 1483, 1414);
CreateObjectAbove(Boompack, 1491, 1415);
var Boompack001 = Chest002->CreateContents(Boompack);
Boompack001->AddRestoreMode(Chest002, 1473, 1403);
var Boompack002 = Chest002->CreateContents(Boompack);
Boompack002->AddRestoreMode(Chest002, 1473, 1403);
Lorry001->CreateContents(DynamiteBox);
Lorry002->CreateContents(DynamiteBox);
Chest002->CreateContents(DynamiteBox, 2);
Chest004->CreateContents(DynamiteBox);
CreateObjectAbove(Dynamite, 1334, 1224);
Lorry002->CreateContents(Pickaxe);
Clonk006->CreateContents(Pickaxe);
Clonk007->CreateContents(Pickaxe);
Lorry001->CreateContents(Shovel);
var Barrel001 = CreateObject(Barrel, 167, 1327);
Barrel001->SetR(-13);
Barrel001->SetColor(0xff000000);
var Barrel002 = Chest002->CreateContents(Barrel);
Barrel002->SetColor(0xff000000);
CreateObjectAbove(Seaweed, 169, 1543);
CreateObjectAbove(Seaweed, 815, 1342);
CreateObjectAbove(Seaweed, 719, 1078);
CreateObjectAbove(Seaweed, 772, 1087);
CreateObjectAbove(Seaweed, 1258, 1279);
var Seaweed001 = CreateObject(Seaweed, 592, 1425);
Seaweed001->SetCon(1);
var Seaweed002 = CreateObject(Seaweed, 652, 1304);
Seaweed002->SetCon(1);
var Seaweed003 = CreateObject(Seaweed, 182, 1575);
Seaweed003->SetCon(1);
var Seaweed004 = CreateObjectAbove(Seaweed, 353, 1558);
Seaweed004->SetCon(1);
var Seaweed005 = CreateObject(Seaweed, 435, 1239);
Seaweed005->SetCon(1);
var Seaweed006 = CreateObject(Seaweed, 461, 1252);
Seaweed006->SetCon(1);
var Seaweed007 = CreateObject(Seaweed, 490, 1303);
Seaweed007->SetCon(1);
var Seaweed008 = CreateObject(Seaweed, 515, 1365);
Seaweed008->SetCon(1);
CreateObjectAbove(Mushroom, 126, 1320);
CreateObjectAbove(Mushroom, 212, 1288);
CreateObjectAbove(Mushroom, 367, 1392);
CreateObjectAbove(Mushroom, 268, 1432);
CreateObject(Mushroom, 247, 1303);
CreateObject(Mushroom, 384, 1419);
var Mushroom001 = CreateObject(Mushroom, 184, 1314);
Mushroom001->SetCon(98);
var Mushroom002 = CreateObject(Mushroom, 195, 1314);
Mushroom002->SetCon(95);
var Mushroom003 = CreateObject(Mushroom, 215, 1315);
Mushroom003->SetCon(92);
var Mushroom004 = CreateObject(Mushroom, 205, 1296);
Mushroom004->SetCon(46);
var Mushroom005 = CreateObject(Mushroom, 409, 1436);
Mushroom005->SetCon(33);
var Mushroom006 = CreateObject(Mushroom, 396, 1410);
Mushroom006->SetCon(13);
Chest006->CreateContents(Blunderbuss);
Chest006->CreateContents(LeadBullet, 3);
Clonk009->CreateContents(Javelin, 3);
Clonk008->CreateContents(Javelin, 3);
Clonk012->CreateContents(Shield);
Clonk010->CreateContents(Shield);
g_king->CreateContents(Shield);
Clonk016->CreateContents(Shield);
Chest006->CreateContents(Shield);
Chest003->CreateContents(Bread, 3);
Chest004->CreateContents(Bread, 3);
Chest006->CreateContents(Bread, 2);
CreateObjectAbove(EnvPack_ManaAltar, 1052, 471);
Chest002->CreateContents(Ropeladder, 2);
g_king->CreateContents(BombArrow);
Chest002->CreateContents(WallKit, 2);
Chest002->CreateContents(Bucket, 2);
Clonk016->CreateContents(GrenadeLauncher);
Clonk016->CreateContents(IronBomb, 20);
Catapult001->CreateContents(Firestone, 5);
CreateObject(Firestone, 38, 1189);
CreateObject(Firestone, 101, 1214);
CreateObject(Firestone, 369, 1281);
CreateObject(Firestone, 22, 1253);
CreateObject(Firestone, 376, 1216);
CreateObject(Firestone, 139, 1346);
CreateObject(Firestone, 280, 1463);
CreateObject(Firestone, 451, 1438);
CreateObject(Firestone, 678, 1364);
CreateObject(Firestone, 838, 1100);
CreateObject(Firestone, 880, 1089);
CreateObject(Firestone, 1022, 1225);
CreateObject(Firestone, 1338, 1261);
CreateObject(Firestone, 1144, 1407);
CreateObject(Firestone, 1051, 1365);
CreateObject(Firestone, 1328, 1486);
CreateObject(Firestone, 1467, 1460);
CreateObject(Firestone, 911, 980);
CreateObject(Firestone, 1118, 765);
CreateObject(Firestone, 948, 787);
CreateObject(Firestone, 781, 910);
CreateObject(Firestone, 1356, 805);
CreateObject(Firestone, 1287, 851);
Clonk006->CreateContents(Firestone, 2);
Clonk007->CreateContents(Firestone);
Chest001->CreateContents(Firestone, 3);
Clonk011->CreateContents(Firestone, 4);
Chest003->CreateContents(Firestone, 3);
g_king->CreateContents(Firestone, 3);
CreateObject(Rule_Gravestones);
return true;
}
func Incineration()
{
SetClrModulation (RGB(48, 32, 32));
}
func Incineration()
{
SetClrModulation (RGB(96,64,64));
}
func Initialize()
{
SetClrModulation(RGBa(255,255,255,170));
return(1);
}
protected func Initialize()
{
_inherited();
SetClrModulation(HSL2RGB(RGB(RandomX(0,255),RandomX(100,200),150)));
}