„Itam_Giver_v0.07.02“ hinzufügen
Kxirya
parent
46a9640203
commit
8c8c08f1bb
|
|
@ -0,0 +1,352 @@
|
|||
// Sammelsystem - Giver [v0.07.02]
|
||||
|
||||
// "4CGS-Init" in die Objektbeschreibung eintragen, um ein Objekt zu initialsieren oder die Werte neu zu setzen
|
||||
// 4CGS-Item in die Objektbeschreibung eintragen, damit "Sammlen" angezeigt wird, wenn ein Avatar in die Nähe des Objektes kommt.
|
||||
|
||||
integer m_num_slots = 8; // Anzahl Slots, die der Spieler hat
|
||||
integer m_max_slots = 8; // Anzahl mx. erreichbare Slots
|
||||
integer m_max_count = 99; // Maximale Anzahl gleicher Objekte im Inventar.
|
||||
key klicker = NULL_KEY; // Wer hat geklickt?
|
||||
string m_itemName = "matse"; // Name für den Pfad, unter dem dieses Objekt auf dem Server verwaltet wird.
|
||||
string m_displayName = "Matse (Fladenbrot)"; // Angezeigter Name des Sammelobjektes
|
||||
string m_desc = "Ein Stück Matse (Fladenbrot)"; // Kurzbeschreibung
|
||||
string m_item_weight = "0.5"; // Gewicht des Gegenstandes (für max. Ztaglast benötigt)
|
||||
string m_desc_long = "Fladenbrot, oder bei den Na'vi auch Matse genannt, lässt sich sehr leicht aus einem aus Mehl und Wasser angerührten Teig herstellen. Es ähnelt der irdischen Pizza und wird meist zu Fleischgerichten, Salaten und anderen Mahlzeiten gegessen. Die Ureinwohner nehmen immer etwas daon mit, wenn sie sich einige tage lang nicht in ihrem Lager aufhalten, denn es ist trotz seiner Einfachheit sehr nahrhaft.";
|
||||
string m_eat = "Essen"; // Button-Text für Aktion
|
||||
string m_watch = "Anschauen"; // Button-Text, um die lange Beschreibung zu lesen (Anschauen).
|
||||
string m_use = "Anwenden"; // Button-Text, wenn Item auf jmd. angewendet wird,
|
||||
string m_xp = "5"; // XP, die man fürs Benutzen bekommt.
|
||||
string m_xp_collect = "2"; // XP, die man fürs Sammlen bekommt.
|
||||
string m_hp = "10"; // Wieviel HP werde abgezogen? (Negative Werte addieren HP)
|
||||
string m_food = "10"; // Wieviel Nahrung wird dazu addiert? (Negative Werte ziehen Nahrung ab)
|
||||
string m_water = "0"; // Wieviel Wasser wird dazu addiert? (Negative Werte ziehen Wasser ab)
|
||||
float m_range = 5.0; // Wie weit darf der Avatar vom Giver entfernt sein (1 ... 96m, 0 = Beliebig)
|
||||
integer m_time_fix = 0; // Zeit, wie lange das Objekt unsichtbar ist (in Sekunden). Wenn 0 = Deaktiviert
|
||||
integer m_time_rnd = 0; // Zufällige Zeit, die der Fixzeit hinzuaddiert wird und die zwischen 0 und dem hier angegebenen Wert liegt.
|
||||
integer m_rnd = -1; // Wenn > 1, wird eine zufällige Anzahl von 1 ... m_rnd gesammelt. Wenn Wert negativ, dann diese Anzahl dazu rechnen.
|
||||
integer m_minlevel = 0; // Wenn Sammler einen kleineren Level hat, entscheidet der Zufall, ob er das Itam bekommt.
|
||||
integer m_isunique = FALSE; // Falls TRUE, wird beim "Entsorgen" abgefragt, ob man das möchte.
|
||||
|
||||
// ####################################################################################################################################
|
||||
|
||||
integer m_num = 0; // Anzahl gesammelter Items
|
||||
float m_weight_total = 0; // Gesamtgewicht gesammelter Items
|
||||
string m_toofar = "Du bist zu weit entfernt, um '{0}' zu sammeln.";
|
||||
string m_lang_noslot = "Du hast keinen Inventar Slot mehr frei!";
|
||||
string m_lang_collected = "Du hast {0} x {1} genommen und {2} Erfahrungspunkte (XP) dazu bekommen. Du trägst nun eine Last von {3}kg.";
|
||||
string m_lang_used = "Du hast {0} benutzt und {1} Erfahrungspunkte (XP) dazu bekommen.";
|
||||
string m_lang_wronggroup = "Entweder Du hast nicht die richtige Gruppe aktiviert oder das Objekt '{0}' hat nicht die Landgruppe.";
|
||||
string m_lang_init = "Das Objekt '{0}' [Itemname: '{1}'] wurde initialisiert.";
|
||||
string m_lang_tooheavy = "Das ist zu schwer für Dich. Du kannst nur max. {0}kg tragen, trägst aber bereits {1}kg.";
|
||||
string m_lang_level_too_low = "Um '{0}' zu sammlen, musst Du mindestens Stufe {1} erreichen. Du bekommst aber dennoch {2} Erfahrungspunkte (XP) dazu.";
|
||||
string m_lang_toomuch = "Sorry, aber mehr als {0} {1} kannst Du nicht tragen.";
|
||||
string m_lang_collect_msg = "Sammeln:";
|
||||
string m_lang_inactive = "Das 4CGS Spielsystem ist derzeit inaktiv.";
|
||||
|
||||
default
|
||||
{
|
||||
state_entry()
|
||||
{
|
||||
//llSetObjectDesc("4CGS-Init");
|
||||
llSetAlpha(255, ALL_SIDES);
|
||||
llSetText("", <0,0,0>, 0);
|
||||
list _dataStorage = getDataListFromDataStorage("game.hud");
|
||||
m_max_slots = getDataEntryFromDataList(_dataStorage, "hud.slots");
|
||||
|
||||
if(llGetObjectDesc() == "4CGS-Init" || !osCheckDataValue("item." + m_itemName))
|
||||
{
|
||||
llSetObjectDesc("");
|
||||
llOwnerSay(osFormatString(m_lang_init, [m_displayName, m_itemName]));
|
||||
list _dataStorage = getDataListFromDataStorage("item." + m_itemName);
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "image", llGetInventoryKey(llGetInventoryName(INVENTORY_TEXTURE, 0)));
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "displayname", m_displayName);
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "beschreibung", m_desc);
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "unique", m_isunique);
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "weight", m_item_weight);
|
||||
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions", "eat;watch;futtern");
|
||||
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.eat.displayname", m_eat);
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.eat.consume", "TRUE");
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.eat.setTarget", "FALSE");
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.eat.tasks", "addFood:" + (string)m_food + ";addWater:" + (string)m_water + ";addXP:" + (string)m_xp + ";addHP:" + (string)m_hp);
|
||||
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.watch.displayname", m_watch);
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.watch.consume", "FALSE");
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.watch.setTarget", "FALSE");
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.watch.tasks", "say:" + m_desc_long);
|
||||
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.futtern.displayname", m_use);
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.futtern.consume", "TRUE");
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.futtern.setTarget", "TRUE");
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "actions.futtern.tasks", "addFood:" + (string)m_food + ";addWater:" + (string)m_water + ";addHP:" + (string)m_hp + ";addXP:" + (string)m_xp);
|
||||
|
||||
saveDataListToDataStorage(_dataStorage, "item." + m_itemName);
|
||||
}
|
||||
}
|
||||
|
||||
touch_start(integer i)
|
||||
{
|
||||
klicker = llDetectedKey(0);
|
||||
list _dataStorage = getDataListFromDataStorage("game.hud");
|
||||
if((integer)getDataEntryFromDataList(_dataStorage, "enable") == FALSE)
|
||||
{
|
||||
llRegionSayTo(klicker, 0, m_lang_inactive);
|
||||
return;
|
||||
}
|
||||
list _dataStorage = getDataListFromDataStorage("game.hud.player." + llDetectedKey(0));
|
||||
integer _slot = getNextFreeInventorySlot(_dataStorage, m_itemName);
|
||||
integer _level = llList2Integer(calcLevelData(_dataStorage), 0);
|
||||
|
||||
m_num = 1;
|
||||
if(m_rnd > 1)
|
||||
m_num = (integer)(llFrand(m_rnd) + 1);
|
||||
else if (m_rnd < 0)
|
||||
m_num = -m_rnd;
|
||||
m_weight_total = (float)m_num * (float)m_item_weight;
|
||||
|
||||
if(!llSameGroup(klicker))
|
||||
{
|
||||
llRegionSayTo(klicker, 0, osFormatString(m_lang_wronggroup, [m_displayName]));
|
||||
return;
|
||||
}
|
||||
|
||||
//llOwnerSay("Max: " + (string)getMaxPlayerWeight(_dataStorage) + "\nTrägt: " + (string)calcPlayerWeight(_dataStorage) + " + " + (string)m_weight_total);
|
||||
if(getMaxPlayerWeight(_dataStorage) < calcPlayerWeight(_dataStorage) + m_weight_total)
|
||||
{
|
||||
llRegionSayTo(klicker, 0, osFormatString(m_lang_tooheavy, [llGetSubString((string)getMaxPlayerWeight(_dataStorage), 0, llSubStringIndex((string)getMaxPlayerWeight(_dataStorage), ".") + 2), llGetSubString((string)calcPlayerWeight(_dataStorage), 0, llSubStringIndex((string)calcPlayerWeight(_dataStorage), ".") + 2)]));
|
||||
return;
|
||||
}
|
||||
|
||||
if(_slot == 0)
|
||||
{
|
||||
llRegionSayTo(klicker, 0, m_lang_noslot);
|
||||
return;
|
||||
}
|
||||
|
||||
if(m_range != 0.0)
|
||||
llSensor("", klicker, AGENT_BY_LEGACY_NAME, m_range, PI);
|
||||
else
|
||||
state sammeln;
|
||||
}
|
||||
|
||||
sensor(integer x)
|
||||
{
|
||||
state sammeln;
|
||||
}
|
||||
|
||||
no_sensor()
|
||||
{
|
||||
llInstantMessage(klicker, osFormatString(m_toofar, [m_displayName]));
|
||||
}
|
||||
|
||||
timer()
|
||||
{
|
||||
llSetTimerEvent(0);
|
||||
llResetScript();
|
||||
}
|
||||
|
||||
dataserver(key id, string msg)
|
||||
{
|
||||
if(llSubStringIndex(llKey2Name(id), "4CGS - Main HUD") != -1)
|
||||
{
|
||||
if(msg == "SHOWTEXT")
|
||||
{
|
||||
llSetText(m_lang_collect_msg + "\n" + llGetObjectName(), <1, 0.8, 0>, 1);
|
||||
llSetTimerEvent(5);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
changed(integer change)
|
||||
{
|
||||
if(change & (CHANGED_REGION_RESTART | CHANGED_INVENTORY))
|
||||
llResetScript();
|
||||
}
|
||||
}
|
||||
|
||||
// ###################################################################################################
|
||||
|
||||
state sammeln
|
||||
{
|
||||
state_entry()
|
||||
{
|
||||
list _dataStorage = getDataListFromDataStorage("game.hud.player." + klicker);
|
||||
integer _slot = getNextFreeInventorySlot(_dataStorage, m_itemName);
|
||||
integer _level = llList2Integer(calcLevelData(_dataStorage), 0);
|
||||
integer _xp = (integer)getDataEntryFromDataList(_dataStorage, "stats.xp");
|
||||
|
||||
if(_level >= (integer)m_minlevel)
|
||||
{
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "stats.xp", _xp + (m_num * (integer)m_xp_collect));
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "inventar.slot." + _slot, m_itemName);
|
||||
|
||||
if(getItemCountFromSlot(_dataStorage, _slot) + m_num > m_max_count)
|
||||
{
|
||||
llRegionSayTo(klicker, 0, osFormatString(m_lang_toomuch, [(string)m_max_count, m_displayName]));
|
||||
return;
|
||||
}
|
||||
else
|
||||
{
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "inventar.slot." + _slot + ".count", getItemCountFromSlot(_dataStorage, _slot) + m_num);
|
||||
llRegionSayTo(klicker, 0, osFormatString(m_lang_collected, [(string)m_num, m_displayName, (string)(m_num * (integer)m_xp_collect), llGetSubString((string)calcPlayerWeight(_dataStorage), 0, llSubStringIndex((string)calcPlayerWeight(_dataStorage), ".") + 2)]));
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
_dataStorage = setDataEntryInDataList(_dataStorage, "stats.xp", _xp + (integer)m_xp_collect);
|
||||
llRegionSayTo(klicker, 0, osFormatString(m_lang_level_too_low, [m_displayName, m_minlevel, (string)m_xp_collect]));
|
||||
}
|
||||
|
||||
saveDataListToDataStorage(_dataStorage, ("game.hud.player." + klicker));
|
||||
llSay((integer)getDataEntryFromDataList(_dataStorage, "channel"), "gamecommand;reload");
|
||||
|
||||
if(m_time_fix + m_time_rnd == 0)
|
||||
state default;
|
||||
else
|
||||
{
|
||||
llSetAlpha(0, ALL_SIDES);
|
||||
llSetText("", <0,0,0>, 0);
|
||||
llSetTimerEvent(m_time_fix + (integer)llFrand(m_time_rnd));
|
||||
}
|
||||
}
|
||||
|
||||
timer()
|
||||
{
|
||||
llSetTimerEvent(0);
|
||||
llResetScript();
|
||||
}
|
||||
|
||||
changed(integer change)
|
||||
{
|
||||
if(change & (CHANGED_REGION_RESTART | CHANGED_INVENTORY))
|
||||
llResetScript();
|
||||
}
|
||||
}
|
||||
|
||||
// ###################################################################################################
|
||||
|
||||
integer getNextFreeInventorySlot(list _dataStorage, string _itemName)
|
||||
{
|
||||
integer _freeSlot = 0;
|
||||
integer _currentSlot;
|
||||
for(_currentSlot = 1; _currentSlot <= m_num_slots; ++_currentSlot)
|
||||
{
|
||||
if(getDataEntryFromDataList(_dataStorage, "inventar.slot." + _currentSlot) == _itemName)
|
||||
return _currentSlot;
|
||||
|
||||
if(getDataEntryFromDataList(_dataStorage, "inventar.slot." + _currentSlot) == "")
|
||||
if(_freeSlot == 0)
|
||||
_freeSlot = _currentSlot;
|
||||
}
|
||||
|
||||
return _freeSlot;
|
||||
}
|
||||
|
||||
integer getItemCountFromSlot(list _dataStorage, integer _slot)
|
||||
{
|
||||
return (integer)getDataEntryFromDataList(_dataStorage, "inventar.slot." + _slot + ".count");
|
||||
}
|
||||
|
||||
list getDataListFromDataStorage(string _storage)
|
||||
{
|
||||
return llCSV2List(osGetDataValue(_storage));
|
||||
}
|
||||
|
||||
saveDataListToDataStorage(list _dataList, string _storage)
|
||||
{
|
||||
string _csv = llList2CSV(_dataList);
|
||||
osSetDataValue(_storage, _csv);
|
||||
}
|
||||
|
||||
integer checkDataEntryInDataList(list _dataList, string _key)
|
||||
{
|
||||
integer _inListPosition = llListFindList(_dataList, [_key]);
|
||||
|
||||
if(_inListPosition == -1)
|
||||
return FALSE;
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
string getDataEntryFromDataList(list _dataList, string _key)
|
||||
{
|
||||
integer _inListPosition = llListFindList(_dataList, [_key]);
|
||||
|
||||
if(_inListPosition == -1)
|
||||
return "";
|
||||
|
||||
return llList2String(_dataList, _inListPosition + 1);
|
||||
}
|
||||
|
||||
list setDataEntryInDataList(list _dataList, string _key, string _value)
|
||||
{
|
||||
integer _inListPosition = llListFindList(_dataList, [_key]);
|
||||
|
||||
if(_inListPosition == -1)
|
||||
{
|
||||
_dataList += [_key, _value];
|
||||
return _dataList;
|
||||
}
|
||||
|
||||
return llListReplaceList(_dataList, [_value], _inListPosition + 1, _inListPosition + 1);
|
||||
}
|
||||
|
||||
float calcPlayerWeight(list _userStorage)
|
||||
{
|
||||
integer _currentSlot;
|
||||
float _currentWeight = 0;
|
||||
for(_currentSlot = 1; _currentSlot <= m_num_slots; ++_currentSlot)
|
||||
{
|
||||
if(getDataEntryFromDataList(_userStorage, "inventar.slot." + _currentSlot) != "")
|
||||
{
|
||||
string _itemName = getDataEntryFromDataList(_userStorage, "inventar.slot." + _currentSlot);
|
||||
list _itemData = getDataListFromDataStorage("item." +_itemName);
|
||||
|
||||
integer _itemCount = getItemCountFromSlot(_userStorage, _currentSlot);
|
||||
float _itemWeight = (float)getDataEntryFromDataList(_itemData, "weight");
|
||||
|
||||
_currentWeight = _currentWeight + (_itemCount * _itemWeight);
|
||||
}
|
||||
}
|
||||
return _currentWeight;
|
||||
}
|
||||
|
||||
list calcLevelData(list _dataStorage)
|
||||
{
|
||||
list _dataStore = getDataListFromDataStorage("game.hud");
|
||||
integer _xpLevelStep = (integer)getDataEntryFromDataList(_dataStore, "stats.levels.firstStep");
|
||||
integer _maxlevel = (integer)getDataEntryFromDataList(_dataStore, "stats.levels.maxlevel");
|
||||
|
||||
float _xpLevelStepMultiplier = (float)getDataEntryFromDataList(_dataStore, "stats.levels.multiplier");
|
||||
integer _currentXP = (integer)getDataEntryFromDataList(_dataStorage, "stats.xp");
|
||||
integer _currentLevel = 0;
|
||||
|
||||
integer _xpNeedForNextLevel = _xpLevelStep * _xpLevelStepMultiplier;
|
||||
|
||||
|
||||
while(_currentXP > _xpNeedForNextLevel)
|
||||
{
|
||||
if(_currentLevel <= _maxlevel)
|
||||
{
|
||||
_currentLevel = _currentLevel + 1;
|
||||
_currentXP = _currentXP - _xpNeedForNextLevel;
|
||||
_xpNeedForNextLevel = (_xpNeedForNextLevel * _xpLevelStepMultiplier);
|
||||
}
|
||||
}
|
||||
|
||||
return [_currentLevel, (integer)_currentXP, _xpNeedForNextLevel];
|
||||
}
|
||||
|
||||
float getMaxPlayerWeight(list _dataStorage)
|
||||
{
|
||||
list _dataStore = getDataListFromDataStorage("game.hud");
|
||||
float _maxweight = (integer)getDataEntryFromDataList(_dataStore, "stats.levels.maxweight");
|
||||
float _xpMultiplier = (float)getDataEntryFromDataList(_dataStore, "stats.levels.multiplier");
|
||||
|
||||
list _levelData = calcLevelData(_dataStorage);
|
||||
integer _playerLevel = llList2Integer(_levelData, 0) + 1;
|
||||
|
||||
float _playerMaxWight = _maxweight + ((_playerLevel - 1) * _xpMultiplier);
|
||||
return _playerMaxWight;
|
||||
}
|
||||
Loading…
Reference in New Issue