more spells

1 files changed, 0 insertions, 1269 deletions

diff --git a/reference/game.c b/reference/game.c
index b469c0e..15b71f3 100644
--- a/reference/game.c
+++ b/reference/game.c
@@ -20852,1275 +20852,6 @@ void __static_initialization_and_destruction_0(int __initialize_p,int __priority
     return;

 }

 

-// WARNING: Unknown calling convention -- yet parameter storage is locked

-

-void CreatureIllusion(void)

-

-{

-    bool bVar1;

-    char *pcVar2;

-    int iVar3;

-    undefined4 *puVar4;

-    int i;

-    int iVar5;

-    int Race;

-    int Race_00;

-    TCreature *in_stack_00000004;

-    int in_stack_00000008;

-    int in_stack_0000000c;

-    char *in_stack_00000010;

-    Object local_3c [6];

-    int local_24;

-    anon_union_4_2_730cd3ca_for_TOutfit_2 local_20;

-    

-    if (in_stack_00000004 == (TCreature *)0x0) {

-        pcVar2 = &DAT_080fc0c0;

-    }

-    else {

-        if (in_stack_00000010 != (char *)0x0) {

-            iVar5 = 1;

-            do {

-                    // try { // try from 08085c5f to 08085db2 has its CatchHandler @ 08085dd0

-                pcVar2 = GetRaceName(iVar5);

-                iVar3 = stricmp(in_stack_00000010,pcVar2,-1);

-                Race_00 = iVar5;

-                if (iVar3 == 0) break;

-                iVar5 = iVar5 + 1;

-                Race_00 = 0;

-            } while (iVar5 < 0x200);

-            if (Race_00 == 0) {

-                puVar4 = (undefined4 *)__cxa_allocate_exception(4);

-                *puVar4 = 0x19;

-            }

-            else {

-                bVar1 = GetRaceNoIllusion(Race_00);

-                if (!bVar1) {

-                    CheckMana(in_stack_00000004,in_stack_00000008,in_stack_0000000c,1000);

-                    iVar5 = TSkill::Get((in_stack_00000004->super_TSkillBase).Skills[0x10]);

-                    if (iVar5 == 0) {

-                        GetRaceOutfit((int)&local_24);

-                        (in_stack_00000004->Outfit).OutfitID = local_24;

-                        (in_stack_00000004->Outfit).field_1 = local_20;

-                        TSkillBase::SetTimer(&in_stack_00000004->super_TSkillBase);

-                    }

-                    local_3c[0].ObjectID = (in_stack_00000004->CrObject).ObjectID;

-                    GraphicalEffect(local_3c,0xd);

-                    return;

-                }

-                puVar4 = (undefined4 *)__cxa_allocate_exception(4);

-                *puVar4 = 1;

-            }

-            goto LAB_08085d6e;

-        }

-        pcVar2 = &DAT_080fc080;

-    }

-    error(pcVar2);

-    puVar4 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar4 = 0xffffffff;

-LAB_08085d6e:

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar4,&RESULT::typeinfo,0);

-}

-

-

-

-// WARNING: Unknown calling convention -- yet parameter storage is locked

-

-void ObjectIllusion(void)

-

-{

-    bool bVar1;

-    int iVar2;

-    ulong uVar3;

-    undefined4 *puVar4;

-    TCreature *in_stack_00000004;

-    int in_stack_00000008;

-    int in_stack_0000000c;

-    Object *in_stack_00000010;

-    char *Text;

-    Object local_2c [7];

-    

-    if (in_stack_00000004 == (TCreature *)0x0) {

-        Text = &DAT_080fc140;

-    }

-    else {

-                    // try { // try from 08085e10 to 08085f85 has its CatchHandler @ 08085fa3

-        bVar1 = Object::exists(in_stack_00000010);

-        if (bVar1) {

-            Object::getObjectType(local_2c);

-            if (local_2c[0].ObjectID != 99) {

-                Object::getObjectType(local_2c);

-                bVar1 = ObjectType::getFlag((ObjectType *)local_2c,UNMOVE);

-                if (!bVar1) {

-                    CheckMana(in_stack_00000004,in_stack_00000008,in_stack_0000000c,1000);

-                    iVar2 = TSkill::Get((in_stack_00000004->super_TSkillBase).Skills[0x10]);

-                    if (iVar2 == 0) {

-                        (in_stack_00000004->Outfit).OutfitID = 0;

-                        Object::getObjectType(local_2c);

-                        bVar1 = ObjectType::getFlag((ObjectType *)local_2c,DISGUISE);

-                        if (bVar1) {

-                            Object::getObjectType(local_2c);

-                            uVar3 = ObjectType::getAttribute((ObjectType *)local_2c,DISGUISETARGET);

-                            local_2c[0].ObjectID._0_2_ = (ushort)uVar3;

-                        }

-                        else {

-                            Object::getObjectType(local_2c);

-                        }

-                        (in_stack_00000004->Outfit).field_1.ObjectType =

-                             (ushort)local_2c[0].ObjectID;

-                        TSkillBase::SetTimer(&in_stack_00000004->super_TSkillBase);

-                    }

-                    local_2c[0].ObjectID = (in_stack_00000004->CrObject).ObjectID;

-                    GraphicalEffect(local_2c,0xd);

-                    return;

-                }

-            }

-            puVar4 = (undefined4 *)__cxa_allocate_exception(4);

-            *puVar4 = 2;

-            goto LAB_08085f62;

-        }

-        Text = &DAT_080fc100;

-    }

-    error(Text);

-    puVar4 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar4 = 0xffffffff;

-LAB_08085f62:

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar4,&RESULT::typeinfo,0);

