marko10_000
/
openclonk
forked from Mirrors/openclonk
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

remove playground scenario 

Sandbox is the new playground.
master
Maikel de Vries 2018-03-11 17:03:57 +01:00
parent 0e535f880e
commit 9fc94509c4
16 changed files with 0 additions and 835 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
planet/Tutorials.ocf/PlayGround.ocs/DescDE.txt
View File

@ -1,3 +0,0 @@
Spielplatz
In dieser Runde kannst du mit allen Objekten im Spiel experimentieren. Einfach nur Spaß haben!

3
planet/Tutorials.ocf/PlayGround.ocs/DescUS.txt
View File

@ -1,3 +0,0 @@
Playground
In this round you can experiment with all objects in the game. Just have fun!

BIN
planet/Tutorials.ocf/PlayGround.ocs/MapBg.bmp
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 13 KiB

BIN
planet/Tutorials.ocf/PlayGround.ocs/MapFg.bmp
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 13 KiB

39
planet/Tutorials.ocf/PlayGround.ocs/ParameterDefs.txt
View File

@ -1,39 +0,0 @@
[ParameterDef]
ID=TutorialCompleted
Achievement=Done
[Options]
[Option]
Description=$MsgTutorialCompleted$
Value=3
[ParameterDef]
ID=TutorialEasterEgg
Achievement=EasterEgg
[Options]
[Option]
Description=$MsgTutorialEasterEgg$
Value=1
[ParameterDef]
Name=$Animals$
Description=$DescAnimals$
ID=Animals
Default=3
[Options]
[Option]
Name=$AnimalsNone$
Value=1
[Option]
Name=$AnimalsFriendly$
Value=2
[Option]
Name=$AnimalsAll$
Value=3

32
planet/Tutorials.ocf/PlayGround.ocs/Scenario.txt
View File

@ -1,32 +0,0 @@
[Head]
Icon=12
Title=Playground
Version=8,0
MaxPlayer=1
Difficulty=11
[Definitions]
Definition1=Objects.ocd
[Player1]
Crew=Clonk=1
[Player2]
Crew=Clonk=1
[Player3]
Crew=Clonk=1
[Player4]
Crew=Clonk=1
[Landscape]
Sky=Clouds1
SkyScrollMode=2
NoScan=1
[Weather]
Climate=0,0,0,100
StartSeason=0,0,0,100
YearSpeed=0,0,0,100
Wind=1,100,-100,100

210
planet/Tutorials.ocf/PlayGround.ocs/Script.c
View File

