Arnea instance system seems to be working partly.

I still need to destroy them, and manage the fights.

1 files changed, 80 insertions, 0 deletions

diff --git a/npc/003-13/arnea.txt b/npc/003-13/arnea.txt
new file mode 100644
index 000000000..6ff4375ca
--- /dev/null
+++ b/npc/003-13/arnea.txt
@@ -0,0 +1,80 @@
+// TMW2 Scripts
+// Author:
+//    4144
+//    Jesusalva
+// Description:
+//    Arena for Duels and PVP (temporary map)
+
+003-13,30,27,0	script	Arnea#003-13	NPC_ELF_F,{
+    mes "npc name: " + .name$;
+    mes "npc ext name: " + .extname$;
+    mes "npc id: " + .id;
+    mes "npc parent id: " + .parent;
+    mes "npc src id: " + .srcId;
+    mes "char id 3: " + getcharid(3);
+    mes "instance id: " + instance_id();
+    mes "Map ID: " + instance_mapname("003-13");
+    if (instance_id() >= 0)
+    {
+        mes "npc in instance named: " + instance_npcname(.name$);
+        next;
+        goto L_Manage;
+    }
+    else
+    {
+        mes "npc not in instance";
+    }
+    close;
+
+L_Manage:
+    mesn;
+    switch (select(
+                "warp back",
+                rif(getcharid(3) == $@ARENA_INSTANCES[replacestr(instance_mapname("003-13"), "003-13@a", "")] || getgmlevel(),"delete"),
+                "cancel"))
+    {
+        case 1:
+            warp "003-5", 33, 40;
+            break;
+        case 2:
+            if (instance_id() < 0)
+            {
+                mes "Error: not in an instance";
+                break;
+            }
+            .@ArenaToFree=replacestr(instance_mapname("003-13"), "003-13@a", "");
+            //mes .@ArenaToFree;
+            //next;
+            $@ARENA_INSTANCES[.@ArenaToFree]=-1;
+            warp "003-5", 33, 40;
+            //instance_destroy(instance_id()); // TODO FIXME
+            break;
+        case 3:
+            break;
+    }
+    close;
+OnInit:
+    .@npcId = getnpcid(0, .name$);
+    setunitdata(.@npcId, UDT_HEADTOP, 2907);
+    setunitdata(.@npcId, UDT_HEADMIDDLE, 1305);
+    setunitdata(.@npcId, UDT_HEADBOTTOM, 2204);
+    setunitdata(.@npcId, UDT_WEAPON, 3509);
+    setunitdata(.@npcId, UDT_HAIRSTYLE, 14);
+    setunitdata(.@npcId, UDT_HAIRCOLOR, 18);
+
+    .sex = G_FEMALE;
+    .distance = 9;
+    // test instance id
+    end;
+
+OnInstanceInit:
+    .@npcId = getnpcid(0, instance_npcname(.name$));
+    setunitdata(.@npcId, UDT_HEADTOP, 2907);
+    setunitdata(.@npcId, UDT_HEADMIDDLE, 1305);
+    setunitdata(.@npcId, UDT_HEADBOTTOM, 2204);
+    setunitdata(.@npcId, UDT_WEAPON, 3509);
+    setunitdata(.@npcId, UDT_HAIRSTYLE, 14);
+    setunitdata(.@npcId, UDT_HAIRCOLOR, 18);
+    end;
+
+}