-}

-

-

-

-void ChangeData(TCreature *cr,char *Param)

-

-{

-    bool bVar1;

-    uint Value;

-    char *pcVar2;

-    undefined4 *puVar3;

-    INSTANCEATTRIBUTE Attribute;

-    Object local_6c [4];

-    Object local_5c [4];

-    Object local_4c [4];

-    ulong local_3c;

-    Object Obj2;

-    ulong local_2c;

-    Object Obj;

-    

-    if (cr == (TCreature *)0x0) {

-        pcVar2 = &DAT_080fc260;

-    }

-    else if (Param == (char *)0x0) {

-        pcVar2 = &DAT_080fc220;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 08086004 to 080863b4 has its CatchHandler @ 080863c7

-            bVar1 = CheckRight(cr->ID,CREATE_OBJECTS);

-            if (bVar1) {

-                GetBodyObject((ulong)&local_2c,cr->ID);

-                GetBodyObject((ulong)&local_3c,cr->ID);

-                bVar1 = false;

-                local_4c[0].ObjectID = NONE.ObjectID;

-                local_5c[0].ObjectID = NONE.ObjectID;

-                if ((local_2c != NONE.ObjectID) &&

-                   (local_6c[0].ObjectID = NONE.ObjectID, local_3c != NONE.ObjectID)) {

-                    bVar1 = true;

-                }

-                if (bVar1) {

-                    SendMessage(cr->Connection,0x17,"First drop one object.");

-                }

-                else {

-                    if (local_3c != NONE.ObjectID) {

-                        local_4c[0].ObjectID = local_3c;

-                        local_2c = local_3c;

-                    }

-                    local_6c[0].ObjectID = NONE.ObjectID;

-                    local_5c[0].ObjectID = local_4c[0].ObjectID;

-                    if (local_2c == NONE.ObjectID) {

-                        GetFirstObject();

-                        local_2c = local_4c[0].ObjectID;

-                        bVar1 = local_4c[0].ObjectID != NONE.ObjectID;

-                        local_5c[0].ObjectID = NONE.ObjectID;

-                        local_4c[0].ObjectID = NONE.ObjectID;

-                        if (bVar1) {

-                            do {

-                                local_5c[0].ObjectID = NONE.ObjectID;

-                                local_4c[0].ObjectID = NONE.ObjectID;

-                                Object::getObjectType(local_5c);

-                                bVar1 = ObjectType::getFlag((ObjectType *)local_5c,KEYDOOR);

-                                if (bVar1) break;

-                                Object::getNextObject(local_4c);

-                                local_2c = local_4c[0].ObjectID;

-                                local_5c[0] = (Object)NONE.ObjectID;

-                                bVar1 = local_4c[0].ObjectID != NONE.ObjectID;

-                                local_4c[0].ObjectID = local_5c[0].ObjectID;

-                            } while (bVar1);

-                        }

-                    }

-                    if (local_2c != NONE.ObjectID) {

-                        local_6c[0].ObjectID = NONE.ObjectID;

-                        Value = __strtol_internal(Param,0,10,0);

-                        Object::getObjectType(local_6c);

-                        bVar1 = ObjectType::getFlag((ObjectType *)local_6c,LIQUIDCONTAINER);

-                        if (bVar1) {

-                            Attribute = CONTAINERLIQUIDTYPE;

-                        }

-                        else {

-                            Object::getObjectType(local_6c);

-                            bVar1 = ObjectType::getFlag((ObjectType *)local_6c,KEY);

-                            if ((bVar1) && (Value != 0)) {

-                                Attribute = KEYNUMBER;

-                            }

-                            else {

-                                Object::getObjectType(local_6c);

-                                bVar1 = ObjectType::getFlag((ObjectType *)local_6c,KEYDOOR);

-                                if ((bVar1) && (Value != 0)) {

-                                    Attribute = KEYHOLENUMBER;

-                                }

-                                else {

-                                    Object::getObjectType(local_6c);

-                                    bVar1 = ObjectType::getFlag((ObjectType *)local_6c,CUMULATIVE);

-                                    if (((bVar1) && (Value != 0)) && (Value < 0x65)) {

-                                        Attribute = AMOUNT;

-                                    }

-                                    else {

-                                        Object::getObjectType(local_6c);

-                                        bVar1 = ObjectType::getFlag((ObjectType *)local_6c,RUNE);

-                                        if (((!bVar1) || (Value == 0)) || (99 < Value)) {

-                                            local_6c[0].ObjectID = local_2c;

-                                            pcVar2 = GetName(local_6c);

-                                            SendMessage(cr->Connection,0x17,

-                                                        "You can\'t change %s in this way.",pcVar2);

-                                            return;

-                                        }

-                                        Attribute = CHARGES;

-                                    }

-                                }

-                            }

-                        }

-                        local_6c[0].ObjectID = local_2c;

-                        Change(local_6c,Attribute,Value);

-                        local_6c[0].ObjectID = (cr->CrObject).ObjectID;

-                        GraphicalEffect(local_6c,0xf);

-                    }

-                }

-            }

-            return;

-        }

-        pcVar2 = "ChangeData: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(pcVar2);

-    puVar3 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar3 = 0xffffffff;

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar3,&RESULT::typeinfo,0);

-}

-

-

-

-// WARNING: Unknown calling convention -- yet parameter storage is locked

-

-void EnchantObject(void)

-

