diff options
Diffstat (limited to 'npc')
36 files changed, 595 insertions, 595 deletions
diff --git a/npc/000-0/sailors.txt b/npc/000-0/sailors.txt index c95c69ec..d5715023 100644 --- a/npc/000-0/sailors.txt +++ b/npc/000-0/sailors.txt @@ -59,7 +59,7 @@ OnTouch: menuimage("flags/vls", "'k hoar ui wel... (Vlaams)"), -, menuimage("flags/pl", "Słyszę cię... (Polski)"), -, menuimage("flags/it", "Vi sento... (Italiano)"), -, - menuimage("flags/nl_BE", "Ik kan je horen... (Nederlands)"), -; + menuimage("flags/nL_BE", "Ik kan je horen... (Nederlands)"), -; set @lang, @menu-1; if (@lang < 0 || @lang > 9) close; setlang @lang; diff --git a/npc/000-1/ale.txt b/npc/000-1/ale.txt index 2a2189b3..20948cfe 100644 --- a/npc/000-1/ale.txt +++ b/npc/000-1/ale.txt @@ -7,10 +7,10 @@ 000-1.gat,55,23,0,1 script Ale 105;2,{ set @g, getq(ShipQuests_Gugli); - if (@g == 0) goto l_NoTask; + if (@g == 0) goto L_NoTask; set @q, getq(ShipQuests_Ale); - if (@q == 1) goto l_CallFunc; + if (@q == 1) goto L_CallFunc; mesn; mesq l("Ouch..."); @@ -20,8 +20,8 @@ menu lg("Gugli sent me down here to help you."), -, - l("What's that?"), l_Plushroom, - l("See you aboard."), l_Quit; + l("What's that?"), L_Plushroom, + l("See you aboard."), L_Quit; mes ""; mesn; @@ -41,13 +41,13 @@ close; -l_CallFunc: +L_CallFunc: callfunc "SailorFood"; menu - rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), l_TaskDone, + rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), L_TaskDone, rif(getq(ShipQuests_Ale) == 1 && (getq(ShipQuests_Astapolos) == 0 || getq(ShipQuests_Gulukan) == 0 || getq(ShipQuests_Jalad) == 0 || getq(ShipQuests_QMuller) == 0 || getq(ShipQuests_Tibbo) == 0), l("I'm still busy, I need to find the other sailors.")), -, - l("What's that?"), l_Plushroom; + l("What's that?"), L_Plushroom; mes ""; mesn; @@ -55,21 +55,21 @@ l_CallFunc: next; menu - rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), l_Bottom, - rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Bottom, - rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), l_Jalad, - rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), l_Bottom, - rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom, - l("Nobody."), l_Quit; - -l_Bottom: + rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), L_Bottom, + rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), L_Bottom, + rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), L_Jalad, + rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), L_Bottom, + rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), L_Bottom, + l("Nobody."), L_Quit; + +L_Bottom: mes ""; mesn; mesq l("I've seen him on the bottom of the island, ask Jalad for more information."); close; -l_Jalad: +L_Jalad: setcamnpc "Jalad"; next; @@ -81,7 +81,7 @@ l_Jalad: close; -l_Plushroom: +L_Plushroom: mes ""; mesn; mesq l("'That', as you call it, is a @@. There're plenty on this island!", getitemlink("Plushroom")); @@ -92,21 +92,21 @@ l_Plushroom: close; -l_NoTask: +L_NoTask: mes ""; mesn; mesq l("Ouch... These boxes are so heavy!"); close; -l_TaskDone: +L_TaskDone: mes ""; mesn; mesq l("That's good to hear!"); close; -l_Quit: +L_Quit: closedialog; close; } diff --git a/npc/000-1/astapolos.txt b/npc/000-1/astapolos.txt index 7492a7e6..808f7c98 100644 --- a/npc/000-1/astapolos.txt +++ b/npc/000-1/astapolos.txt @@ -8,10 +8,10 @@ 000-1.gat,22,50,0,1 script Astapolos 107;2,{ set @g, getq(ShipQuests_Gugli); - if (@g == 0) goto l_NoTask; + if (@g == 0) goto L_NoTask; set @q, getq(ShipQuests_Astapolos); - if (@q == 1) goto l_CallFunc; + if (@q == 1) goto L_CallFunc; mesn; mesq l("So finally someone has came to visit me?"); @@ -29,7 +29,7 @@ menu lg("I'm sorry for your situation. They should change with another sailor from times to times."), -, - l("Well if you are whining like that all the time, then I think there is a reason behind their choice."), l_Whyning; + l("Well if you are whining like that all the time, then I think there is a reason behind their choice."), L_Whyning; mes ""; mesn; @@ -37,7 +37,7 @@ next; menu - l("You... You eat... rattos? I think you're just a fool."), l_Whyning, + l("You... You eat... rattos? I think you're just a fool."), L_Whyning, l("Oh... eating rattos. Sounds... ehm... Delicious, yes."), -; mes ""; @@ -68,14 +68,14 @@ close; -l_CallFunc: +L_CallFunc: callfunc "SailorFood"; menu - rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), l_TaskDone, + rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), L_TaskDone, rif(getq(ShipQuests_Astapolos) == 1 && (getq(ShipQuests_Ale) == 0 || getq(ShipQuests_Gulukan) == 0 || getq(ShipQuests_Jalad) == 0 || getq(ShipQuests_QMuller) == 0 || getq(ShipQuests_Tibbo) == 0), l("I'm still busy, I need to find the other sailors.")), -, - l("How are things going?"), l_HowAreYou, - l("Who are you?"), l_Who; + l("How are things going?"), L_HowAreYou, + l("Who are you?"), L_Who; mes ""; mesn; @@ -83,17 +83,17 @@ l_CallFunc: next; menu - rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Top, - rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Bottom, - rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), l_Top, - rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), l_Bottom, - rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom, + rif(getq(ShipQuests_Ale) == 0, l("Ale.")), L_Top, + rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), L_Bottom, + rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), L_Top, + rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), L_Bottom, + rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), L_Bottom, l("Nobody."), -; closedialog; close; -l_HowAreYou: +L_HowAreYou: mes ""; mesn; @@ -107,7 +107,7 @@ l_HowAreYou: close; -l_Who: +L_Who: mes ""; mesn; mesq l("My name is Astapolos. Q'Muller and I joined Nard's crew a few years ago when it was just a little merchant ship."); @@ -118,14 +118,14 @@ l_Who: close; -l_Bottom: +L_Bottom: mes ""; mesn; mesq l("I've seen him at the bottom of the island, check around."); close; -l_Top: +L_Top: mes ""; mesn; mesq l("I've seen him at the top of the island."); @@ -134,20 +134,20 @@ l_Top: close; -l_NoTask: +L_NoTask: npctalk3 l("Just leave me alone."); closedialog; close; -l_TaskDone: +L_TaskDone: mes ""; mesn; mesq l("Perfect!"); close; -l_Whyning: +L_Whyning: npctalk3 l("Then leave me alone."); closedialog; diff --git a/npc/000-1/chest.txt b/npc/000-1/chest.txt index 06dfb3e4..dd1d3f88 100644 --- a/npc/000-1/chest.txt +++ b/npc/000-1/chest.txt @@ -14,15 +14,15 @@ 000-1.gat,83,70,0 script #chest 316;2,{ set @q, getq(ShipQuests_TreasureChest); - if (getnpcdir ("") == 4) goto l_Give; + if (getnpcdir ("") == 4) goto L_Give; setnpcdir 2; initnpctimer; startnpctimer; close; -l_Give: - if (@q > 0) goto l_Close; +L_Give: + if (@q > 0) goto L_Close; callfunc "InventoryPlace", 514, 1; @@ -32,7 +32,7 @@ l_Give: getitem "OldBook", 1; npctalk3 l("You open the treasure chest."); -l_Close: +L_Close: setnpcdir 6; initnpctimer; startnpctimer; diff --git a/npc/000-1/cookiemaster.txt b/npc/000-1/cookiemaster.txt index 198ba072..ffb6684f 100644 --- a/npc/000-1/cookiemaster.txt +++ b/npc/000-1/cookiemaster.txt @@ -6,8 +6,8 @@ // Cookie NPC, beware, if you don't take your cookie, she'll keep it! 000-1.gat,97,50,0,0 script Cookie Master 319;2,{ - if (getq(General_Cookies) == 1) - goto l_GetCookie; + if (getq(GeneraL_Cookies) == 1) + goto L_GetCookie; mesn; mesq lg("Hey! Adventurer! Are you enjoying your life on Aemil?"); @@ -27,7 +27,7 @@ menu l("I'd love one!"), -, - l("No thank you, I'm fine. I'll come back later."), l_Bye; + l("No thank you, I'm fine. I'll come back later."), L_Bye; mes ""; mesn; @@ -40,11 +40,11 @@ mesq l("Cookies are awesome, so am I."); menu - l("Uhm... Your story seems..."), l_StorySeems, - l("Wait... That's not the place for a chef, what are you doing here?"), l_Presentation, + l("Uhm... Your story seems..."), L_StorySeems, + l("Wait... That's not the place for a chef, what are you doing here?"), L_Presentation, l("Exactly! Can I have one now?"), -; -l_Check: +L_Check: mes ""; mesn; mesq l("Let me check my cookie list..."); @@ -52,23 +52,23 @@ l_Check: // Beta3 Contributors. if (strcharinfo(0) == "4144") - goto l_Reward; + goto L_Reward; if (strcharinfo(0) == "Alige") - goto l_Reward; + goto L_Reward; if (strcharinfo(0) == "enchilado") - goto l_Reward; + goto L_Reward; if (strcharinfo(0) == "hal9000") - goto l_Reward; + goto L_Reward; if (strcharinfo(0) == "Reid") - goto l_Reward; + goto L_Reward; if (strcharinfo(0) == "Socapex") - goto l_Reward; + goto L_Reward; if (strcharinfo(0) == "Kenny690") - goto l_Reward; + goto L_Reward; if (strcharinfo(0) == "Nelson6e65") - goto l_Reward; + goto L_Reward; if (strcharinfo(0) == "Steel Zenn") - goto l_Reward; + goto L_Reward; mesq l("I'm sorry but I can't see your name anywhere."); next; @@ -76,10 +76,10 @@ l_Check: next; menu - l("Seriously? It's just a cookie you know... Tell me what I should do to get one."), l_TaskExpanation, - l("Yes, yes I know... Too bad then. See you soon!"), l_Bye; + l("Seriously? It's just a cookie you know... Tell me what I should do to get one."), L_TaskExpanation, + l("Yes, yes I know... Too bad then. See you soon!"), L_Bye; -l_StorySeems: +L_StorySeems: mes ""; mesn; mesq l("What about my story?"); @@ -87,11 +87,11 @@ l_StorySeems: menu l("It's interesting and exciting at the same time!"), -, - l("Honestly, it's quite far-fetched according to me."), l_Kick; + l("Honestly, it's quite far-fetched according to me."), L_Kick; mes ""; menu - l("Too bad I'm not hungry enough right now for these... cookies. I'll maybe come back later."), l_Bye, + l("Too bad I'm not hungry enough right now for these... cookies. I'll maybe come back later."), L_Bye, l("How can I get one of these cookies?"), -; mes ""; @@ -102,7 +102,7 @@ l_StorySeems: mesq lg("Well, if you want to be one of those who can have a cookie..."); next; -l_TaskExpanation: +L_TaskExpanation: mes ""; mesn; mesq l("You'll first need to help my friends."); @@ -111,10 +111,10 @@ l_TaskExpanation: next; menu - l("So you're under the control of dictators, that's... reassuring."), l_Control, - l("Who are these friends?"), l_Friends; + l("So you're under the control of dictators, that's... reassuring."), L_Control, + l("Who are these friends?"), L_Friends; -l_Friends: +L_Friends: mes ""; mesn; mesq l("Shht shht!"); @@ -148,16 +148,16 @@ l_Friends: menu l("I wish I helped your friends, because I'd really, really like a cookie."), -, - l("You tell me. Do I deserve a cookie?"), l_Check; + l("You tell me. Do I deserve a cookie?"), L_Check; mes ""; mesn; mesq l("Don't worry, I'm sure you will help them soon enough!"); next; - goto l_Bye; + goto L_Bye; -l_Presentation: +L_Presentation: mes ""; mesn; mesq l("For a chef? Who said I was a... Oh right, I am."); @@ -167,9 +167,9 @@ l_Presentation: mesq l("But..."); next; - goto l_TaskExpanation; + goto L_TaskExpanation; -l_Reward: +L_Reward: mesq l("Yes! @@ is written on my cookie list.", strcharinfo(0)); next; mesq lg("That's quite surprising... You don't look very helpful."); @@ -180,7 +180,7 @@ l_Reward: set @count, 1; callfunc "InventoryPlace", 517, 1; - setq General_Cookies, 1; + setq GeneraL_Cookies, 1; getitem "DeliciousCookie", 1; npctalk3 l("You receive a @@!", getitemlink("DeliciousCookie")); @@ -188,25 +188,25 @@ l_Reward: mesq lg("I'm sure you'll appreciate its effect, but be careful, these cookies are rare, and you'll need to help the community again before being able to receive another one."); next; - goto l_Bye; + goto L_Bye; -l_Control: +L_Control: mes ""; mesn; mesq l("Common, don't be like that and loosen up! Don't you want to know who's behind all of this?!"); next; menu - l("Why not, this might get interesting."), l_Friends, + l("Why not, this might get interesting."), L_Friends, l("Fine, tell me, who are these mysterious aliens?"), -, - l("No, and I gotta go, see you."), l_Kick; + l("No, and I gotta go, see you."), L_Kick; mes ""; mesn; mesq l("Don't mock me, my work is admirable."); next; -l_Kick: +L_Kick: closedialog; npctalk3 l("No cookie for you!"); @@ -214,13 +214,13 @@ l_Kick: close; -l_GetCookie: +L_GetCookie: mesq l("How was the cookie? Tasty, wasn't it?"); next; mesq l("If you want another one, you know what to do!"); next; -l_Bye: +L_Bye: closedialog; npctalk3 l("See you later!"); diff --git a/npc/000-1/couwan.txt b/npc/000-1/couwan.txt index 9789e599..1c2319f8 100644 --- a/npc/000-1/couwan.txt +++ b/npc/000-1/couwan.txt @@ -13,8 +13,8 @@ 000-1.gat,89,36,0,1 script Couwan 111;2,{ set @q, getq(ShipQuests_Couwan); - if (@q == 1) goto l_QuestGiven; - if (@q > 1) goto l_QuestDone; + if (@q == 1) goto L_QuestGiven; + if (@q > 1) goto L_QuestDone; mesn; mesq l("Hello yeye."); @@ -24,7 +24,7 @@ menu l("Very nice, indeed!"), -, - l("I don't see anything else than... water?"), l_Water; + l("I don't see anything else than... water?"), L_Water; mes ""; mesn; @@ -35,7 +35,7 @@ menu l("Sure, but what will I get in exchange?"), -, - l("I'm sorry, I don't have time right now."), l_Decline; + l("I'm sorry, I don't have time right now."), L_Decline; mes ""; mesn; @@ -53,7 +53,7 @@ setq ShipQuests_Couwan, 1; close; -l_Water: +L_Water: mes ""; mesn; mesq l("Yeye's brain is probably still full of sea water if yeye can't see the beauty of this place."); @@ -62,14 +62,14 @@ l_Water: close; -l_Decline: +L_Decline: mes ""; mesn; mesq l("Stupid yeye..."); close; -l_QuestGiven: +L_QuestGiven: mesn; mesq l("What are you looking at?"); next; @@ -77,7 +77,7 @@ l_QuestGiven: close; -l_QuestDone: +L_QuestDone: mesn; mesq l("What are you looking at?"); next; diff --git a/npc/000-1/darlin.txt b/npc/000-1/darlin.txt index 32d58413..04eff9d8 100644 --- a/npc/000-1/darlin.txt +++ b/npc/000-1/darlin.txt @@ -24,7 +24,7 @@ menu l("Yes!"), -, - l("No!"), l_Quit; + l("No!"), L_Quit; setcamnpc; mes ""; @@ -39,12 +39,12 @@ menu l("I do feel better!"), -, - l("Why don't you come down to talk?"), l_GoDown; + l("Why don't you come down to talk?"), L_GoDown; mes ""; menu l("And you, how are you doing?"), -, - l("But I need to go, see you!"), l_Bye; + l("But I need to go, see you!"), L_Bye; setcamnpc; mes ""; @@ -69,8 +69,8 @@ restorecam; menu - l("I said... WHY DON'T YOU COME DOWN TO TALK?"), l_GoDown, - l("I SAID, SEE YOU LATER!"), l_Bye, + l("I said... WHY DON'T YOU COME DOWN TO TALK?"), L_GoDown, + l("I SAID, SEE YOU LATER!"), L_Bye, l("I'M CALLED, @@!", strcharinfo(0)), -; setcamnpc; @@ -84,7 +84,7 @@ menu l("I'm looking for Gugli, where is he?"), -, - l("I need to go, sorry."), l_Bye; + l("I need to go, sorry."), L_Bye; setcamnpc; mes ""; @@ -97,7 +97,7 @@ close; -l_GoDown: +L_GoDown: setcamnpc; mes ""; mesn; @@ -111,32 +111,32 @@ l_GoDown: menu l("Have you seen anything dangerous?"), -, - l("Interesting... I'll leave you to your task then!"), l_Bye; + l("Interesting... I'll leave you to your task then!"), L_Bye; mes ""; mesn; - if (@q > 0) goto l_DangerAround; + if (@q > 0) goto L_DangerAround; setcamnpc; mesq l("Oh no, but I've noticed a weird light on the other edge of this island, I wonder what it can be..."); close; -l_Bye: +L_Bye: setcamnpc; npctalk3 l("FINE, BYE!"); closedialog; close; -l_DangerAround: +L_DangerAround: setcamnpc; mesq l("NOTHING ELSE OTHER THAN SHARKS AND AN ODD LIGHT!"); close; -l_Quit: +L_Quit: closedialog; close; } diff --git a/npc/000-1/fexil.txt b/npc/000-1/fexil.txt index aac7066d..fdebe560 100644 --- a/npc/000-1/fexil.txt +++ b/npc/000-1/fexil.txt @@ -16,7 +16,7 @@ next; menu - l("Yes, why not."), l_Accepted, + l("Yes, why not."), L_Accepted, l("No, sorry."), -; mes ""; @@ -27,7 +27,7 @@ close; -l_Accepted: +L_Accepted: shop "Bag"; closedialog; diff --git a/npc/000-1/gugli.txt b/npc/000-1/gugli.txt index fb0b21b9..795aaa13 100644 --- a/npc/000-1/gugli.txt +++ b/npc/000-1/gugli.txt @@ -29,9 +29,9 @@ OnTalk: set @gugli, getq(ShipQuests_Gugli); set @gado, getq(ShipQuests_ChefGado); - if (@nard > 3) goto l_AllComplete; - if (@nard > 1 || @gugli == 2) goto l_TaskCompleted; - if (@gugli == 1) goto l_TaskGiven; + if (@nard > 3) goto L_AllComplete; + if (@nard > 1 || @gugli == 2) goto L_TaskCompleted; + if (@gugli == 1) goto L_TaskGiven; mesq lg("Hi @@, I heard the captain sent you down here, uh?", strcharinfo(0)); next; @@ -72,27 +72,27 @@ OnTalk: setq ShipQuests_Gugli, 1; close; -l_TaskGiven: +L_TaskGiven: mesq l("Great to see you! What can I do for you today?"); next; - if (getq(ShipQuests_Ale) == 1 && getq(ShipQuests_Astapolos) == 1 && getq(ShipQuests_Gulukan) == 1 && getq(ShipQuests_Jalad) == 1 && getq(ShipQuests_QMuller) == 1 && getq(ShipQuests_Tibbo) == 1) goto l_MenuDone; + if (getq(ShipQuests_Ale) == 1 && getq(ShipQuests_Astapolos) == 1 && getq(ShipQuests_Gulukan) == 1 && getq(ShipQuests_Jalad) == 1 && getq(ShipQuests_QMuller) == 1 && getq(ShipQuests_Tibbo) == 1) goto L_MenuDone; -l_Menu: +L_Menu: menu - rif(getq(ShipQuests_Couwan) == 1, l("Couwan gave me this box, it is for you.")), l_Couwan, - rif(countitem("AquadaBox") > 0 || countitem("CroconutBox") > 0 || countitem("PlushroomBox") > 0, l("I have some food for you.")), l_CollectSmthing, - rif(getq(ShipQuests_Gugli) < 2, l("Who should I search for?")), l_SailorNames, - rif(getq(ShipQuests_Gugli) < 2, l("Where can I find your crew?")), l_Location, - l("Bye!"), l_Quit; + rif(getq(ShipQuests_Couwan) == 1, l("Couwan gave me this box, it is for you.")), L_Couwan, + rif(countitem("AquadaBox") > 0 || countitem("CroconutBox") > 0 || countitem("PlushroomBox") > 0, l("I have some food for you.")), L_CollectSmthing, + rif(getq(ShipQuests_Gugli) < 2, l("Who should I search for?")), L_SailorNames, + rif(getq(ShipQuests_Gugli) < 2, l("Where can I find your crew?")), L_Location, + l("Bye!"), L_Quit; -l_MenuDone: +L_MenuDone: menu - rif(getq(ShipQuests_Couwan) == 1, l("Couwan gave me this box, it is for you.")), l_Couwan, - l("I have collected all the boxes you needed."), l_TaskDone, - l("See you!"), l_Quit; + rif(getq(ShipQuests_Couwan) == 1, l("Couwan gave me this box, it is for you.")), L_Couwan, + l("I have collected all the boxes you needed."), L_TaskDone, + l("See you!"), L_Quit; -l_SailorNames: +L_SailorNames: mes ""; mesn; mesq l("Ale and Tibbo should bring 2 boxes of @@s, Astapolos and Gulukan 2 of @@s and Jalad and Q'Muller were charged of the boxes of @@s.", getitemlink("Aquada"), getitemlink("Croconut"), getitemlink("Plushroom")); @@ -100,9 +100,9 @@ l_SailorNames: mesq l("Do you need any other information?"); next; - goto l_Menu; + goto L_Menu; -l_CollectSmthing: +L_CollectSmthing: mes ""; mesn; mesq l("Good job!"); @@ -125,7 +125,7 @@ l_CollectSmthing: close; -l_Couwan: +L_Couwan: mes ""; mesn; mesq l("What?! This tritan is the worse shirker I ever met!"); @@ -146,7 +146,7 @@ l_Couwan: close; -l_Location: +L_Location: mes ""; mesn; mesq l("There're 6 sailors who will need your help. They're all around the island."); @@ -157,8 +157,8 @@ l_Location: next; set @r, rand(3000)/1000; - if (@r == 1) goto l_Silvio; - if (@r == 2) goto l_Lean; + if (@r == 1) goto L_Silvio; + if (@r == 2) goto L_Lean; setcamnpc "Sapartan"; mesq l("Max and Sapartan for example?"); @@ -167,7 +167,7 @@ l_Location: restorecam; close; -l_Silvio: +L_Silvio: setcamnpc "Silvio"; mesq l("Silvio for example?"); next; @@ -175,7 +175,7 @@ l_Silvio: restorecam; close; -l_Lean: +L_Lean: setcamnpc "Lean"; mesq l("Lean for example?"); next; @@ -183,7 +183,7 @@ l_Lean: restorecam; close; -l_TaskDone: +L_TaskDone: if (countitem("AquadaBox") == 2) delitem "AquadaBox", 2; if (countitem("CroconutBox") == 2) delitem "CroconutBox", 2; if (countitem("PlushroomBox") == 2) delitem "PlushroomBox", 2; @@ -203,7 +203,7 @@ l_TaskDone: close; -l_TaskCompleted: +L_TaskCompleted: mesq l("You are now part of the crew... At least for us down here!"); next; mesq l("You should inform Nard about the loading progress of the food on to the boat. He will be pleased to hear that good news!"); @@ -211,18 +211,18 @@ l_TaskCompleted: mesq l("Tell him that everything went fine and that we're almost done with the food."); next; - goto l_Menu; + goto L_Menu; -l_AllComplete: +L_AllComplete: mesq l("Elmo told me what Nard said, congrats!"); next; mesq g(l("You're one of us now, that's great! I was sure that you were a kind lady when I first saw you!"), l("You're one of us now, that's great! I was sure that you were a good man when I first saw you!")); next; - goto l_Menu; + goto L_Menu; -l_Quit: +L_Quit: closedialog; close; diff --git a/npc/000-1/gulukan.txt b/npc/000-1/gulukan.txt index 0b4bc08f..e8481977 100644 --- a/npc/000-1/gulukan.txt +++ b/npc/000-1/gulukan.txt @@ -8,10 +8,10 @@ 000-1.gat,54,90,0,1 script Gulukan 113;2,{ set @g, getq(ShipQuests_Gugli); - if (@g == 0) goto l_NoTask; + if (@g == 0) goto L_NoTask; set @q, getq(ShipQuests_Gulukan); - if (@q == 1) goto l_Func; + if (@q == 1) goto L_Func; mesn; mesq l("Yeye @@!", strcharinfo(0)); @@ -21,28 +21,28 @@ menu l("Wow, it seems everyone knows my name!"), -, - l("Well, it's not bad to finally feel something beneath my feet."), l_Continue, - l("Not so good actually... I would feel better on Nard's ship."), l_Quit; + l("Well, it's not bad to finally feel something beneath my feet."), L_Continue, + l("Not so good actually... I would feel better on Nard's ship."), L_Quit; -l_Name: +L_Name: mes ""; mesn; mesq l("You know, yeyes love to chat while working."); next; -goto l_Continue2; +goto L_Continue2; -l_Continue: +L_Continue: mes ""; mesn; -l_Continue2: +L_Continue2: mesq lg("Are you yaying here to explore the island?"); next; menu lg("Actually Gugli asked me if I could help you bringing him some of your boxes."), -, - l("Yes, indeed. I prefer to explore places I have never been to, before doing anything else."), l_Quit; + l("Yes, indeed. I prefer to explore places I have never been to, before doing anything else."), L_Quit; mes ""; mesn; @@ -64,22 +64,22 @@ l_Continue2: close; -l_Func: +L_Func: mesn; set @q, rand(0, 400) / 100; - if (@q == 0) goto l_RandomA; - if (@q == 1) goto l_RandomB; - if (@q > 1) goto l_RandomC; + if (@q == 0) goto L_RandomA; + if (@q == 1) goto L_RandomB; + if (@q > 1) goto L_RandomC; -l_RandomA: +L_RandomA: mesq l("Hey."); next; mesq l("What did Gugli yayaid about the box? Was it ok?"); next; menu - l("It's ok."), l_Fine, + l("It's ok."), L_Fine, l("He needs more food."), -; mes ""; @@ -88,28 +88,28 @@ l_RandomA: close; -l_Fine: +L_Fine: mes ""; mesn; mesq l("Alright! Yoyone more box and it'll be good."); close; -l_RandomB: +L_RandomB: mesq l("Thanks for the help!"); next; mesq l("These yeye boxes are way too heavy to be carried alone onto the ship."); close; -l_RandomC: +L_RandomC: mesq l("I think that yeye's soon be done. Yeye'll soon have a full box of @@s!", getitemlink("CrocClaw")); next; mesq l("And you? How's it yaying on your side?"); next; menu - rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), l_TaskDone, + rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), L_TaskDone, rif(getq(ShipQuests_Gulukan) == 1 && (getq(ShipQuests_Ale) == 0 || getq(ShipQuests_Astapolos) == 0 || getq(ShipQuests_Jalad) == 0 || getq(ShipQuests_QMuller) == 0 || getq(ShipQuests_Tibbo) == 0), l("I'm still busy, I need to find the other sailors.")), -; mes ""; @@ -118,21 +118,21 @@ l_RandomC: next; menu - rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Top, - rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), l_Top, - rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), l_Top, - rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), l_Top, - rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom, - l("Nobody."), l_Quit; - -l_Bottom: + rif(getq(ShipQuests_Ale) == 0, l("Ale.")), L_Top, + rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), L_Top, + rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), L_Top, + rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), L_Top, + rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), L_Bottom, + l("Nobody."), L_Quit; + +L_Bottom: mes ""; mesn; mesq l("Yeye seen this yoiis at the bottom of the island, check around."); close; -l_Top: +L_Top: mes ""; mesn; mesq l("Yeye seen this yoiis at the top of the island."); @@ -141,21 +141,21 @@ l_Top: close; -l_NoTask: +L_NoTask: mes ""; mesn; mesq l("*Uff*... And another box of @@s for our starving colleagues is ready.", getitemlink("Croconut")); close; -l_TaskDone: +L_TaskDone: mes ""; mesn; mesq lg("That's perfect, yoiis."); close; -l_Quit: +L_Quit: closedialog; close; } diff --git a/npc/000-1/jalad.txt b/npc/000-1/jalad.txt index d229819c..5de310ef 100644 --- a/npc/000-1/jalad.txt +++ b/npc/000-1/jalad.txt @@ -8,10 +8,10 @@ 000-1.gat,46,35,0,1 script Jalad 112;2,{ set @g, getq(ShipQuests_Gugli); - if (@g == 0) goto l_NoTask; + if (@g == 0) goto L_NoTask; set @q, getq(ShipQuests_Jalad); - if (@q == 1) goto l_CallFunc; + if (@q == 1) goto L_CallFunc; mesn; mesq l("*Uff*, *Argh*, why don't you give me some help?"); @@ -20,7 +20,7 @@ next; menu - l("I was going to ask you if you would need any help."), l_Continue, + l("I was going to ask you if you would need any help."), L_Continue, l("What exactly is your real job?"), -; mes ""; @@ -33,7 +33,7 @@ menu l("I will surely visit him. Do you need any help with your boxes?"), -; -l_Continue: +L_Continue: mes ""; mesn; mesq l("Surely. Take this box full of @@s.", getitemlink("Plushroom")); @@ -48,15 +48,15 @@ l_Continue: mesn; mesq l("They are so tasty when cooked together with some @@. Don't drop any of them!", getitemlink("PiouLegs")); - goto l_Close; + goto L_Close; -l_CallFunc: +L_CallFunc: callfunc "SailorFood"; menu - rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), l_TaskDone, + rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), L_TaskDone, rif(getq(ShipQuests_Jalad) == 1 && (getq(ShipQuests_Ale) == 0 || getq(ShipQuests_Astapolos) == 0 || getq(ShipQuests_Gulukan) == 0 || getq(ShipQuests_QMuller) == 0 || getq(ShipQuests_Tibbo) == 0), l("I'm still busy, I need to find the other sailors.")), -, - l("What's that?"), l_Plushroom; + l("What's that?"), L_Plushroom; mes ""; mesn; @@ -64,24 +64,24 @@ l_CallFunc: next; menu - rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Ale, - rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), l_Bottom, - rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Bottom, - rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), l_Bottom, - rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom, + rif(getq(ShipQuests_Ale) == 0, l("Ale.")), L_Ale, + rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), L_Bottom, + rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), L_Bottom, + rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), L_Bottom, + rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), L_Bottom, l("Nobody."), -; closedialog; close; -l_Bottom: +L_Bottom: mes ""; mesn; mesq l("I've seen him at the bottom of the island, have a look around."); close; -l_Ale: +L_Ale: setcamnpc "Ale"; next; @@ -92,7 +92,7 @@ l_Ale: restorecam; close; -l_Plushroom: +L_Plushroom: mes ""; mesn; mesq l("'That', as you call it, is a @@. There're plenty on this island!", getitemlink("Plushroom")); @@ -103,18 +103,18 @@ l_Plushroom: close; -l_NoTask: +L_NoTask: mes ""; mesn; mesq l("Sometimes, I wish somebody is sent here to help us."); close; -l_TaskDone: +L_TaskDone: mes ""; mesn; mesq l("Perfect!"); -l_Close: +L_Close: callfunc "GoodBye"; } diff --git a/npc/000-1/lean.txt b/npc/000-1/lean.txt index bf21be4d..4558f561 100644 --- a/npc/000-1/lean.txt +++ b/npc/000-1/lean.txt @@ -18,10 +18,10 @@ next; menu - rif(@gugli == 1, l("Well, I was in fact looking for them. Where are they now?")), l_Sailors, - l("Wait... Where are we going?"), l_Artis; + rif(@gugli == 1, l("Well, I was in fact looking for them. Where are they now?")), L_Sailors, + l("Wait... Where are we going?"), L_Artis; -l_Artis: +L_Artis: mes ""; mesn; mesq l("Artis of course!"); @@ -30,9 +30,9 @@ l_Artis: next; mesq l("If you're looking for us there, mostly all of us will be at Pedro's restaurant and in the Inn for Silvio's case..."); - goto l_Close; + goto L_Close; -l_Sailors: +L_Sailors: mes ""; mesn; mesq l("They are all around the island."); @@ -45,7 +45,7 @@ l_Sailors: next; menu - l("Thank you for your help."), l_Close, + l("Thank you for your help."), L_Close, l("Gugli mentioned six sailors. What about the others?"), -; mes ""; @@ -56,6 +56,6 @@ l_Sailors: close; -l_Close: +L_Close: callfunc "GoodBye"; } diff --git a/npc/000-1/max.txt b/npc/000-1/max.txt index 72cea39f..233887ca 100644 --- a/npc/000-1/max.txt +++ b/npc/000-1/max.txt @@ -17,20 +17,20 @@ next; menu - rif(@gugli == 0, l("Well, is there anything I can do here to help?")), l_Help, - rif(@gugli == 1, lg("Gugli asked me to help sailors with their food gatherings. Do you know where could I find them?")), l_Sailors, - rif(@gugli > 1, l("Seems I've helped everyone here. I don't know what to do now!")), l_Annoyed, - rif(@knife == 0, lg("It looks like you are an expert of the life inside 'La Johanne'. Do you know any hidden secrets nobody knows?")), l_Secrets, - l("No thanks, not at the moment."), l_Quit; + rif(@gugli == 0, l("Well, is there anything I can do here to help?")), L_Help, + rif(@gugli == 1, lg("Gugli asked me to help sailors with their food gatherings. Do you know where could I find them?")), L_Sailors, + rif(@gugli > 1, l("Seems I've helped everyone here. I don't know what to do now!")), L_Annoyed, + rif(@knife == 0, lg("It looks like you are an expert of the life inside 'La Johanne'. Do you know any hidden secrets nobody knows?")), L_Secrets, + l("No thanks, not at the moment."), L_Quit; -l_Help: +L_Help: mes ""; mesn; mesq l("You could start by talking to Gugli. He always has tasks for people willing to help!"); close; -l_Sailors: +L_Sailors: mes ""; mesn; mesq l("I remember I saw few of them leaving the ship early this morning to get to work."); @@ -38,16 +38,16 @@ l_Sailors: mesq l("I recall seeing Gulukan, Astapolos and Q'Muller."); next; - goto l_MenuSailors; + goto L_MenuSailors; -l_MenuSailors: +L_MenuSailors: menu - l("Do you know where can I find Gulukan?"), l_Gulukan, - l("Any clue on where Astapolos may be hidden?"), l_Astapolos, - l("What about Q'Muller? Where is he?"), l_Qmuller, - l("Alright. I will go looking for them now."), l_Quit; + l("Do you know where can I find Gulukan?"), L_Gulukan, + l("Any clue on where Astapolos may be hidden?"), L_Astapolos, + l("What about Q'Muller? Where is he?"), L_Qmuller, + l("Alright. I will go looking for them now."), L_Quit; -l_Gulukan: +L_Gulukan: mes ""; mesn; mesq l("Oh, he is not far away from here. Just take the road through the crocojungle north from here."); @@ -55,9 +55,9 @@ l_Gulukan: mesq l("You will find a wooden sign near a crossroad. He is a few steps on the left."); next; - goto l_MenuSailors; + goto L_MenuSailors; -l_Astapolos: +L_Astapolos: mes ""; mesn; mesq l("Astapolos... That guy is shy like a piou!"); @@ -65,9 +65,9 @@ l_Astapolos: mesq l("He likes to hide near the little lake in the north-west side of the island."); next; - goto l_MenuSailors; + goto L_MenuSailors; -l_Qmuller: +L_Qmuller: mes ""; mesn; mesq l("You need to cross the crocojungle heading north."); @@ -75,16 +75,16 @@ l_Qmuller: mesq l("You can spot Q'Muller on a cliff on the west busy collecting @@s.", getitemlink("Plushroom")); next; - goto l_MenuSailors; + goto L_MenuSailors; -l_Annoyed: +L_Annoyed: mes ""; mesn; mesq l("There is always something you can do here, like killing some tortugas or help Peter clean the ship from rattos."); close; -l_Secrets: +L_Secrets: mes ""; mesn; mesq l("No there are no secrets hidden below the ship's wood. Some sailors swear they have seen people hidden somewhere near the stow. Just stories sailors love to tell..."); @@ -95,6 +95,6 @@ l_Secrets: close; -l_Quit: +L_Quit: callfunc "GoodBye"; } diff --git a/npc/000-1/muller.txt b/npc/000-1/muller.txt index bb3c76e1..09cbac77 100644 --- a/npc/000-1/muller.txt +++ b/npc/000-1/muller.txt @@ -8,10 +8,10 @@ 000-1.gat,35,69,0,1 script Q'Muller 104;2,{ set @g, getq(ShipQuests_Gugli); - if (@g == 0) goto l_NoTask; + if (@g == 0) goto L_NoTask; set @q, getq(ShipQuests_QMuller); - if (@q == 1) goto l_CallFunc; + if (@q == 1) goto L_CallFunc; mesn; mesq l("Can't you see I'm working?!"); @@ -26,7 +26,7 @@ next; menu - l("Indeed! Goodbye."), l_Quit, + l("Indeed! Goodbye."), L_Quit, l("Yes, it is true! You are not able at all. Nard has been waiting for the food for too long already. Hurry up, you lazy sailors!"), -; mes ""; @@ -53,13 +53,13 @@ close; -l_CallFunc: +L_CallFunc: callfunc "SailorFood"; menu - rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), l_TaskDone, + rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), L_TaskDone, rif(getq(ShipQuests_QMuller) == 1 && (getq(ShipQuests_Ale) == 0 || getq(ShipQuests_Astapolos) == 0 || getq(ShipQuests_Gulukan) == 0 || getq(ShipQuests_Jalad) == 0 || getq(ShipQuests_Tibbo) == 0), l("I'm still busy, I need to find the other sailors.")), -, - l("What's that?"), l_Plushroom; + l("What's that?"), L_Plushroom; mes ""; mesn; @@ -67,21 +67,21 @@ l_CallFunc: next; menu - rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Top, - rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), l_Top, - rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), l_Top, - rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Bottom, - rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom, - l("Nobody."), l_Quit; - -l_Bottom: + rif(getq(ShipQuests_Ale) == 0, l("Ale.")), L_Top, + rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), L_Top, + rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), L_Top, + rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), L_Bottom, + rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), L_Bottom, + l("Nobody."), L_Quit; + +L_Bottom: mes ""; mesn; mesq l("I've seen him at the bottom of the island, check around."); close; -l_Top: +L_Top: mes ""; mesn; mesq l("I've seen him at the top of the island."); @@ -90,7 +90,7 @@ l_Top: close; -l_Plushroom: +L_Plushroom: mes ""; mesn; mesq l("'That', as you call it, is a @@. There're plenty on this island!", getitemlink("Plushroom")); @@ -101,14 +101,14 @@ l_Plushroom: close; -l_NoTask: +L_NoTask: mes ""; mesn; mesq l("You see? I'm working here!"); close; -l_TaskDone: +L_TaskDone: mes ""; mesn; mesq l("Good to hear!"); @@ -116,7 +116,7 @@ l_TaskDone: callfunc "GoodBye"; -l_Quit: +L_Quit: closedialog; close; } diff --git a/npc/000-1/sapartan.txt b/npc/000-1/sapartan.txt index ce64e981..5316273b 100644 --- a/npc/000-1/sapartan.txt +++ b/npc/000-1/sapartan.txt @@ -24,7 +24,7 @@ menu l("Thank you sir for you nice words. I am feeling better now."), -, - lg("I'm still a bit weak at the moment. We should probably talk later."), l_Quit; + lg("I'm still a bit weak at the moment. We should probably talk later."), L_Quit; mes ""; mesn; @@ -55,7 +55,7 @@ menu l("No, I don't, but I would like to know more about that."), -, l("Well... I've only killed some little pious in the ship, that's all."), -, - l("Yes, I feel strong enough for dangerous combats!"), l_Quit; + l("Yes, I feel strong enough for dangerous combats!"), L_Quit; mes ""; mesn; @@ -84,13 +84,13 @@ menu l("Thank you for your tricks. I am going to try them now!"), -, - l("I already know everything. Bye."), l_Quit; + l("I already know everything. Bye."), L_Quit; mes ""; mesn; mesq l("You're welcome. If you can't remember something, just come back here!"); next; -l_Quit: +L_Quit: callfunc "GoodBye"; } diff --git a/npc/000-1/silvio.txt b/npc/000-1/silvio.txt index a378d0c5..937a7951 100644 --- a/npc/000-1/silvio.txt +++ b/npc/000-1/silvio.txt @@ -14,8 +14,8 @@ menu l("Hello... Do I know you?"), -, - rif(getq(ShipQuests_Gugli) > 0, l("Fine, could you please tell me where I can find Gugli's sailors?")), l_Sailors, - l("Uhm, bye."), l_Quit; + rif(getq(ShipQuests_Gugli) > 0, l("Fine, could you please tell me where I can find Gugli's sailors?")), L_Sailors, + l("Uhm, bye."), L_Quit; mes ""; mesn; @@ -28,8 +28,8 @@ menu g(l("You're right, it's about you."), - l("You're right, it's about Julia.")), l_Julia, - l("What is Artis?"), l_Artis, + l("You're right, it's about Julia.")), L_Julia, + l("What is Artis?"), L_Artis, l("None of them?"), -; mes ""; @@ -51,7 +51,7 @@ menu l("He's funny, it's not a problem."), -, - l("Ok, I will leave him alone."), l_ForeverAlone; + l("Ok, I will leave him alone."), L_ForeverAlone; setcamnpc "Gugli"; mes ""; @@ -67,7 +67,7 @@ next; menu - l("You told me that you 'were' important."), l_VeryImportantNoob, + l("You told me that you 'were' important."), L_VeryImportantNoob, l("You mentioned the quality of your wine."), -; mes ""; @@ -78,7 +78,7 @@ close; -l_VeryImportantNoob: +L_VeryImportantNoob: mes ""; mesn; mesq l("It's true!"); @@ -99,7 +99,7 @@ l_VeryImportantNoob: close; -l_Julia: +L_Julia: mes ""; mesn; mesq g(l("You honor me beauty, but I'm already taken by Julia!"), @@ -109,10 +109,10 @@ l_Julia: next; menu - l("I see. Bye!"), l_Quit, - l("Oh look, there's a piou behind you!"), l_Piou; + l("I see. Bye!"), L_Quit, + l("Oh look, there's a piou behind you!"), L_Piou; -l_Piou: +L_Piou: mes ""; mesn; mesq l("Seriously?!"); @@ -121,7 +121,7 @@ l_Piou: close; -l_Artis: +L_Artis: mes ""; mesn; mesq l("This is a nice place... There are some nice chicks..."); @@ -134,14 +134,14 @@ l_Artis: callfunc "GoodBye"; -l_ForeverAlone: +L_ForeverAlone: mes ""; mesn "Narrator"; mes col(l("Silvio starts to speak to his bottle, you leave the conversation."), 9); close; -l_Sailors: +L_Sailors: mes ""; mesn; mesq l("What? Why? They aren't sexier than me, why do you want to see them?"); @@ -170,7 +170,7 @@ l_Sailors: next; menu - l("See you."), l_Quit, + l("See you."), L_Quit, l("*Imitate a thunder's sound.*"), -; closedialog; @@ -179,7 +179,7 @@ l_Sailors: close; -l_Quit: +L_Quit: closedialog; npctalk3 l("Give me a kiss before you say goodbye!"); diff --git a/npc/000-1/tarlan.txt b/npc/000-1/tarlan.txt index 3d60504d..be0c2c92 100644 --- a/npc/000-1/tarlan.txt +++ b/npc/000-1/tarlan.txt @@ -9,9 +9,9 @@ mesn; set @a, rand(4); - if (@a == 0) goto l_HardToHit; - if (@a == 1) goto l_Aouch; - if (@a == 2) goto l_DoYou; + if (@a == 0) goto L_HardToHit; + if (@a == 1) goto L_Aouch; + if (@a == 2) goto L_DoYou; mesq l("Hey you!"); next; @@ -19,42 +19,42 @@ next; menu - l("Some food."), l_Food, + l("Some food."), L_Food, l("Nothing, just hanging around."), -; closedialog; npctalk3 l("Ok, see you then!"); - goto l_Quit; + goto L_Quit; -l_Food: +L_Food: mes " "; mesn; mesq l("You can yaye some @@s by hitting these crocotrees.", getitemlink("Croconut")); next; mesq l("Yeye be careful with wild animal's food, some of them are yeyery dangerous, especially the crocs."); - goto l_Quit; + goto L_Quit; -l_HardToHit: +L_HardToHit: mesq l("These crocotrees are full of yaying @@, but they are so hard to hit...", getitemlink("Croconut")); - goto l_Quit; + goto L_Quit; -l_Aouch: +L_Aouch: mesq l("Ayouyouch! My head..."); next; mesq l("Damn @@.", getitemlink("Croconut")); - goto l_Quit; + goto L_Quit; -l_DoYou: +L_DoYou: mesq l("Do you want to try?"); next; mesq l("Just hit the trunk, and it will yeye a @@.", getitemlink("Croconut")); - goto l_Quit; + goto L_Quit; -l_Quit: +L_Quit: setnpcdir 4; close; } diff --git a/npc/000-1/tibbo.txt b/npc/000-1/tibbo.txt index 5c268fe6..e1c972f3 100644 --- a/npc/000-1/tibbo.txt +++ b/npc/000-1/tibbo.txt @@ -8,10 +8,10 @@ 000-1.gat,34,111,0,1 script Tibbo 110;2,{ set @g, getq(ShipQuests_Gugli); - if (@g == 0) goto l_NoTask; + if (@g == 0) goto L_NoTask; set @q, getq(ShipQuests_Tibbo); - if (@q == 1) goto l_CallFunc; + if (@q == 1) goto L_CallFunc; mesn; mesq l("Uh? Hi! I'm sorry, but I have no time for chatting."); @@ -48,15 +48,15 @@ mesn; mesq l("Thank you and be careful with that box. I have worked really hard to fill it!"); - goto l_Close; + goto L_Close; -l_CallFunc: +L_CallFunc: callfunc "SailorFood"; menu - rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), l_TaskDone, + rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), L_TaskDone, rif(getq(ShipQuests_Tibbo) == 1 && (getq(ShipQuests_Ale) == 0 || getq(ShipQuests_Astapolos) == 0 || getq(ShipQuests_Gulukan) == 0 || getq(ShipQuests_Jalad) == 0 || getq(ShipQuests_QMuller) == 0), l("I'm still busy, I need to find the other sailors.")), -, - l("What's that food?"), l_Aquada; + l("What's that food?"), L_Aquada; mes ""; mesn; @@ -64,16 +64,16 @@ l_CallFunc: next; menu - rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Top, - rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), l_Top, - rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Top, - rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), l_Top, - rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), l_Top, + rif(getq(ShipQuests_Ale) == 0, l("Ale.")), L_Top, + rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), L_Top, + rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), L_Top, + rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), L_Top, + rif(getq(ShipQuests_QMuller) == 0, l("Q'Muller.")), L_Top, l("Nobody."), -; - goto l_Close; + goto L_Close; -l_Top: +L_Top: mes ""; mesn; mesq l("I've seen him at the top of the island."); @@ -82,7 +82,7 @@ l_Top: close; -l_Aquada: +L_Aquada: mes ""; mesn; mesq l("This is an @@, a light blue sea fruit. They're highly desired in the archipelago.", getitemlink("Aquada")); @@ -93,20 +93,20 @@ l_Aquada: close; -l_NoTask: +L_NoTask: mes ""; mesn; mesq l("I'm sorry but I have no time to chat with you."); close; -l_TaskDone: +L_TaskDone: mes ""; mesn; mesq l("Awesome!"); close; -l_Close: +L_Close: callfunc "GoodBye"; } diff --git a/npc/000-2-0/billybons.txt b/npc/000-2-0/billybons.txt index 00671f8b..237e5c26 100644 --- a/npc/000-2-0/billybons.txt +++ b/npc/000-2-0/billybons.txt @@ -6,7 +6,7 @@ 000-2-0.gat,20,23,0,1 script Billy Bons 311;3,{ - if (rand(5) == 2) goto l_Hic; + if (rand(5) == 2) goto L_Hic; mesn; mesq l("You? Here?"); @@ -26,7 +26,7 @@ next; menu - l("Are you ok?"), l_Quit, + l("Are you ok?"), L_Quit, l("Alright... Bye."), -; mes ""; @@ -39,9 +39,9 @@ next; menu - l("What are you talking about? What guild?"), l_Quit, + l("What are you talking about? What guild?"), L_Quit, l("You are full of wine, my friend..."), -, - l("You should go and get some sleep."), l_Quit; + l("You should go and get some sleep."), L_Quit; mes ""; mesn; @@ -50,8 +50,8 @@ menu l("But who am I?"), -, - l("What am I supposed to say?"), l_Quit, - l("You should go and get some sleep."), l_Secret; + l("What am I supposed to say?"), L_Quit, + l("You should go and get some sleep."), L_Secret; mes ""; mesn; @@ -59,7 +59,7 @@ close; -l_Secret: +L_Secret: mes ""; mesn; mesq l("Hear me *hic* well, what ever, whatididever you will *hic* said ab... uhm... out what?! You saw there, the Warrior Guild of Esperia won't let it get public."); @@ -71,12 +71,12 @@ l_Secret: close; -l_Hic: +L_Hic: npctalk3 l("*Hic*"); close; -l_Quit: +L_Quit: mes ""; mesn; mesq l("Yeah you're all like *hic* that in Esperia, but you won't get me! *burp*"); diff --git a/npc/000-2-0/doors.txt b/npc/000-2-0/doors.txt index 5dacbea9..7cf311a6 100644 --- a/npc/000-2-0/doors.txt +++ b/npc/000-2-0/doors.txt @@ -20,9 +20,9 @@ OnTouch: set @nard, getq(ShipQuests_Nard); - if (@nard > 0 && countitem("JohanneKey") > 0) goto l_Key; -// if (@nard == 2) goto l_GotoNard; -// if (@nard == 3) goto l_End; + if (@nard > 0 && countitem("JohanneKey") > 0) goto L_Key; +// if (@nard == 2) goto L_GotoNard; +// if (@nard == 3) goto L_End; setcamnpc "Julia"; mesn "Julia"; @@ -35,11 +35,11 @@ OnTouch: close; -l_Key: +L_Key: warp "000-1", 93, 100; close; -l_GotoNard: +L_GotoNard: setcamnpc "Julia"; mesn "Julia"; mesq l("The captain is waiting for you! Hurry up."); @@ -48,7 +48,7 @@ l_GotoNard: close; -l_End: +L_End: npctalk3 l("This door is locked."); close; @@ -58,10 +58,10 @@ l_End: OnTouch: set @julia, getq(ShipQuests_Julia); - if (@julia == 2) goto l_Warp; + if (@julia == 2) goto L_Warp; close; -l_Warp: +L_Warp: warp "000-2-3", 20, 27; close; } diff --git a/npc/000-2-0/julia.txt b/npc/000-2-0/julia.txt index 09913075..ca0d9b4e 100644 --- a/npc/000-2-0/julia.txt +++ b/npc/000-2-0/julia.txt @@ -44,24 +44,24 @@ set @q3, getq(ShipQuests_Nard); set @s$, l("I don't want to change my language, sorry."); -l_Menu: +L_Menu: menu - rif(@q3 == 3 && @q2 == 0, l("I heard rumors about some old hostilities between you and Gado. Are they true?")), l_Rumors, - rif(@q2 == 2 && countitem("PoisonedDish", 1), l("Well... No wait, I have something for you but you shouldn't eat it... I'm taking it back to the kitchen.")), l_Regret, - rif(@q2 == 2 && countitem("PoisonedDish", 1), l("I have brought you a tasty present for your delicate mouth.")), l_PoisonJulia, - lg("I made a mistake, I would like to change my language."), l_ChooseLang, - l("Could you explain to me where I am?"), l_WhereIam, - l("What happened to me?"), l_What, - l("Can I read these rules again?"), l_Rules, - l("Nothing, sorry."), l_Quit; + rif(@q3 == 3 && @q2 == 0, l("I heard rumors about some old hostilities between you and Gado. Are they true?")), L_Rumors, + rif(@q2 == 2 && countitem("PoisonedDish", 1), l("Well... No wait, I have something for you but you shouldn't eat it... I'm taking it back to the kitchen.")), L_Regret, + rif(@q2 == 2 && countitem("PoisonedDish", 1), l("I have brought you a tasty present for your delicate mouth.")), L_PoisonJulia, + lg("I made a mistake, I would like to change my language."), L_ChooseLang, + l("Could you explain to me where I am?"), L_WhereIam, + l("What happened to me?"), L_What, + l("Can I read these rules again?"), L_Rules, + l("Nothing, sorry."), L_Quit; mes ""; mesn; mesq l("Of course! Tell me which language you speak and I will change the note on the ship board list."); - goto l_ChooseLang; + goto L_ChooseLang; -l_First: +L_First: callfunc "CheckClientVersion"; @@ -75,9 +75,9 @@ l_First: mesq lg("Could I ask you what your native language is? A sailor told me you're russian, but another one told me you're french... I'm a bit lost. I will register you on the ship boarding list just after that."); next; set @s$, ""; - goto l_ChooseLang; + goto L_ChooseLang; - l_ChooseLang: + L_ChooseLang: menu menuimage("flags/en", l("I speak English.") + " (English)"), -, menuimage("flags/fr", l("I speak French.") + " (Français)"), -, @@ -88,8 +88,8 @@ l_First: menuimage("flags/vls", l("I speak Flemish.") + " (Vlaams)"), -, menuimage("flags/pl", l("I speak Polish.") + " (Polski)"), -, menuimage("flags/it", l("I speak Italian.") + " (Italiano)"), -, - menuimage("flags/nl_BE", l("I speak Dutch.") + " (Nederlands)"), -, - @s$, l_NoChanges; + menuimage("flags/nL_BE", l("I speak Dutch.") + " (Nederlands)"), -, + @s$, L_NoChanges; set @lang, @menu-1; if (@lang < 0 || @lang > 9) close; setlang @lang; @@ -99,7 +99,7 @@ l_First: mesq l("Ok, done."); set @q, getq(ShipQuests_Julia); - if (@q == 2) goto l_NoRules; + if (@q == 2) goto L_NoRules; next; mesq l("I'm sure that you've got some questions for me, feel free to ask them, but firstly I need to tell you the rules of proper social conduct on board."); @@ -134,27 +134,27 @@ l_First: next; setq ShipQuests_Julia, 2; - goto l_Menu; + goto L_Menu; -l_NoRules: +L_NoRules: next; mesq l("Do you have any other questions for me?"); next; - goto l_YNMenu; + goto L_YNMenu; -l_NoChanges: +L_NoChanges: mes ""; mesn; mesq l("No problem, do you have any other questions for me?"); next; -l_YNMenu: +L_YNMenu: menu - l("Yes, I do."), l_Menu, - l("No, none."), l_Quit; + l("Yes, I do."), L_Menu, + l("No, none."), L_Quit; -l_WhereIam: +L_WhereIam: mes ""; mesn; mesq l("You're on a ship, we're on our way to the commercial capital of Artis."); @@ -166,9 +166,9 @@ l_WhereIam: mesq l("Do you have any other questions for me?"); next; - goto l_YNMenu; + goto L_YNMenu; -l_What: +L_What: mes ""; mesn; mesq l("We thought that you could help us understand this, all we know is that we found you back in the sea, adrift on your raft."); @@ -177,14 +177,14 @@ l_What: next; mesq l("Oh, and there was this inscription on your raft. It represents the Warrior Guild of Esperia, the largest and biggest guild of the whole new world. Does that make you remember anything, anything at all?"); next; - goto l_EsperiaMenu; + goto L_EsperiaMenu; -l_EsperiaMenu: +L_EsperiaMenu: menu - l("Sorry, but I can't tell you anything about that."), l_NoChanges, - l("Nothing, sorry."), l_NoChanges; + l("Sorry, but I can't tell you anything about that."), L_NoChanges, + l("Nothing, sorry."), L_NoChanges; -l_Rules: +L_Rules: mes ""; mesn; mesq l("Of course, they are on the left wall, go have a look at them."); @@ -192,15 +192,15 @@ l_Rules: mesq l("Do you have any other questions for me?"); next; - goto l_YNMenu; + goto L_YNMenu; OnTouch: set @q, getq(ShipQuests_Julia); - if (@q == 0 || @q == 1) goto l_First; + if (@q == 0 || @q == 1) goto L_First; close; -l_PoisonJulia: +L_PoisonJulia: mes ""; mesn; mesq l("Seems yummy! Let me taste it!"); @@ -211,7 +211,7 @@ l_PoisonJulia: close; -l_Regret: +L_Regret: mes ""; mesn; mesq l("Why? And who should you bring it back to?"); @@ -233,7 +233,7 @@ l_Regret: close; -l_Rumors: +L_Rumors: mes ""; mesn; mesq l("You shouldn't believe all of the stories drunk sailors tell you."); @@ -252,7 +252,7 @@ l_Rumors: next; menu - l("Well... I don't think it is the best way to rule a ship. Think about it."), l_Quit, + l("Well... I don't think it is the best way to rule a ship. Think about it."), L_Quit, l("In fact, everything seems to work perfectly under your guidance. Nard has made the right choice."), -; mes ""; @@ -268,6 +268,6 @@ l_Rumors: close; -l_Quit: +L_Quit: callfunc "GoodBye"; } diff --git a/npc/000-2-1/alige.txt b/npc/000-2-1/alige.txt index 03e7c0f0..2a98020e 100644 --- a/npc/000-2-1/alige.txt +++ b/npc/000-2-1/alige.txt @@ -48,7 +48,7 @@ OnTimer190: 000-2-1.gat,43,31,0,1 script Alige 301;2,{ set @q, getq(ShipQuests_Alige); - if (@q > 1) goto l_AskForFood; + if (@q > 1) goto L_AskForFood; goto OnFirstEncounter; @@ -63,7 +63,7 @@ OnFirstEncounter: menu lg("I am, who are you?"), -, - lg("Indeed, I am not."), l_NeedHelp; + lg("Indeed, I am not."), L_NeedHelp; mes ""; mesn "Narrator"; @@ -71,7 +71,7 @@ OnFirstEncounter: close; -l_NeedHelp: +L_NeedHelp: setcamnpc; mes ""; mesn "Hidden Person"; @@ -80,13 +80,13 @@ l_NeedHelp: restorecam; menu - l("Why not, but who are you, and what kind of help do you need?"), l_CanHelp; + l("Why not, but who are you, and what kind of help do you need?"), L_CanHelp; l("Sorry but I have no time for this."), -; closedialog; close; -l_CanHelp: +L_CanHelp: setcamnpc; mes ""; mesn; @@ -99,10 +99,10 @@ l_CanHelp: restorecam; menu - l("Sure, but what can you give me in exchange?"), l_AboutReward, + l("Sure, but what can you give me in exchange?"), L_AboutReward, l("Why don't you come out?"), -; -l_ExplainHiding: +L_ExplainHiding: setcamnpc; mes ""; mesn; @@ -114,10 +114,10 @@ l_ExplainHiding: next; restorecam; - if (getq(ShipQuests_Alige) == 2) goto l_SoAskForFood; - goto l_Accept; + if (getq(ShipQuests_Alige) == 2) goto L_SoAskForFood; + goto L_Accept; -l_AboutReward: +L_AboutReward: setcamnpc; mes ""; mesn; @@ -125,10 +125,10 @@ l_AboutReward: next; restorecam; -l_Accept: +L_Accept: menu - l("Understood, I will help you."), l_FirstAccepted, - l("What is Artis?"), l_Artis, + l("Understood, I will help you."), L_FirstAccepted, + l("What is Artis?"), L_Artis, l("I think I should report you to the crew members."), -; setcamnpc; @@ -136,7 +136,7 @@ l_Accept: close; -l_Artis: +L_Artis: setcamnpc; mes ""; mesn; @@ -144,16 +144,16 @@ l_Artis: next; restorecam; - if (@q == 2) goto l_SoAskForFood; - goto l_Accept; + if (@q == 2) goto L_SoAskForFood; + goto L_Accept; -l_FirstAccepted: - if (getq(ShipQuests_Alige) >= 2) goto l_Accepted; +L_FirstAccepted: + if (getq(ShipQuests_Alige) >= 2) goto L_Accepted; setq ShipQuests_Alige, 2; - goto l_Accepted; + goto L_Accepted; -l_Accepted: +L_Accepted: setcamnpc; mes ""; mesn; @@ -161,7 +161,7 @@ l_Accepted: next; restorecam; -l_GiveFood: +L_GiveFood: mes ""; menu rif(countitem(501, 1), l(getitemname("Acorn"))), 0, @@ -181,11 +181,11 @@ l_GiveFood: l("I don't have anything good for you today."), -1; set @id, @menuret; - if (@id == -1) goto l_Quit; // Quit message. - if (@id == 0) goto l_NoReward; // In case of wrong food. - if (@id == 1) goto l_Poison; // In case of poisoned food. - if (@id == 2) goto l_NoMore; // In case of Piberries. - if (countitem(@id) == 0) goto l_Quit; + if (@id == -1) goto L_Quit; // Quit message. + if (@id == 0) goto L_NoReward; // In case of wrong food. + if (@id == 1) goto L_Poison; // In case of poisoned food. + if (@id == 2) goto L_NoMore; // In case of Piberries. + if (countitem(@id) == 0) goto L_Quit; // if (@id == item's ID) then food is correct. // Do not put any other number than -1, 0, 1, 2 or the item's ID, that'll avoid confusion. @@ -201,64 +201,64 @@ l_GiveFood: getitem "Piberries", rand(1, 3); next; - goto l_ReturnMenu; + goto L_ReturnMenu; -l_NoReward: +L_NoReward: setcamnpc; mes ""; mesn; mesq l("You don't expect me to eat that, do you? Give me something else!"); restorecam; - goto l_GiveFood; + goto L_GiveFood; -l_ReturnMenu: +L_ReturnMenu: setcamnpc; mesq l("Do you have anything else for me?"); next; restorecam; - goto l_GiveFood; + goto L_GiveFood; -l_NoMore: +L_NoMore: setcamnpc; mes ""; mesn; mesq l("Arrr, don't give me more berries! I don't want them, stupid berries, stupid... Stupid... Stupid!"); next; - goto l_ReturnMenu; + goto L_ReturnMenu; -l_Poison: +L_Poison: setcamnpc; mes ""; mesn; mesq l("Don't try to poison me! I know what that does!"); restorecam; next; - goto l_ReturnMenu; + goto L_ReturnMenu; -l_SoAskForFood: +L_SoAskForFood: setcamnpc; mesn; mesq l("So, do you have anything for me today?"); next; restorecam; - goto l_IntroMenu; + goto L_IntroMenu; -l_AskForFood: +L_AskForFood: setcamnpc; mesn; mesq l("Do you have anything for me today?"); next; restorecam; -l_IntroMenu: +L_IntroMenu: menu - l("Yes."), l_GiveFood, - l("Where can I find some food?"), l_FindFood, - l("Why are you hiding?") + " " + l("Why don't you come out?"), l_ExplainHiding, - l("What is Artis?"), l_Artis, + l("Yes."), L_GiveFood, + l("Where can I find some food?"), L_FindFood, + l("Why are you hiding?") + " " + l("Why don't you come out?"), L_ExplainHiding, + l("What is Artis?"), L_Artis, l("I think I should report you to the crew members."), -; setcamnpc; @@ -266,7 +266,7 @@ l_IntroMenu: close; -l_FindFood: +L_FindFood: setcamnpc; mes ""; mesn; @@ -284,7 +284,7 @@ l_FindFood: close; -l_Quit: +L_Quit: setcamnpc; mes ""; mesn; diff --git a/npc/000-2-1/arpan.txt b/npc/000-2-1/arpan.txt index 7ed79e60..5e1182c6 100644 --- a/npc/000-2-1/arpan.txt +++ b/npc/000-2-1/arpan.txt @@ -32,25 +32,25 @@ 000-2-1.gat,47,32,0,1 script LeftBarrierCheck 0,0,2,{ set @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; + 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: +L_Equip: warp "000-2-1.gat", 49, 32; doevent "Magic Arpan::OnEquip"; close; -l_GetCloth: +L_GetCloth: warp "000-2-1.gat", 49, 32; doevent "Magic Arpan::OnClothNotTaken"; close; -l_EquipDone: +L_EquipDone: setq ShipQuests_Arpan, 3; close; @@ -59,25 +59,25 @@ l_EquipDone: 000-2-1.gat,56,32,0,1 script RightBarrierCheck 0,0,2,{ set @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; + 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: +L_Equip: warp "000-2-1.gat", 55, 32; doevent "Magic Arpan::OnEquip"; close; -l_GetCloth: +L_GetCloth: warp "000-2-1.gat", 55, 32; doevent "Magic Arpan::OnClothNotTaken"; close; -l_EquipDone: +L_EquipDone: setq ShipQuests_Arpan, 3; close; @@ -86,20 +86,20 @@ l_EquipDone: 000-2-1.gat,49,33,0,1 script Magic Arpan 307;5,{ set @q, getq(ShipQuests_Arpan); set @q_julia, getq(ShipQuests_Julia); - if (@q == 2 && getequipid(equip_torso) == 1300 && getequipid(equip_legs) == 2200) goto l_EquipDone; + if (@q == 2 && getequipid(equip_torso) == 1300 && getequipid(equip_legs) == 2200) goto L_EquipDone; OnTalk: mesn; - if (@q > 0) goto l_Menu; + if (@q > 0) goto L_Menu; mesq lg("Yeye, you are really lucky to be alive. You are in good enough shape for walking, do you remember what happened?"); next; setq ShipQuests_Arpan, 1; menu - lg("I only remember I was rescued by you."), l_Story, - lg("I can't remember anything."), l_OhWell; + lg("I only remember I was rescued by you."), L_Story, + lg("I can't remember anything."), L_OhWell; OnClothNotTaken: mesn; @@ -117,7 +117,7 @@ OnEquip: close; -l_OhWell: +L_OhWell: mes ""; mesq lg("Oh well, we rescued you when you were yaying adrift in the sea."); next; @@ -125,7 +125,7 @@ l_OhWell: menu l("And then what happened?"), -; -l_Story: +L_Story: mes ""; mesq lg("You were yaying sleeping for quite some time there, our shipkeeper, Julia, was here with you, she did her best to heal your injuries."); next; @@ -137,24 +137,24 @@ l_Story: close; -l_Menu: +L_Menu: mesq l("What yeye could I do for you today?"); next; set @equipped, getequipid(equip_torso) == 1300 && getequipid(equip_legs) == 2200; menu - lg("Could you tell me where I am?"), l_Where, - lg("Where can I find Julia?"), l_Julia, - l("Who are you?"), l_Who, - rif(getq(ShipQuests_ArpanMoney) == 0, l("Where are my old clothes?")), l_WhereOldClothes, - rif(!@equipped, lg("What should I do after taking these clothes?")), l_WhatCloth, + lg("Could you tell me where I am?"), L_Where, + lg("Where can I find Julia?"), L_Julia, + l("Who are you?"), L_Who, + rif(getq(ShipQuests_ArpanMoney) == 0, l("Where are my old clothes?")), L_WhereOldClothes, + rif(!@equipped, lg("What should I do after taking these clothes?")), L_WhatCloth, rif(!@equipped, l("Thank you, I'll take them and put them on.")), -, l("Nothing, sorry."), -; closedialog; close; -l_Where: +L_Where: mes ""; mesn; mesq lg("You're on our ship, we made port to a little island and we're actually yeyending our long merchant traveling adventure at the city of Artis."); @@ -164,9 +164,9 @@ l_Where: mesq l("You will see, citizens are polite and you can still ask for help in the Warrior Guild. They can help find a job for you or maybe help you find out what happened to you out at sea!"); next; - goto l_Menu; + goto L_Menu; -l_Julia: +L_Julia: mes ""; mesn; mesq g(l("She's on the upper level, yeye can't miss her. She's the only girl in this crew, oh well, except for you now yeyeye!"), @@ -177,17 +177,17 @@ l_Julia: mes col(l("Julia is on the upper level of the ship, use the arrow keys to walk to the stairs or click on the stairs at the top right of your screen."), 9); next; - goto l_Menu; + goto L_Menu; -l_Who: +L_Who: mes ""; mesn; mesq l("Sorry! I forgot to introduce myself. My name is Arpan, but other sailors call me Magic Arpan because I know one or two yaing magic spells."); next; - goto l_Menu; + goto L_Menu; -l_WhereOldClothes: +L_WhereOldClothes: mes ""; mesn; mesq lg("We tried to clean them but the sea water mostly destroyed them. It's why we gave you these clothes. They're not very nice, but that's all that we have for you."); @@ -200,9 +200,9 @@ l_WhereOldClothes: set zeny, zeny+10; message strcharinfo(0), l("You receive @@ E!", 10); - goto l_BeforeMenu; + goto L_BeforeMenu; -l_WhatCloth: +L_WhatCloth: mes ""; mesn; mesq lg("Oh yeyeye... As they are not edible, you can maybe try to equip them?"); @@ -216,12 +216,12 @@ l_WhatCloth: mes col(l("Items have different effects. Some will heal you, some can be used as weapons or armor, and some can be sold for gold."), 9); next; -l_BeforeMenu: +L_BeforeMenu: mesn; - goto l_Menu; + goto L_Menu; -l_EquipDone: +L_EquipDone: setq ShipQuests_Arpan, 3; - goto l_Menu; + goto L_Menu; } diff --git a/npc/000-2-1/chefgado.txt b/npc/000-2-1/chefgado.txt index 47ce9f0e..eaf09b52 100644 --- a/npc/000-2-1/chefgado.txt +++ b/npc/000-2-1/chefgado.txt @@ -18,13 +18,13 @@ 000-2-1.gat,27,28,0,1 script Chef Gado 318;2,{ set @q, getq(ShipQuests_ChefGado); set @n, getq(ShipQuests_Nard); - if (@q == 1) goto l_QuestAccepted; - if (@q == 2) goto l_PoisonAccepted; - if (@q == 3) goto l_PoisonJulia; - if (@q == 4) goto l_QuestComplete; - if (@q == 5 && countitem("PoisonedDish") > 0) goto l_Aborting; - if (@q > 4) goto l_QuestAborted; - if (@n == 3) goto l_QuestStart; + if (@q == 1) goto L_QuestAccepted; + if (@q == 2) goto L_PoisonAccepted; + if (@q == 3) goto L_PoisonJulia; + if (@q == 4) goto L_QuestComplete; + if (@q == 5 && countitem("PoisonedDish") > 0) goto L_Aborting; + if (@q > 4) goto L_QuestAborted; + if (@n == 3) goto L_QuestStart; mesn; set @r, rand(3); @@ -34,13 +34,13 @@ close; -l_QuestStart: +L_QuestStart: mesn; mesq l("So it seems I have another stomach to fill. Those bastards have no respect for who feeds them every damn day!"); next; menu - l("How rude! What is the reason behind your malice?"), l_Rude, + l("How rude! What is the reason behind your malice?"), L_Rude, l("I swear, I do not eat so much."), -; mes ""; @@ -49,7 +49,7 @@ l_QuestStart: close; -l_Rude: +L_Rude: mes ""; mesn; mesq l("UAHAHAHAAH! I am the cook of that bunch of donkeys and I can be rude with everyone from this bossy captain to that harpy-lady!"); @@ -84,7 +84,7 @@ l_Rude: next; menu - l("Sea water?! I will not help you with your evil plan!"), l_Quit, + l("Sea water?! I will not help you with your evil plan!"), L_Quit, l("Sure, why not?"), -; setq ShipQuests_ChefGado, 1; @@ -94,20 +94,20 @@ l_Rude: next; mesq l("Before you go, let me tell you how to get @@s, because you don't look very smart.", getitemlink("HalfCroconut")); - goto l_OpenCroconut; + goto L_OpenCroconut; -l_QuestAccepted: +L_QuestAccepted: mesn; mesq l("Have you collected all the ingredients for my recipe? The special one too?"); next; menu - rif(countitem("PiouLegs") > 1 && countitem("HalfCroconut") > 0 && countitem("Aquada") > 0 && countitem("SeaDrops") > 0, l("All your... Fresh ingredients are ready to be cooked.")), l_GotAll, - l("What are your needs?"), l_Need, - l("Where can I find a half croconut?"), l_OpenCroconut, - l("Not yet. I will be back soon."), l_Quit; + rif(countitem("PiouLegs") > 1 && countitem("HalfCroconut") > 0 && countitem("Aquada") > 0 && countitem("SeaDrops") > 0, l("All your... Fresh ingredients are ready to be cooked.")), L_GotAll, + l("What are your needs?"), L_Need, + l("Where can I find a half croconut?"), L_OpenCroconut, + l("Not yet. I will be back soon."), L_Quit; -l_OpenCroconut: +L_OpenCroconut: mes ""; mesn; mesq g(l("Take a @@ and try opening it using something like a sharp knife! I doubt you'll succeed, you're weak my poor girl.", getitemlink("Croconut")), @@ -117,7 +117,7 @@ l_OpenCroconut: close; -l_GotAll: +L_GotAll: mes ""; callfunc "InventoryPlace", 717, 1; @@ -139,7 +139,7 @@ l_GotAll: close; -l_Need: +L_Need: mes ""; mesn; mesq l("Shhht, don't say it that loud..."); @@ -150,13 +150,13 @@ l_Need: close; -l_PoisonAccepted: +L_PoisonAccepted: mesn; mesq l("Fool! Just come back here when you'll be done with our little... 'Secret mission'."); close; -l_PoisonJulia: +L_PoisonJulia: mesn; mesq l("The usurper has been punished! This is a great day! Take this reward as a prize for your loyalty to the old commander!"); @@ -169,13 +169,13 @@ l_PoisonJulia: close; -l_QuestComplete: +L_QuestComplete: mesn; mesq l("Oh, it's you. I think it's better we do not talk for a while. They suspect something."); close; -l_Aborting: +L_Aborting: mesn; mesq l("Wait, why do you still have the dish on you?!"); next; @@ -196,13 +196,13 @@ l_Aborting: close; -l_QuestAborted: +L_QuestAborted: mesn; mesq lg("You're like the rest of this filthy crew. Your name is now on the traitors list!"); close; -l_Quit: +L_Quit: closedialog; close; } diff --git a/npc/000-2-1/chest.txt b/npc/000-2-1/chest.txt index e409fa7d..6071157f 100644 --- a/npc/000-2-1/chest.txt +++ b/npc/000-2-1/chest.txt @@ -13,16 +13,16 @@ 000-2-1.gat,51,37,0 script Chest 317;2,{ set @q, getq(ShipQuests_Arpan); - if (@q == 0) goto l_Talk; - if (getnpcdir ("") == 4) goto l_Give; + if (@q == 0) goto L_Talk; + if (getnpcdir ("") == 4) goto L_Give; setnpcdir 2; initnpctimer; startnpctimer; close; -l_Give: - if (@q > 1) goto l_Quit; +L_Give: + if (@q > 1) goto L_Quit; set @item, 1300; set @count, 2; callfunc "InventoryPlace", 1300, 2; @@ -31,7 +31,7 @@ l_Give: getitem "CreasedShirt", 1; getitem "CreasedShorts", 1; npctalk3 l("You take the clothes from the chest."); - goto l_Quit; + goto L_Quit; OnTimer220: stopnpctimer; @@ -39,12 +39,12 @@ OnTimer220: if (getnpcdir ("") == 6) setnpcdir 0; end; -l_Talk: +L_Talk: npctalk3 l("You should talk to Magic Arpan first."); close; -l_Quit: +L_Quit: setnpcdir 6; initnpctimer; startnpctimer; diff --git a/npc/000-2-1/dan.txt b/npc/000-2-1/dan.txt index 23724e31..64fbd38a 100644 --- a/npc/000-2-1/dan.txt +++ b/npc/000-2-1/dan.txt @@ -8,7 +8,7 @@ 000-2-1.gat, 32,31,0,1 script Dan 101;2,{ mesn; set @q, rand(3); - if (@q == 0) goto l_QuestStory; + if (@q == 0) goto L_QuestStory; mesq l("You see these pious around us?"); next; @@ -16,13 +16,13 @@ close; -l_QuestStory: +L_QuestStory: mesq l("It's so hard to find the motivation..."); next; menu l("Why?"), -, - l("I guess so... I will leave you alone."), l_Quit; + l("I guess so... I will leave you alone."), L_Quit; mes ""; mesn; @@ -32,7 +32,7 @@ l_QuestStory: next; menu - l("I'm still in a coma, but my ghost is haunting you!"), l_Quit, + l("I'm still in a coma, but my ghost is haunting you!"), L_Quit, l("It was something like a long nap."), -; mes ""; @@ -43,8 +43,8 @@ l_QuestStory: next; menu - l("Who is she?"), l_She, - l("Do you want me to go see her instead of you?"), l_Quest; + l("Who is she?"), L_She, + l("Do you want me to go see her instead of you?"), L_Quest; l("I don't know what to say..."), -; mes ""; @@ -54,28 +54,28 @@ l_QuestStory: close; -l_She: +L_She: mes ""; mesn; mesq l("She is a good friend of mine... We wanted to marry a few weeks before her accident but..."); next; - goto l_Quit2; + goto L_Quit2; -l_Quest: +L_Quest: mes ""; mesn; mesq l("I don't think that we are in a good place to talk about this..."); next; -l_Quit: +L_Quit: mes ""; mesn "Narrator"; mes col(l("Dan keeps silent since your last question."), 9); close; -l_Quit2: +L_Quit2: mesn "Narrator"; mes col(l("Dan ends the conversation and resumes to write his letter."), 9); diff --git a/npc/000-2-1/knife.txt b/npc/000-2-1/knife.txt index 4a37ffc9..99c93ad3 100644 --- a/npc/000-2-1/knife.txt +++ b/npc/000-2-1/knife.txt @@ -18,13 +18,13 @@ next; menu - l("Yes."), l_Give, + l("Yes."), L_Give, l("No."), -; closedialog; close; -l_Give: +L_Give: mes ""; set @item, 3500; set @count, 1; diff --git a/npc/000-2-1/peter.txt b/npc/000-2-1/peter.txt index 01d67102..dda62f7e 100644 --- a/npc/000-2-1/peter.txt +++ b/npc/000-2-1/peter.txt @@ -41,46 +41,46 @@ 000-2-1.gat,72,34,0,1 script AreaNPC 0,0,1,{ OnTouch: - if (BaseLevel < 5) goto l_Stop; - if ($@RAT_SAILOR_COUNTDOWN == "") goto l_NoCountDown; - if ((gettimetick(2) - $@RAT_SAILOR_COUNTDOWN) < 10) goto l_NoGoodTick; - if (($@RAT_SAILOR_OLD_HELPER$ == strcharinfo(0)) && ((gettimetick(2) - $@RAT_SAILOR_COUNTDOWN) < 60)) goto l_NoGoodTick; + if (BaseLevel < 5) goto L_Stop; + if ($@RAT_SAILOR_COUNTDOWN == "") goto L_NoCountDown; + if ((gettimetick(2) - $@RAT_SAILOR_COUNTDOWN) < 10) goto L_NoGoodTick; + if (($@RAT_SAILOR_OLD_HELPER$ == strcharinfo(0)) && ((gettimetick(2) - $@RAT_SAILOR_COUNTDOWN) < 60)) goto L_NoGoodTick; set $@RAT_SAILOR_COUNTDOWN, ""; -l_NoCountDown: - if ($@RAT_SAILOR_HELPER$ != "") goto l_Occupied; +L_NoCountDown: + if ($@RAT_SAILOR_HELPER$ != "") goto L_Occupied; set @peter, getq(ShipQuests_Peter); - if (@peter < 1 || @peter > 5) goto l_Task; - if (@peter == 1 || @peter == 2) goto l_Rfail; - if (@peter == 3 || @peter == 4) goto l_Rwin; - if (@peter > 5) goto l_SecondTime; + if (@peter < 1 || @peter > 5) goto L_Task; + if (@peter == 1 || @peter == 2) goto L_Rfail; + if (@peter == 3 || @peter == 4) goto L_Rwin; + if (@peter > 5) goto L_SecondTime; doevent "Peter::OnReturnWin"; close; -l_Stop: +L_Stop: doevent "Peter::OnStop"; close; -l_Occupied: +L_Occupied: doevent "Peter::OnDontneedHelp"; close; -l_Task: +L_Task: doevent "Peter::OnGiveTask"; close; -l_Rfail: +L_Rfail: doevent "Peter::OnReturnFail"; close; -l_Rwin: +L_Rwin: doevent "Peter::OnReturnWin"; -l_NoGoodTick: +L_NoGoodTick: doevent "Peter::OnNoGoodTick"; close; @@ -88,12 +88,12 @@ l_NoGoodTick: 000-2-1.gat,70,35,0,1 script Peter 303;3,{ if (BaseLevel < 5) goto OnTooWeak; - if ($@RAT_SAILOR_COUNTDOWN == "") goto l_NoCountDown; + if ($@RAT_SAILOR_COUNTDOWN == "") goto L_NoCountDown; if ((gettimetick(2) - $@RAT_SAILOR_COUNTDOWN) < 10) goto OnNoGoodTick; if (($@RAT_SAILOR_OLD_HELPER$ == strcharinfo(0)) && ((gettimetick(2) - $@RAT_SAILOR_COUNTDOWN) < 60)) goto OnNoGoodTick; set $@RAT_SAILOR_COUNTDOWN, ""; -l_NoCountDown: +L_NoCountDown: set @peter, getq(ShipQuests_Peter); if (@peter == 1 || @peter == 2) goto OnReturnFail; if (@peter == 3 || @peter == 4 || @peter == 5) goto OnReturnWin; @@ -109,21 +109,21 @@ OnGiveTask: next; menu - l("Yeah, but what reward will I get?"), l_BonusTask, - l("Why not, I need to train anyway."), l_Task, + l("Yeah, but what reward will I get?"), L_BonusTask, + l("Why not, I need to train anyway."), L_Task, l("No, they are way too dangerous for me!"), -; mes ""; mesn; mesq l("Ok, ok. Come back if you change your mind."); - goto l_Quit; + goto L_Quit; OnTooWeak: mesn; mesq lg("I need help for clean the edge of the ship, but you aren't strong enough to help."); - goto l_Quit; + goto L_Quit; OnStop: warp "000-2-1", 72, 36; @@ -139,15 +139,15 @@ OnReturnFail: next; menu - l("Yeah, but I would like to make sure I get a reward."), l_BonusTask, - l("Why not, I need to train anyway."), l_Task, + l("Yeah, but I would like to make sure I get a reward."), L_BonusTask, + l("Why not, I need to train anyway."), L_Task, l("No, they are way too dangerous for me!"), -; mes ""; mesn; mesq l("Ok, ok. Come back if you change your mind."); - goto l_Quit; + goto L_Quit; OnReturnWin: mesn; @@ -156,13 +156,13 @@ OnReturnWin: if (@peter == 3 || @peter == 4) menu - l("Did you say reward? I want it!"), l_BonusTask, - l("I am not worried about rewards. I just want to help."), l_Task, + l("Did you say reward? I want it!"), L_BonusTask, + l("I am not worried about rewards. I just want to help."), L_Task, l("Sorry, I am not in the mood for another fight with these rattos."), -; if (@peter == 5) menu - l("No problem, I can help you anyway."), l_Task, + l("No problem, I can help you anyway."), L_Task, l("Sorry, I am not in the mood for another fight with these rattos."), -; mes ""; @@ -171,7 +171,7 @@ OnReturnWin: close; -l_BonusTask: +L_BonusTask: mes ""; mesn; mesq l("What if I give you 1000 Esperin for that job, is it ok?"); @@ -179,20 +179,20 @@ l_BonusTask: menu lg("Okay, I'm ready to work!"), -, - l("What? This reward is too small!"), l_Quit; + l("What? This reward is too small!"), L_Quit; if ($@RAT_SAILOR_HELPER$ != "") goto OnDontneedHelp; if (@peter == 6) setq ShipQuests_Peter, 2; if (@peter == 3) setq ShipQuests_Peter, 4; set @peter, getq(ShipQuests_Peter); - goto l_Start; + goto L_Start; -l_Task: +L_Task: if ($@RAT_SAILOR_HELPER$ != "") goto OnDontneedHelp; if (@peter == 6) setq ShipQuests_Peter, 1; set @peter, getq(ShipQuests_Peter); -l_Start: +L_Start: mes ""; mesn; mesq l("Okay, you can start!"); @@ -205,20 +205,20 @@ OnStartOutside: warp "000-2-2.gat", 48, 28; doevent "RattosControl::OnSpawn"; - goto l_Quit; + goto L_Quit; OnTimer2000: - if (attachrid(getcharid(3, $@RAT_SAILOR_HELPER$)) == 0) goto l_Logoff; + if (attachrid(getcharid(3, $@RAT_SAILOR_HELPER$)) == 0) goto L_Logoff; set $@RAT_SAILOR_CONTROL[9], $@RAT_SAILOR_CONTROL[9] + 2; - if ($@RAT_SAILOR_CONTROL[9] > 100) goto l_Timeout; - if (PC_DIE_COUNTER > $@RAT_SAILOR_DEATHS) goto l_Dead; - if ($@RAT_SAILOR_CONTROL[1] && $@RAT_SAILOR_CONTROL[2] && $@RAT_SAILOR_CONTROL[3] && $@RAT_SAILOR_CONTROL[4]) goto l_Done; - if (getmapusers("000-2-2.gat") == 0) goto l_CleaningEnd; - goto l_CheckRattos; + if ($@RAT_SAILOR_CONTROL[9] > 100) goto L_Timeout; + if (PC_DIE_COUNTER > $@RAT_SAILOR_DEATHS) goto L_Dead; + if ($@RAT_SAILOR_CONTROL[1] && $@RAT_SAILOR_CONTROL[2] && $@RAT_SAILOR_CONTROL[3] && $@RAT_SAILOR_CONTROL[4]) goto L_Done; + if (getmapusers("000-2-2.gat") == 0) goto L_CleaningEnd; + goto L_CheckRattos; end; -l_CheckRattos: +L_CheckRattos: if ($@RAT_SAILOR_CONTROL[1]) set $@RAT_SAILOR_CONTROL[5], $@RAT_SAILOR_CONTROL[5] + 2; if ($@RAT_SAILOR_CONTROL[2]) set $@RAT_SAILOR_CONTROL[6], $@RAT_SAILOR_CONTROL[6] + 2; if ($@RAT_SAILOR_CONTROL[3]) set $@RAT_SAILOR_CONTROL[7], $@RAT_SAILOR_CONTROL[7] + 2; @@ -228,7 +228,7 @@ l_CheckRattos: if ($@RAT_SAILOR_CONTROL[7] > 40) doevent "RattosControl::OnRatto3Respawn"; if ($@RAT_SAILOR_CONTROL[8] > 40) doevent "RattosControl::OnRatto4Respawn"; -l_NotYet: +L_NotYet: setnpctimer 0; end; @@ -239,34 +239,34 @@ OnDontneedHelp: next; mesq l("@@ is helping me.", $@RAT_SAILOR_HELPER$); - goto l_Quit; + goto L_Quit; -l_Timeout: +L_Timeout: mesn; mesq l("Hey! Be careful. You can't stay in this basement for so long, you're going to get sick. Come outside and take a break, maybe you can try again later."); warp "000-2-1", 72, 36; - goto l_CleaningClose; + goto L_CleaningClose; -l_Logoff: - goto l_CleaningEnd; +L_Logoff: + goto L_CleaningEnd; -l_Dead: +L_Dead: // Warps the dead body outside, so it does not interfere with the getmapusers check. if (getmapusers("000-2-2.gat") > 0) warp "000-2-1", 61, 36; - goto l_CleaningEnd; + goto L_CleaningEnd; -l_Done: +L_Done: set $@RAT_SAILOR_CONTROL[10], $@RAT_SAILOR_CONTROL[10] + 2; - if($@RAT_SAILOR_CONTROL[10] < 5) goto l_NotYet; + if($@RAT_SAILOR_CONTROL[10] < 5) goto L_NotYet; set @peter, getq(ShipQuests_Peter); - if (@peter == 2 || @peter == 4) goto l_Reward; + if (@peter == 2 || @peter == 4) goto L_Reward; warp "000-2-1.gat", 72, 36; - goto l_Thanks; + goto L_Thanks; -l_CleaningEnd: +L_CleaningEnd: stopnpctimer; set $@RAT_SAILOR_HELPER$, ""; set $@RAT_SAILOR_DEATHS, 0; @@ -278,7 +278,7 @@ l_CleaningEnd: end; -l_CleaningClose: +L_CleaningClose: stopnpctimer; set $@RAT_SAILOR_OLD_HELPER$, $@RAT_SAILOR_HELPER$; set $@RAT_SAILOR_HELPER$, ""; @@ -292,7 +292,7 @@ l_CleaningClose: close; -l_Reward: +L_Reward: warp "000-2-1.gat", 72, 36; setq ShipQuests_Peter, 5; set @peter, getq(ShipQuests_Peter); @@ -302,18 +302,18 @@ l_Reward: set zeny, zeny + 1000; message strcharinfo(0), l("You receive @@ E!", 1000); - goto l_CleaningClose; + goto L_CleaningClose; -l_Thanks: +L_Thanks: mesn; mesq l("Thanks for helping me!"); set @peter, getq(ShipQuests_Peter); if (@peter == 1) setq ShipQuests_Peter, 3; set @peter, getq(ShipQuests_Peter); - goto l_CleaningClose; + goto L_CleaningClose; -l_Quit: +L_Quit: set @peter, 0; close; diff --git a/npc/000-2-2/doors.txt b/npc/000-2-2/doors.txt index 77c8f6f6..0cb55416 100644 --- a/npc/000-2-2/doors.txt +++ b/npc/000-2-2/doors.txt @@ -9,27 +9,27 @@ 000-2-2.gat,48,29,0,1 script DoorUpwards 0,0,0,{ OnTouch: - if (getmapmobs("000-2-2.gat") > 0) goto l_Warn; + if (getmapmobs("000-2-2.gat") > 0) goto L_Warn; - goto l_Warp; + goto L_Warp; -l_Warn: +L_Warn: set @q, getq(ShipQuests_Peter); - if (@q == 5) goto l_Warp; + if (@q == 5) goto L_Warp; mesn "Narrator"; mes col(l("There are still some rattos left! Do you want to abort the quest?"), 9); next; menu - l("Yes."), l_Warp, + l("Yes."), L_Warp, l("No."), -; warp "000-2-2", 48, 28; closedialog; close; -l_Warp: +L_Warp: warp "000-2-1", 72, 36; closedialog; close; @@ -45,14 +45,14 @@ OnTouch: next; menu - rif(countitem("JohanneKey") > 0, l("Use the key.")), l_Warp, - l("Break the door."), l_Break, + rif(countitem("JohanneKey") > 0, l("Use the key.")), L_Warp, + l("Break the door."), L_Break, l("Go away."), -; closedialog; close; -l_Break: +L_Break: mes ""; mesn "Narrator"; @@ -60,7 +60,7 @@ l_Break: close; -l_Warp: +L_Warp: mes ""; mesn "Narrator"; mes col(l("Wait, it seems someone is blocking the door from the other side!"), 9); diff --git a/npc/000-2-3/box.txt b/npc/000-2-3/box.txt index ccc53420..9423cce5 100644 --- a/npc/000-2-3/box.txt +++ b/npc/000-2-3/box.txt @@ -28,11 +28,11 @@ menu l("Take a Bandana."), -, - l("Nothing."), l_Quit; + l("Nothing."), L_Quit; - if (@q == 0) goto l_NoQuest; - if (@q == 4) goto l_Give; - if (@q > 4) goto l_Already; + if (@q == 0) goto L_NoQuest; + if (@q == 4) goto L_Give; + if (@q > 4) goto L_Already; setcamnpc "Nard"; mes ""; @@ -41,7 +41,7 @@ close; -l_NoQuest: +L_NoQuest: mes ""; mesn "Narrator"; mes col(l("Nard looks surprised and stops you."), 9); @@ -62,7 +62,7 @@ l_NoQuest: menu l("Why not, I've got plenty of free time."), -, - l("I think that I'm still a bit sick."), l_Quit; + l("I think that I'm still a bit sick."), L_Quit; mes ""; mesn "Nard"; @@ -79,7 +79,7 @@ l_NoQuest: close; -l_Give: +L_Give: setcamnpc "Nard"; mes ""; mesn "Nard"; @@ -93,7 +93,7 @@ l_Give: close; -l_Already: +L_Already: setcamnpc "Nard"; mes ""; mesn "Nard"; @@ -101,7 +101,7 @@ l_Already: close; -l_Quit: +L_Quit: closedialog; close; } diff --git a/npc/000-2-3/elmo.txt b/npc/000-2-3/elmo.txt index 39e79e65..d2817b02 100644 --- a/npc/000-2-3/elmo.txt +++ b/npc/000-2-3/elmo.txt @@ -6,7 +6,7 @@ 000-2-3.gat,27,27,0,1 script Elmo 309;5,{ set @q, getq(ShipQuests_ArpanMoney); - if (@q == 1) goto l_GotMoney; + if (@q == 1) goto L_GotMoney; mesn; mesq l("Hey you, sorry for leaving your room so quickly, I needed to... Speak with the captain about... The reserve. You know, now that we have a new mouth to feed, we need to check what we have."); @@ -15,7 +15,7 @@ next; menu - l("Yes, Arpan gave me these clothes."), l_OhGood, + l("Yes, Arpan gave me these clothes."), L_OhGood, l("No."), -; mes ""; @@ -26,14 +26,14 @@ close; -l_OhGood: +L_OhGood: mes ""; mesn; mesq l("Oh good! Did he give you your money back as well?"); next; menu - l("Yes he did."), l_OhHeDid, + l("Yes he did."), L_OhHeDid, l("He told me nothing about that."), -; mes ""; @@ -42,14 +42,14 @@ l_OhGood: close; -l_OhHeDid: +L_OhHeDid: mes ""; mesn; mesq l("Ok, be patient a little while longer, in the next few days we will arrive at the port of Artis..."); close; -l_GotMoney: +L_GotMoney: mesn; mesq l("Be patient a little while longer, in the next few days we will arrive at the port of Artis..."); next; diff --git a/npc/000-2-3/nard.txt b/npc/000-2-3/nard.txt index 4e7d63ce..6b2398d5 100644 --- a/npc/000-2-3/nard.txt +++ b/npc/000-2-3/nard.txt @@ -27,14 +27,14 @@ set @gugli, getq(ShipQuests_Gugli); set @gado, getq(ShipQuests_ChefGado); -l_Checker: - if (@gado > 3 && @nard == 3) goto l_ChefQuestComplete; - if (@nard == 2) goto l_ChefQuestStart; - if (@nard == 3) goto l_ChefQuestGiven; - if (@nard == 4) goto l_Reward; - if (@nard > 4) goto l_Already; - if (@gugli == 2) goto l_Done; - if (@nard == 1) goto l_NotYet; +L_Checker: + if (@gado > 3 && @nard == 3) goto L_ChefQuestComplete; + if (@nard == 2) goto L_ChefQuestStart; + if (@nard == 3) goto L_ChefQuestGiven; + if (@nard == 4) goto L_Reward; + if (@nard > 4) goto L_Already; + if (@gugli == 2) goto L_Done; + if (@nard == 1) goto L_NotYet; mesn; mesq l("Hello."); @@ -56,10 +56,10 @@ l_Checker: mesq l("So, how do you feel? I see that Julia did a marvelous job! You look like you're in good health now."); next; -l_Menu: +L_Menu: menu - lg("I feel ok."), l_Ok, - l("Who's this Julia?"), l_Julia, + lg("I feel ok."), L_Ok, + l("Who's this Julia?"), L_Julia, lg("I'm a bit sick..."), -; mes ""; @@ -67,10 +67,10 @@ l_Menu: mesq l("Oh, I was going to ask you if you wanted to help the crew search for some food and explore the island out there."); next; -l_MenuQuest: +L_MenuQuest: menu l("What do you need?"), -, - l("Is there a reward?"), l_NeedHead; + l("Is there a reward?"), L_NeedHead; mes ""; mesn; @@ -80,13 +80,13 @@ l_MenuQuest: l("We need manpower on the island.")); next; - goto l_NeedContent; + goto L_NeedContent; -l_NeedHead: +L_NeedHead: mes ""; mesn; -l_NeedContent: +L_NeedContent: mesq l("Sure, there is a reward for your task."); next; mesq l("Our crew is like a family, and if you agree to help us, I would like to invite you to join our family!"); @@ -107,7 +107,7 @@ l_NeedContent: close; -l_Ok: +L_Ok: mes ""; mesn; mesq l("Good to know."); @@ -117,9 +117,9 @@ l_Ok: mesq l("It would be good for you to do some exercise, the ship isn't big enough for that."); next; - goto l_SpecialTask; + goto L_SpecialTask; -l_Julia: +L_Julia: mes ""; mesn; mesq l("You have an awful amnesia."); @@ -129,18 +129,18 @@ l_Julia: mesq lg("But most important, she is the one who took care of you when you were unconscious."); next; -l_SpecialTask: +L_SpecialTask: mesq l("I know that you are just starting to feel better, but I'd like to give you a special task."); next; - goto l_MenuQuest; + goto L_MenuQuest; -l_NotYet: +L_NotYet: mesn; mesq l("You still haven't completed your tasks."); close; -l_Done: +L_Done: mesn; mesq l("Hi @@.", strcharinfo(0)); next; @@ -148,14 +148,14 @@ l_Done: setq ShipQuests_Nard, 2; next; - goto l_ChefQuestRedir; + goto L_ChefQuestRedir; -l_ChefQuestStart: +L_ChefQuestStart: mesn; mesq l("Elmo told me you are now considered as one of us on the island. And I do appreciate the efforts you did down there."); next; -l_ChefQuestRedir: +L_ChefQuestRedir: mesq l("Unfortunately, we still need help from you. This time it will be a delicate task, here onboard."); next; mesq l("Elmo reported me about some frictions between my old and new lieutenants. You probably already met Julia and Gado the Chef."); @@ -173,13 +173,13 @@ l_ChefQuestRedir: close; -l_ChefQuestGiven: +L_ChefQuestGiven: mesn; mesq l("It seems you still have some work to do."); close; -l_ChefQuestComplete: +L_ChefQuestComplete: mesn; mesq l("Congratulations!"); next; @@ -206,13 +206,13 @@ l_ChefQuestComplete: close; -l_Reward: +L_Reward: mesn; mesq l("Hey! There's a reward for you in the box next to me!"); close; -l_Already: +L_Already: mesn; mesq l("Sorry, I don't need any help right now. Come back later."); diff --git a/npc/functions/inventoryplace.txt b/npc/functions/inventoryplace.txt index b34e773a..c51cbf1f 100644 --- a/npc/functions/inventoryplace.txt +++ b/npc/functions/inventoryplace.txt @@ -14,12 +14,12 @@ function script InventoryPlace { set @iteminfo, getiteminfo(getarg(0), 2); set @countitem, countitem(getarg(0)); - if (checkweight(getarg(0), getarg(1)) == 0) goto l_Warn; + if (checkweight(getarg(0), getarg(1)) == 0) goto L_Warn; if ((@iteminfo < 4) && (@countitem == 0) && (@inventorylist_count < 100)) return; if ((@iteminfo < 4) && (@countitem > 0)) return; if (@inventorylist_count + getarg(1) <= 100) return; -l_Warn: +L_Warn: mes ""; mesn "Narrator"; mes col(l("It looks like you can't carry anything else for now."), 9); diff --git a/npc/functions/sailordialogue.txt b/npc/functions/sailordialogue.txt index 4eb132bb..7ed802e0 100644 --- a/npc/functions/sailordialogue.txt +++ b/npc/functions/sailordialogue.txt @@ -8,18 +8,18 @@ function script SailorFood { mesn; set @q, rand(0, 400) / 100; - if (@q == 0) goto l_RandomA; - if (@q == 1) goto l_RandomB; - if (@q > 1) goto l_RandomC; + if (@q == 0) goto L_RandomA; + if (@q == 1) goto L_RandomB; + if (@q > 1) goto L_RandomC; -l_RandomA: +L_RandomA: mesq l("Hey."); next; mesq l("What did Gugli said about the box? Was it ok?"); next; menu - l("It's ok."), l_Fine, + l("It's ok."), L_Fine, l("He needs more food."), -; mes ""; @@ -28,21 +28,21 @@ l_RandomA: close; -l_Fine: +L_Fine: mes ""; mesn; mesq l("It's alright! Just one more box and it'll be ok."); close; -l_RandomB: +L_RandomB: mesq l("Thanks for the help!"); next; mesq l("These boxes are way too heavy to be brought alone onto the ship."); close; -l_RandomC: +L_RandomC: mesq l("I think that I'm soon done since I'll soon have a box full of @@s!", getitemlink("CrocClaw")); next; mesq l("And you? How's it going on your side?"); diff --git a/npc/items/croconut.txt b/npc/items/croconut.txt index 1273976c..b41d8e82 100644 --- a/npc/items/croconut.txt +++ b/npc/items/croconut.txt @@ -6,8 +6,8 @@ // Allows to cut a Croconut in multiple parts. // // Possible choices for L_Weapon: -// rif(countitem(35xx, 1), l(getitemname("xx"))), l_Weak, -// rif(countitem(35yy, 1), l(getitemname("yy"))), l_Good, +// rif(countitem(35xx, 1), l(getitemname("xx"))), L_Weak, +// rif(countitem(35yy, 1), l(getitemname("yy"))), L_Good, 000-2-1.gat,0,0,0 script Croconut 0,{ close; diff --git a/npc/items/oldbook.txt b/npc/items/oldbook.txt index 679beb56..6d79f254 100644 --- a/npc/items/oldbook.txt +++ b/npc/items/oldbook.txt @@ -15,12 +15,12 @@ OnUse: next; menu - l("Yes."), l_Read, + l("Yes."), L_Read, l("No."), -; close; -l_Read: +L_Read: mes ""; mes l("Aemil is a magnificent world unknown to us all."); next; |