@ -1,210 +0,0 @@
/**
Playground
Author: Maikel
Reward for completing the tutorials, a small playground where the player can test all ingame objects.
TODO:
* Multiple map options.
* Options for animals, vegetation.
*/
protected func Initialize()
{
// Tutorial goal.
var goal = CreateObject(Goal_Tutorial);
goal.Name = "$MsgGoalName$";
goal.Description = "$MsgGoalDescription$";
// Add an effect to track the easter egg for all players.
AddEffect("EasterEgg", nil, 100, 36);
// Initialize different scenario parts.
InitVegetation(3);
InitAnimals(SCENPAR_Animals);
return;
}
private func InitVegetation(int type)
{
// No vegetation.
if (type <= 1)
return;
var wdt = LandscapeWidth();
var hgt = LandscapeHeight();
// Place surface vegetation.
Tree_Coniferous->Place(10);
Tree_Coniferous2->Place(10);
return;
}
private func InitAnimals(int type)
{
// No animals.
if (type <= 1)
return;
var wdt = LandscapeWidth();
var hgt = LandscapeHeight();
// Sky animals.
if (FindLocation(Loc_Sky()))
{
var amount = BoundBy(wdt * hgt - GetTotalMaterialCount() / 20000, 4, 40);
Butterfly->Place(amount);
Mosquito->Place(amount / 2, 10);
if (type >= 3)
{
Zaphive->Place(amount / 2);
}
}
// Land animals.
if (FindLocation(Loc_Sky(), Loc_Wall(CNAT_Bottom)))
{
var amount = BoundBy(wdt / 200, 4, 40);
if (type >= 3)
{
Chippie_Egg->Place(amount / 2);
}
}
// Underwater animals.
if (FindLocation(Loc_Material("Water")))
{
var amount = BoundBy(GetMaterialCount(Material("Water")) / 1500, 4, 40);
Fish->Place(amount);
if (type >= 3)
{
Piranha->Place(amount / 2);
}
}
return;
}
/*-- Player Handling --*/
protected func InitializePlayer(int plr)
{
// Position player's clonk.
var clonk = GetCrew(plr, 0);
clonk->SetPosition(624, 526);
var effect = AddEffect("ClonkRestore", clonk, 100, 10);
effect.to_x = 624;
effect.to_y = 526;
// Standard player zoom for tutorials, set max zoom roughly up to scenario boundaries.
SetPlayerViewLock(plr, true);
SetPlayerZoomByViewRange(plr, 400, nil, PLRZOOM_Direct);
SetPlayerZoomByViewRange(plr, 1200, nil, PLRZOOM_LimitMax);
// Give the player all construction plans.
var index = 0, def;
while (def = GetDefinition(index++))
SetPlrKnowledge(plr, def);
// Create tutorial guide, add messages, show first.
var guide = CreateObject(TutorialGuide, 0, 0 , plr);
var con_spawnmenu = GetPlayerControlAssignment(plr, CON_SpawnMenu, true, true);
guide->AddGuideMessage(Format("$MsgPlaygroundWelcome$", con_spawnmenu));
guide->ShowGuideMessage();
AddEffect("RemoveGuide", clonk, 100, 36 * 10);
// Achievement: Playground is completed by just playing it.
GainScenarioAchievement("TutorialCompleted", 3);
return;
}
global func FxRemoveGuideTimer(object target, proplist effect, int time)
{
return -1;
}
global func FxRemoveGuideStop(object target, proplist effect, int reason, bool temporary)
{
if (temporary)
return;
var guide = FindObject(Find_ID(TutorialGuide));
if (guide)
{
guide->HideGuide();
guide->RemoveObject();
}
}
/*-- Easter Egg --*/
global func FxEasterEggTimer(object target, proplist effect, int time)
{
// Check whether the landscape has been completely destroyed.
if (GetBlastableMaterialCount() < 1000)
{
GainScenarioAchievement("TutorialEasterEgg");
return FX_Execute_Kill;
}
return FX_OK;
}
global func GetBlastableMaterialCount()
{
var total = 0;
for (var index = 0; index < 256; index++)
{
// Only for solids.
if (GetMaterialVal("Density", "Material", index) < 50)
continue;
if (!GetMaterialVal("BlastFree", "Material", index) || !GetMaterialVal("DigFree", "Material", index))
continue;
var mat_cnt = GetMaterialCount(index);
if (mat_cnt != -1)
total += mat_cnt;
}
return total;
}
global func GetTotalMaterialCount()
{ var total = 0;
for (var index = 0; index < 256; index++)
{
var mat_cnt = GetMaterialCount(index);
if (mat_cnt != -1)
total += mat_cnt;
}
return total;
}
/*-- Clonk Restoring --*/
global func FxClonkRestoreTimer(object target, proplist effect, int time)
{
return 1;
}
// Relaunches the clonk, from death or removal.
global func FxClonkRestoreStop(object target, effect, int reason, bool temporary)
{
if (reason == 3 || reason == 4)
{
var restorer = CreateObject(ObjectRestorer, 0, 0, NO_OWNER);
var x = BoundBy(target->GetX(), 0, LandscapeWidth());
var y = BoundBy(target->GetY(), 0, LandscapeHeight());
restorer->SetPosition(x, y);
var to_x = effect.to_x;
var to_y = effect.to_y;
// Respawn new clonk.
var plr = target->GetOwner();
var clonk = CreateObject(Clonk, 0, 0, plr);
clonk->GrabObjectInfo(target);
SetCursor(plr, clonk);
clonk->DoEnergy(100000);
restorer->SetRestoreObject(clonk, nil, to_x, to_y, 0, "ClonkRestore");
}
return 1;
}

