Jaysyn/LoD_PRC8
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 1 Wiki Activity

Initial Upload

Browse Source 
Initial Upload
This commit is contained in:
Jaysyn904
2023-09-21 21:20:34 -04:00
parent d3f23f8b3c
commit 94990edc60
5734 changed files with 6324648 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

165
_module/nss/dmfi_activate.nss Normal file
View File

@@ -0,0 +1,165 @@
void dmw_CleanUp(object oMySpeaker)
{
int nCount;
int nCache;
DeleteLocalObject(oMySpeaker, "dmfi_univ_target");
DeleteLocalLocation(oMySpeaker, "dmfi_univ_location");
DeleteLocalObject(oMySpeaker, "dmw_item");
DeleteLocalString(oMySpeaker, "dmw_repamt");
DeleteLocalString(oMySpeaker, "dmw_repargs");
nCache = GetLocalInt(oMySpeaker, "dmw_playercache");
for(nCount = 1; nCount <= nCache; nCount++)
{
DeleteLocalObject(oMySpeaker, "dmw_playercache" + IntToString(nCount));
}
DeleteLocalInt(oMySpeaker, "dmw_playercache");
nCache = GetLocalInt(oMySpeaker, "dmw_itemcache");
for(nCount = 1; nCount <= nCache; nCount++)
{
DeleteLocalObject(oMySpeaker, "dmw_itemcache" + IntToString(nCount));
}
DeleteLocalInt(oMySpeaker, "dmw_itemcache");
for(nCount = 1; nCount <= 10; nCount++)
{
DeleteLocalString(oMySpeaker, "dmw_dialog" + IntToString(nCount));
DeleteLocalString(oMySpeaker, "dmw_function" + IntToString(nCount));
DeleteLocalString(oMySpeaker, "dmw_params" + IntToString(nCount));
}
DeleteLocalString(oMySpeaker, "dmw_playerfunc");
DeleteLocalInt(oMySpeaker, "dmw_started");
}
void main()
{
object oItem=GetItemActivated();
object oUser=GetItemActivator();
object oOther=GetItemActivatedTarget();
location lLocation=GetItemActivatedTargetLocation();
string sItemTag=GetTag(oItem);
dmw_CleanUp(oUser);
if (GetStringLeft(sItemTag,8) == "hlslang_")
{
//Destroy any existing Voice attached to the user
if (GetIsObjectValid(GetLocalObject(oUser, "dmfi_MyVoice")))
{
DestroyObject(GetLocalObject(oUser, "dmfi_MyVoice"));
DeleteLocalObject(oUser, "dmfi_MyVoice");
FloatingTextStringOnCreature("You have destroyed your previous Voice", oUser, FALSE);
}
//Set the Voice to interpret language of the appropriate widget
string ssLanguage = GetStringRight(sItemTag, 2);
if (GetStringLeft(ssLanguage, 1) == "_")
ssLanguage = GetStringRight(sItemTag, 1);
SetLocalInt(oUser, "hls_MyLanguage", StringToInt(ssLanguage));
SetLocalString(oUser, "hls_MyLanguageName", GetName(oItem));
DelayCommand(1.0f, FloatingTextStringOnCreature("You are speaking " + GetName(oItem) + ". Type /dm [(what you want to say in brackets)]", oUser, FALSE));
object oArea = GetFirstObjectInArea();
while (GetIsObjectValid(oArea))
{
if (GetObjectType(oArea) == OBJECT_TYPE_CREATURE &&
!GetIsPC(oArea) &&
GetDistanceBetween(oUser, oArea) < 20.0f)
{
return;
}
oArea = GetNextObjectInArea();
}
//Create the Voice
object oVoice = CreateObject(OBJECT_TYPE_CREATURE, "dmfi_voice", GetLocation(oUser));
//Set the Voice to Autofollow the User
AssignCommand(oVoice, ActionForceFollowObject(oUser, 3.0f));
//Set Ownership of the Voice to the User
SetLocalObject(oUser, "dmfi_MyVoice", oVoice);
return;
}
if (GetStringLeft(sItemTag, 5) == "dmfi_")
{
if (sItemTag != "dmfi_emote" &&
(!GetIsDM(oUser) &&
!GetLocalInt(GetModule(), "dmfi_Admin" + GetPCPublicCDKey(oUser))) )
{
FloatingTextStringOnCreature("You cannot use this item." ,oUser, FALSE);
SendMessageToAllDMs(GetName(oUser)+ " is attempting to use a DM item.");
return;
}
if (sItemTag == "dmfi_peace")
{ //This widget sets all creatures in the area to a neutral stance and clears combat.
object oArea = GetFirstObjectInArea(GetArea(oUser));
object oP;
while (GetIsObjectValid(oArea))
{
if (GetObjectType(oArea) == OBJECT_TYPE_CREATURE && !GetIsPC(oArea))
{
AssignCommand(oArea, ClearAllActions(TRUE));
oP = GetFirstPC();
while (GetIsObjectValid(oP))
{
ClearPersonalReputation(oArea, oP);
SetStandardFactionReputation(STANDARD_FACTION_HOSTILE, 50, oP);
SetStandardFactionReputation(STANDARD_FACTION_COMMONER, 91, oP);
SetStandardFactionReputation(STANDARD_FACTION_MERCHANT, 91, oP);
SetStandardFactionReputation(STANDARD_FACTION_DEFENDER, 91, oP);
oP = GetNextPC();
}
AssignCommand(oArea, ClearAllActions(TRUE));
}
oArea = GetNextObjectInArea(GetArea(oUser));
}
}
if (sItemTag == "dmfi_voicewidget")
{
object oVoice;
//Destroy any existing Voice attached to the user
if (GetIsObjectValid(GetLocalObject(oUser, "dmfi_MyVoice")))
{
DestroyObject(GetLocalObject(oUser, "dmfi_MyVoice"));
DeleteLocalObject(oUser, "dmfi_MyVoice");
FloatingTextStringOnCreature("You have destroyed your previous Voice", oUser, FALSE);
}
if (GetIsObjectValid(oOther))
{
SetLocalObject(oUser, "dmfi_VoiceTarget", oOther);
FloatingTextStringOnCreature("You have targeted " + GetName(oOther) + " with the Voice Widget", oUser, FALSE);
return;
}
else
{
//Create the Voice
oVoice = CreateObject(OBJECT_TYPE_CREATURE, "dmfi_voice", lLocation);
SetLocalObject(oUser, "dmfi_VoiceTarget", oVoice);
//Set Ownership of the Voice to the User
SetLocalObject(oUser, "dmfi_MyVoice", oVoice);
DelayCommand(1.0f, FloatingTextStringOnCreature("The Voice is operational", oUser, FALSE));
return;
}
return;
}
if (sItemTag == "dmfi_en_ditto")
{
SetLocalObject(oUser, "dmfi_univ_target", oOther);
SetLocalLocation(oUser, "dmfi_univ_location", lLocation);
SetLocalString(oUser, "dmfi_univ_conv", "encounter");
SetLocalInt(oUser, "dmfi_univ_int", GetLocalInt(oUser, "EncounterType"));
ExecuteScript("dmfi_execute", oUser);
return;
}
if (sItemTag == "dmfi_500xp")
{
SetLocalObject(oUser, "dmfi_univ_target", oOther);
SetLocalLocation(oUser, "dmfi_univ_location", lLocation);
SetLocalString(oUser, "dmfi_univ_conv", "xp");
SetLocalInt(oUser, "dmfi_univ_int", 53);
ExecuteScript("dmfi_execute", oUser);
return;
}
SetLocalObject(oUser, "dmfi_univ_target", oOther);
SetLocalLocation(oUser, "dmfi_univ_location", lLocation);
SetLocalString(oUser, "dmfi_univ_conv", GetStringRight(sItemTag, GetStringLength(sItemTag) - 5));
AssignCommand(oUser, ClearAllActions());
AssignCommand(oUser, ActionStartConversation(OBJECT_SELF, "dmfi_universal", TRUE));
}
}