-{

-    bool bVar1;

-    undefined4 *puVar2;

-    bool bVar3;

-    TCreature *in_stack_00000004;

-    int in_stack_00000008;

-    int in_stack_0000000c;

-    int *in_stack_00000010;

-    int *in_stack_00000014;

-    ulong Position;

-    undefined4 uVar4;

-    Object local_9c [4];

-    Object local_8c [4];

-    ulong local_7c [4];

-    Object local_6c [4];

-    ObjectType local_5c [4];

-    Object local_4c [4];

-    ulong local_3c;

-    ulong local_2c;

-    Object Obj;

-    

-    if (in_stack_00000004 == (TCreature *)0x0) {

-        error(&DAT_080fc2a0);

-        puVar2 = (undefined4 *)__cxa_allocate_exception(4);

-        *puVar2 = 0xffffffff;

-        goto LAB_08086535;

-    }

-                    // try { // try from 08086418 to 080865e9 has its CatchHandler @ 08086601

-    GetBodyObject((ulong)&local_2c,in_stack_00000004->ID);

-    bVar1 = false;

-    local_3c = NONE.ObjectID;

-    if (local_2c == NONE.ObjectID) {

-LAB_08086438:

-        bVar1 = true;

-    }

-    else {

-        Object::getObjectType(local_4c);

-        ObjectType::setTypeID(local_5c,*in_stack_00000010);

-        ObjectType::setTypeID((ObjectType *)local_6c,local_5c[0].TypeID);

-        if (local_4c[0].ObjectID != local_6c[0].ObjectID) goto LAB_08086438;

-    }

-    if (!bVar1) goto LAB_0808644c;

-    uVar4 = 6;

-    Position = in_stack_00000004->ID;

-    GetBodyObject((ulong)local_7c,Position);

-    bVar1 = false;

-    local_2c = local_7c[0];

-    bVar3 = local_7c[0] == NONE.ObjectID;

-    local_6c[0].ObjectID = local_7c[0];

-    local_7c[0] = NONE.ObjectID;

-    if (bVar3) {

-LAB_0808650f:

-        local_8c[0].ObjectID = Position;

-        bVar1 = true;

-    }

-    else {

-        Object::getObjectType(local_6c);

-        ObjectType::setTypeID((ObjectType *)local_8c,*in_stack_00000010);

-        ObjectType::setTypeID((ObjectType *)local_9c,local_8c[0].ObjectID);

-        Position = local_8c[0].ObjectID;

-        if (local_6c[0].ObjectID != local_9c[0].ObjectID) goto LAB_0808650f;

-    }

-    if (bVar1) {

-        puVar2 = (undefined4 *)__cxa_allocate_exception(4,local_8c[0].ObjectID,uVar4);

-        *puVar2 = 0x22;

-LAB_08086535:

-                    // WARNING: Subroutine does not return

-        __cxa_throw(puVar2,&RESULT::typeinfo,0);

-    }

-LAB_0808644c:

-    CheckMana(in_stack_00000004,in_stack_00000008,in_stack_0000000c,1000);

-    ObjectType::setTypeID((ObjectType *)local_9c,*in_stack_00000014);

-    local_8c[0].ObjectID = local_2c;

-    Change(local_8c,(ObjectType *)local_9c,0);

-    local_9c[0].ObjectID = (in_stack_00000004->CrObject).ObjectID;

-    GraphicalEffect(local_9c,0xf);

-    return;

-}

-

-

-

-void Convince(TCreature *master,TCreature *slave)

-

-{

-    bool bVar1;

-    int Mana;

-    int iVar2;

-    undefined4 *puVar3;

-    int Delay;

-    Object local_2c [7];

-    

-    if (slave->Type == MONSTER) {

-        if ((master->Type == PLAYER) && (1 < master->SummonedCreatures)) {

-            puVar3 = (undefined4 *)__cxa_allocate_exception(4);

-            *puVar3 = 0x38;

-            goto LAB_08086716;

-        }

-        if (WorldType == NON_PVP) {

-            iVar2 = (*master->_vptr_TCreature[4])(master);

-            if ((char)iVar2 != '\0') {

-                iVar2 = (*slave->_vptr_TCreature[4])(slave);

-                if ((char)iVar2 != '\0') goto LAB_08086750;

-            }

-        }

-                    // try { // try from 0808666f to 08086747 has its CatchHandler @ 08086778

-        bVar1 = GetRaceNoConvince(slave->Race);

-        if (!bVar1) {

-            iVar2 = GetRaceSummonCost(slave->Race);

-            Delay = 1000;

-            if (WorldType != PVP_ENFORCED) {

-                Delay = 2000;

-            }

-            CheckMana(master,iVar2,0,Delay);

-            ConvinceMonster(master,slave);

-            local_2c[0].ObjectID = (master->CrObject).ObjectID;

-            GraphicalEffect(local_2c,0xd);

-            local_2c[0].ObjectID = (slave->CrObject).ObjectID;

-            GraphicalEffect(local_2c,10);

-            return;

-        }

-        puVar3 = (undefined4 *)__cxa_allocate_exception(4);

-        *puVar3 = 1;

-    }

-    else {

-LAB_08086750:

-        puVar3 = (undefined4 *)__cxa_allocate_exception(4);

-        *puVar3 = 0x2b;

-    }

-LAB_08086716:

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar3,&RESULT::typeinfo,0);

-}

-

-

-

-// WARNING: Unknown calling convention -- yet parameter storage is locked

-

-void Challenge(void)

-