5
planet/Tutorials.ocf/PlayGround.ocs/SpawnMenu.ocd/DefCore.txt
View File

@ -1,5 +0,0 @@
[DefCore]
id=GUI_SpawnMenu
Version=8,0
Category=C4D_StaticBack
HideInCreator=true

438
planet/Tutorials.ocf/PlayGround.ocs/SpawnMenu.ocd/Script.c
View File

@ -1,438 +0,0 @@
/**
SpawnMenu
Let's the player spawn all available objects in OpenClonk.
@author Maikel
*/
/*-- ClonkControl Interface --*/
// Necessary callbacks for the ClonkControl library.
public func IsSpawnMenu() { return true; }
public func Close() { return RemoveObject(); }
public func Show() { this.Visibility = VIS_Owner; return true; }
public func Hide() { this.Visibility = VIS_None; return true; }
// Close the menu when this object is removed.
public func Destruction()
{
CloseSpawnMenu();
}
// Used as a static function called by the ClonkControl library.
public func CreateFor(object cursor)
{
var obj = CreateObject(GUI_SpawnMenu, AbsX(0), AbsY(0), cursor->GetOwner());
obj.Visibility = VIS_Owner;
obj->OpenSpawnMenu(cursor);
cursor->SetMenu(obj);
return obj;
}
/*-- Menu Handling --*/
// Background colors for hovering and bars and description.
static const SPAWNMENU_HoverColor = 0x50ffffff;
static const SPAWNMENU_BarColor = 0x50888888;
static const SPAWNMENU_DescColor = 0xffaa0000;
local menu_target;
local menu_controller;
local menu;
local menu_id;
public func OpenSpawnMenu(object clonk)
{
// If the menu is already open, don't open another instance.
if (clonk->GetMenu() && clonk->GetMenu().ID == menu_id)
return;
// Create a menu target for visibility.
menu_target = CreateObject(Dummy, 0, 0, clonk->GetOwner());
menu_target.Visibility = VIS_Owner;
menu_controller = clonk;
// Construction menu proplist.
menu =
{
Target = menu_target,
Style = GUI_Multiple,
Decoration = GUI_MenuDeco,
Left = "10%",
Right = "90%",
Top = "10%",
Bottom = "90%",
BackgroundColor = {Std = 0},
};
// Upper bar divides categories.
MakeCategoryBar();
// Middle area shows the objects to spawn.
MakeObjectGrid();
// Bottom area show info about the object.
MakeInfoBar();
// Menu ID.
menu_id = GuiOpen(menu);
clonk->SetMenu(this);
MenuShowCategory({Symbol = Shovel, Name = "Items"});
return;
}
// Returns the proplist of the menu category bar.
private func MakeCategoryBar()
{
// Create the basic bar submenu.
var bar =
{
Target = menu_target,
ID = 100,
Top = "0%",
Bottom = "4em",
Style = GUI_GridLayout,
BackgroundColor = {Std = 0}
};
// Create the categories.
var categories = [{Symbol = Shovel, Name = "Items"},
{Symbol = Lorry, Name = "Vehicles"},
{Symbol = ToolsWorkshop, Name = "Structures"},
{Symbol = Fish, Name = "Animals"},
{Symbol = Tree_Coconut, Name = "Vegetation"}
];
for (var i = 0; i < GetLength(categories); ++i)
{
var cat = categories[i];
var cat_id = Format("cat%d", i + 1);
var cat_menu =
{
Target = menu_target,
ID = 101 + i,
Right = "4em",
Bottom = "4em",
Symbol = cat.Symbol,
BackgroundColor = {Std = 0, Hover = SPAWNMENU_HoverColor},
OnMouseIn = GuiAction_SetTag("Hover"),
OnMouseOut = GuiAction_SetTag("Std"),
OnClick = GuiAction_Call(this, "MenuShowCategory", cat)
};
bar[cat_id] = cat_menu;
}
// Add the bar to the menu.
menu.category_bar = bar;
}
private func MakeObjectGrid()
{
// Create a submenu for the grid description.
var grid_desc =
{
Target = menu_target,
ID = 999,
Top = "4em",
Bottom = "5em",
Text = "",
Style = GUI_TextHCenter | GUI_TextVCenter,
BackgroundColor = {Std = SPAWNMENU_BarColor}
};
// Add the grid to the menu.
menu.grid_desc = grid_desc;
// Create the basic grid submenu.
var grid =
{
Target = menu_target,
ID = 1000,
Top = "5em",
Bottom = "100%-5em",
Style = GUI_GridLayout,
BackgroundColor = {Std = 0},
items = []
};
// Add the grid to the menu.
menu.object_grid = grid;
}
private func MakeInfoBar()
{
// Create the basic info bar submenu.
var bar =
{
Target = menu_target,
ID = 10000,
Top = "100%-5em",
BackgroundColor = {Std = 0}
};
bar.header =
{
Target = menu_target,
ID = 10001,
Bottom = "1em",
Text = "",
Style = GUI_TextHCenter | GUI_TextVCenter,
BackgroundColor = {Std = SPAWNMENU_BarColor}
};
bar.icon =
{
Target = menu_target,
ID = 10002,
Left = "0.25em",
Right = "3.75em",
Top = "1.25em",
Bottom = "4.75em",
};
bar.description =
{
Target = menu_target,
ID = 10003,
Left = "4em",
Top = "1em",
Bottom = "5em",
text =
{
ID = 10004,
Target = menu_target,
Text = ""
}
};
// Add the grid to the menu.
menu.info_bar = bar;
}
private func MenuShowCategory(proplist category)
{
// Update the grid description.
menu.grid_desc.Text = Format("$MsgCategory$", category.Name);
GuiUpdate(menu.grid_desc, menu_id, menu.grid_desc.ID, menu_target);
// Determine the id's to show based on the category.
var id_list = GetItemList(category.Name);
// Close all old items.
for (var i = 0; i < GetLength(menu.object_grid.items); ++i)
{
var item = menu.object_grid.items[i];
GuiClose(menu_id, item.ID, menu_target);
var item_id = Format("item%d", i + 1);
menu.object_grid[item_id] = nil;
}
menu.object_grid.Items = [];
// Add new items.
for (var i = 0; i < GetLength(id_list); ++i)
{
var item = id_list[i];
var item_id = Format("item%d", i + 1);
var item_menu =
{
Target = menu_target,
ID = 1001 + i,
Right = "3em",
Bottom = "3em",
Symbol = item,
BackgroundColor = {Std = 0, Hover = SPAWNMENU_HoverColor},
OnMouseIn = [GuiAction_SetTag("Hover"), GuiAction_Call(this, "MenuShowInformation", item)],
OnMouseOut = GuiAction_SetTag("Std"),
OnClick = GuiAction_Call(this, "MenuSpawnObject", item)
};
menu.object_grid[item_id] = item_menu;
menu.object_grid.items[i] = item_menu;
}
// Update the object grid.
GuiUpdate(menu.object_grid, menu_id, menu.object_grid.ID, menu_target);
return;
}
public func MenuShowInformation(id obj_id)
{
// Update the header: use id if Name property can't be found.
var name = "";
if (obj_id)
name = Format("%i", obj_id);
if (obj_id && obj_id.Name)
name = obj_id.Name;
menu.info_bar.header.Text = name;
GuiUpdate(menu.info_bar.header, menu_id, menu.info_bar.header.ID, menu_target);
// Update the icon.
menu.info_bar.icon.Symbol = obj_id;
GuiUpdate(menu.info_bar.icon, menu_id, menu.info_bar.icon.ID, menu_target);
// Update description.
var desc = "";
if (obj_id && obj_id.Description)
desc = Format("$MsgDescription$", SPAWNMENU_DescColor, obj_id.Description);
menu.info_bar.description.text.Text = desc;
GuiUpdate(menu.info_bar.description.text, menu_id, menu.info_bar.description.text.ID, menu_target);
return;
}
public func MenuSpawnObject(id obj_id)
{
return SpawnObject(obj_id);
}
public func CloseSpawnMenu()
{
GuiClose(menu_id, nil, menu_target);
menu_id = nil;
menu_target->RemoveObject();
menu_target = nil;
if (menu_controller)
menu_controller->MenuClosed();
menu_controller = nil;
return;
}
/*-- Object Categories --*/
private func GetItemList(string category)
{
if (category == "Items")
return GetItems();
if (category == "Vehicles")
return GetVehicles();
if (category == "Structures")
return GetStructures();
if (category == "Animals")
return GetAnimals();
if (category == "Vegetation")
return GetVegetation();
return [];
}
private func GetItems()
{
var items = [];
var index = 0;
var def;
while (def = GetDefinition(index++))
{
if (!(def->GetCategory() & C4D_Object))
continue;
if (!def.Collectible && !def->~IsCarryHeavy())
continue;
PushBack(items, def);
}
return items;
}
private func GetVehicles()
{
var vehicles = [];
var index = 0;
var def;
while (def = GetDefinition(index++))
{
if (def->GetCategory() & C4D_Vehicle)
PushBack(vehicles, def);
}
return vehicles;
}
private func GetStructures()
{
var structures = [];
var index = 0;
var def;
while (def = GetDefinition(index++))
{
if (def->GetCategory() & C4D_Structure)
PushBack(structures, def);
}
return structures;
}
private func GetAnimals()
{
var animals = [];
var index = 0;
var def;
while (def = GetDefinition(index++))
{
if (!(def->GetCategory() & C4D_Living))
continue;
PushBack(animals, def);
}
return animals;
}
private func GetVegetation()
{
var vegetation = [];
var index = 0;
var def;
while (def = GetDefinition(index++))
{
if (!def->~IsPlant() || def == Library_Plant)
continue;
PushBack(vegetation, def);
}
return vegetation;
}
/*-- Object Spawning --*/
private func SpawnObject(id obj_id)
{
// Safety: there should be someone controlling this menu.
if (!menu_controller)
return;
// Create object at the feet of the clonk.
var clonk_was_stuck = menu_controller->Stuck();
var obj = menu_controller->CreateObjectAbove(obj_id, 0, 9);
// Clonk tries to collect the item.
if (obj.Collectible || obj->~IsCarryHeavy())
{
// TODO: find out why this does not work if the clonk has no free hands
// but has free slots, it works for the contents menu.
if (menu_controller->Collect(obj, true))
return;
}
else if (obj->GetCategory() & C4D_Vehicle)
{
// Try to unstuck vehicles.
var original_x = obj->GetX();
var original_y = obj->GetY();
// Move up until not stuck anymore.
for (var i = 0; obj->Stuck() && (i < 52); i += 4)
obj->SetPosition(original_x, original_y - i);
// Still stuck? Nothing we can do for you (e.g. in tunnels).
if (obj->Stuck())
{
obj->SetPosition(original_x, original_y);
}
else // Otherwise, gently put it down to the ground again.
{
for (var i = 0; !obj->Stuck() && (i < 5); ++i)
obj->SetPosition(original_x, obj->GetY() + 1);
obj->SetPosition(original_x, obj->GetY() - 1);
}
}
// If whatever spawned made the Clonk stuck, free it.
if (!clonk_was_stuck && menu_controller->Stuck())
{
var original_x = menu_controller->GetX();
var original_y = menu_controller->GetY();
// Move the Clonk up.
for (var i = 0; menu_controller->Stuck() && (i < 40); i += 2)
menu_controller->SetPosition(original_x, original_y - i);
// Still? Reset.
if (menu_controller->Stuck())
menu_controller->SetPosition(original_x, original_y);
}
return;
}
/*-- Proplist --*/
local Name = "$Name$";
local Description = "$Description$";

