// TMW2 Scripts.
// Author:
//  Jesusalva

003-2,38,34,0	script	Lua#003-2	NPC_FEMALE,{
    mesn;
    mesq l("Hello, I act on the Alliance's behalf.");
    mes "";
    if (getgmlevel()) goto L_AdminMenu;
    menu
        l("Ok, see you later."),L_Close,
        l("What alliance?"),-;
    mes "";
    mesn;
    mesq l("The Alliance which was formed after the war!");
    close;

L_AdminMenu:
    menu
        l("I'm done here, thanks."), L_Close,
        l("I need a GM set, please!"), L_GMItems;

L_GMItems:
    getnameditem "GMRobe", strcharinfo(0);
    getnameditem "GMCap", strcharinfo(0);
    logmes(strcharinfo(0)+" just took a GM set.");
    logmes("@GMSet "+strcharinfo(0), LOGMES_ATCOMMAND);
    mes "";
    mesn;
    mesq lg("Here they are, miss.", "Here they are, mister.");
    mes "";
    goto L_AdminMenu;

L_Close:
    close;

OnInit:
    .@npcId = getnpcid(0, .name$);
    setunitdata(.@npcId, UDT_HEADTOP, 1322); // Dress
    setunitdata(.@npcId, UDT_HEADMIDDLE, 2204); // Not needed
    setunitdata(.@npcId, UDT_HEADBOTTOM, 1800); // Shoes
    setunitdata(.@npcId, UDT_WEAPON, 3501);
    setunitdata(.@npcId, UDT_HAIRSTYLE, 12);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 5);

    .sex = G_FEMALE;
    .distance = 4;
    end;
}