-{

-    bool bVar1;

-    TCreature *Monster;

-    int dy;

-    int iVar2;

-    int dx;

-    int zx;

-    TCreature *in_stack_00000004;

-    int in_stack_00000008;

-    int in_stack_0000000c;

-    int in_stack_00000010;

-    int iVar3;

-    ObjectType *pOVar4;

-    int local_60;

-    int *local_5c;

-    int local_54;

-    int j;

-    int i;

-    ObjectType local_3c [4];

-    ulong local_2c;

-    Object Obj;

-    

-                    // try { // try from 080867b5 to 08086931 has its CatchHandler @ 08086937

-    CheckMana(in_stack_00000004,in_stack_00000008,in_stack_0000000c,1000);

-    j = 0;

-    if (-1 < in_stack_00000010) {

-        local_5c = &Circle[0].Count;

-        local_60 = 0;

-        do {

-            local_54 = 0;

-            iVar2 = local_60;

-            if (0 < *local_5c) {

-                do {

-                    zx = in_stack_00000004->posx + Circle[0].x[iVar2 + local_54];

-                    iVar2 = in_stack_00000004->posy + Circle[0].y[iVar2 + local_54];

-                    bVar1 = ThrowPossible(in_stack_00000004->posx,in_stack_00000004->posy,

-                                          in_stack_00000004->posz,zx,iVar2,in_stack_00000004->posz,0

-                                         );

-                    if (bVar1) {

-                        GraphicalEffect();

-                        ObjectType::setTypeID(local_3c,99);

-                        pOVar4 = local_3c;

-                        iVar3 = in_stack_00000004->posz;

-                        GetFirstSpecObject();

-                        i = NONE.ObjectID;

-                        local_3c[0].TypeID = NONE.ObjectID;

-                        if (local_2c != NONE.ObjectID) {

-                            i = local_2c;

-                            Monster = GetCreature((Object *)&i);

-                            if (Monster == (TCreature *)0x0) {

-                                error(&DAT_080fc2e0,zx,iVar2,iVar3,pOVar4);

-                            }

-                            else if (Monster->Type == MONSTER) {

-                                ChallengeMonster(in_stack_00000004,Monster);

-                            }

-                        }

-                    }

-                    local_54 = local_54 + 1;

-                    iVar2 = j * 0x41;

-                } while (local_54 < *local_5c);

-            }

-            j = j + 1;

-            local_5c = local_5c + 0x41;

-            local_60 = local_60 + 0x41;

-        } while (j <= in_stack_00000010);

-    }

-    return;

-}

-

-

-

-// WARNING: Unknown calling convention -- yet parameter storage is locked

-

-void FindPerson(void)

-

-{

-    int iVar1;

-    bool bVar2;

-    int iVar3;

-    undefined4 *puVar4;

-    int *piVar5;

-    TConnection *pTVar6;

-    TCreature *in_stack_00000004;

-    int in_stack_00000008;

-    int in_stack_0000000c;

-    char *in_stack_00000010;

-    char *pcVar7;

-    char *pcVar8;

-    int Distance;

-    int local_34;

-    TPlayer *local_30;

-    TPlayer *Opp;

-    

-    if (in_stack_00000004 == (TCreature *)0x0) {

-        pcVar7 = &DAT_080fc440;

-    }

-    else if (in_stack_00000010 == (char *)0x0) {

-        pcVar7 = &DAT_080fc400;

-    }

-    else if (in_stack_00000004->Type == PLAYER) {

-                    // try { // try from 08086994 to 08086c19 has its CatchHandler @ 08086cb8

-        bVar2 = CheckRight(in_stack_00000004->ID,READ_GAMEMASTER_CHANNEL);

-        iVar3 = IdentifyPlayer(in_stack_00000010,false,!bVar2,&local_30);

-        if (iVar3 == -1) {

-            puVar4 = (undefined4 *)__cxa_allocate_exception(4);

-            *puVar4 = 0x1b;

-            goto LAB_08086c02;

-        }

-        if (iVar3 == -2) {

-            puVar4 = (undefined4 *)__cxa_allocate_exception(4);

-            *puVar4 = 0x1c;

-            goto LAB_08086c02;

-        }

-        if (local_30 != (TPlayer *)0x0) {

-            CheckMana(in_stack_00000004,in_stack_00000008,in_stack_0000000c,1000);

-            iVar3 = (local_30->super_TCreature).posx - in_stack_00000004->posx;

-            local_34 = -iVar3;

-            if (-1 < iVar3) {

-                local_34 = iVar3;

-            }

-            iVar3 = (local_30->super_TCreature).posy - in_stack_00000004->posy;

-            Distance = -iVar3;

-            if (-1 < iVar3) {

-                Distance = iVar3;

-            }

-            piVar5 = &Distance;

-            if (Distance <= local_34) {

-                piVar5 = &local_34;

-            }

-            iVar1 = *piVar5;

-            if (iVar1 < 5) {

-                iVar3 = (local_30->super_TCreature).posz;

-                if (iVar3 < in_stack_00000004->posz) {

-                    pTVar6 = in_stack_00000004->Connection;

-                    pcVar7 = "%s is above you.";

-                }

-                else if (in_stack_00000004->posz < iVar3) {

-                    pTVar6 = in_stack_00000004->Connection;

-                    pcVar7 = "%s is below you.";

-                }

-                else {

-                    pTVar6 = in_stack_00000004->Connection;

-                    pcVar7 = "%s is standing next to you.";

-                }

-                SendMessage(pTVar6,0x16,pcVar7,(local_30->super_TCreature).Name);

-                goto LAB_08086a85;

-            }

-            iVar3 = Direction((local_30->super_TCreature).posx - in_stack_00000004->posx,iVar3);

-            switch(iVar3) {

-            default:

-                pcVar7 = "FindPerson: Richtung ist Null.\n";

-                goto LAB_08086beb;

-            case 1:

-                pcVar7 = "east";

-                break;

-            case 2:

-                pcVar7 = "north-east";

-                break;

-            case 3:

-                pcVar7 = "north";

-                break;

-            case 4:

-                pcVar7 = "north-west";

-                break;

-            case 5:

-                pcVar7 = "west";

-                break;

-            case 6:

-                pcVar7 = "south-west";

-                break;

-            case 7:

-                pcVar7 = "south";

-                break;

-            case 8:

-                pcVar7 = "south-east";

-            }

-            if (iVar1 < 100) {

-                iVar3 = (local_30->super_TCreature).posz;

-                if (iVar3 < in_stack_00000004->posz) {

-                    pTVar6 = in_stack_00000004->Connection;

-                    pcVar8 = "%s is on a higher level to the %s.";

-                }

-                else if (in_stack_00000004->posz < iVar3) {

-                    pTVar6 = in_stack_00000004->Connection;

-                    pcVar8 = "%s is on a lower level to the %s.";

-                }

-                else {

-                    pTVar6 = in_stack_00000004->Connection;

-                    pcVar8 = "%s is to the %s.";

-                }

-                SendMessage(pTVar6,0x16,pcVar8,(local_30->super_TCreature).Name,pcVar7);

-            }

-            else {

-                pcVar8 = "very ";

-                if (iVar1 < 0xfb) {

-                    pcVar8 = "";

-                }

-                SendMessage(in_stack_00000004->Connection,0x16,"%s is %sfar to the %s.",

-                            (local_30->super_TCreature).Name,pcVar8,pcVar7);

-            }

-LAB_08086a85:

-            Opp = (TPlayer *)(in_stack_00000004->CrObject).ObjectID;

-            GraphicalEffect((Object *)&Opp,0xd);

-            return;

-        }

-        pcVar7 = "FindPerson: Opp ist NULL.\n";

-    }

-    else {

-        pcVar7 = "FindPerson: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-LAB_08086beb:

-    error(pcVar7);

-    puVar4 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar4 = 0xffffffff;

-LAB_08086c02:

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar4,&RESULT::typeinfo,0);

-}

