#include "x2_inc_switches"
#include "inc_char_token"
#include "inc_udc_conv"

void HandleUDC();

void main()
{
    if(udcGetResult() != ""){
        HandleUDC();
        return;
    }

    object oPC = GetPCSpeaker();

    udcClear(oPC);
    udcSetDescriptor(oPC, "Wildshape form to override?");
    udcAddOption(oPC, "Bear Form", "Bear_a", "d1_wildshap_ctrl");
    udcAddOption(oPC, "Panther Form", "Pant_a", "d1_wildshap_ctrl");
    udcAddOption(oPC, "Wolf Form", "Wolf_a", "d1_wildshap_ctrl");
    udcAddOption(oPC, "Boar Form", "Boar_a", "d1_wildshap_ctrl");
    udcAddOption(oPC, "Badger Form", "Badg_a", "d1_wildshap_ctrl");
    udcDisplay(oPC);
}

void HandleUDC(){
    string sResult = udcGetResult();
    object oPC = GetPCSpeaker();
    udcClearResult();

    string sForm = GetStringLeft(sResult, 4);
    string sPage = GetStringRight(GetStringLeft(sResult, 6), 1);
    string sIndex = GetStringRight(sResult, GetStringLength(sResult) - 6);
    int nDruidLevel = GetLevelByClass(CLASS_TYPE_DRUID, oPC);

    if(sIndex != ""){
        SetTokenInt(oPC, "nWildshape_" + sForm + "Shape", StringToInt(sIndex));
        SendMessageToPC(oPC, "(" + sForm + ") Form overrided to Form " + sIndex);
    }else if(sPage == "a"){
        udcClear(oPC);
        udcSetDescriptor(oPC, "Wildshape form to override to?");
        udcAddOption(oPC, "Badger Form", sResult + "25", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Bat Form", sResult + "108", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Boar Form", sResult + "24", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Chicken Form", sResult + "40", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Deep Rothe Form", sResult + "107", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Fire Beetle Form", sResult + "110", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Giant Spider Form", sResult + "124", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Panther Form", sResult + "22", "d1_wildshap_ctrl");
        udcAddOption(oPC, "(Next Page)", sForm + "_b", "d1_wildshap_ctrl");
        udcDisplay(oPC);
    }else if(sPage == "b"){
        udcClear(oPC);
        udcSetDescriptor(oPC, "Wildshape form to override to?");
        udcAddOption(oPC, "(Prev Page)", sForm + "_a", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Slicer Beetle Form", sResult + "109", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Raven Form", sResult + "119", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Rat Form", sResult + "122", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Wolf Form", sResult + "23", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Worg Form", sResult + "118", "d1_wildshap_ctrl");
        if(nDruidLevel >= 8){
            udcAddOption(oPC, "Dire Rat Form", sResult + "123", "d1_wildshap_ctrl");
            udcAddOption(oPC, "Krenshar Form", sResult + "117", "d1_wildshap_ctrl");
            udcAddOption(oPC, "(Next Page)", sForm + "_c", "d1_wildshap_ctrl");
        }
        udcDisplay(oPC);
    }else if(sPage == "c"){
        udcClear(oPC);
        udcSetDescriptor(oPC, "Wildshape form to override to?");
        udcAddOption(oPC, "(Prev Page)", sForm + "_b", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Phase Spider Form", sResult + "112", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Shadow Mastiff Form", sResult + "116", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Stink Beetle Form", sResult + "111", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Sword Spider Form", sResult + "120", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Mako Shark Form ", sResult + "125", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Hammerhead Shark Form", sResult + "126", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Goblin Shark Form", sResult + "127", "d1_wildshap_ctrl");
        if(nDruidLevel >= 12){
            udcAddOption(oPC, "(Next Page)", sForm + "_d", "d1_wildshap_ctrl");
        }
        udcDisplay(oPC);
    }else if(sPage == "d"){
        udcClear(oPC);
        udcSetDescriptor(oPC, "Wildshape form to override to?");
        udcAddOption(oPC, "(Prev Page)", sForm + "_c", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Dire Badger Form", sResult + "37", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Dire Boar Form", sResult + "36", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Dire Panther Form", sResult + "34", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Dire Spider Form", sResult + "121", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Dire Wolf Form", sResult + "35", "d1_wildshap_ctrl");
        udcAddOption(oPC, "Stag Beetle Form", sResult + "113", "d1_wildshap_ctrl");

        udcDisplay(oPC);
    }
}