summaryrefslogtreecommitdiff
path: root/npc/002-1
diff options
context:
space:
mode:
authorJesusaves <cpntb1@ymail.com>2019-01-14 15:25:31 -0200
committerJesusaves <cpntb1@ymail.com>2019-01-14 15:25:31 -0200
commit6c744697a9506b0277fd60a84b87de62df4ea7e2 (patch)
tree3a7ee2d56a2277ec0a4151b74e32dbe88112f12e /npc/002-1
parent31f7e91e3051699c6845ecdd629bb2cab6fcd664 (diff)
downloadserverdata-6c744697a9506b0277fd60a84b87de62df4ea7e2.tar.gz
serverdata-6c744697a9506b0277fd60a84b87de62df4ea7e2.tar.bz2
serverdata-6c744697a9506b0277fd60a84b87de62df4ea7e2.tar.xz
serverdata-6c744697a9506b0277fd60a84b87de62df4ea7e2.zip
Rewrite Arpan accordingly. Tutorial reward is a Piou Leg. No experience is gained.
You got a whole level on tutorial? Reverted.
Diffstat (limited to 'npc/002-1')
-rw-r--r--npc/002-1/arpan.txt127
1 files changed, 5 insertions, 122 deletions
diff --git a/npc/002-1/arpan.txt b/npc/002-1/arpan.txt
index f62184ba9..bd5d50004 100644
--- a/npc/002-1/arpan.txt
+++ b/npc/002-1/arpan.txt
@@ -6,93 +6,22 @@
// Ablu
// Qwerty Dragon
// Description:
-// Explains to the player how he got here.
-// Modified for TMW2 by Jesusalva.
-// Variable:
-// 0 ShipQuests_Arpan
-// 0 -> Need to talk with Arpan
-// 1 -> Need to take clothes
-// 2 -> Got the clothes
-// 3 -> Equipment Done
-// 1 ShipQuests_Julia
-// Values:
-// 00 Has not talked to Arpan yet.
-// 01 Talked to Arpan and needs to get the clothes.
-// 02 Has the clothes.
-// 03 Has and equipped the clothes.
-// 10 Has not talked to Julia
-// 11 Need to see Julia
-// 12 Has been registered by Julia
-// Translation
-// FR translated
+// Introduction NPC
002-1,49,36,0 script LeftDoorCheck NPC_HIDDEN,0,0,{
.@q = getq(ShipQuests_Arpan);
- if (.@q == 0) doevent "Magic Arpan::OnTalk";
+ if (.@q == 5) doevent "Magic Arpan::OnTalk";
close;
}
002-1,54,36,0 script RightDoorCheck NPC_HIDDEN,0,0,{
.@q = getq(ShipQuests_Arpan);
- if (.@q == 0) doevent "Magic Arpan::OnTalk";
+ if (.@q == 5) doevent "Magic Arpan::OnTalk";
close;
}
-002-1,47,32,0 script LeftBarrierCheck NPC_HIDDEN,0,2,{
- .@q = getq(ShipQuests_Arpan);
- if (.@q > 2) close;
- if (.@q == 2 && getequipid(equip_torso) == 1300 && getequipid(equip_legs) == 2200) goto L_EquipDone;
- if (.@q == 2) goto L_Equip;
- if (.@q == 1) goto L_GetCloth;
-
- doevent "Magic Arpan::OnClothNotTaken";
-
-L_Equip:
- slide 49, 32;
- doevent "Magic Arpan::OnEquip";
-
- close;
-
-L_GetCloth:
- slide 49, 32;
- doevent "Magic Arpan::OnClothNotTaken";
-
- close;
-
-L_EquipDone:
- setq1 ShipQuests_Arpan, 3;
-
- close;
-}
-
-002-1,56,32,0 script RightBarrierCheck NPC_HIDDEN,0,2,{
- .@q = getq(ShipQuests_Arpan);
- if (.@q > 2) close;
- if (.@q == 2 && getequipid(equip_torso) == 1300 && getequipid(equip_legs) == 2200) goto L_EquipDone;
- if (.@q == 2) goto L_Equip;
- if (.@q == 1) goto L_GetCloth;
-
- doevent "Magic Arpan::OnClothNotTaken";
-
-L_Equip:
- slide 55, 32;
- doevent "Magic Arpan::OnEquip";
-
- close;
-
-L_GetCloth:
- slide 55, 32;
- doevent "Magic Arpan::OnClothNotTaken";
-
- close;
-
-L_EquipDone:
- setq1 ShipQuests_Arpan, 3;
-
- close;
-}
002-1,49,33,0 script Magic Arpan NPC_MAGIC_ARPAN,{
showavatar NPC_MAGIC_ARPAN;
@@ -101,14 +30,13 @@ L_EquipDone:
.@s = getq2(ShipQuests_Arpan);
.@n = getq(General_Narrator);
.@q_julia = getq(ShipQuests_Julia);
- if (.@q == 2 && getequipid(equip_torso) == 1300 && getequipid(equip_legs) == 2200) goto L_EquipDone;
OnTalk:
showavatar NPC_MAGIC_ARPAN;
mesn;
- if (.@q > 0) goto L_Menu;
- setq ShipQuests_Arpan, 1, 0;
+ if (.@q > 5) goto L_Menu;
+ setq ShipQuests_Arpan, 6;
deltimer("Magic Arpan::OnSlow");
mesq lg("Yeye, are you finally ready to go?");
@@ -136,41 +64,14 @@ OnTalk:
setq ShipQuests_Julia, 1;
mesq lg("Yaya, you should go see her! She'll be happy to help you again.");
next;
- mesn;
- mesq lg("Also, we took your yayed clothes, as they were... Yeyeye... In a bad shape. Go check the chest near your bed, there are some other ones inside.");
- setcamnpc "Chest";
goto L_Menu;
-OnClothNotTaken:
- showavatar NPC_MAGIC_ARPAN;
- mesn;
- mesq lg("Yeye, you still did not get your new clothes from the chest next to your bed!");
- next;
- mesn;
- mesq lg("It will be a problem if you run around naked!");
-
- close;
-
-OnEquip:
- mesn "Narrator";
- mesc l("To open your inventory, use the F3 key or use your mouse to select it in the above menu in your client.");
- next;
- mesc l("When your inventory is open, you can equip an item by selecting it and clicking 'Equip'. You can do the same to remove an item by clicking on 'Unequip'.");
- next;
- mesc l("Items have different effects. Some will heal you, some can be used as weapons or armor, and some can be sold for gold.");
-
- close;
-
-
L_Menu:
mesq l("What yeye could I do for you today?");
next;
- .@equipped = getequipid(equip_torso) == 1300 && getequipid(equip_legs) == 2200;
menu
- rif(!.@equipped && .@q < 3, lg("What should I do after taking these clothes?")), L_WhatCloth,
- rif(!.@equipped && .@q < 3, l("Thank you, I'll take them and put them on.")), -,
rif(.@q_julia < 2, lg("Where can I find Juliet?")), L_Julia,
rif(!.@n, lg("Could you tell me where I am?")), L_Where,
rif(!.@n, l("Who are you?")), L_Who,
@@ -251,28 +152,10 @@ L_Apana:
next;
goto L_Menu;
-L_WhatCloth:
- mes "";
- mesn;
- mesq lg("Oh yeyeye... As they are not edible, you can maybe try to equip them?");
- next;
-
- mesn "Narrator";
- mesc l("To open your inventory, use the F3 key or use your mouse to select it in the above menu in your client.");
- next;
- mesc l("When your inventory is open, you can equip an item by selecting it and clicking 'Equip'. You can do the same to unequip an item by clicking on 'Unequip'.");
- next;
- mesc l("Items have different effects. Some will heal you, some can be used as weapons or armor, and some can be sold for gold.");
- next;
-
L_BeforeMenu:
mesn;
goto L_Menu;
-L_EquipDone:
- setq1 ShipQuests_Arpan, 3;
- goto L_Menu;
-
OnSlow:
npctalk3 l("@@, do you need help? Are you lost? Click me!", strcharinfo(0));
/*