-

-

-

-void GetPosition(TCreature *cr)

-

-{

-    bool bVar1;

-    undefined4 *puVar2;

-    char *Text;

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fc4e0;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 08086cff to 08086d83 has its CatchHandler @ 08086d90

-            bVar1 = CheckRight(cr->ID,SHOW_COORDINATE);

-            if (bVar1) {

-                SendMessage(cr->Connection,0x13,"Your position is [%d,%d,%d].",cr->posx,cr->posy,

-                            cr->posz);

-            }

-            return;

-        }

-        Text = "GetPosition: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(Text);

-    puVar2 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar2 = 0xffffffff;

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar2,&RESULT::typeinfo,0);

-}

-

-

-

-void GetQuestValue(TCreature *cr,char *Param)

-

-{

-    bool bVar1;

-    int Number;

-    int iVar2;

-    undefined4 *puVar3;

-    char *Text;

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fc5a0;

-LAB_08086e9c:

-        error(Text);

-        puVar3 = (undefined4 *)__cxa_allocate_exception(4);

-        *puVar3 = 0xffffffff;

-                    // WARNING: Subroutine does not return

-        __cxa_throw(puVar3,&RESULT::typeinfo,0);

-    }

-    if (Param == (char *)0x0) {

-        error("GetQuestValue: Param ist NULL.\n");

-    }

-    else {

-        if (cr->Type != PLAYER) {

-            Text = "GetQuestValue: Zauberspruch kann nur von Spielern angewendet werden.\n";

-            goto LAB_08086e9c;

-        }

-                    // try { // try from 08086df1 to 08086ed6 has its CatchHandler @ 08086ee5

-        bVar1 = CheckRight(cr->ID,CHANGE_SKILLS);

-        if (bVar1) {

-            Number = __strtol_internal(Param,0,10,0);

-            bVar1 = false;

-            if ((-1 < Number) && (Number < 500)) {

-                bVar1 = true;

-            }

-            if (bVar1) {

-                iVar2 = TPlayer::GetQuestValue((TPlayer *)cr,Number);

-                SendMessage(cr->Connection,0x16,"Quest value %d is %d.",Number,iVar2);

-            }

-            else {

-                SendMessage(cr->Connection,0x17,"Invalid quest number.");

-            }

-        }

-    }

-    return;

-}

-

-

-

-void SetQuestValue(TCreature *cr,char *Param1,char *Param2)

-

