summaryrefslogtreecommitdiff
path: root/world/map/npc/009-2/selim.txt
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/009-2/selim.txt')
-rw-r--r--world/map/npc/009-2/selim.txt98
1 files changed, 53 insertions, 45 deletions
diff --git a/world/map/npc/009-2/selim.txt b/world/map/npc/009-2/selim.txt
index 0f01da40..a919240c 100644
--- a/world/map/npc/009-2/selim.txt
+++ b/world/map/npc/009-2/selim.txt
@@ -7,7 +7,6 @@
009-2.gat,32,104,0|script|Selim|326,{
setarray @all_colours$, "red", "green", "dark blue", "yellow", "light blue", "pink", "black", "orange", "purple", "dark green";
- setarray @all_colours_cap$, "Red", "Green", "Dark Blue", "Yellow", "Light Blue", "Pink", "Black", "Orange", "Purple", "Dark Green";
mes "[Selim]";
mes "\"What can I dye for you today?\"";
@@ -18,36 +17,26 @@ L_clothes_choice:
set @pronoun$, "it";
set @is_verb$, "is";
menu
- "Cotton shirt", L_cottonshirt,
- "V-Neck sweater", L_vneck,
- "Turtleneck sweater", L_tneck,
- "Cotton shorts", L_shorts,
- "Cotton trousers", L_trousers,
- "Cotton skirt", L_skirt,
- "Miniskirt", L_miniskirt,
- "Tank top ", L_tanktop,
- "Short tank top", L_tanktop_short,
- "Silk robe", L_robe,
- "Cotton headband", L_headband,
- "Desert hat", L_desert_hat,
- "Cotton boots", L_cottonboots,
- "Cotton gloves", L_cottongloves,
- "Rabbit ears", L_rabbitears,
- "Wizard hat", L_wizardhat,
- "Bowler hat", L_bowlerhat,
- "Red lined sorcerer robe", L_redlinedsorcererrobe,
- "Green lined sorcerer robe", L_greenlinedsorcererrobe,
- "Dark blue lined sorcerer robe", L_darkbluelinedsorcererrobe,
- "Yellow lined sorcerer robe", L_yellowlinedsorcererrobe,
- "Light blue lined sorcerer robe", L_lightbluelinedsorcererrobe,
- "Pink lined sorcerer robe", L_pinklinedsorcererrobe,
- "Black lined sorcerer robe", L_blacklinedsorcererrobe,
- "Orange lined sorcerer robe", L_orangelinedsorcererrobe,
- "Purple lined sorcerer robe", L_purplelinedsorcererrobe,
- "Dark green lined sorcerer robe", L_darkgreenlinedsorcererrobe,
- "White lined sorcerer robe", L_whitelinedsorcererrobe,
- "Bowler hat (brown)", L_bowlerhatbrown,
- "Fine dress", L_finedress,
+ "Cotton shirt.", L_cottonshirt,
+ "V-Neck sweater.", L_vneck,
+ "Turtleneck sweater.", L_tneck,
+ "Cotton shorts.", L_shorts,
+ "Cotton trousers.", L_trousers,
+ "Cotton skirt.", L_skirt,
+ "Miniskirt.", L_miniskirt,
+ "Tank top.", L_tanktop,
+ "Short tank top.", L_tanktop_short,
+ "Silk robe.", L_robe,
+ "Cotton headband.", L_headband,
+ "Desert hat.", L_desert_hat,
+ "Cotton boots.", L_cottonboots,
+ "Cotton gloves.", L_cottongloves,
+ "Rabbit ears.", L_rabbitears,
+ "Wizard hat.", L_wizardhat,
+ "Bowler hat.", L_bowlerhat,
+ "Sorcerer robe.", L_sorcererrobe,
+ "Bowler hat (brown).", L_bowlerhatbrown,
+ "Fine dress.", L_finedress,
"About these sorcerer robes...", L_asksorcererrobe,
"I'm fine for now, thanks.", -;
close;
@@ -160,6 +149,25 @@ L_bowlerhat:
set @name$, "bowler hat";
goto L_picked_item;
+L_sorcererrobe:
+ mes "[Selim]";
+ mes "\"Which one?\"";
+ next;
+ menu
+ "A red lined one.", L_redlinedsorcererrobe,
+ "A green lined one.", L_greenlinedsorcererrobe,
+ "A dark blue lined one.", L_darkbluelinedsorcererrobe,
+ "A yellow lined one.", L_yellowlinedsorcererrobe,
+ "A light blue lined one.", L_lightbluelinedsorcererrobe,
+ "A pink lined one.", L_pinklinedsorcererrobe,
+ "A black lined one.", L_blacklinedsorcererrobe,
+ "An orange lined one.", L_orangelinedsorcererrobe,
+ "A purple lined one.", L_purplelinedsorcererrobe,
+ "A dark green lined one.", L_darkgreenlinedsorcererrobe,
+ "A white lined one.", L_whitelinedsorcererrobe,
+ "I'm fine for now, thanks.", -;
+ close;
+
L_redlinedsorcererrobe:
set @del, 798;
set @new, 2220;
@@ -272,20 +280,20 @@ L_colour:
mes "\"Excellent. Now, what color do you want?\"";
next;
menu
- @all_colours_cap$[0], -,
- @all_colours_cap$[1], -,
- @all_colours_cap$[2], -,
- @all_colours_cap$[3], -,
- @all_colours_cap$[4], -,
- @all_colours_cap$[5], -,
- @all_colours_cap$[6], -,
- @all_colours_cap$[7], -,
- @all_colours_cap$[8], -,
- @all_colours_cap$[9], -;
- set @colour, @menu - 1;
- set @vial, 690 + @colour;
- if (countitem(@vial) == 0) goto L_no_dye;
- goto L_finish;
+ "Red.", -,
+ "Green.", -,
+ "Dark Blue.", -,
+ "Yellow.", -,
+ "Light Blue.", -,
+ "Pink.", -,
+ "Black.", -,
+ "Orange.", -,
+ "Purple.", -,
+ "Dark Green.", -;
+ set @colour, @menu - 1;
+ set @vial, 690 + @colour;
+ if (countitem(@vial) == 0) goto L_no_dye;
+ goto L_finish;
L_no_dye:
mes "[Selim]";