diff options
| author | Trojal <trojal@gmail.com> | 2013-01-10 20:09:39 -0800 |
|---|---|---|
| committer | Trojal <trojal@gmail.com> | 2013-01-10 20:32:02 -0800 |
| commit | 83e7a4954437c13aec639b0b512252cc20a8f36c (patch) | |
| tree | b7f6d11b2058248d026f2d9944e8f4b6ac288d50 /npc/custom/stylist.txt | |
| parent | 51bfeb38eb139e97e0e1c096c85c15fba234f35b (diff) | |
| parent | 38e583df21eccd9e4f31d38acaae32579c6f0d27 (diff) | |
| download | hercules-83e7a4954437c13aec639b0b512252cc20a8f36c.tar.gz hercules-83e7a4954437c13aec639b0b512252cc20a8f36c.tar.bz2 hercules-83e7a4954437c13aec639b0b512252cc20a8f36c.tar.xz hercules-83e7a4954437c13aec639b0b512252cc20a8f36c.zip | |
Merge rathena repository to form Hercules initial commit.
Diffstat (limited to 'npc/custom/stylist.txt')
| -rw-r--r-- | npc/custom/stylist.txt | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/npc/custom/stylist.txt b/npc/custom/stylist.txt new file mode 100644 index 000000000..77bbf7bdb --- /dev/null +++ b/npc/custom/stylist.txt @@ -0,0 +1,36 @@ +//===== rAthena Script ======================================= +//= Stylist +//===== By: ================================================== +//= Euphy +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= rAthena SVN +//===== Description: ========================================= +//= Changes your hair style, hair color, and cloth color. +//===== Additional Comments: ================================= +//= 1.1 Switched to 'getbattleflag', credits to Saithis. [Euphy] +//============================================================ + +prontera,170,180,1 script Stylist#custom_stylist 122,{ + + setarray .@Styles[1],getbattleflag("max_cloth_color"),getbattleflag("max_hair_style"),getbattleflag("max_hair_color"); + setarray .@Look[1],7,1,6; + set .@s, select(" ~ Cloth color: ~ Hairstyle: ~ Hair color"); + set .@Revert, getlook(.@Look[.@s]); + set .@Style,1; + while(1) { + setlook .@Look[.@s], .@Style; + message strcharinfo(0),"This is style #"+.@Style+"."; + set .@menu$, " ~ Next (^0055FF"+((.@Style!=.@Styles[.@s])?.@Style+1:1)+"^000000): ~ Previous (^0055FF"+((.@Style!=1)?.@Style-1:.@Styles[.@s])+"^000000): ~ Jump to...: ~ Revert to original (^0055FF"+.@Revert+"^000000)"; + switch(select(.@menu$)) { + case 1: set .@Style, ((.@Style!=.@Styles[.@s])?.@Style+1:1); break; + case 2: set .@Style, ((.@Style!=1)?.@Style-1:.@Styles[.@s]); break; + case 3: message strcharinfo(0),"Choose a style between 1 - "+.@Styles[.@s]+"."; + input .@Style,0,.@Styles[.@s]; + if (!.@Style) set .@Style, rand(1,.@Styles[.@s]); + break; + case 4: set .@Style, .@Revert; setlook .@Look[.@s], .@Revert; break; + } + } +} |