-{

-    bool bVar1;

-    int Number;

-    int Value;

-    undefined4 *puVar2;

-    char *pcVar3;

-    

-    if (cr == (TCreature *)0x0) {

-        pcVar3 = &DAT_080fc6c0;

-LAB_08087027:

-        error(pcVar3);

-        puVar2 = (undefined4 *)__cxa_allocate_exception(4);

-        *puVar2 = 0xffffffff;

-                    // WARNING: Subroutine does not return

-        __cxa_throw(puVar2,&RESULT::typeinfo,0);

-    }

-    if (Param1 == (char *)0x0) {

-        pcVar3 = "SetQuestValue: Param1 ist NULL.\n";

-    }

-    else {

-        if (Param2 != (char *)0x0) {

-            if (cr->Type == PLAYER) {

-                    // try { // try from 08086f4f to 08087061 has its CatchHandler @ 08087080

-                bVar1 = CheckRight(cr->ID,CHANGE_SKILLS);

-                if (!bVar1) {

-                    return;

-                }

-                Number = __strtol_internal(Param1,0,10,0);

-                Value = __strtol_internal(Param2,0,10,0);

-                bVar1 = false;

-                if ((-1 < Number) && (Number < 500)) {

-                    bVar1 = true;

-                }

-                if (!bVar1) {

-                    SendMessage(cr->Connection,0x17,"Invalid quest number.");

-                    return;

-                }

-                TPlayer::SetQuestValue((TPlayer *)cr,Number,Value);

-                SendMessage(cr->Connection,0x16,"Quest value %d set to %d.",Number,Value);

-                return;

-            }

-            pcVar3 = "SetQuestValue: Zauberspruch kann nur von Spielern angewendet werden.\n";

-            goto LAB_08087027;

-        }

-        pcVar3 = "SetQuestValue: Param2 ist NULL.\n";

-    }

-    error(pcVar3);

-    return;

-}

-

-

-

-void ClearQuestValues(TCreature *cr)

-

-{

-    bool bVar1;

-    undefined4 *puVar2;

-    int i;

-    int Number;

-    char *Text;

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fc760;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 080870d2 to 0808715f has its CatchHandler @ 08087170

-            bVar1 = CheckRight(cr->ID,CHANGE_SKILLS);

-            if (bVar1) {

-                Number = 0;

-                do {

-                    TPlayer::SetQuestValue((TPlayer *)cr,Number,0);

-                    Number = Number + 1;

-                } while (Number < 500);

-                SendMessage(cr->Connection,0x16,"All quest values deleted.");

-            }

-            return;

-        }

-        Text = "ClearQuestValues: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(Text);

-    puVar2 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar2 = 0xffffffff;

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar2,&RESULT::typeinfo,0);

-}

-

-

-

-void CreateKnowledge(TCreature *cr,char *Param1,char *Param2)

-

-{

-    bool bVar1;

-    uint uVar2;

-    uint uVar3;

-    TSkill *pTVar4;

-    undefined4 *puVar5;

-    long k;

-    _func_int_varargs **pp_Var6;

-    char *Text;

-    Object local_2c [7];

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fc840;

-    }

-    else if (Param1 == (char *)0x0) {

-        Text = &DAT_080fc800;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 080871d7 to 080872c2 has its CatchHandler @ 080872d5

-            bVar1 = CheckRight(cr->ID,CHANGE_SKILLS);

-            if (bVar1) {

-                uVar2 = __strtol_internal(Param1,0,10,0);

-                if (Param2 == (char *)0x0) {

-                    uVar3 = 0;

-                }

-                else {

-                    uVar3 = __strtol_internal(Param2,0,10,0);

-                }

-                if (((int)uVar2 < 1) || (Param2 != (char *)0x0)) {

-                    if (0x18 < uVar2) {

-                        return;

-                    }

-                    if ((int)uVar3 < 1) {

-                        return;

-                    }

-                    pp_Var6 = (cr->super_TSkillBase).Skills[uVar2]->_vptr_TSkill;

-                    pTVar4 = (cr->super_TSkillBase).Skills[uVar2];

-                    uVar2 = uVar3;

-                }

-                else {

-                    pTVar4 = (cr->super_TSkillBase).Skills[0];

-                    pp_Var6 = pTVar4->_vptr_TSkill;

-                }

-                (*pp_Var6[3])(pTVar4,uVar2);

-                local_2c[0].ObjectID = (cr->CrObject).ObjectID;

-                GraphicalEffect(local_2c,0xf);

-            }

-            return;

-        }

-        Text = "CreateKnowledge: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(Text);

-    puVar5 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar5 = 0xffffffff;

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar5,&RESULT::typeinfo,0);

-}

-

-

-

-void ChangeProfession(TCreature *cr,char *Param)

-

-{

-    bool bVar1;

-    uchar uVar2;

-    byte bVar3;

-    int iVar4;

-    undefined4 *puVar5;

-    char *Text;

-    Object local_1c [4];

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fc920;

-    }

-    else if (Param == (char *)0x0) {

-        Text = &DAT_080fc8e0;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 08087331 to 08087525 has its CatchHandler @ 08087538

-            bVar1 = CheckRight(cr->ID,CHANGE_PROFESSION);

-            if (!bVar1) {

-                return;

-            }

-            iVar4 = stricmp(Param,"male",-1);

-            if (iVar4 == 0) {

-                cr->Sex = 1;

-            }

-            else {

-                iVar4 = stricmp(Param,"female",-1);

-                if (iVar4 == 0) {

-                    cr->Sex = 2;

-                }

-                else {

-                    iVar4 = stricmp(Param,"none",-1);

-                    if (iVar4 == 0) {

-                        TPlayer::ClearProfession((TPlayer *)cr);

-                    }

-                    else {

-                        iVar4 = stricmp(Param,"knight",-1);

-                        if (iVar4 == 0) {

-                            TPlayer::ClearProfession((TPlayer *)cr);

-                            uVar2 = '\x01';

-                        }

-                        else {

-                            iVar4 = stricmp(Param,"paladin",-1);

-                            if (iVar4 == 0) {

-                                TPlayer::ClearProfession((TPlayer *)cr);

-                                uVar2 = '\x02';

-                            }

-                            else {

-                                iVar4 = stricmp(Param,"sorcerer",-1);

-                                if (iVar4 == 0) {

-                                    TPlayer::ClearProfession((TPlayer *)cr);

-                                    uVar2 = '\x03';

-                                }

-                                else {

-                                    iVar4 = stricmp(Param,"druid",-1);

-                                    if (iVar4 == 0) {

-                                        TPlayer::ClearProfession((TPlayer *)cr);

-                                        uVar2 = '\x04';

-                                    }

-                                    else {

-                                        iVar4 = stricmp(Param,"promote",-1);

-                                        if (iVar4 != 0) {

-                                            return;

-                                        }

-                                        uVar2 = TPlayer::GetRealProfession((TPlayer *)cr);

-                                        if (uVar2 == '\0') {

-                                            return;

-                                        }

-                                        bVar3 = TPlayer::GetRealProfession((TPlayer *)cr);

-                                        if (9 < bVar3) {

-                                            return;

-                                        }

-                                        uVar2 = '\n';

-                                    }

-                                }

-                            }

-                        }

-                        TPlayer::SetProfession((TPlayer *)cr,uVar2);

-                    }

-                }

-            }

-            local_1c[0].ObjectID = (cr->CrObject).ObjectID;

-            GraphicalEffect(local_1c,0xd);

-            return;

-        }

