summaryrefslogtreecommitdiff
path: root/npc/custom/eAAC_Scripts/kafraExpress/ke_dye.txt
diff options
context:
space:
mode:
authorjmanfffreak <jmanfffreak@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-05-28 21:19:30 +0000
committerjmanfffreak <jmanfffreak@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-05-28 21:19:30 +0000
commit72cd35c33dee93b88969b579a0cc3327b2e7f2d6 (patch)
tree91b88d46c64c35aafa450284f989d769f0f42e0f /npc/custom/eAAC_Scripts/kafraExpress/ke_dye.txt
parent2aa1029edac5ac7cfb19de5ca5a1050ac5b8f87c (diff)
downloadhercules-72cd35c33dee93b88969b579a0cc3327b2e7f2d6.tar.gz
hercules-72cd35c33dee93b88969b579a0cc3327b2e7f2d6.tar.bz2
hercules-72cd35c33dee93b88969b579a0cc3327b2e7f2d6.tar.xz
hercules-72cd35c33dee93b88969b579a0cc3327b2e7f2d6.zip
Massive updates to /npc/custom folder:
* Removed eAAC scripts, which were outdated. (tid: 64380) (will be released in downloads section) * Removed scripts in /Lance/ folder, which haven't been updated in years. (will be released in downloads section) * Combined heal.txt and heal_payment.txt into one script, set options within file to enable or disable zeny requirement. * Added choice in job changer if you allow third job changes. * Updated warper with new towns and some dungeons. * Card remover now has option to prevent or allow item destruction upon removing failure * Removed 2-2shop and replaced with a full itemmall (thanks Masao!) * General file structure changes (possibly more later) git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16164 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/custom/eAAC_Scripts/kafraExpress/ke_dye.txt')
-rw-r--r--npc/custom/eAAC_Scripts/kafraExpress/ke_dye.txt134
1 files changed, 0 insertions, 134 deletions
diff --git a/npc/custom/eAAC_Scripts/kafraExpress/ke_dye.txt b/npc/custom/eAAC_Scripts/kafraExpress/ke_dye.txt
deleted file mode 100644
index 75160f320..000000000
--- a/npc/custom/eAAC_Scripts/kafraExpress/ke_dye.txt
+++ /dev/null
@@ -1,134 +0,0 @@
-//===== rAthena Script =======================================
-//= Kafra Express - Stylist Module
-//===== By: ==================================================
-//= Skotlex
-//===== Current Version: =====================================
-//= 2.0
-//===== Compatible With: =====================================
-//= rAthena SVN8637+
-//===== Description: =========================================
-//= Part of the Kafra Express Script Package.
-//= Offers dying of hair, clothes and hair-style adjusts
-//===== Additional Comments: =================================
-//= See config.txt for configuration.
-//============================================================
-
-- script keInit_dye -1,{
-OnInit: //Load Config
- donpcevent "keConfig::OnLoadDye";
- end;
-}
-
-function script F_keStylist {
-
- function SF_inputpalette;
- function SF_wheelpalette;
-
- set @jobClass,eaclass(class);
- if (@jobClass == -1)
- set @maxCDye,0;
- else {
- if ((@jobClass&EAJ_BASEMASK) == EAJ_NOVICE) {
- if (@jobClass&EAJL_2)
- set @maxCDye, $@kedy_clothJSN;
- else
- set @maxCDye, $@kedy_clothJN;
- } else {
- if (@jobClass&EAJL_2)
- set @maxCDye, $@kedy_clothJ2ND;
- else
- set @maxCDye, $@kedy_clothJ1ST;
- } }
- do {
- if ($@kedy_enableHairstyle) {
- set @kmenu, select(
- "- Return",
- "- Change hairstyle (current is "+getlook(1)+"/max is "+$@kedy_styles+")",
- "- Change hairstyle (by wheel)",
- "- Dye hair (current is "+getlook(6)+"/max is "+$@kedy_hair+")",
- "- Dye hair (by wheel)",
- "- Dye clothes (current is "+getlook(7)+"/max is "+@maxCDye+")",
- "- Dye clothes (by wheel)"
- );
- } else {
- set @kmenu, select(
- "- Return",
- "- Dye hair (current is "+getlook(6)+"/max is "+$@kedy_hair+")",
- "- Dye hair (by wheel)",
- "- Dye clothes (current is "+getlook(7)+"/max is "+@maxCDye+")",
- "- Dye clothes (by wheel)"
- );
- if (@kmenu > 1)
- set @kmenu, @kmenu+2;
- }
- switch (@kmenu) {
- case 2: //Hair Style Input
- SF_inputpalette 1,$@kedy_styles;
- break;
- case 3: //Hair Style Wheel
- SF_wheelpalette 1,$@kedy_styles;
- break;
- case 4: //Hair Dye Input
- SF_inputpalette 6,$@kedy_hair;
- break;
- case 5: //Hair Dye Wheel
- SF_wheelpalette 6,$@kedy_hair;
- break;
- case 6: //Clothes Input
- SF_inputpalette 7,@maxCDye;
- break;
- case 7: //Clothes Wheel
- SF_wheelpalette 7,@maxCDye ;
- break;
- }
- } while (@kmenu > 1);
- return;
-
-//Subfunction: SF_inputpalette(int part, int maxPalette)
-//Sets a palette from the user's request.
-function SF_inputpalette {
- input @pal;
- if (@pal < 0 || @pal > getarg(1)) {
- callfunc "F_keIntro", e_swt2, "Sorry, we do not have that dye available.";
- return;
- }
- setlook getarg(0),@pal;
- emotion e_lv;
-} //SF_ end
-
-//Subfunction: SF_wheelpalette(int part, int maxPalette)
-//Sets a palette through browsing.
-function SF_wheelpalette {
- set @loc, getarg(0);
- set @max, getarg(1);
- set @pal, getlook(@loc);
- set @dir, 1;
- do {
- if (@dir > 0)
- set @submenu, select(
- "Next",
- "Previous",
- "Done (current is "+@pal+")"
- );
- else
- set @submenu, select(
- "Previous",
- "Next",
- "Done (current is "+@pal+")"
- );
- switch (@submenu) {
- case 2: //Swap direction
- set @dir, @dir*-1;
- case 1:
- set @pal, @pal+@dir;
- if (@pal < 0)
- set @pal, @max;
- else if (@pal > @max)
- set @pal, 0;
- setlook @loc,@pal;
- }
- } while (@submenu != 3);
- emotion e_lv2;
-} //SF_ end
-
-}