diff options
Diffstat (limited to 'npc/commands/debug-look.txt')
-rw-r--r-- | npc/commands/debug-look.txt | 83 |
1 files changed, 0 insertions, 83 deletions
diff --git a/npc/commands/debug-look.txt b/npc/commands/debug-look.txt deleted file mode 100644 index 0a4a953b..00000000 --- a/npc/commands/debug-look.txt +++ /dev/null @@ -1,83 +0,0 @@ -function script BarberDebug { - function setStyle { - clear; - setnpcdialogtitle l("Appearance Debug - Barber"); - mes l("Hair style") + ": " + getlook(LOOK_HAIR); - next; - mes l("Please enter the desired style") + " (1-255)"; - input .@h, 1, 0xFF; - setlook LOOK_HAIR, max(1, min(0xFF, .@h)); - return; - } - function setColor { - clear; - setnpcdialogtitle l("Appearance Debug - Barber"); - mes l("Hair color") + ": " + getlook(LOOK_HAIR_COLOR); - next; - mes l("Please enter the desired color") + " (0-255)"; - input .@h, 0, 0xFF; - setlook LOOK_HAIR_COLOR, max(0, min(0xFF, .@h)); - return; - } - function setRace { - clear; - setnpcdialogtitle l("Appearance Debug - Race"); - mes l("Race") + ": " + Class + " (" + get_race(GETRACE_FULL) + ")"; - next; - mes l("Please enter the desired race") + " (0-32767)"; - input .@r, 0, 0x7FFF; - jobchange max(0, min(0x7FFF, .@r)); - return; - } - - do - { - clear; - setnpcdialogtitle l("Appearance Debug"); - mes l("This menu allows you to customize your appearance."); - mes ""; - - mes "---"; - mes l("Body type") + ": " + bodytypeToString(BodyType); - mes l("Hair style") + ": " + getlook(LOOK_HAIR); - mes l("Hair color") + ": " + getlook(LOOK_HAIR_COLOR); - mes l("Race") + ": " + Class + " (" + get_race() + ")";; - mes "---"; - - next; - mes l("What do you want to change?"); - select - menuimage("actions/edit", l("Body type") + " [" + l("Requires logout") + "]"), - menuimage("actions/edit", l("Hair style")), - menuimage("actions/edit", l("Hair color")), - menuimage("actions/edit", l("Race")), - rif(getarg(0,0), menuimage("actions/back", l("Return to Debug menu"))); - - switch (@menu) - { - case 1: BarberChangeBodyType(); break; - case 2: setStyle; break; - case 3: setColor; break; - case 4: setRace; break; - case 5: return; - } - } while (1); -} - - - -- script @look 32767,{ - end; - -OnCall: - if (!debug && !is_dev()) - { - end; - } - BarberDebug; - closeclientdialog; - end; - -OnInit: - bindatcmd "look", "@look::OnCall", 0, 99, 0; -} |