Mercurial > mm7
view Monsters.cpp @ 2451:0eb0826e18b3
Слияние
| author | Ritor1 |
|---|---|
| date | Fri, 25 Jul 2014 14:19:14 +0600 |
| parents | f4af3b203f65 |
| children | 85a12b497698 |
line wrap: on
line source
#define _CRTDBG_MAP_ALLOC #include <stdlib.h> #include <crtdbg.h> #define _CRT_SECURE_NO_WARNINGS #include <stdlib.h> #include <stdio.h> #include <string.h> #include "ErrorHandling.h" #include "Monsters.h" #include "FrameTableInc.h" #include "LOD.h" #include "texts.h" #include "mm7_data.h" struct MonsterStats *pMonsterStats; struct MonsterList *pMonsterList; unsigned int ParseSpellType(struct FrameTableTxtLine* tbl, int* next_token); int ParseAttackType(const char *damage_type_str); void ParseDamage( char *damage_str, unsigned __int8* dice_rolls, unsigned __int8* dice_sides, unsigned __int8* dmg_bonus ); int ParseMissleAttackType(const char *missle_attack_str); int ParseSpecialAttack(const char *spec_att_str); //----- (004548E2) -------------------------------------------------------- unsigned int ParseSpellType( struct FrameTableTxtLine * tbl, int* next_token ) { if (!tbl->pProperties[0] ) { ++*next_token; return 0; } if ( !_stricmp(tbl->pProperties[0], "Dispel") ) //dispel magic { ++*next_token; return 80; } else if ( !_stricmp(tbl->pProperties[0], "Day") ) //day of protection { *next_token+=2;; return 85; } else if ( !_stricmp(tbl->pProperties[0], "Hour") ) //hour of power { *next_token+=2;; return 86; } else if ( !_stricmp(tbl->pProperties[0], "Shield") ) return 17; else if ( !_stricmp(tbl->pProperties[0], "Spirit") ) { ++*next_token; return 52; } else if ( !_stricmp(tbl->pProperties[0], "Power") ) //power cure { ++*next_token; return 77; } else if ( !_stricmp(tbl->pProperties[0], "Meteor") ) //meteot shower { ++*next_token; return 9; } else if ( !_stricmp(tbl->pProperties[0], "Lightning") ) //Lightning bolt { ++*next_token; return 18; } else if ( !_stricmp(tbl->pProperties[0], "Implosion") ) return 20; else if ( !_stricmp(tbl->pProperties[0], "Stone") ) { ++*next_token; return 38; } else if ( !_stricmp(tbl->pProperties[0], "Haste") ) return 5; else if ( !_stricmp(tbl->pProperties[0], "Heroism") ) return 51; else if ( !_stricmp(tbl->pProperties[0], "Pain") ) //pain reflection { ++*next_token; return 95; } else if ( !_stricmp(tbl->pProperties[0], "Sparks") ) return 15; else if ( !_stricmp(tbl->pProperties[0], "Light") ) { ++*next_token; return 78; } else if ( !_stricmp(tbl->pProperties[0], "Toxic") ) //toxic cloud { ++*next_token; return 90; } else if ( !_stricmp(tbl->pProperties[0], "ShrapMetal") ) return 93; else if ( !_stricmp(tbl->pProperties[0], "Paralyze") ) return 81; else if ( !_stricmp(tbl->pProperties[0], "Fireball") ) return 6; else if ( !_stricmp(tbl->pProperties[0], "Incinerate") ) return 11; else if ( !_stricmp(tbl->pProperties[0], "Fire") ) { ++*next_token; return 2; } else if ( !_stricmp(tbl->pProperties[0], "Rock") ) { ++*next_token; return 41; } else if ( !_stricmp(tbl->pProperties[0], "Mass") ) { ++*next_token; return 44; } else if ( !_stricmp(tbl->pProperties[0], "Ice") ) { ++*next_token; return 26; } else if ( !_stricmp(tbl->pProperties[0], "Acid") ) { ++*next_token; return 29; } else if ( !_stricmp(tbl->pProperties[0], "Bless") ) return 46; else if ( !_stricmp(tbl->pProperties[0], "Dragon") ) { ++*next_token; return 97; } else if ( !_stricmp(tbl->pProperties[0], "Reanimate") ) return 89; else if ( !_stricmp(tbl->pProperties[0], "Summon") ) { ++*next_token; return 82; } else if ( !_stricmp(tbl->pProperties[0], "Fate") ) return 47; else if ( !_stricmp(tbl->pProperties[0], "Harm") ) return 70; else if ( !_stricmp(tbl->pProperties[0], "Mind") ) { ++*next_token; return 57; } else if ( !_stricmp(tbl->pProperties[0], "Blades") ) return 39; else if ( !_stricmp(tbl->pProperties[0], "Psychic") ) { ++*next_token; return 65; } else if ( !_stricmp(tbl->pProperties[0], "Hammerhands") ) return 73; else { sprintf(pTmpBuf.data(), "Unknown monster spell %s", tbl->pProperties[0]); MessageBoxA(nullptr, pTmpBuf.data(), "E:\\WORK\\MSDEV\\MM7\\MM7\\Code\\Itemdata.cpp:1562", 0); ++*next_token; return 0; } } //----- (00454CB4) -------------------------------------------------------- int ParseAttackType( const char *damage_type_str ) { switch (tolower(*damage_type_str)) { case 'f': return 0; //fire case 'a': return 1; //air case 'w': return 2; //water case 'e': return 3; //earth case 's': return 6; //spirit case 'm': return 7; //mind //m ?? 8 case 'l': return 9; //light case 'd': return 10; //dark // d?? 11 } return 4; //phis } //----- (00454D7D) -------------------------------------------------------- void ParseDamage( char *damage_str, unsigned __int8* dice_rolls, unsigned __int8* dice_sides, unsigned __int8* dmg_bonus ) { int str_len=0; int str_pos=0; bool dice_flag=false; *dice_rolls = 0; *dice_sides = 1; *dmg_bonus = 0; str_len = strlen(damage_str); if (str_len<=0) return; for (str_pos=0;str_pos<str_len;++str_pos ) { if (tolower(damage_str[str_pos])=='d') { damage_str[str_pos]='\0'; *dice_rolls=atoi(damage_str); *dice_sides=atoi(&damage_str[str_pos+1]); dice_flag=true; damage_str[str_pos]='d'; } else if (tolower(damage_str[str_pos])=='+') *dmg_bonus=atoi(&damage_str[str_pos+1]); } if (!dice_flag) { if ((*damage_str>='0')&&(*damage_str<='9')) { *dice_rolls =atoi(damage_str); *dice_sides = 1; } } } //----- (00454E3A) -------------------------------------------------------- int ParseMissleAttackType(const char *missle_attack_str) { if ( !_stricmp(missle_attack_str, "ARROW") ) return 1; else if ( !_stricmp(missle_attack_str, "ARROWF") ) return 2; else if ( !_stricmp(missle_attack_str, "FIRE") ) return 3; else if ( !_stricmp(missle_attack_str, "AIR") ) return 4; else if ( !_stricmp(missle_attack_str, "WATER") ) return 5; else if ( !_stricmp(missle_attack_str, "EARTH") ) return 6; else if ( !_stricmp(missle_attack_str, "SPIRIT") ) return 7; else if ( !_stricmp(missle_attack_str, "MIND") ) return 8; else if ( !_stricmp(missle_attack_str, "BODY") ) return 9; else if ( !_stricmp(missle_attack_str, "LIGHT") ) return 10; else if ( !_stricmp(missle_attack_str, "DARK") ) return 11; else if ( !_stricmp(missle_attack_str, "ENER") ) return 13; else return 0; } int ParseSpecialAttack(char *spec_att_str) { _strlwr(spec_att_str); if ( strstr(spec_att_str, "curse") ) return 1; else if ( strstr(spec_att_str, "weak") ) return 2; else if ( strstr(spec_att_str, "asleep") ) return 3; else if ( strstr(spec_att_str, "afraid") ) return 23; else if ( strstr(spec_att_str, "drunk") ) return 4; else if ( strstr(spec_att_str, "insane") ) return 5; else if ( strstr(spec_att_str, "poison weak") ) return 6; else if ( strstr(spec_att_str, "poison medium") ) return 7; else if ( strstr(spec_att_str, "poison severe") ) return 8; else if ( strstr(spec_att_str, "disease weak") ) return 9; else if ( strstr(spec_att_str, "disease medium") ) return 10; else if ( strstr(spec_att_str, "disease severe") ) return 11; else if ( strstr(spec_att_str, "paralyze") ) return 12; else if ( strstr(spec_att_str, "uncon") ) return 13; else if ( strstr(spec_att_str, "dead") ) return 14; else if ( strstr(spec_att_str, "stone") ) return 15; else if ( strstr(spec_att_str, "errad") ) return 16; else if ( strstr(spec_att_str, "brkitem") ) return 17; else if ( strstr(spec_att_str, "brkarmor") ) return 18; else if ( strstr(spec_att_str, "brkweapon") ) return 19; else if ( strstr(spec_att_str, "steal") ) return 20; else if ( strstr(spec_att_str, "age") ) return 21; else if ( strstr(spec_att_str, "drainsp") ) return 22; else return 0; } //----- (004598FC) -------------------------------------------------------- bool MonsterList::FromFileTxt(const char *Args) { MonsterList *v2; // ebx@1 FILE *v3; // eax@1 unsigned int v4; // esi@3 void *v5; // eax@9 FILE *v6; // ST14_4@11 char *i; // eax@11 signed int v8; // esi@12 unsigned __int16 v9; // ax@16 const char *v10; // ST18_4@16 unsigned __int16 v11; // ax@16 const char *v12; // ST14_4@16 unsigned __int16 v13; // ax@16 const char *v14; // ST10_4@16 __int16 v15; // ax@16 const char *v16; // ST0C_4@16 int v17; // esi@16 unsigned __int8 v18; // al@16 signed int v19; // esi@16 unsigned __int16 v20; // ax@17 int v21; // ecx@17 char Buf; // [sp+4h] [bp-304h]@3 FrameTableTxtLine v24; // [sp+1F8h] [bp-110h]@4 FrameTableTxtLine v25; // [sp+274h] [bp-94h]@4 int v26; // [sp+2F0h] [bp-18h]@16 char v27; // [sp+2F4h] [bp-14h]@14 char v28; // [sp+2F5h] [bp-13h]@14 char v29; // [sp+2F6h] [bp-12h]@14 char v30; // [sp+2F7h] [bp-11h]@14 char v31; // [sp+2F8h] [bp-10h]@14 char v32; // [sp+2F9h] [bp-Fh]@14 char v33; // [sp+2FAh] [bp-Eh]@14 char v34; // [sp+2FBh] [bp-Dh]@14 char v35; // [sp+2FCh] [bp-Ch]@14 char v36; // [sp+2FDh] [bp-Bh]@14 char v37; // [sp+2FEh] [bp-Ah]@14 char v38; // [sp+2FFh] [bp-9h]@14 char v39; // [sp+300h] [bp-8h]@14 char v40; // [sp+301h] [bp-7h]@14 char v41; // [sp+302h] [bp-6h]@14 char v42; // [sp+303h] [bp-5h]@14 FILE *File; // [sp+304h] [bp-4h]@1 unsigned int Argsa; // [sp+310h] [bp+8h]@3 int Argsb; // [sp+310h] [bp+8h]@16 v2 = this; v3 = fopen(Args, "r"); File = v3; if ( !v3 ) Error("MonsterRaceListStruct::load - Unable to open file: %s."); v4 = 0; Argsa = 0; if ( fgets(&Buf, 490, v3) ) { do { *strchr(&Buf, 10) = 0; memcpy(&v25, frame_table_txt_parser(&Buf, &v24), sizeof(v25)); if ( v25.uPropCount && *v25.pProperties[0] != 47 ) ++Argsa; } while ( fgets(&Buf, 490, File) ); v4 = Argsa; } v2->uNumMonsters = v4; v5 = malloc(152 * v4); v2->pMonsters = (MonsterDesc *)v5; if ( !v5 ) Error("MonsterRaceListStruct::load - Out of Memory!"); v6 = File; v2->uNumMonsters = 0; fseek(v6, 0, 0); for ( i = fgets(&Buf, 490, File); i; i = fgets(&Buf, 490, File) ) { *strchr(&Buf, 10) = 0; memcpy(&v25, frame_table_txt_parser(&Buf, &v24), sizeof(v25)); v8 = 0; if ( v25.uPropCount && *v25.pProperties[0] != 47 ) { strcpy(v2->pMonsters[v2->uNumMonsters].pMonsterName, v25.pProperties[0]); v35 = 0; v36 = 1; v37 = 7; v38 = 2; v39 = 3; v40 = 4; v41 = 5; v42 = 6; v27 = 1; v28 = 2; v29 = 3; v30 = 4; v31 = 4; v32 = 5; v33 = 6; v34 = 7; do { strcpy( v2->pMonsters[v2->uNumMonsters].pSpriteNames[(unsigned __int8)*(&v35 + v8)], v25.pProperties[(unsigned __int8)*(&v27 + v8)]); ++v8; } while ( v8 < 8 ); v9 = atoi(v25.pProperties[8]); v10 = v25.pProperties[9]; v2->pMonsters[v2->uNumMonsters].uMonsterHeight = v9; v11 = atoi(v10); v12 = v25.pProperties[10]; v2->pMonsters[v2->uNumMonsters].uMovementSpeed = v11; v13 = atoi(v12); v14 = v25.pProperties[11]; v2->pMonsters[v2->uNumMonsters].uMonsterRadius = v13; v15 = atoi(v14); v16 = v25.pProperties[12]; v2->pMonsters[v2->uNumMonsters].uToHitRadius = v15; v17 = (unsigned __int8)atoi(v16); Argsb = atoi(v25.pProperties[13]) & 0xFF; v26 = atoi(v25.pProperties[14]) & 0xFF; v18 = atoi(v25.pProperties[15]); v2->pMonsters[v2->uNumMonsters].sTintColor = v18 | ((v26 | ((Argsb | (v17 << 8)) << 8)) << 8); v19 = 0; do { v20 = atoi(v25.pProperties[v19 + 16]); v21 = v19++ ; v2->pMonsters[v2->uNumMonsters].pSoundSampleIDs[v21] = v20; } while ( v19 < 4 ); ++v2->uNumMonsters; } } fclose(File); return 1; } //----- (004598AF) -------------------------------------------------------- void MonsterList::FromFile(void *data_mm6, void *data_mm7, void *data_mm8) { uint num_mm6_monsters = data_mm6 ? *(int *)data_mm6 : 0, num_mm7_monsters = data_mm7 ? *(int *)data_mm7 : 0, num_mm8_monsters = data_mm8 ? *(int *)data_mm8 : 0; uNumMonsters = num_mm6_monsters + num_mm7_monsters + num_mm8_monsters; Assert(uNumMonsters); Assert(!num_mm8_monsters); pMonsters = (MonsterDesc *)malloc(sizeof(MonsterDesc) * uNumMonsters); memcpy(pMonsters, (char *)data_mm7 + 4, num_mm7_monsters * sizeof(MonsterDesc)); for (uint i = 0; i < num_mm6_monsters; ++i) { auto src = (MonsterDesc_mm6 *)((char *)data_mm6 + 4) + i; MonsterDesc* dst = &pMonsters[num_mm7_monsters + i]; dst->uMonsterHeight = src->uMonsterHeight; dst->uMonsterRadius = src->uMonsterRadius; dst->uMovementSpeed = src->uMovementSpeed; dst->uToHitRadius = src->uToHitRadius; dst->sTintColor = -1; memcpy(dst->pSoundSampleIDs, src->pSoundSampleIDs, sizeof(src->pSoundSampleIDs)); memcpy(dst->pMonsterName, src->pMonsterName, sizeof(src->pMonsterName)); memcpy(dst->pSpriteNames, src->pSpriteNames, sizeof(src->pSpriteNames)); } memcpy(pMonsters + num_mm6_monsters + num_mm7_monsters, (char *)data_mm8 + 4, num_mm8_monsters * sizeof(MonsterDesc)); } //----- (00459860) -------------------------------------------------------- void MonsterList::ToFile() { MonsterList *v1; // esi@1 FILE *v2; // eax@1 FILE *v3; // edi@1 v1 = this; v2 = fopen("data\\dmonlist.bin", "wb"); v3 = v2; if ( !v2 ) Error("Unable to save dmonlist.bin!"); fwrite(v1, 4u, 1u, v2); fwrite(v1->pMonsters, 0x98u, v1->uNumMonsters, v3); fclose(v3); } //----- (004563FF) -------------------------------------------------------- signed int MonsterStats::FindMonsterByTextureName(const char *monster_textr_name) { for (int i=1; i<uNumMonsters; ++i) { if((pInfos[i].pName )&& (!_stricmp(pInfos[i].pPictureName, monster_textr_name))) return i; } return -1; } //----- (00454F4E) -------------------------------------------------------- void MonsterStats::InitializePlacements() { int i; char* test_string; unsigned char c; bool break_loop; unsigned int temp_str_len; char* tmp_pos; int decode_step; // int item_counter; pMonsterPlacementTXT_Raw = (char *)pEvents_LOD->LoadRaw("placemon.txt", 0); strtok(pMonsterPlacementTXT_Raw, "\r"); for (i=1; i<31; ++i) { test_string = strtok(NULL, "\r") + 1; break_loop = false; decode_step=0; do { c = *(unsigned char*)test_string; temp_str_len = 0; while((c!='\t')&&(c>0)) { ++temp_str_len; c=test_string[temp_str_len]; } tmp_pos=test_string+temp_str_len; if (*tmp_pos == 0) break_loop = true; *tmp_pos = 0; if (temp_str_len) { if (decode_step==1) pPlaceStrings[i]=RemoveQuotes(test_string); } else { break_loop = true; } ++decode_step; test_string=tmp_pos+1; } while ((decode_step<3)&&!break_loop); } uNumPlacements = 31; } //----- (0045501E) -------------------------------------------------------- void MonsterStats::Initialize() { int i;//,j; char* test_string; unsigned char c; bool break_loop; unsigned int temp_str_len; char* tmp_pos; int decode_step; // int item_counter; int curr_rec_num; char parse_str[64]; char Src[120]; FrameTableTxtLine parsed_field; free(pMonstersTXT_Raw); pMonstersTXT_Raw = (char *)pEvents_LOD->LoadRaw("monsters.txt", 0); strtok(pMonstersTXT_Raw, "\r"); strtok(NULL, "\r"); strtok(NULL, "\r"); strtok(NULL, "\r"); uNumMonsters = 265; curr_rec_num=0; for (i=0;i<uNumMonsters-1;++i) { test_string = strtok(NULL, "\r") + 1; break_loop = false; decode_step=0; do { c = *(unsigned char*)test_string; temp_str_len = 0; while((c!='\t')&&(c>0)) { ++temp_str_len; c=test_string[temp_str_len]; } tmp_pos=test_string+temp_str_len; if (*tmp_pos == 0) break_loop = true; *tmp_pos = 0; if (temp_str_len) { switch (decode_step) { case 0: curr_rec_num=atoi(test_string); pInfos[curr_rec_num].uID=curr_rec_num; break; case 1: pInfos[curr_rec_num].pName=RemoveQuotes(test_string); break; case 2: pInfos[curr_rec_num].pPictureName=RemoveQuotes(test_string); break; case 3: pInfos[curr_rec_num].uLevel=atoi(test_string); break; case 4: { int str_len=0; int str_pos=0; pInfos[curr_rec_num].uHP=0; if (test_string[0]=='"') test_string[0]=' '; str_len=strlen(test_string); if (str_len==0) break; while ((test_string[str_pos]!=',')&&(str_pos<str_len)) ++str_pos; if (str_len==str_pos) pInfos[curr_rec_num].uHP=atoi(test_string); else { test_string[str_pos]='\0'; pInfos[curr_rec_num].uHP=1000*atoi(test_string); pInfos[curr_rec_num].uHP+=atoi(&test_string[str_pos+1]); test_string[str_pos]=','; } } break; case 5: pInfos[curr_rec_num].uAC=atoi(test_string); break; case 6: { int str_len=0; int str_pos=0; pInfos[curr_rec_num].uExp=0; if (test_string[0]=='"') test_string[0]=' '; str_len=strlen(test_string); if (str_len==0) break; while ((test_string[str_pos]!=',')&&(str_pos<str_len)) ++str_pos; if (str_len==str_pos) pInfos[curr_rec_num].uExp=atoi(test_string); else { test_string[str_pos]='\0'; pInfos[curr_rec_num].uExp=1000*atoi(test_string); pInfos[curr_rec_num].uExp+=atoi(&test_string[str_pos+1]); test_string[str_pos]=','; } } break; case 7: { int str_len=0; int str_pos=0; bool chance_flag=false; bool dice_flag=false; bool item_type_flag=false; char* item_name; pInfos[curr_rec_num].uTreasureDropChance=0; pInfos[curr_rec_num].uTreasureDiceRolls=0; pInfos[curr_rec_num].uTreasureDiceSides=0; pInfos[curr_rec_num].uTreasureType=0; pInfos[curr_rec_num].uTreasureLevel=0; if (test_string[0]=='"') test_string[0]=' '; str_len=strlen(test_string); do { switch(tolower(test_string[str_pos])) { case '%': chance_flag=true; break; case 'd': dice_flag=true; break; case 'l': item_type_flag=true; break; } ++str_pos; } while(str_pos<str_len); if (chance_flag) { pInfos[curr_rec_num].uTreasureDropChance=atoi(test_string); } else { if ((!dice_flag)&&(!item_type_flag)) break; pInfos[curr_rec_num].uTreasureDropChance=100; } if (dice_flag) { str_pos=0; dice_flag=false; do { switch(tolower(test_string[str_pos])) { case '%': pInfos[curr_rec_num].uTreasureDiceRolls=atoi(&test_string[str_pos+1]); dice_flag=true; break; case 'd': if(!dice_flag) pInfos[curr_rec_num].uTreasureDiceRolls=atoi(test_string); pInfos[curr_rec_num].uTreasureDiceSides=atoi(&test_string[str_pos+1]); str_pos=str_len; break; } ++str_pos; } while(str_pos<str_len); } if (item_type_flag) { str_pos=0; do { if (tolower(test_string[str_pos])=='l') break; ++str_pos; } while(str_pos<str_len); pInfos[curr_rec_num].uTreasureLevel=test_string[str_pos+1]-'0'; item_name=&test_string[str_pos+2]; if (*item_name) { if ( !_stricmp(item_name, "WEAPON")) pInfos[curr_rec_num].uTreasureType= 20; else if ( !_stricmp(item_name, "ARMOR")) pInfos[curr_rec_num].uTreasureType= 21; else if ( !_stricmp(item_name, "MISC")) pInfos[curr_rec_num].uTreasureType= 22; else if ( !_stricmp(item_name, "SWORD")) pInfos[curr_rec_num].uTreasureType= 23; else if ( !_stricmp(item_name, "DAGGER")) pInfos[curr_rec_num].uTreasureType= 24; else if ( !_stricmp(item_name, "AXE")) pInfos[curr_rec_num].uTreasureType= 25; else if ( !_stricmp(item_name, "SPEAR")) pInfos[curr_rec_num].uTreasureType= 26; else if ( !_stricmp(item_name, "BOW")) pInfos[curr_rec_num].uTreasureType= 27; else if ( !_stricmp(item_name, "MACE")) pInfos[curr_rec_num].uTreasureType= 28; else if ( !_stricmp(item_name, "CLUB")) pInfos[curr_rec_num].uTreasureType= 29; else if ( !_stricmp(item_name, "STAFF")) pInfos[curr_rec_num].uTreasureType= 30; else if ( !_stricmp(item_name, "LEATHER")) pInfos[curr_rec_num].uTreasureType= 31; else if ( !_stricmp(item_name, "CHAIN")) pInfos[curr_rec_num].uTreasureType= 32; else if ( !_stricmp(item_name, "PLATE")) pInfos[curr_rec_num].uTreasureType= 33; else if ( !_stricmp(item_name, "SHIELD")) pInfos[curr_rec_num].uTreasureType= 34; else if ( !_stricmp(item_name, "HELM")) pInfos[curr_rec_num].uTreasureType= 35; else if ( !_stricmp(item_name, "BELT")) pInfos[curr_rec_num].uTreasureType= 36; else if ( !_stricmp(item_name, "CAPE")) pInfos[curr_rec_num].uTreasureType= 37; else if ( !_stricmp(item_name, "GAUNTLETS")) pInfos[curr_rec_num].uTreasureType= 38; else if ( !_stricmp(item_name, "BOOTS")) pInfos[curr_rec_num].uTreasureType= 39; else if ( !_stricmp(item_name, "RING")) pInfos[curr_rec_num].uTreasureType= 40; else if ( !_stricmp(item_name, "AMULET")) pInfos[curr_rec_num].uTreasureType= 41; else if ( !_stricmp(item_name, "WAND")) pInfos[curr_rec_num].uTreasureType= 42; else if ( !_stricmp(item_name, "SCROLL")) pInfos[curr_rec_num].uTreasureType= 43; else if ( !_stricmp(item_name, "GEM")) pInfos[curr_rec_num].uTreasureType= 46; } } } break; case 8: { pInfos[curr_rec_num].bQuestMonster=0; if (atoi(test_string)) pInfos[curr_rec_num].bQuestMonster=1; } break; case 9: { pInfos[curr_rec_num].uFlying=false; if (_strnicmp(test_string, "n",1)) pInfos[curr_rec_num].uFlying=true; } break; case 10: { switch(tolower(test_string[0])) { case 's': pInfos[curr_rec_num].uMovementType=MONSTER_MOVEMENT_TYPE_SHORT;// short if (tolower(test_string[1])!='h') pInfos[curr_rec_num].uMovementType=MONSTER_MOVEMENT_TYPE_STAIONARY; //stationary break; //short case 'l': pInfos[curr_rec_num].uMovementType=2; break; //long case 'm': pInfos[curr_rec_num].uMovementType=1; break; //med case 'g': pInfos[curr_rec_num].uMovementType=3; break; //global? default: pInfos[curr_rec_num].uMovementType=4; //free } } break; case 11: { switch(tolower(test_string[0])) { case 's': pInfos[curr_rec_num].uAIType=0; break; // suicide case 'w': pInfos[curr_rec_num].uAIType=1; break; //wimp case 'n': pInfos[curr_rec_num].uAIType=2; break; //normal default: pInfos[curr_rec_num].uAIType=3; //Agress } } break; case 12: pInfos[curr_rec_num].uHostilityType=(MonsterInfo::HostilityRadius)atoi(test_string); break; case 13: pInfos[curr_rec_num].uBaseSpeed=atoi(test_string); break; case 14: pInfos[curr_rec_num].uRecoveryTime=atoi(test_string); break; case 15: { int str_len=0; int str_pos=0; pInfos[curr_rec_num].uAttackPreference=0; pInfos[curr_rec_num].uNumCharactersAttackedPerSpecialAbility=0; str_len=strlen(test_string); for (str_pos=0;str_pos<str_len;++str_pos ) { switch(tolower(test_string[str_pos])) { case '0': pInfos[curr_rec_num].uAttackPreference|=0x0004; break; case '2': pInfos[curr_rec_num].uNumCharactersAttackedPerSpecialAbility=2; break; case '3': pInfos[curr_rec_num].uNumCharactersAttackedPerSpecialAbility=3; break; case '4': pInfos[curr_rec_num].uNumCharactersAttackedPerSpecialAbility=4; break; case 'c': pInfos[curr_rec_num].uAttackPreference|=0x0010; break; case 'd': pInfos[curr_rec_num].uAttackPreference|=0x0008; break; case 'e': pInfos[curr_rec_num].uAttackPreference|=0x1000; break; case 'f': pInfos[curr_rec_num].uAttackPreference|=0x0400; break; case 'h': pInfos[curr_rec_num].uAttackPreference|=0x0800; break; case 'k': pInfos[curr_rec_num].uAttackPreference|=0x0001; break; case 'm': pInfos[curr_rec_num].uAttackPreference|=0x0100; break; case 'o': pInfos[curr_rec_num].uAttackPreference|=0x0400; break; case 'p': pInfos[curr_rec_num].uAttackPreference|=0x0002; break; case 'r': pInfos[curr_rec_num].uAttackPreference|=0x0040; break; case 's': pInfos[curr_rec_num].uAttackPreference|=0x0020; break; case 't': pInfos[curr_rec_num].uAttackPreference|=0x0080; break; case 'w': pInfos[curr_rec_num].uAttackPreference|=0x2000; break; case 'x': pInfos[curr_rec_num].uAttackPreference|=0x0200; break; } } } break; case 16: { int str_len=0; int str_pos=0; pInfos[curr_rec_num].uSpecialAttackLevel=1; pInfos[curr_rec_num].uSpecialAttackType=(SPECIAL_ATTACK_TYPE)0; str_len=strlen(test_string); if (str_len>1) { for (str_pos=0;str_pos<str_len;++str_pos ) { if (tolower(test_string[str_pos])=='x') { test_string[str_pos]='\0'; pInfos[curr_rec_num].uSpecialAttackLevel=atoi(&test_string[str_pos+1]); test_string[str_pos]='x'; break; } } pInfos[curr_rec_num].uSpecialAttackType=(SPECIAL_ATTACK_TYPE)ParseSpecialAttack(test_string); } } break; case 17: pInfos[curr_rec_num].uAttack1Type=ParseAttackType(test_string); break; case 18: { ParseDamage(test_string, &pInfos[curr_rec_num].uAttack1DamageDiceRolls, &pInfos[curr_rec_num].uAttack1DamageDiceSides, &pInfos[curr_rec_num].uAttack1DamageBonus); } break; case 19: pInfos[curr_rec_num].uMissleAttack1Type=ParseMissleAttackType(test_string); break; case 20: pInfos[curr_rec_num].uAttack2Chance=atoi(test_string); break; case 21: pInfos[curr_rec_num].uAttack2Type=ParseAttackType(test_string); break; case 22: { ParseDamage(test_string, &pInfos[curr_rec_num].uAttack2DamageDiceRolls, &pInfos[curr_rec_num].uAttack2DamageDiceSides, &pInfos[curr_rec_num].uAttack2DamageBonus); } break; case 23: pInfos[curr_rec_num].uMissleAttack2Type=ParseMissleAttackType(test_string); break; case 24: pInfos[curr_rec_num].uSpell1UseChance=atoi(test_string); break; case 25: { int param_num; char type_flag; strcpy(parse_str,test_string); parse_str[0]=' '; parse_str[strlen(parse_str)-1]=' '; frame_table_txt_parser(parse_str,&parsed_field); if (parsed_field.uPropCount>2) { param_num=1; pInfos[curr_rec_num].uSpell1ID=ParseSpellType(&parsed_field,¶m_num); type_flag=*parsed_field.pProperties[param_num]; pInfos[curr_rec_num].uSpellSkillAndMastery1=atoi(parsed_field.pProperties[param_num+1])&0x003F; switch(type_flag) { case 'E': pInfos[curr_rec_num].uSpellSkillAndMastery1|=0x0040; break; case 'M': pInfos[curr_rec_num].uSpellSkillAndMastery1|=0x0080; break; case 'G': pInfos[curr_rec_num].uSpellSkillAndMastery1|=0x0100; break; } } else { pInfos[curr_rec_num].uSpell1ID=0; pInfos[curr_rec_num].uSpellSkillAndMastery1=0; } } break; case 26: pInfos[curr_rec_num].uSpell2UseChance=atoi(test_string); break; case 27: { int param_num; char type_flag; strcpy(parse_str,test_string); parse_str[0]=' '; parse_str[strlen(parse_str)-1]=' '; frame_table_txt_parser(parse_str,&parsed_field); if (parsed_field.uPropCount>2) { param_num=1; pInfos[curr_rec_num].uSpell2ID=ParseSpellType(&parsed_field,¶m_num); type_flag=*parsed_field.pProperties[param_num]; pInfos[curr_rec_num].uSpellSkillAndMastery2=atoi(parsed_field.pProperties[param_num+1])&0x003F; switch(type_flag) { case 'E': pInfos[curr_rec_num].uSpellSkillAndMastery2|=0x0040; break; case 'M': pInfos[curr_rec_num].uSpellSkillAndMastery2|=0x0080; break; case 'G': pInfos[curr_rec_num].uSpellSkillAndMastery2|=0x0100; break; } } else { pInfos[curr_rec_num].uSpell2ID=0; pInfos[curr_rec_num].uSpellSkillAndMastery2=0; } } break; case 28: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResFire=200; else pInfos[curr_rec_num].uResFire=atoi(test_string); } break; case 29: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResAir=200; else pInfos[curr_rec_num].uResAir=atoi(test_string); } break; case 30: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResWater=200; else pInfos[curr_rec_num].uResWater=atoi(test_string); } break; case 31: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResEarth=200; else pInfos[curr_rec_num].uResEarth=atoi(test_string); } break; case 32: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResMind=200; else pInfos[curr_rec_num].uResMind=atoi(test_string); } break; case 33: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResSpirit=200; else pInfos[curr_rec_num].uResSpirit=atoi(test_string); } break; case 34: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResBody=200; else pInfos[curr_rec_num].uResBody=atoi(test_string); } break; case 35: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResLight=200; else pInfos[curr_rec_num].uResLight=atoi(test_string); } break; case 36: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResDark=200; else pInfos[curr_rec_num].uResDark=atoi(test_string); } break; case 37: { if (tolower(test_string[0])=='i') pInfos[curr_rec_num].uResPhysical=200; else pInfos[curr_rec_num].uResPhysical=atoi(test_string); } break; case 38: { // int param_num; // char type_flag; pInfos[curr_rec_num].uSpecialAbilityType=0; pInfos[curr_rec_num].uSpecialAbilityDamageDiceBonus=0; strcpy(parse_str,test_string); parse_str[0]=' '; parse_str[strlen(parse_str)-1]=' '; frame_table_txt_parser(parse_str,&parsed_field); if ( parsed_field.uPropCount ) { // v74 = v94.field_0; if ( parsed_field.uPropCount < 10 ) { if (! _stricmp(parsed_field.pProperties[0], "shot") ) { pInfos[curr_rec_num].uSpecialAbilityType=1; pInfos[curr_rec_num].uSpecialAbilityDamageDiceBonus=atoi((char *)(parsed_field.pProperties[1] + 1)); } else if (!_stricmp(parsed_field.pProperties[0], "summon") ) { pInfos[curr_rec_num].uSpecialAbilityType=2; if ( parsed_field.uPropCount > 1 ) { pTmpBuf[0] = 0; strcpy(pTmpBuf.data(), parsed_field.pProperties[2]); if ( parsed_field.uPropCount > 2 ) { int prop_cnt = 3; if ( parsed_field.uPropCount > 3 ) { do { strcat(pTmpBuf.data(), " "); char test_char = parsed_field.pProperties[prop_cnt][0]; strcat(pTmpBuf.data(), parsed_field.pProperties[prop_cnt]); if ( prop_cnt == (parsed_field.uPropCount - 1) ) { switch (tolower(test_char)) { case 'a': pInfos[curr_rec_num].uSpecialAbilityDamageDiceRolls = 1; break; case 'b': pInfos[curr_rec_num].uSpecialAbilityDamageDiceRolls = 2; break; case 'c': pInfos[curr_rec_num].uSpecialAbilityDamageDiceRolls = 3; break; default: pInfos[curr_rec_num].uSpecialAbilityDamageDiceRolls = 0; } } ++prop_cnt; } while ( prop_cnt < parsed_field.uPropCount ); } } else { pInfos[curr_rec_num].uSpecialAbilityDamageDiceRolls = 0; } if ( pMonsterList->uNumMonsters ) { pInfos[curr_rec_num].field_3C_some_special_attack = pMonsterList->GetMonsterIDByName(pTmpBuf.data()) + 1; if ( pInfos[curr_rec_num].field_3C_some_special_attack == -1 ) { sprintf(Src, "Can't create random monster: '%s' See MapStats!", pTmpBuf.data()); MessageBoxA(nullptr, Src, "E:\\WORK\\MSDEV\\MM7\\MM7\\Code\\Itemdata.cpp:2239", 0); } } pInfos[curr_rec_num].uSpecialAbilityDamageDiceSides = 0; if ( !_stricmp(parsed_field.pProperties[1], "ground") ) pInfos[curr_rec_num].uSpecialAbilityDamageDiceSides = 1; if ( pInfos[curr_rec_num].field_3C_some_special_attack == -1 ) pInfos[curr_rec_num].uSpecialAbilityType = 0; } } else if (!_stricmp(parsed_field.pProperties[0], "explode") ) { pInfos[curr_rec_num].uSpecialAbilityType = 3; ParseDamage((char*)parsed_field.pProperties[1], &pInfos[curr_rec_num].uSpecialAbilityDamageDiceRolls, &pInfos[curr_rec_num].uSpecialAbilityDamageDiceSides, &pInfos[curr_rec_num].uSpecialAbilityDamageDiceBonus); pInfos[curr_rec_num].field_3C_some_special_attack = ParseAttackType(test_string); } } } } break; } } else { break_loop = true; } ++decode_step; test_string=tmp_pos+1; } while ((decode_step<39)&&!break_loop); } uNumMonsters = i; } //----- (0044FA08) -------------------------------------------------------- signed __int16 MonsterList::GetMonsterIDByName( const char *pMonsterName ) { if (!pMonsterName) return -1; for (signed __int16 i=1; i<=uNumMonsters; ++i) { if( (!_stricmp(pMonsters[i].pMonsterName, pMonsterName))) return i; } Error("Monster not found: %s", pMonsterName); } //----- (00438BDF) -------------------------------------------------------- bool MonsterStats::BelongsToSupertype(unsigned int uMonsterInfoID, enum MONSTER_SUPERTYPE eSupertype) { unsigned __int8 v2; // zf@15 char v3; // sf@15 unsigned __int8 v4; // of@15 bool result; // eax@33 switch ( eSupertype ) { case MONSTER_SUPERTYPE_UNDEAD: if ( (signed int)uMonsterInfoID >= MONSTER_GHOST_1 && (signed int)uMonsterInfoID <= MONSTER_GHOST_3 || (signed int)uMonsterInfoID >= MONSTER_LICH_1 && (signed int)uMonsterInfoID <= MONSTER_LICH_3 || (signed int)uMonsterInfoID >= MONSTER_SKELETON_1 && (signed int)uMonsterInfoID <= MONSTER_SKELETON_3 || (signed int)uMonsterInfoID >= MONSTER_VAMPIRE_1 && (signed int)uMonsterInfoID <= MONSTER_VAMPIRE_3 || (signed int)uMonsterInfoID >= MONSTER_WIGHT_1 && (signed int)uMonsterInfoID <= MONSTER_WIGHT_3 || (signed int)uMonsterInfoID >= MONSTER_ZOMBIE_1 && (signed int)uMonsterInfoID <= MONSTER_ZOMBIE_3 ) goto ret_true; if ( (signed int)uMonsterInfoID < MONSTER_GHOUL_1 ) goto ret_false; v4 = __OFSUB__(uMonsterInfoID, (int)MONSTER_GHOUL_3); v2 = uMonsterInfoID == MONSTER_GHOUL_3; v3 = ((uMonsterInfoID - MONSTER_GHOUL_3) & 0x80000000u) != 0; goto false_if_outside; case MONSTER_SUPERTYPE_KREEGAN: if ( (signed int)uMonsterInfoID < MONSTER_DEVIL_1 ) goto ret_false; v4 = __OFSUB__(uMonsterInfoID, (int)MONSTER_DEVIL_3); v2 = uMonsterInfoID == MONSTER_DEVIL_3; v3 = ((uMonsterInfoID - MONSTER_DEVIL_3) & 0x80000000u) != 0; goto false_if_outside; case MONSTER_SUPERTYPE_ELF: if ( (signed int)uMonsterInfoID >= MONSTER_PEASANT_ELF_FEMALE_1_1 && (signed int)uMonsterInfoID <= MONSTER_PEASANT_ELF_MALE_3_3 || (signed int)uMonsterInfoID >= MONSTER_ELF_ARCHER_1 && (signed int)uMonsterInfoID <= MONSTER_ELF_ARCHER_3 ) goto ret_true; if ( (signed int)uMonsterInfoID < MONSTER_ELF_SPEARMAN_1 ) goto ret_false; v4 = __OFSUB__(uMonsterInfoID, (int)MONSTER_ELF_SPEARMAN_3); v2 = uMonsterInfoID == MONSTER_ELF_SPEARMAN_3; v3 = ((uMonsterInfoID - MONSTER_ELF_SPEARMAN_3) & 0x80000000u) != 0; goto false_if_outside; case MONSTER_SUPERTYPE_DRAGON: if ( (signed int)uMonsterInfoID < MONSTER_DRAGON_1 ) goto ret_false; v4 = __OFSUB__(uMonsterInfoID, (int)MONSTER_DRAGON_3); v2 = uMonsterInfoID == MONSTER_DRAGON_3; v3 = ((uMonsterInfoID - MONSTER_DRAGON_3) & 0x80000000u) != 0; goto false_if_outside; case MONSTER_SUPERTYPE_WATER_ELEMENTAL: if ( (signed int)uMonsterInfoID < MONSTER_ELEMENTAL_WATER_1 ) goto ret_false; v4 = __OFSUB__(uMonsterInfoID, (int)MONSTER_ELEMENTAL_WATER_3); v2 = uMonsterInfoID == MONSTER_ELEMENTAL_WATER_3; v3 = ((uMonsterInfoID - MONSTER_ELEMENTAL_WATER_3) & 0x80000000u) != 0; goto false_if_outside; case MONSTER_SUPERTYPE_TREANT: if ( (signed int)uMonsterInfoID < MONSTER_TREANT_1 ) goto ret_false; v4 = __OFSUB__(uMonsterInfoID, (int)MONSTER_TREANT_3); v2 = uMonsterInfoID == MONSTER_TREANT_3; v3 = ((uMonsterInfoID - MONSTER_TREANT_3) & 0x80000000u) != 0; goto false_if_outside; case MONSTER_SUPERTYPE_TITAN: if ( (signed int)uMonsterInfoID < MONSTER_TITAN_1 ) goto ret_false; v4 = __OFSUB__(uMonsterInfoID, (int)MONSTER_TITAN_3); v2 = uMonsterInfoID == MONSTER_TITAN_3; v3 = ((uMonsterInfoID - MONSTER_TITAN_3) & 0x80000000u) != 0; false_if_outside: if ( !((unsigned __int8)(v3 ^ v4) | v2) ) goto ret_false; ret_true: result = 1; break; default: ret_false: result = 0; break; } return result; }