303 lines
12 KiB
Text
303 lines
12 KiB
Text
#include "Peril_Constants.lsl"
|
|
|
|
// === FloatManager (Consolidated) ===
|
|
// This version enforces a maximum of 10 players.
|
|
|
|
// =============================================================================
|
|
// DYNAMIC CHANNEL CONFIGURATION FOR FLOATERS
|
|
// =============================================================================
|
|
|
|
// Base channel offset must match Main.lsl
|
|
#define CHANNEL_BASE -77000
|
|
|
|
// Calculate channels dynamically to avoid hardcoded conflicts
|
|
integer calculateChannel(integer offset) {
|
|
// Use BOTH owner's key AND object's key to make channels unique per game instance
|
|
// This prevents interference when same owner has multiple game tables
|
|
string ownerStr = (string)llGetOwner();
|
|
string objectStr = (string)llGetKey();
|
|
string combinedStr = ownerStr + objectStr;
|
|
|
|
// Create a more unique hash using both keys
|
|
string hashStr = llMD5String(combinedStr, 0);
|
|
integer hash1 = llSubStringIndex("0123456789abcdef", llGetSubString(hashStr, 0, 0));
|
|
integer hash2 = llSubStringIndex("0123456789abcdef", llGetSubString(hashStr, 1, 1));
|
|
integer combinedHash = hash1 * 16 + hash2; // Creates 0-255 range
|
|
|
|
return CHANNEL_BASE - (offset * 1000) - combinedHash;
|
|
}
|
|
|
|
// Dynamic channel variables
|
|
integer FLOATER_BASE_CHANNEL;
|
|
|
|
// Channel initialization function
|
|
initializeChannels() {
|
|
FLOATER_BASE_CHANNEL = calculateChannel(9); // ~-86000 range base for floaters
|
|
}
|
|
|
|
// Maximum number of players allowed in the game
|
|
#define MAX_PLAYERS 10
|
|
|
|
// Debug control - set to TRUE for verbose pick debugging, FALSE for normal operation
|
|
integer DEBUG_PICKS = FALSE;
|
|
|
|
// Memory reporting function
|
|
reportMemoryUsage(string scriptName) {
|
|
integer used = llGetUsedMemory();
|
|
integer free = llGetFreeMemory();
|
|
integer total = used + free;
|
|
float percentUsed = ((float)used / (float)total) * 100.0;
|
|
|
|
dbg("🧠 [" + scriptName + "] Memory: " +
|
|
(string)used + " used, " +
|
|
(string)free + " free (" +
|
|
llGetSubString((string)percentUsed, 0, 4) + "% used)");
|
|
}
|
|
|
|
// ALL REGISTERED PLAYERS (for channel mapping - order never changes)
|
|
list allPlayerNames = []; // Names in registration order
|
|
|
|
// CURRENT GAME STATE (Synced from Main Controller)
|
|
list names = []; // Current player names in game
|
|
list players = []; // Current player keys in game
|
|
list lives = []; // Current health from sync
|
|
list picksData = []; // Current picks data from sync
|
|
|
|
string perilPlayer = "";
|
|
|
|
// Helper to get picks for a player, handles both comma (human) and semicolon (bot)
|
|
list getPicksFor(string nameInput) {
|
|
integer i;
|
|
for (i = 0; i < llGetListLength(picksData); i++) {
|
|
string entry = llList2String(picksData, i);
|
|
integer pipeIdx = llSubStringIndex(entry, "|");
|
|
if (pipeIdx != -1 && llGetSubString(entry, 0, pipeIdx - 1) == nameInput) {
|
|
string pickString = llGetSubString(entry, pipeIdx + 1, -1);
|
|
if (pickString == "") return [];
|
|
list pickList = llParseString2List(pickString, [",", ";"], []); // Parse both at once
|
|
list filtered = [];
|
|
integer j;
|
|
for (j = 0; j < llGetListLength(pickList); j++) {
|
|
string val = llStringTrim(llList2String(pickList, j), STRING_TRIM);
|
|
if (val != "") filtered += [val];
|
|
}
|
|
return filtered;
|
|
}
|
|
}
|
|
return [];
|
|
}
|
|
|
|
// Main event handler
|
|
default {
|
|
state_entry() {
|
|
reportMemoryUsage("💬 Floater Manager");
|
|
|
|
initializeChannels();
|
|
|
|
// Initialize/reset all state variables
|
|
allPlayerNames = [];
|
|
names = [];
|
|
players = [];
|
|
lives = [];
|
|
picksData = [];
|
|
perilPlayer = "";
|
|
|
|
dbg("💬 [Floater Manager] 📦 Floater Manager ready!");
|
|
}
|
|
|
|
on_rez(integer start_param) {
|
|
reportMemoryUsage("💬 Floater Manager");
|
|
dbg("💬 [Floater Manager] 🔄 Floater Manager rezzed - reinitializing...");
|
|
|
|
initializeChannels();
|
|
|
|
// Reset all state variables on rez
|
|
allPlayerNames = [];
|
|
names = [];
|
|
players = [];
|
|
lives = [];
|
|
picksData = [];
|
|
dbg("💬 [Floater Manager] ✅ Floater Manager reset complete after rez!");
|
|
}
|
|
|
|
link_message(integer sender, integer num, string str, key id) {
|
|
// Handle full reset from main controller
|
|
if (num == MSG_RESET_ALL && str == "FULL_RESET") {
|
|
allPlayerNames = [];
|
|
names = [];
|
|
players = [];
|
|
lives = [];
|
|
picksData = [];
|
|
perilPlayer = "";
|
|
dbg("💬 [Floater Manager] 📦 Floater Manager reset!");
|
|
return;
|
|
}
|
|
|
|
if (num == MSG_REGISTER_PLAYER) {
|
|
if (llGetListLength(allPlayerNames) >= MAX_PLAYERS) {
|
|
dbg("💬 [Floater Manager] ⚠️ Game is full (max " + (string)MAX_PLAYERS + ").");
|
|
return;
|
|
}
|
|
list info = llParseString2List(str, ["|"], []);
|
|
string name = llList2String(info, 0);
|
|
key avKey = llList2Key(info, 1);
|
|
|
|
if (llListFindList(allPlayerNames, [name]) != -1) return;
|
|
|
|
allPlayerNames += [name]; // Permanent map
|
|
llSay(0, "💀 " + name + " has entered the deadly game! 💀");
|
|
llMessageLinked(LINK_SET, MSG_REZ_FLOAT, name, avKey);
|
|
}
|
|
else if (num == MSG_REZ_FLOAT) {
|
|
string name = str;
|
|
integer channelIdx = llListFindList(allPlayerNames, [name]);
|
|
if (channelIdx == -1) return;
|
|
|
|
key avKey = id; // Passed from MSG_REGISTER_PLAYER or MSG_REZ_FLOAT
|
|
|
|
list details = llGetObjectDetails(avKey, [OBJECT_POS]);
|
|
vector basePos = llGetPos();
|
|
if (llGetListLength(details) > 0) basePos = llList2Vector(details, 0);
|
|
|
|
vector pos;
|
|
if (llGetListLength(details) > 0) {
|
|
pos = basePos + <1, 0, 1>; // Avatar relative
|
|
} else {
|
|
// Test players: grid layout
|
|
integer row = channelIdx / 5;
|
|
integer col = channelIdx % 5;
|
|
pos = basePos + <-3.0 - (float)col * 1.5, 2.0 + (float)row * 2.0, 1>;
|
|
}
|
|
|
|
integer ch = FLOATER_BASE_CHANNEL + channelIdx;
|
|
llRezObject("StatFloat", pos, ZERO_VECTOR, ZERO_ROTATION, ch);
|
|
llSleep(0.2);
|
|
llRegionSay(ch, "SET_NAME:" + name);
|
|
llMessageLinked(LINK_SET, MSG_UPDATE_FLOAT, name, avKey);
|
|
}
|
|
else if (num == MSG_UPDATE_FLOAT) {
|
|
string name = str;
|
|
integer channelIdx = llListFindList(allPlayerNames, [name]);
|
|
if (channelIdx == -1) return;
|
|
integer ch = FLOATER_BASE_CHANNEL + channelIdx;
|
|
|
|
integer syncIdx = llListFindList(names, [name]);
|
|
key avKey = id;
|
|
integer lifeCount = 0;
|
|
|
|
if (syncIdx != -1) {
|
|
if (syncIdx < llGetListLength(players)) avKey = llList2Key(players, syncIdx);
|
|
if (syncIdx < llGetListLength(lives)) lifeCount = llList2Integer(lives, syncIdx);
|
|
}
|
|
|
|
list picks = getPicksFor(name);
|
|
string picksDisplay = llList2CSV(picks);
|
|
|
|
// Visual Settings
|
|
float glow = 0.0;
|
|
vector color = <1,1,1>;
|
|
string heartTexture = (string)lifeCount + "_hearts";
|
|
|
|
// Status String Logic
|
|
string perilStatus;
|
|
if (perilPlayer == "" || perilPlayer == "NONE") perilStatus = "🧑 Status: Waiting...";
|
|
else if (name == perilPlayer) perilStatus = "⚡ YOU ARE IN PERIL! ⚡";
|
|
else perilStatus = "🧑 Peril Player: " + perilPlayer;
|
|
|
|
// Winner detection
|
|
integer livingPlayers = 0;
|
|
integer i;
|
|
for (i = 0; i < llGetListLength(lives); i++) {
|
|
if (llList2Integer(lives, i) > 0) livingPlayers++;
|
|
}
|
|
|
|
string txt = "🎲 Peril Dice\n👤 " + name + "\n" + perilStatus + "\n🔢 Picks: " + picksDisplay;
|
|
|
|
if (lifeCount <= 0) {
|
|
glow = 0.3;
|
|
color = <1,0,0>; // Red
|
|
txt = "🎲 Peril Dice\n👤 " + name + "\n🔢 Picks: " + picksDisplay + "\n💀 ELIMINATED! 💀";
|
|
} else if (livingPlayers == 1 && llGetListLength(names) >= 2) {
|
|
glow = 0.3;
|
|
color = <0,1,0>; // Green
|
|
txt = "🎲 Peril Dice\n👤 " + name + "\n✨ ULTIMATE VICTORY! ✨\n🏆 ULTIMATE SURVIVOR 🏆\n🔢 Final Picks: " + picksDisplay;
|
|
} else if (name == perilPlayer) {
|
|
glow = 0.2;
|
|
color = <1,1,0>; // Yellow
|
|
}
|
|
|
|
// Send Universal API command
|
|
llRegionSay(ch, "CMD:" + (string)avKey +
|
|
"|T=" + txt +
|
|
"|G=" + (string)glow +
|
|
"|C=" + (string)color +
|
|
"|H=" + heartTexture);
|
|
}
|
|
else if (num == MSG_CLEANUP_FLOAT) {
|
|
integer ch = (integer)str;
|
|
llRegionSay(ch, "CLEANUP");
|
|
|
|
integer foundIdx = ch - FLOATER_BASE_CHANNEL;
|
|
if (foundIdx >= 0 && foundIdx < llGetListLength(allPlayerNames)) {
|
|
string removedPlayer = llList2String(allPlayerNames, foundIdx);
|
|
integer currentIdx = llListFindList(names, [removedPlayer]);
|
|
if (currentIdx != -1) {
|
|
if (currentIdx < llGetListLength(players)) players = llDeleteSubList(players, currentIdx, currentIdx);
|
|
if (currentIdx < llGetListLength(names)) names = llDeleteSubList(names, currentIdx, currentIdx);
|
|
if (currentIdx < llGetListLength(lives)) lives = llDeleteSubList(lives, currentIdx, currentIdx);
|
|
}
|
|
|
|
integer pickIdx = -1;
|
|
integer p;
|
|
for (p = 0; p < llGetListLength(picksData); p++) {
|
|
if (llSubStringIndex(llList2String(picksData, p), removedPlayer + "|") == 0) {
|
|
pickIdx = p;
|
|
p = llGetListLength(picksData);
|
|
}
|
|
}
|
|
if (pickIdx != -1) picksData = llDeleteSubList(picksData, pickIdx, pickIdx);
|
|
}
|
|
}
|
|
else if (num == MSG_SYNC_GAME_STATE) {
|
|
list parts = llParseString2List(str, ["~"], []);
|
|
if (llGetListLength(parts) < 4) return;
|
|
|
|
lives = llCSV2List(llList2String(parts, 0));
|
|
string picksDataStr = llList2String(parts, 1);
|
|
if (picksDataStr == "" || picksDataStr == "EMPTY") {
|
|
picksData = [];
|
|
} else {
|
|
picksData = llParseString2List(picksDataStr, ["^"], []);
|
|
}
|
|
|
|
string receivedPeril = llList2String(parts, 2);
|
|
if (receivedPeril == "NONE") {
|
|
perilPlayer = "";
|
|
} else {
|
|
perilPlayer = receivedPeril;
|
|
}
|
|
names = llCSV2List(llList2String(parts, 3));
|
|
|
|
if (llGetListLength(allPlayerNames) == 0 && llGetListLength(names) > 0) allPlayerNames = names;
|
|
if (llGetListLength(parts) >= 5) players = llCSV2List(llList2String(parts, 4));
|
|
|
|
integer idx;
|
|
for (idx = 0; idx < llGetListLength(allPlayerNames); idx++) {
|
|
string n = llList2String(allPlayerNames, idx);
|
|
key k = NULL_KEY;
|
|
integer aliveIdx = llListFindList(names, [n]);
|
|
if (aliveIdx != -1 && aliveIdx < llGetListLength(players)) k = llList2Key(players, aliveIdx);
|
|
llMessageLinked(LINK_SET, MSG_UPDATE_FLOAT, n, k);
|
|
}
|
|
}
|
|
else if (num == MSG_CLEANUP_ALL_FLOATERS) {
|
|
integer i;
|
|
for (i = 0; i < llGetListLength(allPlayerNames); i++) {
|
|
llRegionSay(FLOATER_BASE_CHANNEL + i, "CLEANUP");
|
|
}
|
|
players = []; names = []; lives = []; picksData = []; perilPlayer = "";
|
|
}
|
|
else if (num == MSG_DEBUG_PICKS_ON) DEBUG_PICKS = TRUE;
|
|
else if (num == MSG_DEBUG_PICKS_OFF) DEBUG_PICKS = FALSE;
|
|
}
|
|
}
|