6
planet/Tutorials.ocf/PlayGround.ocs/SpawnMenu.ocd/StringTblDE.txt
View File

@ -1,6 +0,0 @@
Name=SpawnMenu
Description=Let's the player spawn all available objects in OpenClonk.
MsgCategory=Spawn from category: %s
MsgDescription=<c %x>Beschreibung:</c> %s
MsgUsage=<c %x>Verwendung:</c> %s

6
planet/Tutorials.ocf/PlayGround.ocs/SpawnMenu.ocd/StringTblUS.txt
View File

@ -1,6 +0,0 @@
Name=SpawnMenu
Description=Lets the player spawn all available objects in OpenClonk.
MsgCategory=Spawn from category: %s
MsgDescription=<c %x>Description:</c> %s
MsgUsage=<c %x>Usage:</c> %s

17
planet/Tutorials.ocf/PlayGround.ocs/StringTblDE.txt
View File

@ -1,17 +0,0 @@
# Achievements
MsgTutorialCompleted=Lernrunde Abgeschlossen.
MsgTutorialEasterEgg=Osterei gefunden.
# Goal description
MsgGoalName=Spielplatz
MsgGoalDescription=Nur expirementieren und Spass haben! You can spawn items from a menu opened by pressing [I].
# Tutorial messages
MsgPlaygroundWelcome=Welcome to the playground. You have mastered all tutorials, which gives you access to all items in OpenClonk! Open a menu with [%s] from which you can choose any item to spawn.
# Scenario options
Animals=Tiere
DescAnimals=Wähle ob und welche Tiere in dieser Runde anwesend sind.
AnimalsNone=Keine Tiere
AnimalsFriendly=Freundliche Tiere
AnimalsAll=Alle Tiere

