From aa9e8007503427c97dd8af6eaecb3c795176a2fe Mon Sep 17 00:00:00 2001 From: Joseph Botosh Date: Mon, 7 Sep 2015 23:11:28 +0300 Subject: split Barber function into 2 --- npc/functions/barber.txt | 19 +++++++------------ 1 file changed, 7 insertions(+), 12 deletions(-) (limited to 'npc/functions/barber.txt') diff --git a/npc/functions/barber.txt b/npc/functions/barber.txt index db92a1c8..6dd308fb 100644 --- a/npc/functions/barber.txt +++ b/npc/functions/barber.txt @@ -1,18 +1,12 @@ // Evol scripts. // Authors: // Reid +// Travolta // Description: // Function for supporting barber NPC. -function script Barber { - menu - l("I'd like to get a different style."), L_Style, - l("Can you do something with my color?"), L_Color, - l("Hmm, I'm fine for now, thank you."), L_Done; - - goto L_Done; +function script BarberChangeStyle { -L_Style: menu l("Bald"), -, l("Bowl cut"), -, @@ -45,13 +39,15 @@ L_Style: l("As you want!"), -, l("Hmm, I'm fine for now, thank you."), L_Done; -L_Process_Style: set @style, @menu; if (@style == 29) set @style, rand(28); setlook 1, @style; +L_Done: return; +} + +function script BarberChangeColor { -L_Color: menu l("Off black"), -, l("Ash brown"), -, @@ -76,11 +72,10 @@ L_Color: l("Esperia Blue"), -, l("Surprise me"), -, l("Hmm, I'm fine for now, thank you."), L_Done; + set @color, @menu - 1; if (@color == 21) set @color, rand(20); setlook 6, @color; - return; - L_Done: return; } -- cgit v1.2.3-70-g09d2