#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++; } } */ }