17
planet/Tutorials.ocf/PlayGround.ocs/StringTblUS.txt
View File

@ -1,17 +0,0 @@
# Achievements
MsgTutorialCompleted=Tutorial Completed.
MsgTutorialEasterEgg=Easter egg found.
# Goal description
MsgGoalName=Playground
MsgGoalDescription=Just experiment and have fun! You can spawn items from a menu opened by pressing [I].
# Tutorial messages
MsgPlaygroundWelcome=Welcome to the playground. You have mastered all tutorials, which gives you access to all items in OpenClonk! Open a menu with [%s] from which you can choose any item to spawn.
# Scenario options
Animals=Animals
DescAnimals=Choose whether and what kind of animals you want in this round.
AnimalsNone=No Animals
AnimalsFriendly=Friendly Animals
AnimalsAll=All Animals

22
planet/Tutorials.ocf/PlayGround.ocs/System.ocg/PlayerControls.txt
View File

@ -1,22 +0,0 @@
[ControlDefs]
[ControlDef]
Identifier=SpawnMenu
GUIName=SpawnMenu
GUIDesc=Open/close spawn menu
SendCursorPos=1
[ControlSets]
[ControlSet]
Name=WASD_Hotkeys_IntQueue_MouseCon_
GUIName=Keyboard and Mouse
Keyboard=1
Mouse=1
Gamepad=0
[Assignment]
Key=I
Control=SpawnMenu

35
planet/Tutorials.ocf/PlayGround.ocs/System.ocg/SpawnMenu.c
View File

@ -1,35 +0,0 @@
// Create the menu to spawn objects.
#appendto Library_ClonkControl
public func ObjectControl(int plr, int ctrl, int x, int y, int strength, bool repeat, int status)
{
if (!this)
return false;
// Spawn menu
if (ctrl == CON_SpawnMenu && status == CONS_Down)
{
// Close any menu if open.
if (GetMenu())
{
var is_spawn = GetMenu()->~IsSpawnMenu();
// unclosable menu? bad luck.
if (!TryCancelMenu()) return true;
// If contents menu, don't open new one and return.
if (is_spawn)
return true;
}
// Open contents menu.
CancelUse();
GUI_SpawnMenu->CreateFor(this);
// The interaction menu calls SetMenu(this) in the clonk,
// so after this call menu = the created menu.
if (GetMenu())
GetMenu()->~Show();
return true;
}
// Unhandled control will be handled by the library itself.
return _inherited(plr, ctrl, x, y, strength, repeat, status, ...);
}

2
planet/Tutorials.ocf/PlayGround.ocs/Title.txt
View File

@ -1,2 +0,0 @@
DE:Spielplatz
US:Playground