summaryrefslogtreecommitdiff
path: root/npc/re/guides/guides_aldebaran.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/re/guides/guides_aldebaran.txt')
-rw-r--r--npc/re/guides/guides_aldebaran.txt87
1 files changed, 37 insertions, 50 deletions
diff --git a/npc/re/guides/guides_aldebaran.txt b/npc/re/guides/guides_aldebaran.txt
index 9593e0b2e..ef47d543d 100644
--- a/npc/re/guides/guides_aldebaran.txt
+++ b/npc/re/guides/guides_aldebaran.txt
@@ -1,25 +1,27 @@
-//===== Hercules Script ======================================
+//===== Hercules Script ======================================
//= Al De Baran Guides
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= Hercules
+//= 1.1
//===== Description: =========================================
//= [Official Conversion]
-//= Guides for the city of Al De baran
+//= Guides for the city of Al De Baran.
//===== Additional Comments: =================================
//= 1.0 First version, Renewal guide.
+//= 1.1 Navigation system update. [Euphy]
+//= Optimized.
//============================================================
-aldebaran,139,63,4 script Guide#01aldebaran::GuideAldearan 105,{
+aldebaran,139,63,4 script Guide#01aldebaran::GuideAldearan 8W_SOLDIER,{
cutin "prt_soldier",2;
mes "[Al De Baran Guide]";
mes "Welcome to ^8B4513Al De Baran^000000,";
mes "the Border City.";
mes "Do you need help navigating the city?";
+ F_Navi("[Al De Baran Guide]");
next;
+ set .@str$,"Would you like to check any other locations?";
while (1) {
switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) {
case 1:
@@ -27,55 +29,43 @@ aldebaran,139,63,4 script Guide#01aldebaran::GuideAldearan 105,{
while (.@loop) {
switch(select("[ Kafra Headquarters ]:[ Alchemist Guild ]:[ Clock Tower ]:[ Inn & Tool Shop ]:[ Repair & Buy Equipment ]:[ Tavern ]:Previous Menu")) {
case 1:
- mes "[Al De Baran Guide]";
- mes "Let me mark the location of the";
- mes "^B9062FKafra Headquarters^000000";
- mes "on your mini-map.";
- mes "Would you like to check any other locations?";
+ callsub L_Mark, F_Navi("Kafra Headquarters","aldebaran,61,229","^B9062F");
+ mes .@str$;
viewpoint 1,61,229,0,0xFF0000;
next;
break;
case 2:
- mes "[Al De Baran Guide]";
- mes "Let me mark the location of the";
- mes "the ^0000FFAlchemist Guild^000000";
- mes "on your mini-map.";
- mes "Would you like to check any other locations?";
+ callsub L_Mark, F_Navi("Alchemist Guild","aldebaran,60,60","^0000FF");
+ mes .@str$;
viewpoint 1,60,60,1,0x0A82FF;
next;
break;
case 3:
- mes "[Al De Baran Guide]";
- mes "Let me mark the location of the";
- mes "the ^FF5400Clock Tower^000000";
- mes "on your mini-map.";
- mes "Would you like to check any other locations?";
+ callsub L_Mark, F_Navi("Clock Tower","aldebaran,139,133","^FF5400");
+ mes .@str$;
viewpoint 1,139,133,2,0xFFB400;
next;
break;
case 4:
mes "[Al De Baran Guide]";
mes "Let me mark the location of the";
- mes "the ^006400Inn^000000 and";
- mes "the ^006400Tool Shop^000000 building";
+ mes F_Navi("Inn & Tool Shop","aldebaran,197,70","^006400")+" building";
mes "on your mini-map.";
- mes "Would you like to check any other locations?";
+ mes .@str$;
viewpoint 1,197,70,3,0xAAFF00;
next;
break;
case 5:
mes "[Al De Baran Guide]";
- mes "If you'd like to ^7F3300Buy or Repair Equipment^000000,";
+ mes "If you'd like to ";
+ mes F_Navi("Buy or Repair Equipment","aldebaran,197,70","^7F3300")+",";
mes "then this is the place you'll want to visit.";
- mes "Would you like to check any other locations?";
+ mes .@str$;
viewpoint 1,72,197,4,0xD2691E;
next;
break;
case 6:
- mes "[Al De Baran Guide]";
- mes "Let me mark the location of the";
- mes "the ^800080Tavern^000000";
- mes "on your mini-map.";
+ callsub L_Mark, F_Navi("Tavern","aldebaran,231,106","^800080");
viewpoint 1,231,106,5,0xDA70D6;
next;
break;
@@ -90,38 +80,29 @@ aldebaran,139,63,4 script Guide#01aldebaran::GuideAldearan 105,{
while (.@loop) {
switch(select("[ Eden Teleport Officer ]:[ Kafra Employee ]:[ Mr. Claus ]:[ Chef Assistant ]:Previous Menu")) {
case 1:
- mes "[Al De Baran Guide]";
- mes "Let me mark the location of the";
- mes "^B9062FEden Teleport Officer^000000";
- mes "on your mini-map.";
- mes "Would you like to check any other locations?";
+ callsub L_Mark, F_Navi("Eden Teleport Officer","aldebaran,133,119","^B9062F");
+ mes .@str$;
viewpoint 1,133,119,6,0xFF0000;
next;
break;
case 2:
- mes "[Al De Baran Guide]";
- mes "Let me mark the location of the";
- mes "^0000FFKafra Employee^000000";
- mes "on your mini-map.";
+ callsub L_Mark, "^0000FFKafra Employee^000000";
viewpoint 1,143,119,7,0x0A82FF;
next;
break;
case 3:
mes "[Al De Baran Guide]";
mes "Mr. Claus can teleport";
- mes "you to ^006400Lutie^000000.";
+ mes "you to "+F_Navi("Lutie","aldebaran,168,168","^006400")+".";
mes "Let me mark his location";
mes "on your mini-map.";
- mes "Would you like to check any other locations?";
+ mes .@str$;
viewpoint 1,168,168,8,0xAAFF00;
next;
break;
case 4:
- mes "[Al De Baran Guide]";
- mes "Let me mark the location of the";
- mes "^7F3300Chef Assistant^000000";
- mes "on your mini-map.";
- mes "Would you like to check any other locations?";
+ callsub L_Mark, F_Navi("Chef Assistant","aldebaran,165,107","^7F3300");
+ mes .@str$;
viewpoint 1,165,107,9,0xD2691E;
next;
break;
@@ -156,8 +137,14 @@ aldebaran,139,63,4 script Guide#01aldebaran::GuideAldearan 105,{
end;
}
}
+ end;
+L_Mark:
+ mes "[Al De Baran Guide]";
+ mes "Let me mark the location of the";
+ mes getarg(0);
+ mes "on your mini-map.";
+ return;
}
-
-aldebaran,243,143,2 duplicate(GuideAldearan) Guide#02aldebaran 105
-aldebaran,135,243,4 duplicate(GuideAldearan) Guide#03aldebaran 105
-aldebaran,36,135,6 duplicate(GuideAldearan) Guide#04aldebaran 105
+aldebaran,243,143,2 duplicate(GuideAldearan) Guide#02aldebaran 8W_SOLDIER
+aldebaran,135,243,4 duplicate(GuideAldearan) Guide#03aldebaran 8W_SOLDIER
+aldebaran,36,135,6 duplicate(GuideAldearan) Guide#04aldebaran 8W_SOLDIER