npc/items/mirror.txt


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

function	script	useMirror	{
    callfunc "getHeadStyles";
    goto L_Rand;

L_Rand:
    .@mirror_rnd = .@mirror_rnd + 1;
    @style = rand(1,getarraysize($@hairstyle$)-1);
    @color = rand(getarraysize($@haircolor$));
    if (((getlook(LOOK_HAIR_STYLE) == @style) ||
        (getlook(LOOK_HAIR_COLOR) == @color)) &&
        .@mirror_rnd < 15)
            goto L_Rand;
    if (@fixedMirror)
        setlook LOOK_HAIR_STYLE, @style;
    setlook LOOK_HAIR_COLOR, @color;
    //if(!@fixedMirror) getitem "SilverMirror", 1; <== this can be used in the future to have a portable hair color changer (like scissors but for the color)
    @fixedMirror = 0;
    return;
}