-        Text = "ChangeProfession: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(Text);

-    puVar5 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar5 = 0xffffffff;

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar5,&RESULT::typeinfo,0);

-}

-

-

-

-void EditGuests(TCreature *cr)

-

-{

-    ushort HouseID_00;

-    undefined4 *puVar1;

-    ushort HouseID;

-    char *Text;

-    char local_101c [4];

-    char Buffer [4096];

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fc9c0;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 08087598 to 0808761b has its CatchHandler @ 08087640

-            HouseID_00 = GetHouseID(cr->posx,cr->posy,cr->posz);

-            if (HouseID_00 != 0) {

-                ShowGuestList(HouseID_00,(TPlayer *)cr,local_101c);

-                SendEditList(cr->Connection,'\x01',(uint)HouseID_00,local_101c);

-                return;

-            }

-            puVar1 = (undefined4 *)__cxa_allocate_exception(4);

-            *puVar1 = 1;

-            goto LAB_080875f8;

-        }

-        Text = "EditGuests: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(Text);

-    puVar1 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar1 = 0xffffffff;

-LAB_080875f8:

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar1,&RESULT::typeinfo,0);

-}

-

-

-

-void EditSubowners(TCreature *cr)

-

-{

-    ushort HouseID_00;

-    undefined4 *puVar1;

-    ushort HouseID;

-    char *Text;

-    char local_101c [4];

-    char Buffer [4096];

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fca60;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 080876a8 to 0808772b has its CatchHandler @ 08087750

-            HouseID_00 = GetHouseID(cr->posx,cr->posy,cr->posz);

-            if (HouseID_00 != 0) {

-                ShowSubownerList(HouseID_00,(TPlayer *)cr,local_101c);

-                SendEditList(cr->Connection,'\x02',(uint)HouseID_00,local_101c);

-                return;

-            }

-            puVar1 = (undefined4 *)__cxa_allocate_exception(4);

-            *puVar1 = 1;

-            goto LAB_08087708;

-        }

-        Text = "EditSubowners: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(Text);

-    puVar1 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar1 = 0xffffffff;

-LAB_08087708:

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar1,&RESULT::typeinfo,0);

-}

-

-

-

-// WARNING: Variable defined which should be unmapped: Guest

-

-void KickGuest(TCreature *cr,char *Name)

-

-{

-    bool bVar1;

-    ushort HouseID_00;

-    int Result;

-    int iVar2;

-    undefined4 *puVar3;

-    ushort HouseID;

-    char *Text;

-    TPlayer *local_10;

-    TPlayer *Guest;

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fcb40;

-    }

-    else if (Name == (char *)0x0) {

-        Text = &DAT_080fcb00;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 080877b1 to 0808788b has its CatchHandler @ 080878b2

-            bVar1 = CheckRight(cr->ID,READ_GAMEMASTER_CHANNEL);

-            iVar2 = IdentifyPlayer(Name,false,!bVar1,&local_10);

-            if (iVar2 == -1) {

-                puVar3 = (undefined4 *)__cxa_allocate_exception(4);

-                *puVar3 = 0x1b;

-            }

-            else if (iVar2 == -2) {

-                puVar3 = (undefined4 *)__cxa_allocate_exception(4);

-                *puVar3 = 0x1c;

-            }

-            else {

-                HouseID_00 = GetHouseID((local_10->super_TCreature).posx,

-                                        (local_10->super_TCreature).posy,

-                                        (local_10->super_TCreature).posz);

-                if (HouseID_00 != 0) {

-                    KickGuest(HouseID_00,(TPlayer *)cr,local_10);

-                    return;

-                }

-                puVar3 = (undefined4 *)__cxa_allocate_exception(4);

-                *puVar3 = 1;

-            }

-            goto LAB_08087840;

-        }

-        Text = "KickGuest(magic): Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(Text);

-    puVar3 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar3 = 0xffffffff;

-LAB_08087840:

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar3,&RESULT::typeinfo,0);

-}

-

-

-

-void EditNameDoor(TCreature *cr)

-

