openboe/oboe
2
0
Fork 0
Code Issues 146 Pull Requests 4 Actions Packages Projects Releases Wiki Activity
Files
29906153cf725a0daf0df27812fc3dd67dde6203
oboe/osx/scenedit/scen.core.cpp
Celtic Minstrel b02902770c Well, at present the Windows code for the actual game almost compiles. The current goal is to undo all the things that Ormus did to make this job difficult. 
Basically, remove as many as possible of the dependencies of the source files in the tools and classes folders on source files not in those folders.
(With the exception that files in the classes folder may depend on files in the tools folder.)

In this commit, several changes were made.
- Project file modified, may need further modification.
- Many files renamed to match the Mac version.
- #include statements for system headers changed to use <> instead of "" (some already did, but many didn't).
- xxx.h headers replaced with cxxx headers where appropriate.
- Most sound-related variables moved from globvars.cpp to soundvars.cpp.
- The files originally named graphutil and gutils have been merged.
- Changed TRUE/FALSE to true/false.
- Changed exlsound to soundtool and mostly removed dependencies on the main game files; the exception is that it still uses mainPtr (which probably can't be helped)
  and print_nums (which should probably be incorporated into the MessageBox string).
- Possibly other things that were forgotten.

For some reason this commit also includes changes recently committed into the branch for osx.

git-svn-id: http://openexile.googlecode.com/svn/trunk@121 4ebdad44-0ea0-11de-aab3-ff745001d230
2009-08-03 19:00:23 +00:00

2919 lines
86 KiB
C++
Raw Blame History

#include <cstdio>
#include <cstring>
#include <boost/bind.hpp>
#include "scen.global.h"
#include "classes.h"
#include "graphtool.h"
#include "scen.graphics.h"
#include "scen.dlgutil.h"
//#include "itemlist.h"
#include "scen.core.h"
#include "dlgtool.h"
#include "dlgconsts.h"
#include "scen.keydlgs.h"
#include "scen.townout.h"
#include "scen.fileio.h"
#include "scen.actions.h"
#include "dialog.h"
#include "dlogutil.h"
#include "fileio.h"
extern short cen_x, cen_y,/* overall_mode,*/cur_town;
extern bool mouse_button_held;
extern short cur_viewing_mode,dialog_answer;//,given_password,user_given_password;
extern cTown* town;
//extern short town_type; // 0 - big 1 - ave 2 - small
extern short max_dim[3];
extern short mode_count,to_create;
extern ter_num_t template_terrain[64][64];
cItemRec item_list[400];
extern cScenario scenario;
extern cSpecial null_spec_node;
extern cSpeech null_talk_node;
//extern piles_of_stuff_dumping_type *data_store;
extern location cur_out;
extern short start_volume, start_dir;
short store_which_ter;
cTerrain store_ter;
short store_which_monst;
cMonster store_monst,store_monst2;
short store_which_item;
cItemRec store_item,store_item2;
short store_which_spec_item ;
short spec_item_spec,store_horse_page,store_boat_page ;
cScenario::cItemStorage store_storage;
short cur_shortcut;
char *item_types[] = {"No Item","1-Handed weapon","2-Handed weapon","Gold","Bow","Arrows","Thrown missile",
"Potion/Magic Item","Scroll/Magic Item","Wand","Tool","Food","Shield","Armor","Helm",
"Gloves","Shield","Boots","Ring","Necklace",
"Weapon Poison","Non-Use Object","Pants","Crossbow","Bolts","Missile (no ammo)","Unused","Unused"};
unsigned char m_level[200] = {
0,1,1,1,1,1,1,1,1,1, // 0
1,1,30,4,8,12,20,25,3,5, // 10
28,3,8,20,4,8,20,5,10,25, // 20
35,8,6,2,2,7,6,12,2,5, // 30
4,6,5,6,8,7,18,7,10,8, // 40
8,12,12,15,18,22,28,26,3,10, // 50
4,3,6,8,12,11,10,14,18,35, // 60
14,10,4,8,8,3,7,3,2,4, // 70
3,18,2,18,7,20,30,35,5,3, // 80
1,9,8,7,7,18,18,25,35,3, // 90
5,24,18,10,25,7,2,28,1,1, // 100
1,1,1,1,1,3,7,8,4,8, // 110
3,12,18,4,7,5,8,18,22,10, // 120
12,6,12,16,7,25,28,25,3,3, // 130
3,4,14,2,6,8,8,10,4,5, // 140
8,7,10,12,14,10,12,14,24,13, // 150
18,18,22,22,10,30,20,27,30,7, // 160
30,15,12,18,3,5,7,39,20,24, // 170
24,8,7,25,2,10,18,0,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
short m_health[200] = {
0,6,6,6,6,6,6,6,6,6, // 0
3,3,140,20,40,75,115,140,14,16, // 10
90,18,40,90,18,40,90,16,40,90, // 20
160,40,35,6,6,35,30,80,10,22, // 30
15,25,18,30,45,35,70,30,50,40, // 40
40,70,70,100,90,110,140,130,15,50, // 50
20,15,30,40,60,55,50,70,90,170, // 60
70,50,20,40,40,15,35,30,10,20, // 70
15,100,10,90,35,70,150,200,25,20, // 80
5,90,75,70,70,120,120,190,400,15, // 90
25,120,90,50,120,35,10,200,3,3, // 100
3,7,7,1,5,15,35,40,14,40, // 110
15,50,90,150,35,25,40,90,110,50, // 120
60,25,50,80,35,125,140,150,8,8, // 130
10,10,140,10,30,40,40,60,30,25, // 140
40,35,50,60,70,50,60,70,200,70, // 150
70,70,90,120,100,200,100,150,200,40, // 160
500,100,80,110,17,30,30,2500,100,125, // 170
140,40,10,80,6,30,50,150,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_armor[200] = {
1,1,1,1,1,1,1,1,1,1, // 0
1,1,30,8,12,18,22,25,6,6, // 10
20,8,14,20,8,14,20,5,10,20, // 20
30,4,4,2,2,9,7,15,3,5, // 30
4,7,6,12,18,9,15,7,3,5, // 40
10,18,18,24,10,14,24,25,2,6, // 50
0,0,2,2,2,7,8,10,5,15, // 60
7,10,4,7,7,0,0,0,2,2, // 70
2,1,10,12,8,14,20,20,4,2, // 80
2,10,10,14,14,14,14,18,25,2, // 90
2,8,8,5,9,12,12,18,1,1, // 100
1,1,1,1,1,1,1,3,1,1, // 110
1,6,6,12,8,5,5,7,10,0, // 120
7,2,5,13,6,20,18,25,0,0, // 130
0,0,10,2,3,4,5,6,0,6, // 140
10,10,12,20,30,8,14,8,18,20, // 150
14,14,18,25,25,25,20,30,9,0, // 160
15,6,10,14,3,1,10,40,14,14, // 170
10,6,30,20,1,2,4,12,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_skill[200] = {
2,2,2,2,2,2,2,2,2,1, // 0
1,2,30,8,10,14,20,23,5,6, // 10
28,2,4,8,2,4,8,2,4,5, // 20
5,3,3,1,1,12,8,25,5,8, // 30
3,9,8,4,18,10,10,7,14,6, // 40
6,6,6,28,12,10,28,28,4,10, // 50
5,3,9,13,18,7,10,17,20,30, // 60
8,16,7,12,12,4,7,7,3,5, // 70
5,15,4,18,12,18,24,33,5,5, // 80
3,12,12,8,8,8,8,23,35,4, // 90
6,7,7,5,12,0,0,0,1,1, // 100
1,1,1,1,1,5,9,12,3,25, // 110
5,9,20,25,10,5,12,15,24,13, // 120
8,3,12,18,10,4,28,33,3,3, // 130
3,3,12,4,6,7,7,13,30,5, // 140
8,6,8,14,22,12,18,10,30,20, // 150
15,15,13,26,0,0,30,36,30,4, // 160
26,18,15,17,6,5,10,35,20,20, // 170
17,7,2,16,2,8,14,18,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
short m_a1[200] = {
6,6,6,6,6,6,6,6,6,1, // 0
1,2,210,107,109,110,208,212,8,6, // 10
10,8,8,208,8,8,208,6,8,10, // 20
12,6,6,3,3,12,106,108,7,9, // 30
8,107,8,8,110,206,206,10,208,12, // 40
10,10,10,310,408,408,510,410,8,108, // 50
104,8,108,208,308,10,108,0,110,0, // 60
210,0,106,206,206,8,110,12,6,10, // 70
8,0,7,215,0,208,0,510,106,8, // 80
3,212,16,18,18,112,112,410,514,8, // 90
10,10,10,106,206,0,0,0,2,2, // 100
2,2,2,2,2,106,206,306,8,206, // 110
8,106,0,0,12,8,10,206,306,409, // 120
306,106,407,410,106,12,310,0,106,8, // 130
8,7,110,8,108,208,108,308,108,10, // 140
112,8,10,210,310,208,308,208,410,0, // 150
310,310,10,410,0,0,810,913,913,8, // 160
710,512,210,212,12,0,208,840,308,308, // 170
308,209,8,912,8,108,210,312,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
short m_a2[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,210,0,0,110,208,212,0,0, // 10
0,0,0,0,0,0,0,0,0,0, // 20
0,0,0,0,0,0,106,108,0,0, // 30
0,0,0,0,110,0,0,0,208,0, // 40
0,0,0,310,0,0,0,0,0,0, // 50
0,0,10,13,405,0,0,306,0,308, // 60
0,208,8,10,10,8,0,0,0,0, // 70
0,310,0,110,10,15,310,310,0,0, // 80
0,0,0,0,0,0,0,310,0,0, // 90
0,0,0,8,10,0,0,0,0,0, // 100
0,0,0,0,0,0,0,12,0,0, // 110
0,0,210,409,0,0,0,8,106,0, // 120
0,0,0,0,0,0,0,410,0,0, // 130
0,0,110,0,0,0,0,0,0,0, // 140
0,0,0,0,0,0,0,0,0,212, // 150
0,0,0,0,0,0,0,0,0,0, // 160
310,0,108,12,0,105,0,730,308,308, // 170
308,209,0,0,0,0,0,212,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
short m_a3[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,0,0,0,0,0,0,0,0, // 10
0,0,0,0,0,0,0,0,0,0, // 20
0,0,0,0,00,0,0,108,0,0, // 30
0,0,0,0,0,00,00,0,0,0, // 40
0,0,0,0,0,0,0,0,0,0, // 50
00,0,10,13,405,0,0,306,0,308, // 60
0,208,8,10,10,8,0,0,0,0, // 70
0,310,0,110,10,15,310,310,0,0, // 80
0,0,0,0,0,0,0,0,0,0, // 90
0,0,0,8,10,0,0,0,0,0, // 100
0,0,0,0,0,0,0,12,0,0, // 110
0,0,210,409,0,0,0,8,106,0, // 120
0,0,0,0,0,0,0,410,0,0, // 130
0,0,0,0,0,0,0,0,0,0, // 140
0,0,0,0,0,0,0,0,0,212, // 150
0,0,0,0,0,0,0,0,0,0, // 160
310,0,108,12,0,105,0,730,308,308, // 170
308,0,0,0,0,0,0,212,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_a1t[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,0,0,0,0,0,0,0,0, // 10
0,0,0,0,0,0,0,0,0,0, // 20
0,0,0,0,0,0,4,4,0,0, // 30
0,0,0,0,0,0,0,0,0,0, // 40
0,0,0,0,0,0,0,0,1,1, // 50
1,1,2,2,2,1,1,0,1,0, // 60
1,0,2,2,2,3,3,3,2,2, // 70
2,0,2,2,0,2,0,2,2,0, // 80
0,0,0,0,0,0,0,0,0,2, // 90
2,2,2,2,2,0,0,0,2,2, // 100
2,2,2,2,2,2,2,2,2,2, // 110
4,1,0,0,0,0,0,2,2,3, // 120
2,2,2,2,4,4,2,0,3,3, // 130
3,3,3,2,2,2,2,2,2,0, // 140
0,0,0,0,0,0,0,0,0,0, // 150
0,0,0,0,0,0,2,2,2,4, // 160
2,2,2,2,0,0,3,2,2,2,// 170
2,2,7,9,0,0,0,2,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_a23t[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,0,0,0,0,0,0,0,0, // 10
0,0,0,0,0,0,0,0,0,0, // 20
0,0,0,0,0,0,4,4,0,0, // 30
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0, // 50
0,0,1,1,1,0,0,1,0,1,
0,1,1,1,1,3,3,3,0,0,
0,1,0,1,1,1,4,1,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,1,1,0,0,0,0,0, //100
0,0,0,0,0,0,0,1,0,0,
0,0,0,1,1,0,0,1,1,0,
0,0,0,0,0,0,0,1,0,0,
0,0,3,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0, // 150
0,0,0,0,0,0,0,0,0,0,
1,1,1,1,0,1,0,1,2,2,
2,2,0,0,0,0,0,1,0,0,
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_type[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,0,0,0,0,0,0,0,0, // 10
0,5,5,5,5,5,5,4,4,4, // 20
4,4,4,0,0,0,5,5,6,6, // 30
6,6,6,6,6,6,6,6,6,6, // 40
6,6,6,6,9,9,9,9,8,8, // 50
8,8,8,8,8,8,8,8,8,8, // 60
8,8,1,1,1,10,10,10,2,2, // 70
2,2,2,1,7,7,7,7,7,6, // 80
6,6,6,6,6,6,6,6,6,1, // 90
1,2,2,1,1,11,11,11,2,2, // 100
2,2,2,2,2,2,2,2,12,12, // 110
6,2,2,3,2,8,8,1,1,10, // 120
12,12,12,12,2,2,2,2,10,10, // 130
10,10,10,12,12,12,12,12,12,6, // 140
6,6,6,6,6,9,9,9,9,11, // 150
11,11,11,11,11,11,2,2,2,6, // 160
1,2,2,2,1,8,10,13,1,1, // 170
1,1,14,14,6,6,6,7,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_speed[200] = {
0,4,4,4,4,4,4,4,4,4, // 0
4,4,6,4,4,5,8,8,4,4, // 10
4,4,4,4,4,4,4,4,5,6, // 20
7,4,4,4,4,4,5,8,3,3, // 30
4,6,4,4,6,4,4,4,4,4, // 40
4,4,4,4,3,4,4,4,4,4, // 50
4,4,4,4,9,4,4,4,4,5, // 60
4,4,4,4,4,3,3,3,4,4, // 70
4,3,8,4,4,4,4,4,4,4, // 80
4,7,6,4,4,4,4,6,8,4, // 90
4,5,6,4,4,4,4,5,2,3, // 100
3,3,3,2,2,4,4,4,4,4, // 110
7,4,4,4,3,4,4,4,4,3, // 120
4,4,4,4,4,5,5,5,3,3, // 130
3,3,3,3,3,4,4,4,4,4, // 140
4,4,4,4,4,4,4,4,4,4, // 150
4,4,4,7,4,4,4,5,3,4, // 160
4,4,3,4,4,3,4,4,4,4, // 170
4,4,9,8,3,5,5,6,4,4, // 180
4,4,4,4,4,4,4,4,4,4
}; // 190
unsigned char m_mu[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,0,0,0,0,0,0,0,0, // 10
0,0,0,0,0,0,0,2,4,7, // 20
7,5,3,0,0,0,0,0,0,0, // 30
0,0,0,3,0,0,6,0,0,0,
4,0,6,0,0,4,0,0,0,0, // 50
0,0,0,0,0,3,0,0,5,7,
4,0,0,0,0,0,0,0,0,0,
0,0,0,4,2,5,0,7,1,0,
0,0,0,3,0,6,0,0,7,0,
0,6,0,0,0,1,0,7,0,0, //100
0,0,0,0,0,0,0,0,0,0,
0,3,0,0,0,0,0,0,3,0,
0,0,0,0,0,6,5,4,0,0,
0,1,0,0,0,0,0,0,0,0,
0,4,6,0,0,0,0,3,0,0, // 150
0,0,0,0,0,7,0,0,0,0,
5,0,0,0,0,0,0,7,0,0,
0,0,3,2,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_cl[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,0,0,0,0,0,0,0,0, // 10
0,2,4,6,2,4,6,0,0,0, // 20
0,0,0,0,0,0,0,0,0,0, // 30
0,0,0,3,0,0,0,0,0,4,
0,7,0,0,0,4,0,0,0,0, // 50
0,0,0,0,0,0,0,0,0,7,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,2,3,0,7,1,0,
0,0,0,0,3,0,6,0,7,0,
0,3,0,0,0,1,0,7,0,0, //100
0,0,0,0,0,0,0,0,0,0,
0,5,0,0,0,0,2,0,3,0,
0,0,0,0,0,0,4,0,0,0,
0,1,0,0,0,0,0,0,0,0,
0,5,6,0,0,0,0,3,0,0, // 150
0,0,0,5,0,7,0,0,0,0,
7,0,0,0,0,0,0,7,0,0,
0,0,0,2,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_breath[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,0,0,0,0,0,0,0,0, // 10
0,0,0,0,0,0,0,0,0,0, // 20
0,0,0,0,0,0,0,0,0,0, // 30
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0, // 50
0,0,0,0,0,0,0,0,0,0,
0,0,0,4,104,0,0,0,0,0,
0,0,0,6,0,0,0,8,1,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0, //100
0,0,0,0,0,0,0,0,0,0,
0,0,5,0,0,0,0,4,107,0,
0,0,0,0,0,0,0,7,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,// 150
7,107,208,9,209,0,0,0,0,0,
9,0,0,0,0,0,0,35,0,15,
115,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_poison[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,0,0,0,0,0,0,0,0, // 10
0,0,0,0,0,0,0,0,0,0, // 20
0,0,0,0,0,4,0,0,0,2, // 30
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0, // 50
0,0,0,0,0,0,0,0,0,0,
3,0,0,0,0,0,0,2,0,0,
2,0,0,0,0,0,6,8,1,0,
0,0,0,0,0,0,0,0,0,0,
5,0,0,0,0,0,0,0,0,0, //100
0,0,0,0,0,0,0,0,3,9,
0,0,0,0,7,0,0,0,0,0,
0,0,4,0,0,0,7,0,0,0,
0,0,0,0,0,0,4,0,0,0,
0,0,0,0,0,0,0,0,0,0, // 150
0,0,0,0,0,0,0,6,7,0,
0,0,0,4,1,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_treas[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,0,2,2,2,2,2,1,1, // 10
2,1,2,3,1,2,3,1,2,3, // 20
4,2,1,1,1,1,1,2,1,1, // 30
1,2,1,2,3,1,2,1,2,2, // 40
2,3,3,4,1,2,4,2,0,0, // 50
0,0,0,0,0,0,1,2,3,4, // 60
0,0,0,2,2,0,0,0,0,0, // 70
0,0,0,2,2,2,3,4,2,1, // 80
0,2,2,2,2,2,2,3,4,0, // 90
0,2,2,0,0,0,0,0,0,0, // 100
0,0,0,0,0,0,0,0,0,0, // 110
1,0,0,0,0,0,0,2,3,0, // 120
0,0,0,0,0,3,3,3,0,0, // 130
0,0,0,0,0,0,0,0,0,1, // 140
2,2,2,2,4,1,2,2,4,0, // 150
0,0,0,0,0,0,0,0,3,2, // 160
3,2,1,2,0,0,0,4,2,3, // 170
3,0,0,0,1,2,3,0,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_abil[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,3,0,0,0,0,0,0,2, // 10
20,0,0,0,0,0,0,0,0,0, // 20
0,0,0,0,0,0,0,0,0,0, // 30
0,0,2,0,0,0,0,0,3,0, // 40
0,0,0,0,4,5,6,5,0,10, // 50
0,0,18,18,18,0,16,17,17,17, // 60
0,0,0,0,0,0,15,12,0,14, // 70
0,27,0,0,0,0,9,0,0,0, // 80
0,0,7,0,0,0,0,0,0,0, // 90
0,0,9,8,8,13,13,0,0,0, // 100
0,0,0,0,0,0,0,0,19,19, // 110
21,11,11,12,0,0,0,22,23,23, // 120
27,0,24,33,25,26,29,22,27,31, // 130
28,0,35,30,30,25,0,25,25,0, // 140
0,0,0,0,0,4,5,5,6,0, // 150
0,0,33,28,24,9,0,0,29,0, // 160
0,34,0,32,0,0,31,13,0,0, // 170
0,0,28,29,0,0,0,33,0,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_pict[200] = {
0,1,2,3,4,5,6,7,8,9, // 0
10,11,12,13,14,15,16,17,18,19, // 10
20,21,22,22,23,24,24,25,26,27, // 20
28,29,30,31,32,4,33,34,35,36, // 30
37,38,39,40,41,42,44,46,47,48, // 40
49,48,49,50,51,53,55,57,59,60, // 50
61,43,63,64,64,62,65,66,67,68, // 60
69,70,71,72,73,74,75,74,76,76, // 70
76,77,78,79,81,82,83,83,85,86, // 80
87,88,89,90,91,92,93,94,95,96, // 90
96,97,97,98,98,99,99,100,101,102, // 100
103,104,105,106,107,108,116,109,111,111, // 110
112,0,0,113,77,62,66,72,114,75, // 120
117,118,119,120,77,122,123,125,127,128, // 130
129,130,131,135,136,137,136,137,139,140, // 140
141,142,143,144,145,51,55,53,55,146, // 150
147,148,149,150,151,152,153,154,155,159, // 160
160,164,166,168,170,61,74,95,160,160, // 170
171,172,173,174,160,3,5,173,143,0, // 180
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_magic_r[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,1,0,0,0,0,0,0,0, // 10
0,1,1,1,1,1,1,1,1,2, // 20
2,1,1,0,0,0,0,1,0,0, // 30
0,0,0,0,0,0,1,0,0,0,
0,1,1,0,0,0,0,0,0,0, // 50
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,1,0,0,1,1,0,0,
0,0,0,0,0,0,0,1,1,0,
0,2,2,0,0,0,0,2,0,0, //100
0,0,0,0,0,0,0,0,0,0,
0,0,0,2,0,0,0,0,0,0,
0,0,0,0,0,2,1,1,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,1, // 150
1,1,1,1,2,2,0,0,1,2,
1,0,0,1,0,0,1,2,0,0,
0,0,2,1,0,0,0,2,0,0,
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_fire_r[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,1,0,0,0,0,0,0,0, // 10
0,0,0,1,0,0,1,1,1,1, // 20
2,0,0,0,0,0,0,1,0,0, // 30
0,0,0,0,0,0,1,0,0,0,
0,1,1,0,0,0,0,0,0,2, // 50
0,0,0,0,0,0,0,0,0,1,
0,0,0,2,0,0,0,0,0,0,
0,0,0,2,2,2,2,2,2,0,
0,0,0,0,0,1,1,1,1,0,
0,1,1,0,0,0,0,2,0,0, //100
0,0,0,0,0,0,0,0,0,0,
0,0,0,2,0,0,0,2,0,0,
0,0,0,0,0,2,1,2,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0, // 150
2,0,0,1,2,2,0,0,0,0,
2,0,0,0,0,0,1,2,0,2,
0,0,2,1,0,0,0,1,0,0,
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_cold_r[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,1,0,0,0,0,0,0,0, // 10
0,0,0,1,0,0,1,0,1,1, // 20
2,0,0,0,0,0,0,1,0,0, // 30
0,0,0,0,0,0,1,0,0,0,
0,1,1,0,0,0,0,0,2,2, // 50
2,2,2,2,2,2,2,2,2,2,
2,2,0,0,2,0,2,0,0,0,
0,1,0,0,0,0,1,1,0,0,
0,0,0,0,0,1,1,1,1,0,
0,1,1,0,0,0,0,2,0,0, //100
0,0,0,0,0,0,0,0,0,0,
0,2,2,2,0,2,2,0,2,2,
1,1,1,0,0,2,1,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0, // 150
0,2,0,1,2,2,0,0,0,0,
0,0,0,0,0,2,0,1,0,0,
2,0,2,1,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0
}; // 190
unsigned char m_poison_r[200] = {
0,0,0,0,0,0,0,0,0,0, // 0
0,0,1,0,0,0,0,0,0,0, // 10
0,0,0,0,0,0,0,0,0,0, // 20
1,0,0,0,0,0,1,1,0,0, // 30
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,2,2,2, // 50
2,2,2,2,2,2,2,2,2,2,
2,2,0,0,0,2,2,2,0,0,
2,2,0,0,2,2,2,2,2,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,2,2,2,0,0, //100
0,0,0,0,0,0,0,0,0,0,
0,2,2,2,2,2,2,0,0,0,
0,0,0,0,2,1,1,2,2,2,
2,2,2,1,1,1,1,0,0,0,
0,0,0,0,0,0,0,0,0,2, // 150
2,2,2,1,2,2,0,0,0,0,
1,1,0,0,0,2,2,1,0,0,
0,0,2,2,0,0,0,2,0,0,
0,0,0,0,0,0,0,0,0,0
}; // 190
short ter_pics[256] = {
0,1,2,3,4,5,6,6,7,8,
8,9,10,10,11,12,12,13,14,15,
16,17,18,19,20,21,22,23,24,25,
26,27,28,29,30,31,32,33,34,35,
36,37,38,39,40,41,42,43,44,45,
46,47,48,49,50,51,52,53,54,55,
56,57,58,59,60,61,62,63,64,65,
66,400,401,402,403,404,404,405,406,202,
203,204,215,216,67,68,69,85,86,87,
74,70,71,72,73,75,76,83,84,121,
122,178,179,180,411,182,183,184,185,186,
79,80,81,82,83,84,198,199,181,205,
206,227,88,88,89,90,90,90,90,91,
92,93,94,95,96,88,97,98,99,100,
100,101,102,102,102,102,103,104,105,106,
107,108,100,109,110,110,111,112,112,112,
112,113,114,115,116,117,118,110,119,120,
123,123,123,124,125,126,127,128,129,150,
151,152,146,147,148,149,130,131,132,133,
134,135,136,137,138,139,140,141,142,143,
144,145,153,154,155,156,412,413,213,214,
157,157,158,159,160,161,162,163,164,165,
166,167,168,169,170,171,172,173,174,175,
176,177,187,188,189,190,2,192,193,195,
194,196,197,191,200,201,207,208,209,210,
211,212,407,408,409,410
};
short ter_block[256] = {
0,0,0,0,0,5,5,1,5,5,
1,5,5,1,5,5,1,5,5,5,
5,5,5,5,5,5,5,5,5,5,
5,5,5,5,5,5,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
3,3,3,3,3,3,3,3,3,3,
3,3,3,0,3,0,0,0,0,0,
0,3,0,0,3,2,2,4,2,0,
0,0,0,0,0,0,0,0,0,0,
3,4,0,0,0,4,0,4,0,4,
4,4,0,0,4,0,4,4,0,4,
4,0,4,4,0,0,5,5,0,4,
4,4,5,5,1,5,5,5,5,0,
4,0,5,4,5,5,5,5,4,5,
5,1,5,5,5,5,0,4,0,5,
5,5,5,4,5,5,1,5,5,5,
5,0,4,0,5,5,5,5,5,4,
0,2,2,0,4,4,4,4,4,4,
4,4,4,4,4,4,4,4,4,4,
4,5,4,4,4,0,0,0,0,0,
0,4,4,4,0,4,0,0,2,2,
0,2,4,4,4,0,4,0,4,0,
0,0,4,4,0,0,4,4,4,4,
4,4,5,5,5,5,5,5,5,5,
5,5,5,5,5,5,2,2,2,2,
2,2,0,0,0,0
};
short ter_traits[256] = {
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,2,0,15,0,0,
0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,5,0,0,0,
0,14,14,0,0,0,11,11,0,0,
0,5,0,0,0,0,0,0,0,0,
0,11,0,1,0,1,10,10,10,22,
9,8,11,7,7,7,0,0,0,0,
1,0,1,10,10,10,22,9,8,11,
7,7,7,0,0,1,0,1,10,10,
10,22,9,8,11,7,7,7,0,0,
0,20,4,20,0,14,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,
0,14,0,0,14,0,0,0,0,0,
0,14,0,0,0,0,0,0,0,0,
0,20,0,0,0,0,0,0,0,0,
0,14,0,14,20,0,0,0,0,0,
0,0,21,21,21,21,21,21,21,21,
21,21,21,21,21,21,0,0,0,0,
0,0,16,17,18,19
};
cMonster return_monster_template(m_num_t store) {
cMonster monst;
short m_num,i;
m_num = store;
monst.m_num = m_num;
if (m_num >= 189)
m_num = 189;
monst.level = m_level[m_num];
monst.m_health = m_health[m_num];
monst.health = monst.m_health;
monst.max_mp = 0;
monst.mp = monst.max_mp;
monst.armor = m_armor[m_num];
monst.skill = m_skill[m_num];
monst.a[0] = m_a1[m_num];
monst.a[1] = m_a2[m_num];
monst.a[2] = m_a3[m_num];
if (monst.a[0] > 0)
monst.a[0] = monst.a[0] + 100;
if (monst.a[1] > 0)
monst.a[1] = monst.a[1] + 100;
if (monst.a[2] > 0)
monst.a[2] = monst.a[2] + 100;
monst.a1_type = m_a1t[m_num];
monst.a23_type = m_a23t[m_num];
monst.m_type = (eMonsterType) m_type[m_num];
monst.speed = m_speed[m_num];
monst.ap = 0;
monst.mu = m_mu[m_num];
monst.cl = m_cl[m_num];
if ((monst.mu > 0) || (monst.cl > 0))
monst.max_mp = monst.mp = 14 * m_level[m_num];
monst.breath = m_breath[m_num] % 100;
monst.breath_type = m_breath[m_num] / 100;
monst.treasure = m_treas[m_num];
monst.spec_skill = m_abil[m_num];
monst.m_morale = 10 * m_level[m_num];
if (m_level[m_num] >= 20)
monst.m_morale += 10 * (m_level[m_num] - 20);
monst.morale = monst.m_morale;
monst.poison = m_poison[m_num];
monst.picture_num = m_pict[m_num];
monst.direction = 0;
monst.corpse_item = -1;
monst.corpse_item_chance = -1;
for (i = 0; i < 15; i++)
monst.status[i] = 0;
monst.x_width = monst.y_width = 1;
for (i = 0; i < 200; i++)
if (m_pict[m_num] == m_pic_index[i].i) {
monst.picture_num = i;
monst.x_width = m_pic_index[i].x;
monst.y_width = m_pic_index[i].y;
i = 200;
}
// monst.x_width = xdim[m_num];
// monst.y_width = ydim[m_num];
monst.radiate_1 = 0;
monst.radiate_2 = 0;
monst.default_attitude = 0;
monst.summon_type = 0;
monst.default_facial_pic = 0;
monst.immunities = 0;
if (m_magic_r[m_num] == 1)
monst.immunities = monst.immunities | 1;
if (m_magic_r[m_num] == 2)
monst.immunities = monst.immunities | 2;
if (m_fire_r[m_num] == 1)
monst.immunities = monst.immunities | 4;
if (m_fire_r[m_num] == 2)
monst.immunities = monst.immunities | 8;
if (m_cold_r[m_num] == 1)
monst.immunities = monst.immunities | 16;
if (m_cold_r[m_num] == 2)
monst.immunities = monst.immunities | 32;
if (m_poison_r[m_num] == 1)
monst.immunities = monst.immunities | 64;
if (m_poison_r[m_num] == 2)
monst.immunities = monst.immunities | 128;
return monst;
}
//item_record_type convert_item (short_item_record_type s_item) {
// item_record_type i;
// location l = {0,0};
// short temp_val;
//
// i.variety = (short) s_item.variety;
// i.item_level = (short) s_item.item_level;
// i.awkward = (short) s_item.awkward;
// i.bonus = (short) s_item.bonus;
// i.protection = (short) s_item.protection;
// i.charges = (short) s_item.charges;
// i.type = (short) s_item.type;
// i.graphic_num = (short) s_item.graphic_num;
// if (i.graphic_num >= 25)
// i.graphic_num += 20;
// i.ability = (short) s_item.real_abil;
// i.type_flag = (short) s_item.type_flag;
// i.is_special = (short) s_item.is_special;
// i.value = (short) s_item.value;
// i.weight = s_item.weight;
// i.special_class = 0;
// i.item_loc = l;
// strcpy((char *)i.full_name,(char *)s_item.full_name);
// strcpy((char *)i.name,(char *)s_item.name);
//
// if (i.charges > 0)
// temp_val = i.value * i.charges;
// else temp_val = i.value;
// if (temp_val >= 15)
// i.treas_class = 1;
// if (temp_val >= 100)
// i.treas_class = 2;
// if (temp_val >= 900)
// i.treas_class = 3;
// if (temp_val >= 2400)
// i.treas_class = 4;
//
// i.magic_use_type = s_item.magic_use_type;
// i.ability_strength = s_item.ability_strength;
// i.reserved1 = 0;
// i.reserved2 = 0;
// i.item_properties = 0;
// if (s_item.identified == true)
// i.item_properties = i.item_properties | 1;
// if ((s_item.ability == 14) || (s_item.ability == 129) || (s_item.ability == 95))
// i.item_properties = i.item_properties | 16;
// if (s_item.magic == true)
// i.item_properties = i.item_properties | 4;
//
// return i;
//}
void init_scenario() {
short i;
rectangle dummy_rect;
Str255 temp_str;
cVehicle null_boat;// = {{0,0},{0,0},{0,0},-1,false,false};
cVehicle null_horse;// = {{0,0},{0,0},{0,0},-1,false,false};
cScenario::cItemStorage null_item_s;// ={-1,{-1,-1,-1,-1,-1,-1,-1,-1,-1,-1},{0,0,0,0,0,0,0,0,0,0},0};
short j,item_to_hide[13] = {214,233,270,271,280,281,286,290,291,297,304,311,348};
scenario.format.ver[0] = 1;
scenario.format.ver[1] = 0;
scenario.format.ver[2] = 0;
scenario.format.min_run_ver = 1;
scenario.format.prog_make_ver[0] = 1;
scenario.format.prog_make_ver[1] = 0;
scenario.format.prog_make_ver[2] = 0;
scenario.num_towns = 1;
scenario.out_width = 1;
scenario.out_height = 1;
scenario.difficulty = 0;
scenario.intro_pic = 0;
scenario.default_ground = 1;
for (i = 0; i < 200; i++) {
scenario.town_size[i] = 1;
scenario.town_hidden[i] = 0;
scenario.town_data_size[i][0] = 0;
scenario.town_data_size[i][1] = 0;
scenario.town_data_size[i][2] = 0;
scenario.town_data_size[i][3] = 0;
scenario.town_data_size[i][4] = 0;
}
scenario.intro_mess_len = 0;
scenario.where_start.x = 24;
scenario.where_start.y = 24;
scenario.out_sec_start.x = 0;
scenario.out_sec_start.y = 0;
scenario.out_start = scenario.where_start;
scenario.which_town_start = 0;
for (i = 0; i < 10; i++) {
scenario.town_to_add_to[i] = -1;
scenario.flag_to_add_to_town[i][0] = 0;
scenario.flag_to_add_to_town[i][1] = 0;
}
for (i = 0; i < 100; i++) {
scenario.out_data_size[i][0] = 0;
scenario.out_data_size[i][1] = 0;
}
for (i = 0; i < 3; i++) {
scenario.store_item_rects[i] = dummy_rect;
scenario.store_item_towns[i] = -1;
}
for (i = 0; i < 50; i++) {
scenario.special_items[i] = 0;
scenario.special_item_special[i] = -1;
}
scenario.rating = 0;
scenario.uses_custom_graphics = 0;
for (i = 0; i < 256; i++) {
scenario.scen_monsters[i] = return_monster_template(i);
get_str(temp_str,2,i);
if ((i > 187) || (i == 0))
scenario.scen_monsters[i].m_name = "Unused";
else scenario.scen_monsters[i].m_name = (char*)temp_str;
if (i == 0)
scenario.scen_monsters[i].m_name = "Empty";
}
for (i = 0; i < 30; i++) {
scenario.boats[i] = null_boat;
scenario.horses[i] = null_horse;
}
for (i = 0; i < 256; i++) {
scenario.ter_types[i].picture = ter_pics[i];
scenario.ter_types[i].blockage = ter_block[i];
scenario.ter_types[i].special = (eTerSpec) ter_traits[i]; // ???: What on earth is all this for?
get_str(temp_str,1,i + 1);
sprintf((char *)scenario.ter_types[i].name.c_str(), "%s", temp_str);
scenario.scen_specials[i] = null_spec_node;
}
for (i = 0; i < 20; i++) {
scenario.scenario_timer_times[i] = 0;
scenario.scenario_timer_specs[i] = -1;
}
for (i = 0; i < 10; i++) {
scenario.storage_shortcuts[i] = null_item_s;
}
scenario.last_out_edited.x = 0;
scenario.last_out_edited.y = 0;
scenario.last_town_edited = 0;
for (i = 0; i < 400; i++) {
scenario.scen_items[i] = item_list[i]; //convert_item(item_list[i]);
for (j = 0; j < 13; j++)
if (i == item_to_hide[j])
scenario.scen_items[i].concealed = true;
}
for (i = 0; i < 270; i++) {
get_str(temp_str,35,i + 1);
sprintf((char *)scenario.scen_strs(i), "%s", temp_str);
scenario.scen_str_len[i] = strlen((char *) scenario.scen_strs(i));
}
}
//void put_ter_info_in_dlog() {
// Str255 str;
// strcpy((char*)str,(char*)scenario.ter_types[store_which_ter].name.c_str());
//
// cdsin(813,12,store_which_ter);
// CDST(813,2,(char*)str);
// CDSN(813,5,store_ter.picture);
// cd_set_led_range(813,19,24,store_ter.blockage);
// cd_set_led(813,25,store_ter.fly_over);
// cd_set_led(813,26,store_ter.boat_over);
// cd_set_led(813,27,store_ter.block_horse);
// cd_set_led_range(813,28,31,store_ter.step_sound);
// str[0] = store_ter.shortcut_key;
// str[1] = 0;
// CDST(813,3,(char *) str);
// CDSN(813,4,store_ter.trans_to_what);
// CDSN(813,8,store_ter.light_radius);
// cd_set_led_range(813,32,55,store_ter.special);
// CDSN(813,6,store_ter.flag1.u);
// CDSN(813,7,store_ter.flag2.u);
// get_str(str,21,40 + store_ter.special);
// csit(813,67,(char *) str);
// get_str(str,21,80 + store_ter.special);
// csit(813,68,(char *) str);
// if (store_ter.picture >= 1000)
// csp(813,14,store_ter.picture % 1000,PICT_CUSTOM + PICT_TER);
// else if (store_ter.picture >= 400)
// csp(813,14,store_ter.picture - 400,PICT_TER_ANIM);
// else csp(813,14,store_ter.picture,PICT_TER);
//}
//
//bool save_ter_info() {
// Str255 str;
// short i;
//
//
// store_ter.picture = CDGN(813,5);
// if ((store_ter.picture < 0) ||
// ((store_ter.picture > PICT_N_TER) && (store_ter.picture < 400)) ||
// ((store_ter.picture > 400 + PICT_N_TER_ANIM) && (store_ter.picture < 1000))) {
// give_error("Picture number isn't in the proper range.","",813);
// return false;
// }
//
// if (store_which_ter > 90) {
// store_ter.blockage = cd_get_led_range(813,19,24);
// store_ter.special = (eTerSpec) cd_get_led_range(813,32,55);
// i = CDGN(813,6);
// /*if ((store_ter.special < 2) || (store_ter.special > 6)) {
// if (cre(i,0,256,"First special flag must be from 0 to 255.","",813) == true) return false;
// }
// else*/ if (store_ter.special == TER_SPEC_DAMAGING) {
// if (cre(i,0,256,"First special flag must be from 0 to 100.","",813) == true) return false;
// }
// else if (store_ter.special == TER_SPEC_DANGEROUS) {
// if (cre(i,0,256,"First special flag must be from 0 to 8.","",813) == true) return false;
// }
// store_ter.flag1.u = CDGN(813,6);
//
// i = CDGN(813,7);
// if (store_ter.special == TER_SPEC_TOWN_ENTRANCE) {
// if (cre(i,0,256,"Second special flag must be from 0 to 200.","",813) == true) return false;
// }
// else if ((store_ter.special == TER_SPEC_DAMAGING) || (store_ter.special == TER_SPEC_DANGEROUS)) {
// if (cre(i,0,256,"Second special flag must be from 0 to 100.","",813) == true) return false;
// }
// store_ter.flag2.u = CDGN(813,7);
//
// i = CDGN(813,4);
// if (cre(i,0,255,"Transform To What must be from 0 to 255.","",813) == true) return false;
// store_ter.trans_to_what = CDGN(813,4);
// store_ter.fly_over = cd_get_led(813,25);
// store_ter.boat_over = cd_get_led(813,26);
// store_ter.block_horse = cd_get_led(813,27);
// store_ter.light_radius = CDGN(813,8);
// if (cre(store_ter.light_radius,0,8,"Light radius must be from 0 to 8.","",813) == true) return false;
//
// store_ter.step_sound = cd_get_led_range(813,28,31);
// }
// CDGT(813,3,(char *) str);
// store_ter.shortcut_key = str[0];
//
// CDGT(813,2,(char *) str);
// str[29] = 0;
// scenario.ter_types[store_which_ter].name = (char*)str;
//
// scenario.ter_types[store_which_ter] = store_ter;
// return true;
//}
//void edit_ter_type_event_filter (short item_hit) {
// Str255 str;
// short i;
//
// switch (item_hit) {
// case 9:
// toast_dialog();
// break;
// case 62:
// if (save_ter_info() == true)
// toast_dialog();
// break;
// case 10:
// if (save_ter_info() == false) break;
// store_which_ter--;
// if (store_which_ter < 0) store_which_ter = 255;
// store_ter = scenario.ter_types[store_which_ter];
// put_ter_info_in_dlog();
// break;
// case 11:
// if (save_ter_info() == false) break;
// store_which_ter++;
// if (store_which_ter > 255) store_which_ter = 0;
// store_ter = scenario.ter_types[store_which_ter];
// put_ter_info_in_dlog();
// break;
//
// case 13: case 70:
// if (item_hit == 13)
// i = choose_graphic(0,PICT_N_TER,store_ter.picture,PICT_TER,813);
// else i = 400 + choose_graphic(/*300,313*/0,PICT_N_TER_ANIM,store_ter.picture,PICT_TER_ANIM,813);
// if (i >= 0) {
// //if (i >= 300) i += 100;
// store_ter.picture = i;
// }
// else break;
// CDSN(813,5,store_ter.picture);
// if (store_ter.picture >= 1000)
// csp(813,14,store_ter.picture % 1000,PICT_CUSTOM + PICT_TER);
// else if (store_ter.picture >= 400)
// csp(813,14,store_ter.picture - 400,PICT_TER_ANIM);
// else csp(813,14,store_ter.picture,PICT_TER);
// break;
// default:
// cd_hit_led_range(813,32,55,item_hit);
// cd_hit_led_range(813,28,31,item_hit);
// cd_hit_led_range(813,19,24,item_hit);
// cd_flip_led(813,25,item_hit);
// cd_flip_led(813,26,item_hit);
// cd_flip_led(813,27,item_hit);
// if ((item_hit >= 32) && (item_hit <= 55)) {
// get_str(str,21,40 + item_hit - 32);
// csit(813,67,(char *) str);
// get_str(str,21,80 + item_hit - 32);
// csit(813,68,(char *) str);
// }
// break;
//
// }
//}
bool check_range(cDialog& me,std::string id,bool losing,long min_val,long max_val,std::string fld_name){
if(!losing) return true;
cTextField& fld_ctrl = dynamic_cast<cTextField&>(me[id]);
long n = fld_ctrl.getTextAsNum();
if(n < min_val || n > max_val){
// TODO: Display error message
return false;
}
return true;
}
bool pick_picture(ePicType type, cDialog& parent, std::string result_fld, std::string pic_fld, pic_num_t first, pic_num_t last, pic_num_t modifier){
pic_num_t cur_sel = 0;
if(result_fld != ""){
cTextField& fld_ctrl = dynamic_cast<cTextField&>(parent[result_fld]);
cur_sel = fld_ctrl.getTextAsNum();
cur_sel -= modifier;
}else if(pic_fld != ""){
cPict& pic_ctrl = dynamic_cast<cPict&>(parent[pic_fld]);
if(pic_ctrl.getPicType() == type)
cur_sel = pic_ctrl.getPicNum();
}
std::vector<pic_num_t> pics;
for(pic_num_t i = first; i <= last; i++)
pics.push_back(i);
cPictChoice pic_dlg(pics,type,&parent);
pic_num_t pic = pic_dlg.show(last+1, cur_sel);
if(pic <= last){
if(result_fld != ""){
cTextField& fld_ctrl = dynamic_cast<cTextField&>(parent[result_fld]);
fld_ctrl.setTextToNum(pic + modifier);
}
if(pic_fld != ""){
cPict& pic_ctrl = dynamic_cast<cPict&>(parent[pic_fld]);
pic_ctrl.setPict(pic,type);
}
}
return true;
}
bool pick_string(std::string from_file, cDialog& parent, std::string result_fld, std::string str_fld){
size_t cur_sel = 0;
if(result_fld != ""){
cTextField& fld_ctrl = dynamic_cast<cTextField&>(parent[result_fld]);
cur_sel = fld_ctrl.getTextAsNum();
}
std::vector<std::string> strings = load_strings(from_file);
cStringChoice str_dlg(strings, &parent);
size_t result = str_dlg.show(strings[cur_sel]);
if(result < strings.size()){
if(result_fld != ""){
cTextField& fld_ctrl = dynamic_cast<cTextField&>(parent[result_fld]);
fld_ctrl.setTextToNum(result);
}
if(str_fld != ""){
parent[str_fld].setText(strings[result]);
}
}
return true;
}
bool show_help(std::string from_file, cDialog& parent, pic_num_t pic){
std::vector<std::string> strings = load_strings(from_file);
cThreeChoice help(strings,-1,-1,63,pic,PIC_DLOG,&parent);
help.show();
return true;
}
bool fill_ter_flag_info(cDialog& me, std::string id, bool dummy){
static std::vector<std::string> flag1_strs = load_strings("ter-flag1.txt");
static std::vector<std::string> flag2_strs = load_strings("ter-flag2.txt");
static std::vector<std::string> flag3_strs = load_strings("ter-flag3.txt");
eTerSpec prop;
cLedGroup& led_ctrl = dynamic_cast<cLedGroup&>(me[id]);
std::istringstream sel(led_ctrl.getSelected());
sel >> prop;
me["flag1text"].setText(flag1_strs[prop]);
me["flag2text"].setText(flag2_strs[prop]);
me["flag3text"].setText(flag3_strs[prop]);
// TODO: Click handlers for the "choose" buttons as necessary, plus hide/show them as needed
return true;
}
void fill_ter_info(cDialog& me, short ter){
cTerrain& ter_type = scenario.ter_types[ter];
{
cPict& pic_ctrl = dynamic_cast<cPict&>(me["graphic"]);
pic_num_t pic = ter_type.picture;
if(pic < 400)
pic_ctrl.setPict(pic, PIC_TER);
else if(pic < 1000)
pic_ctrl.setPict(pic % 400, PIC_TER_ANIM);
else if(pic < 2000)
pic_ctrl.setPict(pic % 1000, PIC_CUSTOM_TER);
else
pic_ctrl.setPict(pic % 2000, PIC_CUSTOM_TER_ANIM);
me["pict"].setTextToNum(pic);
}{
cPict& pic_ctrl = dynamic_cast<cPict&>(me["seemap"]);
pic_num_t pic = ter_type.map_pic;
if(pic < 1000)
pic_ctrl.setPict(pic, PIC_TER_MAP);
else pic_ctrl.setPict(pic, PIC_CUSTOM_TER_MAP);
me["map"].setTextToNum(pic);
}
me["number"].setTextToNum(ter);
me["name"].setText(ter_type.name);
me["key"].setTextToNum(ter_type.shortcut_key);
me["light"].setTextToNum(ter_type.light_radius);
me["trans"].setTextToNum(ter_type.trans_to_what);
me["ground"].setTextToNum(ter_type.ground_type);
me["trimter"].setTextToNum(ter_type.trim_ter);
me["trim"].setTextToNum(ter_type.trim_type);
fill_ter_flag_info(me, "prop", false);
{
cLedGroup& led_ctrl = dynamic_cast<cLedGroup&>(me["blockage"]);
switch(ter_type.blockage){
case 0:
led_ctrl.setSelected("clear");
break;
case 1:
led_ctrl.setSelected("curtain");
break;
case 2:
led_ctrl.setSelected("special");
break;
case 3:
led_ctrl.setSelected("window");
break;
case 4:
led_ctrl.setSelected("obstructed");
break;
case 5:
led_ctrl.setSelected("opaque");
break;
}
}{
cLedGroup& led_ctrl = dynamic_cast<cLedGroup&>(me["sound"]);
switch(ter_type.step_sound){
case 0:
led_ctrl.setSelected("step");
break;
case 1:
led_ctrl.setSelected("squish");
break;
case 2:
led_ctrl.setSelected("crunch");
break;
case 3:
led_ctrl.setSelected("nosound");
break;
case 4:
led_ctrl.setSelected("splash");
break;
}
}
if(ter_type.fly_over){
cLed& led_ctrl = dynamic_cast<cLed&>(me["flight"]);
led_ctrl.setState(led_red);
}
if(ter_type.boat_over){
cLed& led_ctrl = dynamic_cast<cLed&>(me["boat"]);
led_ctrl.setState(led_red);
}
if(ter_type.block_horse){
cLed& led_ctrl = dynamic_cast<cLed&>(me["horse"]);
led_ctrl.setState(led_red);
}
if(ter_type.special == TER_SPEC_NONE)
me["flag1"].setTextToNum(ter_type.flag1.s);
else me["flag1"].setTextToNum(ter_type.flag1.u);
if(false) // flag2 is never signed, apparently; but that could change?
me["flag2"].setTextToNum(ter_type.flag2.s);
else me["flag2"].setTextToNum(ter_type.flag2.u);
if(ter_type.special == TER_SPEC_CALL_SPECIAL || ter_type.special == TER_SPEC_CALL_SPECIAL_WHEN_USED)
me["flag3"].setTextToNum(ter_type.flag3.s);
else me["flag3"].setTextToNum(ter_type.flag3.u);
me["arena"].setTextToNum(ter_type.combat_arena);
}
short edit_ter_type(short which_ter) {
init_sheets();
cDialog ter_dlg("edit-terrain.xml");
// Attach handlers
ter_dlg["pict"].attachFocusHandler(boost::bind(check_range,_1,_2,_3,0,2999,"terrain graphic"));
ter_dlg["pickpict"].attachClickHandler(boost::bind(pick_picture,PIC_TER,_1,"pict","graphic",0,399,0));
ter_dlg["pickanim"].attachClickHandler(boost::bind(pick_picture,PIC_TER_ANIM,_1,"pict","graphic",0,99,400));
ter_dlg["light"].attachFocusHandler(boost::bind(check_range,_1,_2,_3,0,255,"light radius"));
ter_dlg["trans"].attachFocusHandler(boost::bind(check_range,_1,_2,_3,0,65535,"\"transform to what?\""));
ter_dlg["ground"].attachFocusHandler(boost::bind(check_range,_1,_2,_3,0,255,"ground type"));
ter_dlg["trimter"].attachFocusHandler(boost::bind(check_range,_1,_2,_3,0,255,"trim terrain"));
ter_dlg["trim"].attachFocusHandler(boost::bind(check_range,_1,_2,_3,0,18,"trim type"));
ter_dlg["prop"].attachFocusHandler(fill_ter_flag_info);
ter_dlg["cancel"].attachClickHandler(boost::bind(&cDialog::toast, &ter_dlg));
ter_dlg["arena"].attachFocusHandler(boost::bind(check_range,_1,_2,_3,0,299,"ground type"));
// TODO: Add focus handler for key
// TODO: Add click handler for object, done, left, right, help
ter_dlg["picktrim"].attachClickHandler(boost::bind(pick_string,"trim-names.txt", _1, "trim", ""));
ter_dlg["pickarena"].attachClickHandler(boost::bind(pick_string,"arena-names.txt", _1, "arena", ""));
ter_dlg["help"].attachClickHandler(boost::bind(show_help, "ter-type-help.txt", _1, 16));
fill_ter_info(ter_dlg,which_ter);
ter_dlg.run();
// // ignore parent in Mac version
// short item_hit,i;
// Str255 temp_str;
// char *blocked_strs[6] = {"Clear","Walk through, Opaque","Clear, Special","Clear, Blocked","Blocked, Obstructed",
// "Blocked, Opaque"};
// char *sound_strs[4] = {"Footstep","Squish","Crunch","Silence"};
//
// store_which_ter = which_ter;
// store_ter = scenario.ter_types[which_ter];
// //make_cursor_sword();
//
// cd_create_dialog_parent_num(813,0);
// printf("Created dialog.");
// put_ter_info_in_dlog();
// for (i = 0; i < 24; i++) {
// get_str(temp_str,21,i + 1);
// cd_add_label(813,32 + i,(char *) temp_str,57);
// }
// for (i = 0; i < 4; i++)
// cd_add_label(813,28 + i,sound_strs[i],35);
// for (i = 0; i < 6; i++)
// cd_add_label(813,19 + i,blocked_strs[i],57);
// cd_attach_key(813,10,0);
// cd_attach_key(813,11,0);
//
// item_hit = cd_run_dialog();
// cd_kill_dialog(813);
// return 0;
}
void put_monst_info_in_dlog() {
Str255 str;
if (store_monst.picture_num < 1000)
csp(814,34,/*400 + */store_monst.picture_num,PICT_MONST);
else {
short type_g = PICT_CUSTOM + PICT_MONST;
short size_g = store_monst.picture_num / 1000;
switch(size_g){
case 2:
type_g += PICT_WIDE_MONSTER;
break;
case 3:
type_g += PICT_TALL_MONSTER;
break;
case 4:
type_g += PICT_WIDE_MONSTER + PICT_TALL_MONSTER;
break;
}
csp(814,34,store_monst.picture_num % 1000,type_g);
}
cdsin(814,33,store_which_monst);
CDST(814,2,(char*)scenario.scen_monsters[store_which_monst].m_name.c_str());
CDSN(814,3,store_monst.picture_num);
sprintf((char *) str,"Width = %d",store_monst.x_width);
csit(814,40,(char *) str);
sprintf((char *) str,"Height = %d",store_monst.y_width);
csit(814,41,(char *) str);
CDSN(814,4,store_monst.level);
CDSN(814,5,store_monst.health);
CDSN(814,6,store_monst.armor);
CDSN(814,7,store_monst.skill);
CDSN(814,8,store_monst.speed);
CDSN(814,9,store_monst.mu);
CDSN(814,10,store_monst.cl);
CDSN(814,11,store_monst.a[0] / 100);
CDSN(814,12,store_monst.a[0] % 100);
CDSN(814,13,store_monst.a[1] / 100);
CDSN(814,14,store_monst.a[1] % 100);
CDSN(814,15,store_monst.a[2] / 100);
CDSN(814,16,store_monst.a[2] % 100);
CDSN(814,17,store_monst.default_facial_pic);
CDSN(814,18,store_monst.treasure);
cd_set_led_range(814,29,32,store_monst.default_attitude);
get_str(str,20,150 + store_monst.m_type);
csit(814,42,(char *) str);
get_str(str,20,130 + store_monst.a1_type);
csit(814,43,(char *) str);
get_str(str,20,130 + store_monst.a23_type);
csit(814,44,(char *) str);
}
bool save_monst_info() {
Str255 str;
short i;
CDGT(814,2,(char *) str);
str[19] = 0;
scenario.scen_monsters[store_which_monst].m_name = (char*)str;
//CDGT(814,2,data_store->scen_item_list.monst_names[store_which_monst]);
store_monst.picture_num = CDGN(814,3);
if (cre(store_monst.picture_num,0,5000,"Monster pic must be from 0 to 5000.","",814) > 0) return false;
// later check pic num for error, and assign widths if custom
if (store_monst.picture_num >= 1000) {
if ((store_monst.picture_num >= 1000) && (store_monst.picture_num < 2000)) {
store_monst.x_width = 1;
store_monst.y_width = 1;
}
if ((store_monst.picture_num >= 2000) && (store_monst.picture_num < 3000)) {
store_monst.x_width = 2;
store_monst.y_width = 1;
}
if ((store_monst.picture_num >= 3000) && (store_monst.picture_num < 4000)) {
store_monst.x_width = 1;
store_monst.y_width = 2;
}
if ((store_monst.picture_num >= 4000) && (store_monst.picture_num < 5000)) {
store_monst.x_width = 2;
store_monst.y_width = 2;
}
}
else {
if (cre(store_monst.picture_num,0,PICT_N_MONST,"Non-customized monster pic must be from 0 to 173.","",814) > 0) return false;
store_monst.x_width = m_pic_index[store_monst.picture_num].x;
store_monst.y_width = m_pic_index[store_monst.picture_num].y;
}
store_monst.level = CDGN(814,4);
if (cre(store_monst.level,0,40,"Level must be from 0 to 40.","",814) > 0) return false;
store_monst.m_health = store_monst.health = CDGN(814,5);
if (cre(store_monst.health,0,2500,"Health must be from 0 to 2500.","",814) > 0) return false;
store_monst.armor = CDGN(814,6);
if (cre(store_monst.armor,0,50,"Armor must be from 0 to 50.","",814) > 0) return false;
store_monst.skill = CDGN(814,7);
if (cre(store_monst.skill,0,40,"Skill must be from 0 to 40.","",814) > 0) return false;
store_monst.speed = CDGN(814,8);
if (cre(store_monst.speed,1,12,"Speed must be from 2 to 12.","",814) > 0) return false;
store_monst.mu = CDGN(814,9);
if (cre(store_monst.mu,0,7,"Magic Spells must be from 0 to 7.","",814) > 0) return false;
store_monst.cl = CDGN(814,10);
if (cre(store_monst.cl,0,7,"Priest Spells must be from 0 to 7.","",814) > 0) return false;
i = CDGN(814,11);
if (cre(i,0,20,"Attack 1 number of dice must be from 0 to 20 (0 means no attack).","",814) > 0) return false;
i = CDGN(814,13);
if (cre(i,0,20,"Attack 2 number of dice must be from 0 to 20 (0 means no attack).","",814) > 0) return false;
i = CDGN(814,15);
if (cre(i,0,20,"Attack 3 number of dice must be from 0 to 20 (0 means no attack).","",814) > 0) return false;
i = CDGN(814,12);
if (cre(i,0,50,"Attack 1 damage per die must be from 1 to 50.","",814) > 0) return false;
i = CDGN(814,14);
if (cre(i,0,50,"Attack 2 damage per die must be from 1 to 50.","",814) > 0) return false;
i = CDGN(814,16);
if (cre(i,0,50,"Attack 3 damage per die must be from 1 to 50.","",814) > 0) return false;
store_monst.a[0] = CDGN(814,11) * 100 + CDGN(814,12);
store_monst.a[1] = CDGN(814,13) * 100 + CDGN(814,14);
store_monst.a[2] = CDGN(814,15) * 100 + CDGN(814,16);
store_monst.default_facial_pic = CDGN(814,17); // later
store_monst.treasure = CDGN(814,18);
if (cre(store_monst.treasure,0,4,"Treasure must be from 0 to 4.","",814) > 0) return false;
store_monst.default_attitude = cd_get_led_range(814,29,32);
return true;
}
void edit_monst_type_event_filter (short item_hit) {
short i;
cMonster temp_monst;
switch (item_hit) {
case 20:
toast_dialog();
break;
case 19:
if (save_monst_info() == true) {
scenario.scen_monsters[store_which_monst] = store_monst;
toast_dialog();
}
break;
case 23: // abils
if (save_monst_info() == false) break;
temp_monst = edit_monst_abil(store_monst,814);
if (temp_monst.level < 255)
store_monst = temp_monst;
put_monst_info_in_dlog();
break;
case 21:
if (save_monst_info() == false) break;
scenario.scen_monsters[store_which_monst] = store_monst;
store_which_monst--;
if (store_which_monst < 1) store_which_monst = 255;
store_monst = scenario.scen_monsters[store_which_monst];
put_monst_info_in_dlog();
break;
case 22:
if (save_monst_info() == false) break;
scenario.scen_monsters[store_which_monst] = store_monst;
store_which_monst++;
if (store_which_monst > 255) store_which_monst = 1;
store_monst = scenario.scen_monsters[store_which_monst];
put_monst_info_in_dlog();
break;
case 24: // picture
if (save_monst_info() == false) break;
i = choose_graphic(/*400,572*/0,PICT_N_MONST,store_monst.picture_num/* + 400*/,PICT_MONST,814);
if (i >= 0) {
store_monst.picture_num = i;
}
else break;
store_monst.x_width = m_pic_index[i].x;
store_monst.y_width = m_pic_index[i].y;
put_monst_info_in_dlog();
break;
case 25: // m type
if (save_monst_info() == false) break;
i = choose_text_res(20,150,164,store_monst.m_type + 150,814,"Choose Monster Type:");
if (i >= 0) {
i -= 150;
store_monst.m_type = (eMonsterType) i;
put_monst_info_in_dlog();
}
break;
case 26: // att type 1
if (save_monst_info() == false) break;
i = choose_text_res(20,130,139,store_monst.a1_type + 130,814,"Choose Attack 1 Type:");
if (i >= 0) {
store_monst.a1_type = i - 130;
put_monst_info_in_dlog();
}
break;
case 27: // att type 23
if (save_monst_info() == false) break;
i = choose_text_res(20,130,139,store_monst.a23_type + 130,814,"Choose Attack 2 & 3 Type:");
if (i >= 0) {
store_monst.a23_type = i - 130;
put_monst_info_in_dlog();
}
break;
case 28: // talk pic
if (save_monst_info() == false) break;
i = choose_graphic(/*1001,1084*/1,1+PICT_N_TALK,store_monst.default_facial_pic/* + 1000*/,PICT_TALK,814);
if (i >= 0) {
store_monst.default_facial_pic = i - 1000;
}
else break;
put_monst_info_in_dlog();
break;
default:
cd_hit_led_range(814,29,32,item_hit);
break;
}
}
short edit_monst_type(short which_monst) {
// ignore parent in Mac version
short item_hit,i;
char *attitude[4] = {"Friendly, Docile","Hostile, Type A","Friendly, Will Fight","Hostile, Type B"};
store_which_monst = which_monst;
store_monst = scenario.scen_monsters[which_monst];
//make_cursor_sword();
cd_create_dialog_parent_num(814,0);
put_monst_info_in_dlog();
for (i = 0; i < 4; i++)
cd_add_label(814,29 + i,attitude[i],57);
cd_attach_key(814,21,0);
cd_attach_key(814,22,0);
item_hit = cd_run_dialog();
cd_kill_dialog(814);
return 0;
}
void put_monst_abils_in_dlog() {
Str255 str;
short i;
cdsin(815,24,store_which_monst);
CDSN(815,2,store_monst2.poison);
CDSN(815,3,store_monst2.breath);
get_str(str,20,store_monst2.spec_skill + 1);
csit(815,30,(char *) str);
get_str(str,20,store_monst2.radiate_1 + 50);
csit(815,33,(char *) str);
get_str(str,20,store_monst2.radiate_1 + 80);
csit(815,36,(char *) str);
CDSN(815,4,store_monst2.radiate_2);
CDSN(815,5,store_monst2.corpse_item);
CDSN(815,6,store_monst2.corpse_item_chance);
cd_set_led_range(815,9,12,store_monst2.breath_type);
cd_set_led_range(815,41,44,store_monst2.summon_type);
for (i = 0; i < 8; i++)
cd_set_led(815,13 + i,0);
if (store_monst2.immunities & 1 ) cd_set_led(815,13,1);
if (store_monst2.immunities & 2 ) cd_set_led(815,14,1);
if (store_monst2.immunities & 4 ) cd_set_led(815,15,1);
if (store_monst2.immunities & 8 ) cd_set_led(815,16,1);
if (store_monst2.immunities & 16 ) cd_set_led(815,17,1);
if (store_monst2.immunities & 32 ) cd_set_led(815,18,1);
if (store_monst2.immunities & 64 ) cd_set_led(815,19,1);
if (store_monst2.immunities & 128 ) cd_set_led(815,20,1);
}
bool save_monst_abils() {
store_monst2.poison = CDGN(815,2);
if (cre(store_monst2.poison,0,8,"Poison must be from 0 to 8.","",815) > 0) return false;
store_monst2.breath = CDGN(815,3);
if (cre(store_monst2.poison,0,40,"Breath Damage must be from 0 to 4.","",815) > 0) return false;
store_monst2.breath_type = cd_get_led_range(815,9,12);
store_monst2.summon_type = cd_get_led_range(815,41,44);
store_monst2.radiate_2 = CDGN(815,4);
if ((store_monst2.radiate_1 >= 1) && (store_monst2.radiate_1 <= 6))
if (cre(store_monst2.radiate_2,0,100,"Radiation Chance must be from 0 to 100.","",815) > 0) return false;
if ((store_monst2.radiate_1 >= 10) && (store_monst2.radiate_1 <= 12))
if (cre(store_monst2.radiate_2,0,255,"Summoned Monster must be from 0 to 255.","",815) > 0) return false;
store_monst2.corpse_item = CDGN(815,5);
if (cre(store_monst2.corpse_item,-1,399,"Item To Drop must be from 0 to 399 (or -1 for no item).","",815) > 0) return false;
store_monst2.corpse_item_chance = CDGN(815,6);
if (cre(store_monst2.corpse_item_chance,-1,100,"Dropping Chance must be from 0 to 100 (or -1 for no item).","",815) > 0) return false;
store_monst2.immunities = 0;
if (cd_get_led(815,13) == 1) store_monst2.immunities = store_monst2.immunities | 1;
if (cd_get_led(815,14) == 1) store_monst2.immunities = store_monst2.immunities | 2;
if (cd_get_led(815,15) == 1) store_monst2.immunities = store_monst2.immunities | 4;
if (cd_get_led(815,16) == 1) store_monst2.immunities = store_monst2.immunities | 8;
if (cd_get_led(815,17) == 1) store_monst2.immunities = store_monst2.immunities | 16;
if (cd_get_led(815,18) == 1) store_monst2.immunities = store_monst2.immunities | 32;
if (cd_get_led(815,19) == 1) store_monst2.immunities = store_monst2.immunities | 64;
if (cd_get_led(815,20) == 1) store_monst2.immunities = store_monst2.immunities | 128;
return true;
}
void edit_monst_abil_event_filter (short item_hit) {
short i;
switch (item_hit) {
case 8:
store_monst2.level = 255;
toast_dialog();
break;
case 7:
if (save_monst_abils() == true)
toast_dialog();
break;
case 31: // abils
if (save_monst_abils() == false) break;
i = choose_text_res(20,1,38,store_monst2.spec_skill + 1,815,"Choose Monster Ability:");
if (i >= 0) {
store_monst2.spec_skill = i - 1;
put_monst_abils_in_dlog();
}
break;
case 34: // radiate
if (save_monst_abils() == false) break;
i = choose_text_res(20,50,65,store_monst2.radiate_1 + 50,815,"Choose Radiation Ability:");
if (i >= 0) {
store_monst2.radiate_1 = i - 50;
put_monst_abils_in_dlog();
}
break;
default:
cd_hit_led_range(815,9,12,item_hit);
cd_hit_led_range(815,41,44,item_hit);
for (i = 13; i < 21; i++)
cd_flip_led(815,i,item_hit);
break;
}
}
cMonster edit_monst_abil(cMonster starting_record,short parent_num) {
// ignore parent in Mac version
short item_hit;
//store_which_monst = which_monst;
store_monst2 = starting_record;
//make_cursor_sword();
cd_create_dialog_parent_num(815,parent_num);
put_monst_abils_in_dlog();
cd_add_label(815,9,"Fire",35);
cd_add_label(815,10,"Cold",35);
cd_add_label(815,11,"Electricity",35);
cd_add_label(815,12,"Darkness",35);
cd_add_label(815,41,"No Summon",35);
cd_add_label(815,42,"Type 1",35);
cd_add_label(815,43,"Type 2",35);
cd_add_label(815,44,"Type 3",35);
cd_add_label(815,13,"Resist Magic",55);
cd_add_label(815,15,"Resist Fire",55);
cd_add_label(815,17,"Resist Cold",55);
cd_add_label(815,19,"Resist Poison",55);
cd_add_label(815,14,"Immune To Magic",55);
cd_add_label(815,16,"Immune To Fire",55);
cd_add_label(815,18,"Immune To Cold",55);
cd_add_label(815,20,"Immune To Poison",55);
item_hit = cd_run_dialog();
cd_kill_dialog(815);
return store_monst2;
}
void put_item_info_in_dlog() {
cdsin(818,52,store_which_item);
CDST(818,2,store_item.full_name.c_str());
CDST(818,3,store_item.name.c_str());
if (store_item.graphic_num >= 1000) // was 150
csp(818,49,store_item.graphic_num % 1000,PICT_CUSTOM + PICT_ITEM);
else csp(818,49,/*1800 + */store_item.graphic_num,PICT_ITEM);
CDSN(818,4,store_item.graphic_num);
cd_set_led_range(818,18,45,store_item.variety);
CDSN(818,5,store_item.item_level);
CDSN(818,6,store_item.awkward);
CDSN(818,7,store_item.bonus);
CDSN(818,8,store_item.protection);
CDSN(818,9,store_item.charges);
CDSN(818,10,store_item.type_flag);
CDSN(818,11,store_item.value);
CDSN(818,12,store_item.weight);
CDSN(818,13,store_item.special_class);
cd_set_led_range(818,46,48,store_item.type - 1);
}
bool save_item_info() {
Str255 str;
CDGT(818,2,(char *) str);
str[24] = 0;
store_item.full_name = (char*)str;
CDGT(818,3,(char *) str);
str[14] = 0;
store_item.name = (char*)str;
store_item.graphic_num = CDGN(818,4);
store_item.variety = (eItemType) cd_get_led_range(818,18,45);
store_item.type = (eWeapType) (cd_get_led_range(818,46,48) + 1);
store_item.item_level = CDGN(818,5);
if (cre(store_item.item_level,0,50,"Item Level must be from 0 to 50.","",818) > 0) return false;
if (((store_item.variety == 3) || (store_item.variety == 11)) && (store_item.item_level == 0))
store_item.item_level = 1;
store_item.awkward = CDGN(818,6);
if (cre(store_item.awkward,0,20,"Awkward must be from 0 to 20.","",818) > 0) return false;
store_item.bonus = CDGN(818,7);
if (cre(store_item.bonus,0,60,"Bonus must be from 0 to 60.","",818) > 0) return false;
store_item.protection = CDGN(818,8);
if (cre(store_item.protection,-10,20,"Protection must be from -10 to 20.","",818) > 0) return false;
store_item.charges = CDGN(818,9);
if (cre(store_item.charges,0,100,"Charges must be from 0 to 100.","",818) > 0) return false;
store_item.type_flag = CDGN(818,10);
if (cre(store_item.type_flag,0,1000,"Type Flag must be from 0 to 1000.","",818) > 0) return false;
store_item.value = CDGN(818,11);
if (cre(store_item.value,0,10000,"Value must be from 0 to 10000.","",818) > 0) return false;
store_item.weight = CDGN(818,12);
if (cre(store_item.weight,0,250,"Weight must be from 0 to 250.","",818) > 0) return false;
store_item.special_class = CDGN(818,13);
if (cre(store_item.special_class,0,100,"Special Class must be from 0 to 100.","",818) > 0) return false;
if ((store_item.type_flag > 0) && (store_item.charges == 0)) {
give_error("If the Type Flag is greater than 0, the Charges must also be greater than 0.","",818);
return false;
}
if (store_item.variety > 25) {
give_error("The Unused item varieties are reserved for later expansions, and can't be used now.","",818);
return false;
}
if ((store_item.ability >= 70) && (store_item.ability < 170) && (store_item.charges == 0)) {
give_error("An item with the special ability selected must have at least 1 charge.","",818);
return false;
}
scenario.scen_items[store_which_item] = store_item ;
return true;
}
void edit_item_type_event_filter (short item_hit) {
short i;
cItemRec temp_item;
switch (item_hit) {
case 15:
toast_dialog();
break;
case 14:
if (save_item_info() == true)
toast_dialog();
break;
case 16:
if (save_item_info() == false) break;
store_which_item--;
if (store_which_item < 0) store_which_item = 399;
store_item = scenario.scen_items[store_which_item];
put_item_info_in_dlog();
break;
case 17:
if (save_item_info() == false) break;
store_which_item++;
if (store_which_item > 399) store_which_item = 0;
store_item = scenario.scen_items[store_which_item];
put_item_info_in_dlog();
break;
case 56:
if (save_item_info() == false) break;
i = choose_graphic(/*1800,1922*/0,PICT_N_ITEM,store_item.graphic_num/* + 1800*/,PICT_ITEM,818);
if (i < 0) break;
store_item.graphic_num = i;
put_item_info_in_dlog();
break;
case 69:
if (store_item.variety == 0) {
give_error("You must give the item a type (weapon, armor, etc.) before you can choose its abilities.","",818);
break;
}
if ((store_item.variety == 3) || (store_item.variety == 11)) {
give_error("Gold and Food cannot be given special abilities.","",818);
break;
}
temp_item = edit_item_abil(store_item,818);
if (temp_item.variety != 0)
store_item = temp_item;
break;
default:
cd_hit_led_range(818,18,45,item_hit);
store_item.variety = (eItemType) cd_get_led_range(818,18,45);
if ((store_item.variety == ITEM_TYPE_ONE_HANDED) || (store_item.variety == ITEM_TYPE_TWO_HANDED))
store_item.type = ITEM_EDGED;
else store_item.type = ITEM_NOT_MELEE;
cd_hit_led_range(818,46,48,item_hit);
break;
}
}
short edit_item_type(short which_item) {
// ignore parent in Mac version
short item_hit,i;
store_which_item = which_item;
store_item = scenario.scen_items[store_which_item];
//make_cursor_sword();
cd_create_dialog_parent_num(818,0);
put_item_info_in_dlog();
for (i = 18; i < 46; i++)
cd_add_label(818, i,item_types[i - 18],47);
cd_add_label(818,46,"Edged",23);
cd_add_label(818,47,"Bashing",23);
cd_add_label(818,48,"Pole",23);
cd_attach_key(818,16,0);
cd_attach_key(818,17,0);
item_hit = cd_run_dialog();
cd_kill_dialog(818);
return 0;
}
void put_item_abils_in_dlog() {
Str255 str;
cdsin(824,16,store_which_item);
csit(824,32,store_item2.full_name.c_str());
csit(824,34,item_types[store_item2.variety]);
get_str(str,23,store_item2.ability + 1);
csit(824,19,(char *) str);
cd_set_led_range(824,5,8,store_item2.magic_use_type);
cd_set_led_range(824,26,30,store_item2.treas_class);
CDSN(824,2,store_item2.ability_strength);
if (store_item2.ident)
cd_set_led(824,9,1);
else cd_set_led(824,9,0);
if (store_item2.magic)
cd_set_led(824,10,1);
else cd_set_led(824,10,0);
if (store_item2.cursed)
cd_set_led(824,11,1);
else cd_set_led(824,11,0);
if (store_item2.concealed)
cd_set_led(824,12,1);
else cd_set_led(824,12,0);
}
bool save_item_abils() {
store_item2.magic_use_type = cd_get_led_range(824,5,8);
store_item2.treas_class = cd_get_led_range(824,26,30);
store_item2.ability_strength = CDGN(824,2);
if ((store_item2.ability != 119) && (store_item2.ability != 120)) {
if (cre(store_item2.ability_strength,0,10,"Ability Strength must always be a number from 0 to 10.","",824) > 0) return false;
}
else if (cre(store_item2.ability_strength,0,255,"Ability Strength must be 0 to 255 - the number of the monster to summon.","",824) > 0) return false;
store_item2.property = store_item2.enchanted = store_item2.contained = false;
store_item2.ident = cd_get_led(824,9);
store_item2.magic = cd_get_led(824,10);
store_item2.cursed = store_item2.unsellable = cd_get_led(824,11);
store_item2.concealed = cd_get_led(824,12);
return true;
}
void edit_item_abil_event_filter (short item_hit) {
short i;
switch (item_hit) {
case 4:
store_item2.ability = ITEM_NO_ABILITY;
toast_dialog();
break;
case 3:
if (save_item_abils() == true)
toast_dialog();
break;
case 17:
if (save_item_abils() == false) break;
if (store_item.variety > 2) {
give_error("You can only give an ability of this sort to a melee weapon.","",824);
break;
}
i = choose_text_res(23,1,15,store_item2.ability + 1,824,"Choose Weapon Ability (inherent)");
if (i >= 0) store_item2.ability = (eItemAbil) (i - 1);
else store_item2.ability = ITEM_NO_ABILITY;
put_item_abils_in_dlog();
break;
case 35:
if (save_item_abils() == false) break;
if ((store_item.variety == 5) || (store_item.variety == 6)|| (store_item.variety == 7) || (store_item.variety == 8) ||
(store_item.variety == 9) || (store_item.variety == 10) || (store_item.variety == 20) ||
(store_item.variety == 21) || (store_item.variety == 24)){
give_error("You can only give an ability of this sort to an non-missile item which can be equipped (like armor, or a ring).","",824);
break;
}
i = choose_text_res(23,31,63,store_item2.ability + 1,824,"Choose General Ability (inherent)");
if (i >= 0) store_item2.ability = (eItemAbil) (i - 1);
else store_item2.ability = ITEM_NO_ABILITY;
put_item_abils_in_dlog();
break;
case 36:
if (save_item_abils() == false) break;
if ((store_item.variety == 5) || (store_item.variety == 6) || (store_item.variety == 24)){
give_error("You can only give an ability of this sort to an item which isn't a missile.","",824);
break;
}
i = choose_text_res(23,71,95,store_item2.ability + 1,824,"Choose Usable Ability (Not spell)");
if (i >= 0) store_item2.ability = (eItemAbil) (i - 1);
else store_item2.ability = ITEM_NO_ABILITY;
put_item_abils_in_dlog();
break;
case 39:
if (save_item_abils() == false) break;
if ((store_item.variety == 5) || (store_item.variety == 6) || (store_item.variety == 24)){
give_error("You can only give an ability of this sort to an item which isn't a missile.","",824);
break;
}
i = choose_text_res(23,111,136,store_item2.ability + 1,824,"Choose Usable Ability (Spell)");
if (i >= 0) store_item2.ability = (eItemAbil) (i - 1);
else store_item2.ability = ITEM_NO_ABILITY;
put_item_abils_in_dlog();
break;
case 38:
if (save_item_abils() == false) break;
if (store_item.variety != 21){
give_error("You can only give an ability of this sort to an item of type Non-Use Object.","",824);
break;
}
i = choose_text_res(23,151,162,store_item2.ability + 1,824,"Choose Reagent Ability");
if (i >= 0) store_item2.ability = (eItemAbil) (i - 1);
else store_item2.ability = ITEM_NO_ABILITY;
put_item_abils_in_dlog();
break;
case 37:
if (save_item_abils() == false) break;
if ((store_item.variety != 5) && (store_item.variety != 6) && (store_item.variety != 24)){
give_error("You can only give an ability of this sort to an item which isn't a missile.","",824);
break;
}
i = choose_text_res(23,171,177,store_item2.ability + 1,824,"Choose Missile Ability");
if (i >= 0) store_item2.ability = (eItemAbil) (i - 1);
else store_item2.ability = ITEM_NO_ABILITY;
put_item_abils_in_dlog();
break;
default:
cd_hit_led_range(824,26,30,item_hit);
cd_hit_led_range(824,5,8,item_hit);
for (i = 9; i < 13; i++)
cd_flip_led(824,i,item_hit);
break;
}
}
cItemRec edit_item_abil(cItemRec starting_record,short parent_num) {
// ignore parent in Mac version
short item_hit;
//store_which_item = which_item;
store_item2 = starting_record;
//make_cursor_sword();
cd_create_dialog_parent_num(824,parent_num);
put_item_abils_in_dlog();
cd_add_label(824,26,"Type 0: Junk, Not left",68);
cd_add_label(824,27,"Type 1: Lousy, 1 - 20 gp",68);
cd_add_label(824,28,"Type 2: So-so, 20-200 gp",68);
cd_add_label(824,29,"Type 3: Good, 200+ gp",68);
cd_add_label(824,30,"Type 4: Great, 2500+ gp",68);
cd_add_label(824,5,"Help using PC",50);
cd_add_label(824,6,"Harm using PC",50);
cd_add_label(824,7,"Help whole party",50);
cd_add_label(824,8,"Harm whole party",50);
cd_add_label(824,9,"Always identified",50);
cd_add_label(824,10,"Magical",50);
cd_add_label(824,11,"Cursed",50);
cd_add_label(824,12,"Conceal ability",50);
item_hit = cd_run_dialog();
cd_kill_dialog(824);
return store_item2;
}
void put_spec_item_in_dlog() {
cdsin(806,19,store_which_spec_item);
CDST(806,2,scenario.scen_strs(60 + store_which_spec_item * 2));
CDST(806,3,scenario.scen_strs(60 + store_which_spec_item * 2 + 1));
CDSN(806,4,scenario.special_item_special[store_which_spec_item]);
if (scenario.special_items[store_which_spec_item] >= 10)
cd_set_led(806,15,1);
else cd_set_led(806,15,0);
if (scenario.special_items[store_which_spec_item] % 10 > 0)
cd_set_led(806,17,1);
else cd_set_led(806,17,0);
}
bool save_spec_item() {
Str255 str;
CDGT(806,2,(char *) str);
str[25] = 0;
sprintf(scenario.scen_strs(60 + store_which_spec_item * 2 + 0),"%s",str);
CDGT(806,3,scenario.scen_strs(60 + store_which_spec_item * 2 + 1));
spec_item_spec = CDGN(806,4);
if (cre(scenario.special_item_special[store_which_spec_item],
-1,255,"Scenario special node called must be from 0 to 255 (or -1 for no special).","",806) > 0) return false;
scenario.special_item_special[store_which_spec_item] = spec_item_spec;
scenario.special_items[store_which_spec_item] = 0;
if (cd_get_led(806,15) == 1)
scenario.special_items[store_which_spec_item] += 10;
if (cd_get_led(806,17) == 1)
scenario.special_items[store_which_spec_item] += 1;
return true;
}
void edit_spec_item_event_filter (short spec_item_hit) {
short spec;
switch (spec_item_hit) {
case 11:
toast_dialog();
break;
case 5:
if (save_spec_item() == true)
toast_dialog();
break;
case 20:
if (save_spec_item() == false) break;
store_which_spec_item--;
if (store_which_spec_item < 0) store_which_spec_item = 49;
spec_item_spec = scenario.special_item_special[store_which_spec_item];
put_spec_item_in_dlog();
break;
case 21:
if (save_spec_item() == false) break;
store_which_spec_item++;
if (store_which_spec_item > 49) store_which_spec_item = 0;
spec_item_spec = scenario.special_item_special[store_which_spec_item];
put_spec_item_in_dlog();
break;
case 13: //choose edit
if (save_spec_item() == false)
break;
spec = CDGN(806,4);
if ((spec < 0) || (spec >= 256)) {
spec = get_fresh_spec(0);
if (spec < 0) {
give_error("You can't create a new special encounter because there are no more free scenario special nodes.",
"To free a special node, set its type to No Special and set its Jump To special to -1.",806);
break;
}
CDSN(806,4,spec);
}
edit_spec_enc(spec,0,806);
if ((spec >= 0) && (spec < 256) && (scenario.scen_specials[spec].pic < 0))
CDSN(806,4,-1);
if (save_spec_item() == false)
break;
break;
default:
cd_flip_led(806,15,spec_item_hit);
cd_flip_led(806,17,spec_item_hit);
break;
}
}
void edit_spec_item(short which_item) {
// ignore parent in Mac version
short spec_item_hit;
//store_which_spec_item = which_spec_item;
store_which_spec_item = which_item;
spec_item_spec = scenario.special_item_special[store_which_spec_item];
cd_create_dialog_parent_num(806,0);
put_spec_item_in_dlog();
cd_attach_key(806,20,0);
cd_attach_key(806,21,0);
cd_activate_item(806,12,0);
spec_item_hit = cd_run_dialog();
cd_kill_dialog(806);
}
void put_save_rects_in_dlog() {
short i;
for (i = 0; i < 3; i++) {
CDSN(807,3 + 5 * i,scenario.store_item_rects[i].top);
CDSN(807,4 + 5 * i,scenario.store_item_rects[i].left);
CDSN(807,5 + 5 * i,scenario.store_item_rects[i].bottom);
CDSN(807,6 + 5 * i,scenario.store_item_rects[i].right);
CDSN(807,2 + 5 * i,scenario.store_item_towns[i]);
}
}
bool save_save_rects() {
short i;
for (i = 0; i < 3; i++) {
scenario.store_item_rects[i].top = CDGN(807,3 + 5 * i);
scenario.store_item_rects[i].left = CDGN(807,4 + 5 * i);
scenario.store_item_rects[i].bottom = CDGN(807,5 + 5 * i);
scenario.store_item_rects[i].right = CDGN(807,6 + 5 * i);
scenario.store_item_towns[i] = CDGN(807,2 + 5 * i);
if ((scenario.store_item_towns[i] < -1) || (scenario.store_item_towns[i] >= 200)) {
give_error("Towns must be in 0 to 200 range (or -1 for no save items rectangle).","",807);
return false;
}
}
if (((scenario.store_item_towns[0] == scenario.store_item_towns[1]) &&
(scenario.store_item_towns[0] >= 0) && (scenario.store_item_towns[1] >= 0))
||
((scenario.store_item_towns[2] == scenario.store_item_towns[1]) &&
(scenario.store_item_towns[2] >= 0) && (scenario.store_item_towns[1] >= 0))
||
((scenario.store_item_towns[2] == scenario.store_item_towns[0]) &&
(scenario.store_item_towns[2] >= 0) && (scenario.store_item_towns[0] >= 0))
) {
give_error("The three towns towns with saved item rectangles must be different.","",807);
return false;
}
return true;
}
void edit_save_rects_event_filter (short save_rects_hit) {
switch (save_rects_hit) {
case 18:
toast_dialog();
break;
case 17:
if (save_save_rects() == true)
toast_dialog();
break;
}
}
void edit_save_rects() {
// ignore parent in Mac version
short save_rects_hit;
cd_create_dialog_parent_num(807,0);
put_save_rects_in_dlog();
save_rects_hit = cd_run_dialog();
cd_kill_dialog(807);
}
bool save_horses() {
short i;
for (i = 0; i < 6; i++) {
scenario.horses[6 * store_horse_page + i].which_town = CDGN(808,2 + i);
if (cre(scenario.horses[6 * store_horse_page + i].which_town,
-1,199,"Town number must be from 0 to 199 (or -1 for horse to not exist).","",808) == true) return false;
scenario.horses[6 * store_horse_page + i].loc.x = CDGN(808,8 + i);
if (cre(scenario.horses[6 * store_horse_page + i].loc.x,
0,63,"Horse location coordinates must be from 0 to 63.","",808) == true) return false;
scenario.horses[6 * store_horse_page + i].loc.y = CDGN(808,14 + i);
if (cre(scenario.horses[6 * store_horse_page + i].loc.y,
0,63,"Horse location coordinates must be from 0 to 63.","",808) == true) return false;
scenario.horses[6 * store_horse_page + i].property = cd_get_led(808,43 + i);
}
return true;
}
void put_horses_in_dlog() {
short i;
for (i = 0; i < 6; i++) {
cdsin(808,23 + i,6 * store_horse_page + i);
CDSN(808,2 + i,scenario.horses[6 * store_horse_page + i].which_town);
CDSN(808,8 + i,scenario.horses[6 * store_horse_page + i].loc.x);
CDSN(808,14 + i,scenario.horses[6 * store_horse_page + i].loc.y);
cd_set_led(808,43 + i,scenario.horses[6 * store_horse_page + i].property);
}
}
void edit_horses_event_filter (short item_hit) {
short i;
switch (item_hit) {
case 20:
if (save_horses() == true)
toast_dialog();
break;
case 21:
if (save_horses() == false) break;
store_horse_page--;
if (store_horse_page < 0) store_horse_page = 4;
put_horses_in_dlog();
break;
case 22:
if (save_horses() == false) break;
store_horse_page++;
if (store_horse_page > 4) store_horse_page = 0;
put_horses_in_dlog();
break;
default:
for (i = 0; i < 6; i++)
cd_flip_led(808,43 + i,item_hit);
break;
}
}
void edit_horses() {
// ignore parent in Mac version
short horses_hit;
store_horse_page = 0;
cd_create_dialog_parent_num(808,0);
put_horses_in_dlog();
horses_hit = cd_run_dialog();
cd_kill_dialog(808);
}
bool save_boats() {
short i;
for (i = 0; i < 6; i++) {
scenario.boats[6 * store_boat_page + i].which_town = CDGN(809,2 + i);
if (cre(scenario.boats[6 * store_boat_page + i].which_town,
-1,199,"Town number must be from 0 to 199 (or -1 for boat to not exist).","",809) == true) return false;
scenario.boats[6 * store_boat_page + i].loc.x = CDGN(809,8 + i);
if (cre(scenario.boats[6 * store_boat_page + i].loc.x,
0,63,"boat location coordinates must be from 0 to 63.","",809) == true) return false;
scenario.boats[6 * store_boat_page + i].loc.y = CDGN(809,14 + i);
if (cre(scenario.boats[6 * store_boat_page + i].loc.y,
0,63,"boat location coordinates must be from 0 to 63.","",809) == true) return false;
scenario.boats[6 * store_boat_page + i].property = cd_get_led(809,43 + i);
}
return true;
}
void put_boats_in_dlog() {
short i;
for (i = 0; i < 6; i++) {
cdsin(809,24 + i,6 * store_boat_page + i);
CDSN(809,2 + i,scenario.boats[6 * store_boat_page + i].which_town);
CDSN(809,8 + i,scenario.boats[6 * store_boat_page + i].loc.x);
CDSN(809,14 + i,scenario.boats[6 * store_boat_page + i].loc.y);
cd_set_led(809,43 + i,scenario.boats[6 * store_boat_page + i].property);
}
}
void edit_boats_event_filter (short item_hit) {
short i;
switch (item_hit) {
case 20:
if (save_boats() == true)
toast_dialog();
break;
case 22:
if (save_boats() == false) break;
store_boat_page--;
if (store_boat_page < 0) store_boat_page = 4;
put_boats_in_dlog();
break;
case 23:
if (save_boats() == false) break;
store_boat_page++;
if (store_boat_page > 4) store_boat_page = 0;
put_boats_in_dlog();
break;
default:
for (i = 0; i < 6; i++)
cd_flip_led(809,43 + i,item_hit);
break;
}
}
void edit_boats() {
// ignore parent in Mac version
short boats_hit;
store_boat_page = 0;
cd_create_dialog_parent_num(809,0);
put_boats_in_dlog();
boats_hit = cd_run_dialog();
cd_kill_dialog(809);
}
bool save_add_town() {
short i;
for (i = 0; i < 10; i++) {
scenario.town_to_add_to[i] = CDGN(810,2 + i);
if (cre(scenario.town_to_add_to[i],
-1,199,"Town number must be from 0 to 199 (or -1 for no effect).","",810) == true) return false;
scenario.flag_to_add_to_town[i][0] = CDGN(810,12 + i);
if (cre(scenario.flag_to_add_to_town[i][0],
0,299,"First part of flag must be from 0 to 299.","",810) == true) return false;
scenario.flag_to_add_to_town[i][1] = CDGN(810,22 + i);
if (cre(scenario.flag_to_add_to_town[i][1],
0,9,"Second part of flag must be from 0 to 9.","",810) == true) return false;
}
return true;
}
void put_add_town_in_dlog() {
short i;
for (i = 0; i < 10; i++) {
CDSN(810,2 + i,scenario.town_to_add_to[i]);
CDSN(810,12 + i,scenario.flag_to_add_to_town[i][0]);
CDSN(810,22 + i,scenario.flag_to_add_to_town[i][1]);
}
}
void edit_add_town_event_filter (short item_hit) {
switch (item_hit) {
case 32:
if (save_add_town() == true)
toast_dialog();
break;
}
}
void edit_add_town() {
// ignore parent in Mac version
short add_town_hit;
cd_create_dialog_parent_num(810,0);
put_add_town_in_dlog();
add_town_hit = cd_run_dialog();
cd_kill_dialog(810);
}
bool save_item_placement() {
short i;
store_storage.property = cd_get_led(812,38);
store_storage.ter_type = CDGN(812,22);
if (cre(store_storage.ter_type,
-1,255,"Terrain Type must be from 0 to 255 (or -1 for No Shortcut).","",812) == true) return false;
for (i = 0; i < 10; i++) {
store_storage.item_num[i] = CDGN(812,2 + i);
if (cre(store_storage.item_num[i],
-1,399,"All item numbers must be from 0 to 399 (or -1 for No Item).","",812) == true) return false;
store_storage.item_odds[i] = CDGN(812,12 + i);
if (cre(store_storage.item_odds[i],
0,100,"All item chances must bve from 0 to 100.","",812) == true) return false;
}
scenario.storage_shortcuts[cur_shortcut] = store_storage;
return true;
}
void put_item_placement_in_dlog() {
short i;
cdsin(812,27,cur_shortcut);
cd_set_led(812,38,store_storage.property);
CDSN(812,22,store_storage.ter_type);
for (i = 0; i < 10; i++) {
CDSN(812,2 + i,store_storage.item_num[i]);
CDSN(812,12 + i,store_storage.item_odds[i]);
}
}
void edit_item_placement_event_filter (short item_hit) {
short i;
switch (item_hit) {
case 23:
if (save_item_placement() == true)
toast_dialog();
break;
case 24:
toast_dialog();
break;
case 26:
if (save_item_placement() == false) break;
cur_shortcut--;
if (cur_shortcut < 0) cur_shortcut = 9;
store_storage = scenario.storage_shortcuts[cur_shortcut];
put_item_placement_in_dlog();
break;
case 25:
if (save_item_placement() == false) break;
cur_shortcut++;
if (cur_shortcut > 9) cur_shortcut = 0;
store_storage = scenario.storage_shortcuts[cur_shortcut];
put_item_placement_in_dlog();
break;
case 41:
store_storage.ter_type = CDGN(812,22);
i = choose_text_res(-4,0,255,store_storage.ter_type,812,"Which Terrain?");
store_storage.ter_type = i;
CDSN(812,22,i);
break;
default:
if ((item_hit >= 42) && (item_hit <= 51)) {
i = CDGN(812,2 + item_hit - 42);
i = choose_text_res(-2,0,399,i,812,"Place which item?");
if (i >= 0)
CDSN(812,2 + item_hit - 42,i);
break;
}
cd_flip_led(812,38,item_hit);
break;
}
}
void edit_item_placement() {
// ignore parent in Mac version
short item_placement_hit;
store_storage = scenario.storage_shortcuts[0];
cur_shortcut = 0;
cd_create_dialog_parent_num(812,0);
put_item_placement_in_dlog();
item_placement_hit = cd_run_dialog();
cd_kill_dialog(812);
}
bool save_scen_details() {
Str255 str;
short i;
scenario.difficulty = cd_get_led_range(803,30,33);
scenario.rating = cd_get_led_range(803,21,24);
scenario.format.ver[0] = CDGN(803,2);
scenario.format.ver[1] = CDGN(803,3);
scenario.format.ver[2] = CDGN(803,4);
for (i = 0; i < 3; i++)
if (cre(scenario.format.ver[i],
0,9,"The digits in the version number must be in the 0 to 9 range.","",803) == true) return false;
CDGT(803,5,(char *) str);
str[59] = 0;
strcpy(scenario.scen_strs(1),(char *) str);
CDGT(803,6,(char *) str);
str[59] = 0;
strcpy(scenario.scen_strs(2),(char *) str);
CDGT(803,7,scenario.scen_strs(3));
return true;
}
void put_scen_details_in_dlog() {
cd_set_led_range(803,30,33,scenario.difficulty);
cd_set_led_range(803,21,24,scenario.rating);
CDSN(803,2,scenario.format.ver[0]);
CDSN(803,3,scenario.format.ver[1]);
CDSN(803,4,scenario.format.ver[2]);
CDST(803,5,scenario.scen_strs(1));
CDST(803,6,scenario.scen_strs(2));
CDST(803,7,scenario.scen_strs(3));
}
void edit_scen_details_event_filter (short item_hit) {
switch (item_hit) {
case 8:
if (save_scen_details() == true)
toast_dialog();
break;
default:
cd_hit_led_range(803,21,24,item_hit);
cd_hit_led_range(803,30,33,item_hit);
break;
}
}
void edit_scen_details() {
// ignore parent in Mac version
short scen_details_hit;
cd_create_dialog_parent_num(803,0);
put_scen_details_in_dlog();
scen_details_hit = cd_run_dialog();
cd_kill_dialog(803);
}
void put_make_scen_1_in_dlog() {
CDST(800,2,"Scenario name");
CDST(800,3,"filename");
}
void edit_make_scen_1_event_filter (short item_hit) {
Str255 str;
short i,j;
switch (item_hit) {
case 4:
CDGT(800,3,(char *) str);
j = strlen((char *) str);
if (j == 0) {
give_error("You've left the file name empty.","",800);
break;
}
if (j > 50) {
give_error("The file name can be at most 50 characters long.","",800);
break;
}
for (i = 0; i < j; i++)
if ((str[i] < 97) || (str[i] > 122)) {
give_error("The file name must consist of only lower case letters.","",800);
return;
}
dialog_answer = 1;
toast_dialog();
break;
case 9:
dialog_answer = 0;
toast_dialog();
break;
default:
cd_flip_led(800,11,item_hit);
break;
}
}
short edit_make_scen_1(char *filename,char *title,short *grass) {
// ignore parent in Mac version
short make_scen_1_hit;
cd_create_dialog_parent_num(800,0);
put_make_scen_1_in_dlog();
make_scen_1_hit = cd_run_dialog();
CDGT(800,2,title);
title[30] = 0;
CDGT(800,3,filename);
*grass = cd_get_led(800,11);
cd_kill_dialog(800);
return dialog_answer;
}
void put_make_scen_2_in_dlog() {
CDSN(801,2,1);
CDSN(801,3,1);
CDSN(801,4,0);
CDSN(801,5,1);
CDSN(801,6,0);
}
void edit_make_scen_2_event_filter (short item_hit) {
short i,j,k;
switch (item_hit) {
case 11:
i = CDGN(801,2);
if (cre(i,
1,50,"Outdoors width must be between 1 and 50.","",801) == true) return ;
j = CDGN(801,3);
if (cre(j,
1,50,"Outdoors height must be between 1 and 50.","",801) == true) return ;
if (cre(i * j,
1,100,"The total number of outdoor sections (width times height) must be between 1 and 100.","",801) == true) return ;
i = CDGN(801,4);
j = CDGN(801,5);
k = CDGN(801,6);
if (cre(i,
0,200,"Number of small towns must be between 0 and 200.","",801) == true) return ;
if (cre(j,
1,200,"Number of medium towns must be between 0 and 200. The first town (Town 0) must always be of medium size.","",801) == true) return ;
if (cre(k,
0,200,"Number of large towns must be between 0 and 200.","",801) == true) return ;
if (cre(i + j + k,
1,200,"The total number of towns must be from 1 to 200 (you must have at least 1 town).","",801) == true) return ;
toast_dialog();
break;
case 10:
dialog_answer = 0;
toast_dialog();
break;
default:
cd_flip_led(801,26,item_hit);
break;
}
}
short edit_make_scen_2(short *val_array) {
// ignore parent in Mac version
short make_scen_2_hit,i;//array[6];
//array = val_array;
cd_create_dialog_parent_num(801,0);
put_make_scen_2_in_dlog();
make_scen_2_hit = cd_run_dialog();
for (i = 0; i < 5; i++)
val_array[i] = CDGN(801,2 + i);
val_array[5] = cd_get_led(801,26);
cd_kill_dialog(801);
return dialog_answer;
}
bool build_scenario() {
printf("Building a scenario currently disabled.\n");
// short two_flags[6]; // width, height, large, med, small, default_town
// Str255 f_name,f_name2,title;
// short grass,password,which_town,error;
// FSSpec temp_file_to_load;
// short i,j;
// long dummy;
//
// if (edit_make_scen_1((char *) f_name,(char *) title,&grass) == false)
// return false;
// sprintf((char *) f_name2,"%s.exs",f_name);
// if (edit_make_scen_2((short *) two_flags) == false)
// return false;
// user_given_password = given_password = get_password();
// if (fancy_choice_dialog(860,0) == 2)
// return false;
// town = new cMedTown;
// //cMedTown* t_d = (cMedTown*) town;
// init_out();
// init_scenario();
// strcpy((char *) scenario.scen_strs(0),(char *) title);
// if (two_flags[5] == 0) {
// init_town(1);
// if (grass == 0)
// for (i = 0; i < 48; i++)
// for (j = 0; j < 48; j++)
// town->terrain(i,j) = 0;
// }
// else {
// error = FSMakeFSSpec(start_volume,start_dir,"\p::::Blades of Exile Base",&temp_file_to_load);
// if (error != 0) {oops_error(40);}
// import_town(0,temp_file_to_load);
// }
// if (two_flags[3] > 0)
// two_flags[3]--;
//
// make_new_scenario(f_name2,two_flags[0],two_flags[1],two_flags[5],grass);
//
// // now make sure correct outdoors is in memory, because we're going to be saving scenarios
// // for a while
// overall_mode = 60;
// cur_out.x = 0;
// cur_out.y = 0;
// load_outdoors(cur_out,0);
//
// for (i = 0; i < two_flags[2]; i++) {
// which_town = scenario.num_towns;
// scenario.num_towns++;
// scenario.town_size[which_town] = 0;
// scenario.town_hidden[which_town] = 0;
// cur_town = which_town;
// init_town(0);
// strcpy(data_store->town_strs[0],"Large town");
// town_type = 0;
// reset_pwd();
// save_scenario();
// }
// for (i = 0; i < two_flags[3]; i++) {
// which_town = scenario.num_towns;
// scenario.num_towns++;
// scenario.town_size[which_town] = 1;
// scenario.town_hidden[which_town] = 0;
// cur_town = which_town;
// init_town(1);
// strcpy(data_store->town_strs[0],"Medium town");
// town_type = 1;
// reset_pwd();
// save_scenario();
// }
// for (i = 0; i < two_flags[4]; i++) {
// which_town = scenario.num_towns;
// scenario.num_towns++;
// scenario.town_size[which_town] = 2;
// scenario.town_hidden[which_town] = 0;
// cur_town = which_town;
// init_town(2);
// strcpy(data_store->town_strs[0],"Small town");
// town_type = 2;
// reset_pwd();
// save_scenario();
// }
// //Delay(200,&dummy);
// if(load_town(0)) cur_town = 0;
// cur_town = 0;
// augment_terrain(cur_out);
// update_item_menu();
return false;
}
//void user_password_filter (short item_hit) {
// Str255 str;
// short i;
//
// switch (item_hit) {
// case 4:
// i = CDGN(802,2);
// if ((i < 0) || (i > 30000)) {
// give_error("The password must be from 0 to 30000.","",802);
// break;
// }
// toast_dialog();
// break;
//
// }
//}
//
//short get_password() {
// // ignore parent in Mac version
// short town_strs_hit,i,store_dialog_answer;
// Str255 temp_str,str2;
//
// cd_create_dialog_parent_num(802,0);
//
// CDSN(802,2,0);
//
// town_strs_hit = cd_run_dialog();
//
// CDGT(802,2,(char *) temp_str);
// i = wd_to_pwd(temp_str);
//
// cd_kill_dialog(802);
//
// return i;
//}
void set_starting_loc_filter (short item_hit) {
Str255 str;
short i,j,k;
switch (item_hit) {
case 5:
i = CDGN(805,2);
j = CDGN(805,3);
k = CDGN(805,4);
if ((i < 0) || (i >= scenario.num_towns)) {
sprintf((char *) str,"The starting town must be from 0 to %d.",scenario.num_towns - 1);
give_error((char *) str,"",805);
break;
}
if ((j < 0) || (j >= max_dim[scenario.town_size[i]] - 1) ||
(k < 0) || (k >= max_dim[scenario.town_size[i]] - 1)) {
give_error("This coordinate is not inside the bounds of the town.","",805);
break;
}
scenario.which_town_start = i;
scenario.where_start.x = j;
scenario.where_start.y = k;
toast_dialog();
break;
case 12:
toast_dialog();
break;
}
}
void set_starting_loc() {
// ignore parent in Mac version
short town_strs_hit;
cd_create_dialog_parent_num(805,0);
CDSN(805,2,scenario.which_town_start);
CDSN(805,3,scenario.where_start.x);
CDSN(805,4,scenario.where_start.y);
town_strs_hit = cd_run_dialog();
cd_kill_dialog(805);
}
bool save_scenario_events() {
short i;
for (i = 0; i < 10; i++) {
scenario.scenario_timer_times[i] = CDGN(811,2 + i);
if ((scenario.scenario_timer_times[i] > 0) &&
(scenario.scenario_timer_times[i] % 10 != 0)) {
give_error("All scenario event times must be multiples of 10 (e.g. 100, 150, 1000, etc.).","",811);
return false;
}
scenario.scenario_timer_specs[i] = CDGN(811,12 + i);
if (cre(scenario.scenario_timer_specs[i],-1,255,"The scenario special nodes must be between 0 at 255 (or -1 for no special)."
,"",811) == true) return false;
}
return true;
}
void put_scenario_events_in_dlog() {
short i;
for (i = 0; i < 10; i++) {
CDSN(811,2 + i,scenario.scenario_timer_times[i]);
CDSN(811,12 + i,scenario.scenario_timer_specs[i]);
}
}
void edit_scenario_events_event_filter (short item_hit) {
short spec;
switch (item_hit) {
case 22:
if (save_scenario_events() == true)
toast_dialog();
break;
default:
if ((item_hit >= 30) && (item_hit <= 39)) {
if (save_scenario_events() == false)
break;
spec = CDGN(811,item_hit - 30 + 12);
if ((spec < 0) || (spec > 255)) {
spec = get_fresh_spec(0);
if (spec < 0) {
give_error("You can't create a new scenario special encounter because there are no more free special nodes.",
"To free a special node, set its type to No Special and set its Jump To special to -1.",811);
break;
}
CDSN(811,item_hit - 30 + 12,spec);
}
edit_spec_enc(spec,0,811);
if ((spec >= 0) && (spec < 256) && (scenario.scen_specials[spec].pic < 0))
CDSN(811,item_hit - 30 + 12,-1);
}
break;
}
}
void edit_scenario_events() {
// ignore parent in Mac version
short advanced_town_hit;
cd_create_dialog_parent_num(811,0);
put_scenario_events_in_dlog();
advanced_town_hit = cd_run_dialog();
cd_kill_dialog(811);
}
//void give_password_filter (short item_hit) {
// Str255 str;
// short i;
//
// switch (item_hit) {
// default:
//
// toast_dialog();
// break;
//
// }
//}
//
//short enter_password() {
// // ignore parent in Mac version
// short town_strs_hit,i,store_dialog_answer;
// Str255 temp_str,str2;
//
// cd_create_dialog_parent_num(823,0);
//
// CDSN(823,2,0);
//
// town_strs_hit = cd_run_dialog();
//
// CDGT(823,2,(char *) temp_str);
// i = wd_to_pwd(temp_str);
// given_password = user_given_password = i;
//
// cd_kill_dialog(823);
//
// return i;
//}
//
//short wd_to_pwd(Str255 str) {
// char pwd[8] = "aaaaaa";
// short i;
// long val = 0,pow[6] = {1,10,100,1000,9999,99999};
//
// for (i = 0; i < 6; i++) {
// if (str[i] == 0)
// i = 6;
// else {
// if ((str[i] >= 65) && (str[i] <= 90))
// pwd[i] = str[i] + 32;
// else if ((str[i] >= 48) && (str[i] <= 57))
// pwd[i] = str[i] + 49;
// else if ((str[i] >= 97) && (str[i] <= 122))
// pwd[i] = str[i];
// }
// }
// for (i = 0; i < 6; i++)
// val = val + pow[i] * (long) (pwd[i] - 97);
// val = val % 30000;
// return (short) val;
//}
Reference in New Issue View Git Blame Copy Permalink