144 lines
3.0 KiB
Plaintext
144 lines
3.0 KiB
Plaintext
|
#include "qst_include"
|
||
|
|
#include "nwnx_areas"
|
||
|
|
#include "nwnx_haks"
|
||
|
|
#include "rhs_include"
|
||
|
|
|
||
|
|
void main()
|
||
|
|
{
|
||
|
|
object oPC = GetLastUsedBy();
|
||
|
|
int iTest = GetLocalInt(OBJECT_SELF, "TEST");
|
||
|
|
|
||
|
|
//DumpHakList();
|
||
|
|
DumpHiddenHakList();
|
||
|
|
|
||
|
|
|
||
|
|
/*
|
||
|
|
switch(iTest)
|
||
|
|
{
|
||
|
|
// AddFriend
|
||
|
|
case 1:
|
||
|
|
{
|
||
|
|
RHS_AddFriend(oPC, 2);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
// AddFurniture
|
||
|
|
case 2:
|
||
|
|
{
|
||
|
|
RHS_AddFurniture(oPC, OBJECT_SELF);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
// RemoveFriend
|
||
|
|
case 3:
|
||
|
|
{
|
||
|
|
RHS_RemoveFriend(oPC, 2);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
// RemoveFurniture
|
||
|
|
case 4:
|
||
|
|
{
|
||
|
|
RHS_RemoveFurniture(oPC, OBJECT_SELF);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
// RemovePlayerHouse
|
||
|
|
case 5:
|
||
|
|
{
|
||
|
|
RHS_RemovePlayerHouse(oPC);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
// SetHouseName
|
||
|
|
case 6:
|
||
|
|
{
|
||
|
|
RHS_SetHouseName(oPC, "Spanky`s Wild Kingdom");
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
// SetHousePublicity
|
||
|
|
case 7:
|
||
|
|
{
|
||
|
|
RHS_SetHousePublicity(oPC, RHS_HOUSE_PUBLICITY_TYPE_PUBLIC);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
// SetPlayerHouse
|
||
|
|
case 8:
|
||
|
|
{
|
||
|
|
RHS_SetPlayerHouse(oPC, 1);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
*/
|
||
|
|
/*
|
||
|
|
int iTest = GetLocalInt(oPC, "TEST");
|
||
|
|
|
||
|
|
object oOriginalArea = GetArea(oPC);
|
||
|
|
string sOriginalResref = GetResRef(oOriginalArea);
|
||
|
|
object oNewArea = CreateArea(sOriginalResref);
|
||
|
|
|
||
|
|
SetAreaName(oNewArea, GetName(oPC) + "'s New Area!");
|
||
|
|
|
||
|
|
AssignCommand(oPC, ActionJumpToLocation(GetLocation(GetFirstObjectInArea(oNewArea))));
|
||
|
|
*/
|
||
|
|
|
||
|
|
/*
|
||
|
|
if(iTest == 0)
|
||
|
|
{
|
||
|
|
QST_AcceptQuest(oPC, 1);
|
||
|
|
QST_AcceptQuest(oPC, 2);
|
||
|
|
QST_AcceptQuest(oPC, 3);
|
||
|
|
QST_AcceptQuest(oPC, 4);
|
||
|
|
QST_AcceptQuest(oPC, 5);
|
||
|
|
QST_AcceptQuest(oPC, 6);
|
||
|
|
SetLocalInt(oPC, "TEST", 1);
|
||
|
|
}
|
||
|
|
else if(iTest == 1)
|
||
|
|
{
|
||
|
|
QST_CompleteQuest(oPC, 1);
|
||
|
|
QST_CompleteQuest(oPC, 2);
|
||
|
|
QST_CompleteQuest(oPC, 3);
|
||
|
|
QST_CompleteQuest(oPC, 4);
|
||
|
|
QST_CompleteQuest(oPC, 5);
|
||
|
|
QST_CompleteQuest(oPC, 6);
|
||
|
|
SetLocalInt(oPC, "TEST", 2);
|
||
|
|
}
|
||
|
|
|
||
|
|
*/
|
||
|
|
|
||
|
|
/*
|
||
|
|
KEYITEM_AddKeyItem(oPC, 1);
|
||
|
|
KEYITEM_AddKeyItem(oPC, 2);
|
||
|
|
KEYITEM_AddKeyItem(oPC, 3);
|
||
|
|
|
||
|
|
KEYITEM_RemoveKeyItem(oPC, 1);
|
||
|
|
KEYITEM_AddKeyItem(oPC, 1, FALSE);
|
||
|
|
*/
|
||
|
|
|
||
|
|
//GiveGoldToCreature(oPC, 50000);
|
||
|
|
|
||
|
|
/*
|
||
|
|
GetIsSkillSuccessful(oPC, SKILL_SEARCH, 0);
|
||
|
|
GetIsSkillSuccessful(oPC, SKILL_SEARCH, 5);
|
||
|
|
*/
|
||
|
|
|
||
|
|
/*
|
||
|
|
int iRow;
|
||
|
|
int iDBRow = 1;
|
||
|
|
for(iRow = 1; iRow <= 4230; iRow++)
|
||
|
|
{
|
||
|
|
string sResref = Get2DAString("portraits", "BaseResRef", iRow);
|
||
|
|
|
||
|
|
if(sResref != "****" && sResref != "")
|
||
|
|
{
|
||
|
|
string sSQL = "INSERT INTO portrait_lookup (ID, Resref, 2DAID) VALUES (" + IntToString(iDBRow) + ", '" + sResref + "', '" + IntToString(iRow) + "')";
|
||
|
|
SQLExecDirect(sSQL);
|
||
|
|
|
||
|
|
iDBRow++;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
*/
|
||
|
|
}
|