-{

-    bool bVar1;

-    undefined4 *puVar2;

-    int y;

-    int iVar3;

-    int x;

-    char *pcVar4;

-    int iVar5;

-    int iVar6;

-    int iVar7;

-    int z;

-    char Buffer [4096];

-    Object local_4c [4];

-    Object local_3c [4];

-    ulong local_2c;

-    Object Door;

-    

-    if (cr == (TCreature *)0x0) {

-        pcVar4 = &DAT_080fcbe0;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-            iVar3 = cr->posy;

-            iVar7 = cr->posz;

-            iVar5 = iVar3;

-            iVar6 = iVar7;

-                    // try { // try from 08087925 to 08087b48 has its CatchHandler @ 08087b66

-            GetFirstObject();

-            local_3c[0].ObjectID = NONE.ObjectID;

-            if (local_2c != NONE.ObjectID) {

-                do {

-                    local_4c[0].ObjectID = NONE.ObjectID;

-                    local_3c[0].ObjectID = NONE.ObjectID;

-                    Object::getObjectType(local_4c);

-                    bVar1 = ObjectType::getFlag((ObjectType *)local_4c,NAMEDOOR);

-                    if (bVar1) break;

-                    Object::getNextObject(local_3c);

-                    local_2c = local_3c[0].ObjectID;

-                    bVar1 = local_3c[0].ObjectID != NONE.ObjectID;

-                    local_3c[0].ObjectID = NONE.ObjectID;

-                } while (bVar1);

-            }

-            local_4c[0].ObjectID = NONE.ObjectID;

-            if (local_2c == NONE.ObjectID) {

-                iVar5 = cr->Direction;

-                if (iVar5 != 1) {

-                    if (iVar5 < 2) {

-                        if (iVar5 == 0) {

-                            iVar3 = iVar3 + -1;

-                        }

-                    }

-                    else if (iVar5 == 2) {

-                        iVar3 = iVar3 + 1;

-                    }

-                }

-                GetFirstObject();

-                local_2c._0_1_ = Buffer[0xffc];

-                local_2c._1_1_ = Buffer[0xffd];

-                local_2c._2_1_ = Buffer[0xffe];

-                local_2c._3_1_ = Buffer[0xfff];

-                local_3c[0].ObjectID = NONE.ObjectID;

-                iVar5 = iVar3;

-                iVar6 = iVar7;

-                if (Buffer._4092_4_ != NONE.ObjectID) {

-                    do {

-                        Buffer._4092_4_ = NONE.ObjectID;

-                        local_3c[0].ObjectID = NONE.ObjectID;

-                        Object::getObjectType((Object *)(Buffer + 0xffc));

-                        bVar1 = ObjectType::getFlag((ObjectType *)(Buffer + 0xffc),NAMEDOOR);

-                        iVar5 = iVar3;

-                        iVar6 = iVar7;

-                        if (bVar1) break;

-                        Object::getNextObject(local_3c);

-                        local_2c = local_3c[0].ObjectID;

-                        bVar1 = local_3c[0].ObjectID != NONE.ObjectID;

-                        local_3c[0].ObjectID = NONE.ObjectID;

-                        iVar5 = iVar3;

-                        iVar6 = iVar7;

-                    } while (bVar1);

-                }

-            }

-            if (local_2c != NONE.ObjectID) {

-                Buffer._4092_4_ = local_2c;

-                ShowNameDoor((Object *)(Buffer + 0xffc),(TPlayer *)cr,(char *)&z);

-                SendEditList(cr->Connection,'\x03',local_2c,(char *)&z);

-                return;

-            }

-            pcVar4 = "Keine NameDoor gefunden.\n";

-            Buffer._4092_4_ = NONE.ObjectID;

-            print();

-            puVar2 = (undefined4 *)__cxa_allocate_exception(4,pcVar4,iVar5,iVar6);

-            *puVar2 = 1;

-            goto LAB_08087ae7;

-        }

-        pcVar4 = "EditNameDoor: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(pcVar4);

-    puVar2 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar2 = 0xffffffff;

-LAB_08087ae7:

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar2,&RESULT::typeinfo,0);

-}

-

-

-

-void Notation(TCreature *cr,char *Name,char *Comment)

-

-{

-    undefined4 *puVar1;

-    char *Text;

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fcd40;

-    }

-    else if (Name == (char *)0x0) {

-        Text = &DAT_080fcd00;

-    }

-    else if (Comment == (char *)0x0) {

-        Text = &DAT_080fccc0;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 08087bc2 to 08087c00 has its CatchHandler @ 08087c20

-            SendMessage(cr->Connection,0x17,

-                        "Spell is not available any more. Press Ctrl+Y for the dialog.");

-            return;

-        }

-        Text = "Notation: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(Text);

-    puVar1 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar1 = 0xffffffff;

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar1,&RESULT::typeinfo,0);

-}

-

-

-

-void NameLock(TCreature *cr,char *Name)

-

-{

-    undefined4 *puVar1;

-    char *Text;

-    

-    if (cr == (TCreature *)0x0) {

-        Text = &DAT_080fce20;

-    }

-    else if (Name == (char *)0x0) {

-        Text = &DAT_080fcde0;

-    }

-    else {

-        if (cr->Type == PLAYER) {

-                    // try { // try from 08087c77 to 08087cb5 has its CatchHandler @ 08087cc8

-            SendMessage(cr->Connection,0x17,

-                        "Spell is not available any more. Press Ctrl+Y for the dialog.");

-            return;

-        }

-        Text = "NameLock: Zauberspruch kann nur von Spielern angewendet werden.\n";

-    }

-    error(Text);

-    puVar1 = (undefined4 *)__cxa_allocate_exception(4);

-    *puVar1 = 0xffffffff;

-                    // WARNING: Subroutine does not return

-    __cxa_throw(puVar1,&RESULT::typeinfo,0);

-}

-

-

-

 void BanishAccount(TCreature *cr,char *Name,int param_3,char *Reason)

 

 {