Mercurial > otakunoraifu
annotate scn2k/scn2k_impl.cc @ 66:d112357a0ec1
Fix a bug with savegames introduced with changeset c7bcc0ec2267.
Warning: savegames created since c7bcc0ec2267 are probably corrupted,
you may have to start the game over.
If you chose not to do so, you should replace all occurrences of 'TextWindow' by 'TextImplWindow',
and 'Text Window' by 'TextImpl Window' in your save files.
| author | Thibaut Girka <thib@sitedethib.com> |
|---|---|
| date | Sat, 11 Dec 2010 18:36:20 +0100 |
| parents | 4416cfac86ae |
| children |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 2 * Copyright (c) 2004-2006 Kazunori "jagarl" Ueno | |
| 3 * All rights reserved. | |
| 4 * | |
| 5 * Redistribution and use in source and binary forms, with or without | |
| 6 * modification, are permitted provided that the following conditions | |
| 7 * are met: | |
| 8 * 1. Redistributions of source code must retain the above copyright | |
| 9 * notice, this list of conditions and the following disclaimer. | |
| 10 * 2. Redistributions in binary form must reproduce the above copyright | |
| 11 * notice, this list of conditions and the following disclaimer in the | |
| 12 * documentation and/or other materials provided with the distribution. | |
| 13 * 3. The name of the author may not be used to endorse or promote products | |
| 14 * derived from this software without specific prior written permission. | |
| 15 * | |
| 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR | |
| 17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES | |
| 18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. | |
| 19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, | |
| 20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | |
| 21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, | |
| 22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY | |
| 23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT | |
| 24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF | |
| 25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |
| 26 */ | |
| 27 | |
| 28 #include <stdexcept> | |
| 52 | 29 #include "scn2k_impl.h" |
| 30 #include "system/file.h" | |
| 31 #include "system/system_config.h" | |
| 32 #include "window/picture.h" | |
| 33 #include "window/system.h" | |
| 0 | 34 |
| 35 // #define DEBUG 1 | |
| 36 | |
| 37 using namespace std; | |
| 38 | |
| 39 /********************************************** | |
| 40 ** Scn2k | |
| 41 */ | |
| 42 | |
| 43 void kconv(const unsigned char* src, unsigned char* dest); | |
| 44 void kconv_rev(const unsigned char* src, unsigned char* dest); | |
| 45 string kconv(const string& s); | |
| 46 string kconv_rev(const string& s); | |
| 47 | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
48 Scn2k::Scn2k(Event::Container& _event, PicContainer& _parent) : |
| 0 | 49 Event::Time(_event), |
| 50 event(_event), | |
| 51 parent(_parent), | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
52 text_exec(_event, _parent), |
|
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
53 grp_exec(_event, _parent, flag, flag.cgm_data) |
| 0 | 54 { |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
55 config = AyuSysConfig::GetInstance(); |
|
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
56 |
| 0 | 57 system_version = 0; |
| 58 skip_mode = SKIP_NO; | |
| 59 | |
| 52 | 60 script_start = NULL; |
| 61 script = NULL; | |
| 62 script_end = NULL; | |
| 0 | 63 |
| 64 backlog_script_scn = -1; | |
| 52 | 65 backlog_script_start = NULL; |
| 66 backlog_script_end = NULL; | |
| 0 | 67 |
| 68 save_scn = 0; | |
| 69 save_point = 0; | |
| 70 scn_number = 0; | |
| 71 scn_point = 0; | |
| 72 cmd_stack_str = cmd_stack_str_orig; | |
| 73 | |
| 52 | 74 dialog = NULL; |
| 0 | 75 dialog_type = CMD_NOP; |
| 52 | 76 menu = NULL; |
| 0 | 77 menu_mouseshown = false; |
| 78 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
79 /* マウスカーソルを作成 */ |
| 0 | 80 mouse_type = 0; |
| 52 | 81 mouse_surface = NULL; |
| 0 | 82 mouse_pressed = 0; |
| 83 ShowCursor(); | |
| 84 | |
| 85 LoadSys(); | |
| 86 text_exec.InitWindow(); | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
87 grp_exec.InitSel(); |
| 0 | 88 } |
| 89 | |
| 90 Scn2k::~Scn2k() { | |
| 50 | 91 if (script_start) delete[] script_start; |
| 0 | 92 HideCursor(); |
| 93 SaveSys(); | |
| 94 } | |
| 95 | |
| 96 char* Scn2k::OpenScript(int new_scn_number, char*& end, int* call_vec, int& system_version) { | |
| 97 char fname[1024]; | |
| 98 const char* data; | |
| 99 char* ret_data; | |
| 100 int offset = 0; | |
| 101 int scenario_magic; | |
| 102 | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
103 FileSearcher* file_searcher = FileSearcher::GetInstance(); |
|
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
104 |
| 0 | 105 sprintf(fname, "SEEN%04d.TXT", new_scn_number); |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
106 ARCINFO* info = file_searcher->Find(FileSearcher::SCN, fname, ""); |
| 52 | 107 if (info == NULL) goto err; |
| 0 | 108 data = info->Read(); |
| 109 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
110 /* version 確認 */ |
| 0 | 111 scenario_magic = read_little_endian_int(data + 4); |
| 112 if (scenario_magic != 0x2712 && scenario_magic != 0x1adb2) { | |
| 113 fprintf(stderr,"Invalid scenario header : scenario number %d\n",new_scn_number); | |
| 114 goto err; | |
| 115 } | |
| 116 if (read_little_endian_int(data) == 0x1cc) { | |
| 117 system_version = 0; | |
| 118 offset = 0x1cc + read_little_endian_int(data+0x20) + 4; | |
| 119 } else if (read_little_endian_int(data) == 0x1d0) { | |
| 120 system_version = 1; | |
| 121 offset = read_little_endian_int(data + 0x20); | |
| 122 } else { | |
| 123 fprintf(stderr,"Invalid scenario header : scenario number %d\n",new_scn_number); | |
| 124 goto err; | |
| 125 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
126 /* header から subroutine number とりだし */ |
| 0 | 127 if (call_vec) { |
| 128 int i; | |
| 129 for (i=0; i<100; i++) { | |
| 130 call_vec[i] = read_little_endian_int(data + 0x34 + i * 4); | |
| 131 } | |
| 132 } | |
| 133 ret_data = new char[info->Size() - offset + 1024]; | |
| 134 memcpy(ret_data, data+offset, info->Size()-offset); | |
| 135 memset(ret_data+info->Size()-offset, 0, 1024); | |
| 136 end = ret_data + info->Size() - offset; | |
| 137 delete info; | |
| 138 return ret_data; | |
| 139 | |
| 140 err: | |
| 141 delete info; | |
| 142 fprintf(stderr,"Cannot open scenario number %d\n",new_scn_number); | |
| 143 throw std::invalid_argument("Scn2k::OpenScript"); | |
| 144 | |
| 145 return false; | |
| 146 } | |
| 52 | 147 |
| 0 | 148 bool Scn2k::ChangeScript(int new_scn_number, int call_no) { |
| 149 int old_scn_number = scn_number; | |
| 150 int old_scn_pt = script - script_start; | |
| 151 int scn_pt = 0; | |
| 152 | |
| 153 if (script_start) delete[] script_start; | |
| 52 | 154 script_start = NULL; |
| 155 script = NULL; | |
| 156 script_end = NULL; | |
| 0 | 157 |
| 158 int call_vec[100]; | |
| 159 | |
| 160 try { | |
| 161 script_start = OpenScript(new_scn_number, script_end, call_vec, system_version); | |
| 162 } catch(...) { | |
| 163 fprintf(stderr,"\tFrom script %d pt %d\n",old_scn_number, old_scn_pt); | |
| 164 throw; | |
| 165 } | |
| 166 if (call_no > 0 && call_no < 100) { | |
| 167 scn_pt = call_vec[call_no]; | |
| 168 if (scn_pt == 0) { | |
| 169 fprintf(stderr,"Invalid subroutine number: scn %d sub %d\n",new_scn_number, call_no); | |
| 170 scn_pt = 0; | |
| 171 } | |
| 172 } else if (call_no < 0) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
173 scn_pt = -call_no; // デバッグ用 |
| 0 | 174 } |
| 175 | |
| 176 scn_number = new_scn_number; | |
| 177 scn_point = scn_pt; | |
| 178 script = script_start + scn_pt; | |
| 179 if (script < script_start || script >= script_end) | |
| 180 fprintf(stderr,"scn %d pt %d: Cannot jump to %d:%d; fall back to the top\n",old_scn_number, old_scn_pt, scn_number, scn_pt); | |
| 181 return true; | |
| 182 } | |
| 52 | 183 |
| 0 | 184 bool Scn2k::ReadCmdAt(Cmd& cmd, int scn, int pt) { |
| 185 const char* d; | |
| 52 | 186 if (scn == scn_number) { |
| 0 | 187 d = script_start + pt; |
| 188 if (d < script_start || d >= script_end) { | |
| 189 fprintf(stderr,"Cannot read script at current scn %d pt %d\n", scn, pt); | |
| 190 return false; | |
| 191 } | |
| 192 } else { | |
| 193 if (backlog_script_scn != scn) { | |
| 194 if (backlog_script_start) delete[] backlog_script_start; | |
| 195 backlog_script_start = OpenScript(scn, backlog_script_end, 0, system_version); | |
| 196 } | |
| 197 d = backlog_script_start + pt; | |
| 198 if (d < backlog_script_start || d >= backlog_script_end) { | |
| 199 fprintf(stderr,"Cannot read script at scn %d pt %d\n", scn, pt); | |
| 200 return false; | |
| 201 } | |
| 202 } | |
| 203 | |
| 204 cmd.GetCmd(flag, d); | |
| 205 return true; | |
| 206 } | |
| 207 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
208 extern bool save_req, load_req; // キーボードからセーブ・ロードできるように |
| 0 | 209 extern bool pressAreq; |
| 210 | |
| 211 void Scn2k::Elapsed(unsigned int current_time) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
212 SetWakeup(current_time + 10); // 10msに一回シナリオスクリプト解釈 |
| 52 | 213 if (script == NULL) return; |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
214 //VarInfo info; info.type = 6; info.number = 0; // PB の「一回ゲームを開始したことがある」フラグ |
| 0 | 215 //flag.Set(info,1); |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
216 //info.type = 0; info.number = 604; // Princess Bride: クリア対象設定フラグ (聖) |
| 0 | 217 //flag.Set(info, 1); |
| 218 | |
| 219 | |
| 220 Cmd cmd(flag, system_version); | |
| 221 int cnt1; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
222 int cnt2 = 1000; // flag / jump / flag 系コマンドの最大実行回数 |
| 0 | 223 |
| 224 /* XXX */ | |
| 225 if (save_req) { | |
| 226 save_req = false; | |
| 227 load_req = false; | |
| 228 cmd.cmd_type = CMD_SAVEREQ; | |
| 229 } else if (load_req) { | |
| 230 load_req = false; | |
| 231 save_req = false; | |
| 232 cmd.cmd_type = CMD_LOADREQ; | |
| 233 } | |
| 234 if (pressAreq) { | |
| 235 pressAreq = false; | |
| 236 LoadRollback(cmd); | |
| 237 return; | |
| 238 } | |
| 239 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
240 /* キー入力などに対応 */ |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
241 // メニュー内以外で shift キーが押されたらスキップ開始 |
| 0 | 242 if ( (skip_mode&SKIP_IN_MENU) == 0) { |
| 243 if (event.pressed(KEY_SHIFT)) { | |
| 244 if (skip_mode & SKIP_TEXT) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
245 ; // スキップ中ならなにもしない |
| 0 | 246 } else { |
| 247 SetSkipMode(SkipMode(SKIP_TEXT | SKIP_GRP_NOEFFEC | SKIPEND_KEY)); | |
| 248 } | |
| 249 } else { | |
| 250 if ( skip_mode & SKIPEND_KEY) { | |
| 251 if ( (skip_mode & SKIPEND_TEXT) && (skip_mode & SKIP_TEXT)) { | |
| 252 SkipMode new_skip_mode = SkipMode(skip_mode & (~SKIPEND_KEY)); | |
| 253 if ( (new_skip_mode & SKIP_GRP_FAST) || (new_skip_mode & SKIP_GRP_NODRAW)) { | |
| 254 new_skip_mode = SkipMode(skip_mode & (~SKIP_GRP_NOEFFEC)); | |
| 255 } | |
| 256 SetSkipMode(new_skip_mode); | |
| 257 } else { | |
| 258 SetSkipMode(SKIP_NO); | |
| 259 } | |
| 260 } | |
| 261 } | |
| 262 } | |
| 263 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
264 for (cnt1=0; cnt1<20; cnt1++) { // 一回につき 20 個のコマンド実行 |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
265 // 他のコマンド実行中なら終了 |
| 0 | 266 if ( (cmd.cmd_type == CMD_NOP && SysWait(cmd)) || |
| 267 // (cmd.cmd_type == CMD_NOP && text_exec.Wait(current_time, cmd)) || | |
| 268 // (cmd.cmd_type == CMD_NOP && grp_exec.Wait(current_time, cmd))) { | |
| 269 (cmd.cmd_type == CMD_NOP && grp_exec.Wait(current_time, cmd)) || | |
| 270 (cmd.cmd_type == CMD_NOP && text_exec.Wait(current_time, cmd))) { | |
| 271 break; | |
| 272 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
273 // コマンド読み込み |
| 0 | 274 for (; cnt2 > 0; cnt2--) { |
| 275 scn_point = script - script_start; | |
| 276 eprintf("%d / %d :", script - script_start, script_end-script_start); | |
| 277 // fprintf(stderr,"%d: %d / %d :",scn_number, script - script_start, script_end-script_start); | |
| 278 cmd.GetCmd(flag, script); | |
| 279 // if (cmd.cmd_type != CMD_NOP) { | |
| 280 if (0) { | |
| 281 fprintf(stderr,"%d / %d : 0x23 - cmd %02x-%02x:%04x:%02x[%2d] \n", | |
| 282 scn_point, script_end-script_start, | |
| 283 cmd.cmd1,cmd.cmd2,cmd.cmd3,cmd.cmd4,cmd.argc); | |
| 52 | 284 int i; |
| 285 for (i = 0; i<cmd.args.size(); i++) { | |
| 0 | 286 if (i == 0) fprintf(stderr,"\t"); |
| 287 VarInfo info = cmd.args[i]; | |
| 288 if (info.type == TYPE_STR || info.type == TYPE_VARSTR) | |
| 289 fprintf(stderr,"\"%s\",", cmd.Str(info)); | |
| 290 else | |
| 291 fprintf(stderr,"%d,",info.value); | |
| 292 } | |
| 293 fprintf(stderr,"\n"); | |
| 294 } | |
| 295 cmd.scn = scn_number; | |
| 296 cmd.pos = scn_point; | |
| 297 if (cmd.IsError()) break; | |
| 298 if (cmd.cmd_type == CMD_NOP) continue; | |
| 299 if (cmd.cmd_type == CMD_JMP) { | |
| 300 // local jump | |
| 301 if (cmd.cmd1 == 0 && cmd.cmd2 == 1 && cmd.cmd3 == 16) { | |
| 302 int i; | |
| 303 for (i=0; i<cmd.args.size()-1; i++) { | |
| 304 VarInfo var; | |
| 305 var.type = 11; | |
| 306 var.number = i; | |
| 307 flag.Set(var, cmd.args[i].value); | |
| 308 } | |
| 309 cmd.args[0].value = cmd.args[i].value; | |
| 310 } | |
| 311 if ( cmd.cmd1 == 0 && cmd.cmd2 == 1 && (cmd.cmd3 == 5 || cmd.cmd3 == 8 || cmd.cmd3 == 16) ) { // local call / simple switch | |
| 312 int scn_pt = script - script_start; | |
| 313 // fprintf(stderr,"\nlocal call %d:%d from %d\n",scn_number,cmd.args[0].value,scn_pt); | |
| 314 stack.push_back(StackItem(-1, scn_pt)); | |
| 315 } | |
| 52 | 316 if (cmd.cmd1 == 0 && cmd.cmd2 == 1 && cmd.cmd3 == 1) {//TODO |
| 0 | 317 fprintf(stderr,"*** unsupported: cond 1\n"); |
| 318 } | |
| 319 script = script_start + cmd.args[0].value; | |
| 320 if (script < script_start || script >= script_end) { | |
|
43
01aa5ddf7dc8
A lot of very minor improvements (deleted some unused variables, and other things like that...)
thib
parents:
19
diff
changeset
|
321 fprintf(stderr,"scn %d pt %d: Cannot jump to %d; fall back to the top\n", scn_number, scn_point, cmd.args[0].value); |
| 0 | 322 script = script_start; |
| 323 } | |
| 324 cmd.clear(); | |
| 325 continue; | |
| 326 } | |
| 327 if (flag.Exec(cmd)) continue; | |
| 328 break; | |
| 329 } | |
| 330 if (cmd.IsError()) { | |
| 331 fprintf(stderr,"cmd error occured: scn %d pt %d / cur %d",scn_number,scn_point,script-script_start); | |
| 332 while(script < script_end) { | |
| 333 if (*script == 0x29 && script[1] == 0x0a) {script++;break;} | |
| 334 if (*script == 0 && script[1] == 0x0a) {script++;break;} | |
| 335 if (*script == 0 && script[1] == 0x23) {script++;break;} | |
| 336 script++; | |
| 337 fprintf(stderr," -> fall back to %d\n",script-script_start); | |
| 338 } | |
| 339 const char* dprev = script - 0x60; | |
| 340 if (dprev < script_start) dprev = script_start; | |
| 341 int ilen = (script-dprev+65)/16; | |
| 342 int i; for (i=0; i<ilen; i++) { | |
| 343 fprintf(stderr, "%6d: ",dprev-script_start); | |
| 344 int j; for (j=0; j<16; j++) { | |
| 345 if (dprev >= script_end) break; | |
| 346 fprintf(stderr, "%02x ",*(unsigned char*)(dprev)); | |
| 347 dprev++; | |
| 348 } | |
| 349 fprintf(stderr, "\n"); | |
| 350 } | |
| 351 break; | |
| 352 } | |
| 52 | 353 |
| 0 | 354 if (cmd.cmd_type == CMD_NOP) continue; |
| 355 | |
| 356 if (cmd.cmd_type == CMD_TEXT && cmd.pos != -1) { | |
| 357 set<int>& readflag = text_readflag[scn_number]; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
358 if (readflag.find(cmd.pos) == readflag.end()) { // 未読テキスト発見 |
| 0 | 359 readflag.insert(cmd.pos); |
| 360 if (skip_mode & SKIPEND_TEXT) { | |
| 361 if (!(skip_mode & SKIPEND_KEY)) SetSkipMode(SKIP_NO); | |
| 362 } | |
| 363 } | |
| 364 } | |
| 365 text_exec.Exec(cmd); | |
| 366 grp_exec.Exec(cmd); | |
| 367 SysExec(cmd); | |
| 368 if (cmd.cmd_type == CMD_WAITFRAMEUPDATE) { | |
| 369 SetWakeup(Event::Time::FRAME_UPDATE); | |
| 370 break; | |
| 371 } else if (cmd.cmd_type != CMD_NOP) { | |
| 372 #if DEBUG | |
| 373 fprintf(stderr,"%d-%d / %d : unsupported command; 0x23 - cmd %02x-%02x:%04x:%02x[%2d] \n", | |
| 374 cmd.scn, script - script_start, script_end-script_start, | |
| 375 cmd.cmd1,cmd.cmd2,cmd.cmd3,cmd.cmd4,cmd.argc); | |
| 52 | 376 int i; |
| 377 for (i = 0; i<cmd.args.size(); i++) { | |
| 0 | 378 if (i == 0) fprintf(stderr,"\t"); |
| 379 VarInfo info = cmd.args[i]; | |
| 380 if (info.type == TYPE_STR || info.type == TYPE_VARSTR) | |
| 381 fprintf(stderr,"\"%s\",", cmd.Str(info)); | |
| 382 else | |
| 383 fprintf(stderr,"%d,",info.value); | |
| 384 } | |
| 385 fprintf(stderr,"\n"); | |
| 386 #endif | |
| 387 cmd.clear(); | |
| 388 } | |
| 389 } | |
| 390 } | |
| 391 | |
| 392 void Scn2k::ShowCursor(void) { | |
| 393 HideCursor(); | |
| 394 char key[1024]; | |
| 57 | 395 sprintf(key, "#MOUSE_CURSOR.%03d.NAME", mouse_type); |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
396 const char* name = config->GetParaStr(key); |
| 52 | 397 if (name == NULL || name[0] == 0) mouse_surface = DEFAULT_MOUSECURSOR; |
| 57 | 398 else |
|
61
bdd8a5ff8f46
Revert an old change that disabled cursors...
Thibaut GIRKA <thib@sitedethib.com>
parents:
57
diff
changeset
|
399 mouse_surface = parent.Root().NewSurface(name, COLOR_MASK); |
| 57 | 400 if (mouse_surface == NULL) |
| 401 mouse_surface = DEFAULT_MOUSECURSOR; | |
| 0 | 402 System::Main::SetCursor(mouse_surface, Rect(8, 8, 8+32, 8+32)); |
| 403 } | |
| 404 | |
| 405 void Scn2k::HideCursor(void) { | |
| 406 if (mouse_surface) { | |
| 407 System::Main::SetCursor(0, Rect(0,0)); | |
| 408 if (mouse_surface != DEFAULT_MOUSECURSOR) | |
| 409 parent.Root().DeleteSurface(mouse_surface); | |
| 52 | 410 mouse_surface = NULL; |
| 0 | 411 } |
| 412 } | |
| 413 | |
| 414 bool Scn2k::SysWait(Cmd& cmd) { | |
| 415 if (menu) { | |
| 416 menu->Exec(cmd); | |
| 52 | 417 if (menu->status & Scn2kMenu::MENU_DELETE || menu->pimpl == NULL) { |
| 0 | 418 delete menu; |
| 52 | 419 menu = NULL; |
| 0 | 420 if (! menu_mouseshown) HideCursor(); |
| 421 else ShowCursor(); | |
| 422 SetSkipMode(SkipMode(skip_mode & (~SKIP_IN_MENU) )); | |
| 423 } | |
| 424 if (cmd.cmd_type == CMD_NOP) return true; | |
| 425 else return false; /* exec command */ | |
| 426 } | |
| 427 return false; | |
| 428 } | |
| 429 | |
| 430 void DllCall_LB(Cmd& cmd, Flags& flags); | |
| 431 void Scn2k::SysExec(Cmd& cmd) { | |
| 432 if (cmd.cmd_type == CMD_SYSVAR) { | |
| 433 int i; | |
| 434 for (i=0; i<cmd.args.size(); i++) { | |
| 435 if (cmd.args[i].type == TYPE_SYS) { | |
| 436 if (cmd.args[i].number == TYPE_SYS_SYS) { | |
| 437 flag.SetSys(cmd.args[i].value); | |
| 438 } else if (cmd.args[i].number == TYPE_SYS_SKIPMODE) { | |
| 439 SetSkipMode(SkipMode(cmd.args[i].value)); | |
| 440 } | |
| 441 } else if (cmd.args[i].type == TYPE_VARSTR) { | |
| 442 flag.SetStr(cmd.args[i].number, cmd.Str(cmd.args[i])); | |
| 443 } else { | |
| 444 flag.Set(cmd.args[i], cmd.args[i].value); | |
| 445 } | |
| 446 } | |
| 447 cmd.clear(); | |
| 448 } | |
| 449 if (cmd.cmd_type == CMD_SAVEPOINT || cmd.cmd_type == CMD_ROLLBACKPOINT) { | |
| 450 if (text_exec.backlog_item.scn != -1) { | |
| 451 text_exec.backlog.push_back(text_exec.backlog_item); | |
| 452 text_exec.backlog_item.Clear(); | |
| 453 } | |
| 454 save_scn = scn_number; | |
| 455 save_point = scn_point; | |
| 456 if (!new_rollback_save.empty()) { | |
| 457 rollback_save.push_back(new_rollback_save); | |
| 458 new_rollback_save = ""; | |
| 459 } | |
| 460 if (cmd.cmd_type == CMD_ROLLBACKPOINT) SaveRollback(); | |
| 461 cmd.clear(); | |
| 462 } | |
| 463 if (cmd.cmd_type == CMD_SAVEREQ || cmd.cmd_type == CMD_SAVE) { | |
| 464 Save(cmd); | |
| 465 return; | |
| 466 } | |
| 467 if (cmd.cmd_type == CMD_LOADREQ || cmd.cmd_type == CMD_LOAD) { | |
| 468 Load(cmd); | |
| 469 return; | |
| 470 } | |
| 471 if (cmd.cmd_type == CMD_BACKLOGREQ || cmd.cmd_type == CMD_BACKLOGREQ_FWD) { | |
| 472 if (menu) { | |
| 473 fprintf(stderr,"BACKLOG_REQ requested!!!\n"); | |
| 474 return; | |
| 475 } | |
| 476 if (cmd.cmd_type == CMD_BACKLOGREQ_FWD) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
477 cmd.clear(); // backlog mode 以外で fwd を押されてもなにもしない |
| 0 | 478 return; |
| 479 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
480 SetSkipMode(SKIP_IN_MENU); // テキストスキップ等はここで中断 |
| 0 | 481 menu = new Scn2kMenu(Scn2kMenu::MENU_BACKLOG, *this, flag, text_exec, system_version); |
| 482 menu->InitPanel(event, parent); | |
| 483 menu->InitTitle(Scn2kSaveTitle(*this)); | |
| 484 if (mouse_surface) menu_mouseshown = true; | |
| 485 else menu_mouseshown = false; | |
| 486 ShowCursor(); | |
| 487 return; | |
| 488 } | |
| 489 if (cmd.cmd_type == CMD_MENUREQ) { | |
| 490 int scn=0, pt=0; | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
491 config->GetParam("#CANCELCALL", 2, &scn, &pt); |
| 0 | 492 if (scn) { |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
493 // 右クリックされたら global call を行う |
| 0 | 494 cmd.cmd_type = CMD_OTHER; |
| 495 cmd.cmd1 = 0; | |
| 496 cmd.cmd2 = 1; | |
| 497 cmd.cmd3 = 0x0c; | |
| 498 cmd.cmd4 = 1; | |
| 499 cmd.args.clear(); | |
| 500 cmd.args.push_back(VarInfo(SCN_INFO_MENU)); | |
| 501 cmd.args.push_back(0); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
502 SetSkipMode(SKIP_IN_MENU); // テキストスキップ等はここで中断 |
| 0 | 503 } |
| 504 } | |
| 505 if (cmd.cmd_type == CMD_SAVECMDGRP || cmd.cmd_type == CMD_SAVECMDGRP_START || cmd.cmd_type == CMD_SAVECMDGRP_ONCE || cmd.cmd_type == CMD_SAVECMD_ONCE) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
506 // 画像コマンド等はスタックに保存し、セーブ時に保存できるようにする |
| 0 | 507 if (cmd.cmd_type == CMD_SAVECMDGRP_START) { |
| 508 vector<CmdSimplified>::iterator it, cur; | |
| 509 cur = cmd_stack.begin(); | |
| 510 cmd_stack_str = cmd_stack_str_orig; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
511 /* 画像関連コマンド以外を別にする */ |
| 0 | 512 for (it=cmd_stack.begin(); it != cmd_stack.end(); it++) { |
| 513 if (it->type != CMD_SAVECMDGRP && it->type != CMD_SAVECMDGRP_START && it->type != CMD_SAVECMDGRP_ONCE) { | |
| 514 cur->copy(*it, cmd_stack_str); | |
| 515 cur++; | |
| 516 } | |
| 517 } | |
| 518 cmd_stack.erase(cur, cmd_stack.end()); | |
| 519 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
520 if (cmd.cmd_type == CMD_SAVECMD_ONCE || cmd.cmd_type == CMD_SAVECMDGRP_ONCE) { // 同じコマンドがあれば削除する |
| 0 | 521 vector<CmdSimplified>::iterator it; |
| 522 for (it = cmd_stack.end(); it != cmd_stack.begin(); ) { | |
| 523 --it; | |
| 524 if (it->cmd1 == cmd.cmd1 && it->cmd2 == cmd.cmd2 && it->cmd3 == cmd.cmd3 && it->cmd4 == cmd.cmd4) { | |
| 525 cmd_stack.erase(it); | |
| 526 break; | |
| 527 } | |
| 528 } | |
| 529 } | |
| 530 CmdSimplified cmd_item; | |
| 531 cmd.write(cmd_item, cmd_stack_str); | |
| 532 cmd_stack.push_back(cmd_item); | |
| 533 cmd.clear(); | |
| 534 if (cmd_stack_str > cmd_stack_str_orig + 30000) { // char cmd_stack_str_orig[32768] | |
| 535 fprintf(stderr,"Error in Scn2k::SysExec: too long cmdstack (%d): stack string overflow\n",cmd_stack.size()); | |
| 536 cmd_stack_str = cmd_stack_str_orig; | |
| 537 cmd_stack.clear(); | |
| 538 } | |
| 539 } | |
| 540 if (cmd.cmd_type != CMD_OTHER) return; | |
| 541 if (cmd.cmd1 == 0 && cmd.cmd2 == 1) { | |
| 542 if (cmd.cmd3 == 0x0b) { // global jump | |
| 6 | 543 int call_no = 0; |
| 15 | 544 if (cmd.args.size() >= 2) call_no = cmd.args[1].value; |
| 0 | 545 eprintf("global jump to %d\n",cmd.args[0].value); |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
546 if (! ChangeScript(cmd.args[0].value, call_no)) return; // 読み込めない; abort. |
| 0 | 547 cmd.clear(); |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
548 } else if (cmd.cmd3 == 0x0c || cmd.cmd3 == 0x12) { // call (0x12 の方は微妙) |
| 0 | 549 int new_scn = cmd.args[0].value; |
| 550 int new_pt = 0; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
551 if (cmd.args.size() >= 2) { // subroutine number が付く |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
552 // 引数が付くのもあるらしい |
| 0 | 553 new_pt = cmd.args[1].value; |
| 554 } | |
| 555 if (new_scn == SCN_INFO_MENU) { // menu call | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
556 config->GetParam("#CANCELCALL", 2, &new_scn, &new_pt); |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
557 stack.push_back(StackItem(SCN_INFO, SCN_INFO_MENU)); // menu call を示す特殊な記号 |
| 0 | 558 } else { |
| 559 int i; | |
| 560 VarInfo var; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
561 // ローカル変数を伴う subroutine call |
| 0 | 562 var.type = 11; |
| 563 var.number = 0; | |
| 564 int saved_vars = 0; | |
| 565 for (i=0; i<40; i++) { | |
| 566 int val = flag.Get(var.type, i); | |
| 567 if (val != 0) { | |
| 568 stack.push_back(StackItem(SCN_INFO_LOCALS + i, val)); | |
| 569 saved_vars++; | |
| 570 } | |
| 571 } | |
| 572 var.type = TYPE_VARLOCSTR; | |
| 573 for (i=0; i<3; i++) { | |
| 574 string s = flag.Str(var.type, i); | |
| 575 if (s.size()) { | |
| 576 int sp = stack_strbuffer.size(); | |
| 577 stack.push_back(StackItem(SCN_INFO_LOCALSTR+i, sp)); | |
| 578 stack_strbuffer.push_back(s); | |
| 579 saved_vars++; | |
| 580 } | |
| 581 } | |
| 582 stack.push_back(StackItem(SCN_INFO, SCN_INFO_LOCALS + saved_vars)); | |
| 583 | |
| 584 var.type = 11; | |
| 585 var.number = 0; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
586 // 特殊な subroutine call なので、余計な情報を引数に渡す |
| 0 | 587 for (i=2; i<cmd.args.size(); i++) { |
| 588 flag.Set(var, cmd.args[i].value); | |
| 589 // fprintf(stderr,"<%d:%d>=%d;",var.type,var.number,cmd.args[i].value); | |
| 590 var.number++; | |
| 591 } | |
| 592 // fprintf(stderr,"%d; ",stack.size()); | |
| 593 } | |
| 594 int scn_pt = script - script_start; | |
| 595 stack.push_back(StackItem(scn_number, scn_pt)); | |
| 596 // fprintf(stderr,"\nglobal call %d:%d from %d:%d\n",new_scn,new_pt,scn_number,scn_pt); | |
| 597 eprintf("global call to %d, %d\n",new_scn, new_pt); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
598 if (! ChangeScript(new_scn, new_pt)) return; // 読み込めない; abort. |
| 0 | 599 cmd.clear(); |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
600 } else if (cmd.cmd3 == 0x65) { // 文字列の返り値をセットする |
| 0 | 601 int arg1 = cmd.args[0].value; |
| 602 string s = cmd.Str(cmd.args[1]); | |
| 603 int sp = stack_strbuffer.size(); | |
| 604 stack.push_back(StackItem(SCN_INFO_RETSTR+arg1, sp)); | |
| 605 stack_strbuffer.push_back(s); | |
| 606 cmd.clear(); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
607 } else if (cmd.cmd3 == 0x0d || cmd.cmd3 == 0x0a || cmd.cmd3 == 0x11 || cmd.cmd3 == 0x13) { // return (0a: local return) (0x13はよくわからない) |
| 0 | 608 // fprintf(stderr,"global return : stack size %d\n",stack.size()); |
| 609 if (stack.empty()) { | |
| 610 cmd.clear(); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
611 return; // スタックがおかしい：abort |
| 0 | 612 } |
| 613 map<int, string> retstr; | |
| 614 while( (!stack.empty()) && stack.back().scn_number >= SCN_INFO_RETSTR) { | |
| 615 int ret_num = stack.back().scn_number - SCN_INFO_RETSTR; | |
| 616 // fprintf(stderr,"\nRetStr;"); | |
| 617 string str = stack_strbuffer.back(); | |
| 618 stack_strbuffer.pop_back(); | |
| 619 retstr[ret_num] = str; | |
| 620 stack.pop_back(); | |
| 621 } | |
| 622 if (stack.empty()) { | |
| 623 cmd.clear(); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
624 return; // スタックがおかしい：abort |
| 0 | 625 } |
| 626 StackItem s = stack.back(); | |
| 627 stack.pop_back(); | |
| 628 bool localvar_init = false; | |
| 629 while( (!stack.empty()) && stack.back().scn_number == SCN_INFO) { | |
| 630 int mode = stack.back().scn_pt; | |
| 631 stack.pop_back(); | |
| 632 if (mode == SCN_INFO_MENU) { | |
| 633 // fprintf(stderr,"\nInfo Menu;"); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
634 // menu モード終了 |
| 0 | 635 SetSkipMode(SkipMode(skip_mode & (~SKIP_IN_MENU) )); |
| 636 } else if (mode >= SCN_INFO_LOCALS && mode <= SCN_INFO_LOCALS+50) { | |
| 637 // fprintf(stderr,"\nInfo Local;"); | |
| 638 int i; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
639 // ローカル変数を元に戻す |
| 0 | 640 VarInfo var; |
| 641 var.type = 11; | |
| 642 var.number = 0; | |
| 643 for (i=0; i<40; i++) { | |
| 644 var.number = i; | |
| 645 flag.Set(var, 0); | |
| 646 } | |
| 647 var.type = TYPE_VARLOCSTR; | |
| 648 for (i=0; i<3; i++) { | |
| 649 var.number = i; | |
| 650 flag.SetStr(var, ""); | |
| 651 } | |
| 652 int args = mode - SCN_INFO_LOCALS; | |
| 653 // fprintf(stderr," args = %d; ",args); | |
| 654 for (i=0; i<args; i++) { | |
| 655 if (stack.empty() || stack.back().scn_number < SCN_INFO) { | |
| 656 fprintf(stderr,"Fatal : Invalid stack found in preserved local variables!\n"); | |
| 657 break; | |
| 658 } | |
| 659 var.number = stack.back().scn_number; | |
| 660 // fprintf(stderr,"%d:%d; ",stack.back().scn_number,stack.back().scn_pt); | |
| 661 if (var.number >= SCN_INFO_LOCALS && var.number < SCN_INFO_LOCALSTR) { | |
| 662 var.type = 11; | |
| 663 var.number -= SCN_INFO_LOCALS; | |
| 664 flag.Set(var, stack.back().scn_pt); | |
| 665 } else if (var.number >= SCN_INFO_LOCALSTR && var.number < SCN_INFO_RETSTR) { | |
| 666 var.type = TYPE_VARLOCSTR; | |
| 667 var.number -= SCN_INFO_LOCALSTR; | |
| 668 flag.SetStr(var, stack_strbuffer.back()); | |
| 669 stack_strbuffer.pop_back(); | |
| 670 } | |
| 671 stack.pop_back(); | |
| 672 } | |
| 673 } | |
| 674 // fprintf(stderr,"stack size %d string size %d\n",stack.size(),stack_strbuffer.size()); | |
| 675 } | |
| 676 if (cmd.cmd3 == 0x11 || cmd.cmd3 == 0x13) { | |
| 677 // fprintf(stderr,"\nSet RetLocal;"); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
678 // 返り値をセットする |
| 0 | 679 map<int,string>::iterator it; |
| 680 VarInfo var; | |
| 681 var.type = TYPE_VARLOCSTR; | |
| 682 for (it=retstr.begin(); it!=retstr.end(); it++) { | |
| 683 var.number = it->first; | |
| 684 flag.SetStr(var, it->second); | |
| 685 } | |
| 686 var.type = 11; | |
| 687 // fprintf(stderr,"return : cmd.cmd3 == 0x11; size %d\n",cmd.args.size()); | |
| 688 if (cmd.args.size() == 1) { | |
| 689 // fprintf(stderr,"return value %d\n",cmd.args[0].value); | |
| 690 flag.SetSys(cmd.args[0].value); | |
| 691 } else { | |
| 692 int i;for (i=0; i<cmd.args.size(); i++) { | |
| 693 var.number = i; | |
| 694 flag.Set(var, cmd.args[i].value); | |
| 695 } | |
| 696 } | |
| 697 } | |
| 698 // fprintf(stderr,"global return : return to %d:%d\n",s.scn_number,s.scn_pt); | |
| 699 // fprintf(stderr,"\nglobal return %d:%d from %d:%d\n",s.scn_number,s.scn_pt,scn_number, script - script_start); | |
| 700 if (s.scn_number != -1) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
701 if (! ChangeScript(s.scn_number, 0)) return; // 読み込めない; abort. |
| 0 | 702 } |
| 703 script = script_start + s.scn_pt; | |
| 704 cmd.clear(); | |
| 705 } | |
| 706 } else if (cmd.cmd1 == 2 && cmd.cmd2 == 1 && cmd.cmd3 == 12) { // DLL Call | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
707 const char* regname = config->GetParaStr("#REGNAME"); |
| 52 | 708 const char key_lb[] = "KEY\\LittleBusters";//FIXME: too specific to be here? |
| 0 | 709 if (strcmp(regname, key_lb) == 0) { |
| 710 DllCall_LB(cmd, flag); | |
| 711 cmd.clear(); | |
| 712 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
713 } else if (cmd.cmd1 == 0 && cmd.cmd2 == 0x04) { // メニューモード |
| 0 | 714 if (cmd.cmd3 == 300 || cmd.cmd3 == 301 || cmd.cmd3 == 302) { |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
715 // メニューからのreturn |
| 0 | 716 cmd.cmd2 = 1; |
| 717 cmd.cmd3 = 0x0d; | |
| 718 SysExec(cmd); | |
| 719 } | |
| 720 } else if (cmd.cmd1 == 1 && cmd.cmd2 == 0x04) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
721 if (cmd.cmd3 == 0 && cmd.cmd4 == 0) { // タイトル名設定 |
| 0 | 722 const char* name = cmd.Str(cmd.args[0]); |
| 52 | 723 if (name == NULL) name = ""; |
| 0 | 724 window_title = name; |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
725 const char* config_name = config->GetParaStr("#CAPTION"); |
| 52 | 726 if (config_name == NULL) config_name = ""; |
| 0 | 727 string setname = kconv(string(config_name) + " " + window_title); |
| 728 parent.Root().SetWindowCaption(setname.c_str()); | |
| 729 cmd.clear(); | |
| 730 } else if (cmd.cmd3 == 0x82 && cmd.cmd4 == 0) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
731 /* cmd.cmd3 == 0x82 : マウスの press 状態クリアかも */ |
| 0 | 732 event.presscount(MOUSE_LEFT); |
| 733 event.presscount(MOUSE_RIGHT); | |
| 734 cmd.clear(); | |
| 735 } else if (cmd.cmd3 == 0x85 && cmd.cmd4 == 0) { | |
| 736 int x,y,left,right; | |
| 737 event.MousePos(x,y); | |
| 738 if (event.presscount(MOUSE_LEFT)) left = 2; | |
| 739 else if (event.pressed(MOUSE_LEFT)) left = 1; | |
| 740 else left = 0; | |
| 741 | |
| 742 if (event.presscount(MOUSE_RIGHT)) right = 2; | |
| 743 else if (event.pressed(MOUSE_RIGHT)) right = 1; | |
| 744 else right = 0; | |
| 745 | |
| 746 // eprintf("mouse pos\n"); | |
| 747 flag.Set(cmd.args[0], x); | |
| 748 flag.Set(cmd.args[1], y); | |
| 749 flag.Set(cmd.args[2], left); | |
| 750 flag.Set(cmd.args[3], right); | |
| 751 cmd.clear(); | |
| 752 } else if (cmd.cmd3 == 0x15e || cmd.cmd3 == 0x161 || cmd.cmd3 == 0x162 || cmd.cmd3 == 0x14c || cmd.cmd3 == 0x7d1) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
753 /* 15e, 161, 162, 14c, 7d1 : なんらかのシステム情報を返す（skip modeなど？） */ |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
754 /* 7d1: == 1 || 14c: == 1 || (15e==1&&161==1&&162==0) || (press_val == 2) : スキップ中？ タイトル画面のアニメーション終了 */ |
| 0 | 755 flag.SetSys(0); |
| 756 cmd.clear(); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
757 } else if (cmd.cmd3 == 0x4b0) { // 終了 |
| 0 | 758 System::Main::Quit(); |
| 52 | 759 //script = NULL; script_start = NULL; script_end = NULL; |
| 0 | 760 cmd.clear(); |
| 761 cmd.cmd_type = CMD_WAITFRAMEUPDATE; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
762 } else if (cmd.cmd3 == 0x4b4 || cmd.cmd3 == 0x4b5) { // 選択肢巻き戻し |
| 0 | 763 LoadRollback(cmd); |
| 764 } else if (cmd.cmd3 == 0x58d) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
765 // 前にロード|セーブされた番号を返す。 |
|
16
92765a5661f7
added "new" label on last savegame and corrected StatSaveFile
thib
parents:
15
diff
changeset
|
766 int lastsave; |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
767 config->GetParam("#LASTSAVE", 1, &lastsave); |
|
16
92765a5661f7
added "new" label on last savegame and corrected StatSaveFile
thib
parents:
15
diff
changeset
|
768 flag.SetSys(lastsave-1); |
| 0 | 769 } else if (cmd.cmd3 == 0x585) { |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
770 // 第一引数の記録された日付、タイトルなどが返される |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
771 // データがないなら sys に 0が、あるなら 1 が返る |
| 0 | 772 int y,m,d,wd,h,min,s,ms; |
| 773 string title; | |
| 774 fprintf(stderr,"StatSave %d:",cmd.args[0].value+1); | |
| 775 if (StatSaveFile(cmd.args[0].value+1,y,m,d,wd,h,min,s,ms,title) == true) { | |
| 776 flag.Set(cmd.args[1], y); | |
| 777 flag.Set(cmd.args[2], m); | |
| 778 flag.Set(cmd.args[3], d); | |
| 779 flag.Set(cmd.args[4], wd); | |
| 780 flag.Set(cmd.args[5], h); | |
| 781 flag.Set(cmd.args[6], min); | |
| 782 flag.Set(cmd.args[7], s); | |
| 783 flag.Set(cmd.args[8], ms); | |
| 784 if (cmd.args[9].type == TYPE_VARSTR) { | |
| 12 | 785 flag.SetStr(cmd.args[9], kconv_rev(title)); |
| 0 | 786 } |
| 787 flag.SetSys(1); | |
| 788 } else { | |
| 789 flag.SetSys(0); | |
| 790 } | |
| 791 cmd.clear(); | |
| 792 } else if (cmd.cmd3 == 0xc23) { // save | |
| 793 Save(cmd); | |
| 794 } else if (cmd.cmd3 == 0xc25) { // load | |
| 795 Load(cmd); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
796 } else if (cmd.cmd3 == 0x4b1 || cmd.cmd3 == 0x4b3) { // menu へ戻る (4b3: バッドエンド) |
| 0 | 797 int scn_start; |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
798 if (config->GetParam("#SEEN_MENU", 1, &scn_start) == 0) { |
| 0 | 799 ChangeScript(scn_start, 0); |
| 800 save_scn = 0; | |
| 801 save_point = 0; | |
| 802 window_title = ""; | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
803 const char* window_title_config = config->GetParaStr("#CAPTION"); |
| 0 | 804 if (window_title_config) window_title = window_title_config; |
| 805 parent.Root().SetWindowCaption(kconv(window_title).c_str()); | |
| 806 stack.clear(); | |
| 807 cmd_stack.clear(); | |
| 808 cmd_stack_str = cmd_stack_str_orig; | |
| 809 flag.Load(""); | |
| 810 text_exec.Load(""); | |
| 811 grp_exec.Load(""); | |
| 812 SetSkipMode(SKIP_NO); | |
| 813 } | |
| 814 } else if (cmd.cmd3 == 0xcc) { | |
| 815 eprintf("show mouse cursor\n"); | |
| 816 ShowCursor(); | |
| 817 cmd.clear(); | |
| 818 } else if (cmd.cmd3 == 0xcd) { | |
| 819 eprintf("hide mouse cursor\n"); | |
| 820 HideCursor(); | |
| 821 cmd.clear(); | |
| 822 } else if (cmd.cmd3 == 0xcf) { | |
| 823 mouse_type = cmd.args[0].value; | |
| 824 eprintf("change mouse cursor : %d\n", mouse_type); | |
| 825 if (mouse_surface) ShowCursor(); | |
| 826 cmd.clear(); | |
| 827 } | |
| 828 } | |
| 829 | |
| 830 } | |
| 831 | |
| 52 | 832 #include <sys/types.h> |
| 833 #include <sys/stat.h> | |
| 834 #include <errno.h> | |
| 835 #include <unistd.h> | |
| 0 | 836 |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
837 // セーブファイルの名前をつくる |
| 0 | 838 string Scn2k::MakeSaveFile(void) const { |
| 839 struct stat sstatus; | |
| 840 string dir = "~/.xkanon"; | |
| 841 | |
| 842 if (dir.c_str()[0] == '~' && dir.c_str()[1] == '/') { | |
| 843 char* home = getenv("HOME"); | |
| 52 | 844 if (home != NULL) { |
| 0 | 845 string new_dir = string(home) + (dir.c_str()+1); |
| 846 dir = new_dir; | |
| 847 } | |
| 848 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
849 // savepathにファイル名が入っていれば、それをセーブファイルとして使う |
| 0 | 850 if (stat(dir.c_str(), &sstatus) == -1) { |
| 851 if (errno != ENOENT) { | |
| 852 fprintf(stderr,"Cannot open save file; dir %s is not directory\n",dir.c_str()); | |
| 853 return ""; | |
| 854 } | |
| 855 if (mkdir(dir.c_str(), S_IRWXU) != 0 && errno != EEXIST) { | |
| 856 fprintf(stderr, "Cannot create directory %s ; Please create manually!!\n",dir.c_str()); | |
| 857 } | |
| 858 } else { | |
| 859 if ( (sstatus.st_mode & S_IFMT) == S_IFREG) { | |
| 860 return dir; | |
| 861 } | |
| 862 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
863 // ファイル名を作る |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
864 const char* regname = config->GetParaStr("#REGNAME"); |
| 0 | 865 |
| 866 char* fname = new char[strlen(regname)+1]; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
867 /* レジストリ名をファイル名として有効なものにする */ |
| 0 | 868 int i; for (i=0; regname[i]!=0; i++) { |
| 869 char c = regname[i]; | |
| 870 if (c == '\\' || c == '/' || c == ':' || c <= 0x20) c = '_'; | |
| 871 fname[i] = tolower(c); | |
| 872 } | |
| 873 fname[i] = 0; | |
| 874 dir += "/save."; | |
| 875 dir += fname; | |
| 8 | 876 delete[] fname; |
| 0 | 877 return dir; |
| 878 } | |
| 52 | 879 |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
880 // セーブファイルの名前をつくる |
| 0 | 881 string Scn2kSaveTitle::operator() (int number) const { |
| 882 int y,m,d,wd,h,min,sec,msec; | |
| 883 string title; | |
| 884 if (! impl.StatSaveFile(number, y,m,d,wd,h,min,sec,msec,title)) { | |
| 885 return ""; | |
| 886 } else { | |
| 887 char buf[1024]; | |
| 888 sprintf(buf, "%2d/%2d %2d:%2d ",m,d,h,min); | |
| 889 return string(buf) + title; | |
| 890 } | |
| 52 | 891 } |
| 0 | 892 |
| 893 void Scn2k::SaveSys(void) { | |
| 894 char buf[1024]; | |
| 895 string save; | |
| 896 string path = MakeSaveFile(); | |
| 897 | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
898 sprintf(buf, "KEY=%s\n", config->GetParaStr("#REGNAME")); |
| 52 | 899 save += buf; |
| 0 | 900 string save_config; |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
901 config->DiffOriginal(save_config); |
| 0 | 902 save += "CONFIG="; |
| 903 save += save_config; | |
| 904 save += "\n"; | |
| 905 string save_flag; flag.SaveSys(save_flag); | |
| 906 save += save_flag; | |
| 907 string save_grp; grp_exec.SaveSys(save_grp); | |
| 908 save += save_grp; | |
| 909 map<int,set<int> >::iterator it; | |
| 910 save += "[TextRead]\n"; | |
| 911 for (it=text_readflag.begin(); it != text_readflag.end(); it++) { | |
| 912 set<int>& read_flag = it->second; | |
| 913 set<int>::iterator jt; | |
| 914 char buf[1024]; | |
| 915 sprintf(buf,"T<%05d>=",it->first); | |
| 916 string save_readflag = buf; | |
| 917 for (jt=read_flag.begin(); jt != read_flag.end(); jt++) { | |
| 918 sprintf(buf, "%d,", *jt); | |
| 919 save_readflag += buf; | |
| 920 } | |
| 921 save_readflag += "\n"; | |
| 922 save += save_readflag; | |
| 923 } | |
| 924 | |
| 925 path += ".0"; | |
| 926 FILE* f = fopen(path.c_str(), "w"); | |
| 52 | 927 if (f == NULL) { |
| 0 | 928 fprintf(stderr,"Cannot open save file %s\n",path.c_str()); |
| 929 return; | |
| 930 } | |
| 931 fwrite(save.c_str(), save.length(), 1, f); | |
| 932 fclose(f); | |
| 933 return; | |
| 934 } | |
| 935 | |
| 936 void Scn2k::LoadSys(void) { | |
| 937 char buf[1024]; | |
| 938 string path = MakeSaveFile(); | |
| 939 path += ".0"; | |
| 940 FILE* f = fopen(path.c_str(), "r"); | |
| 52 | 941 if (f == NULL) { |
| 0 | 942 fprintf(stderr, "Cannot open save file %s\n",path.c_str()); |
| 943 } else { | |
| 52 | 944 fseek(f, 0, SEEK_END); |
| 0 | 945 int sz = ftell(f); |
| 52 | 946 fseek(f, 0, SEEK_SET); |
| 0 | 947 char* savedata = new char[sz+1]; |
| 948 fread(savedata, sz, 1, f); | |
| 949 savedata[sz] = 0; | |
| 950 fclose(f); | |
| 951 | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
952 sprintf(buf, "KEY=%s\n", config->GetParaStr("#REGNAME")); |
| 0 | 953 if (strncmp(savedata, buf, strlen(buf)) != 0) { |
|
43
01aa5ddf7dc8
A lot of very minor improvements (deleted some unused variables, and other things like that...)
thib
parents:
19
diff
changeset
|
954 fprintf(stderr,"Invalid header in save file %s: it must be started with \"%s\"\n", path.c_str(), buf); |
| 0 | 955 } else { |
| 956 char* config_str = strstr(savedata, "\nCONFIG="); | |
| 957 if (config_str) { | |
| 958 config_str += strlen("\nCONFIG="); | |
| 959 char* strend = strchr(config_str, '\n'); | |
| 960 if (strend) { | |
| 961 int l = strend - config_str; | |
| 962 char* config_copy = new char[l+1]; | |
| 963 strncpy(config_copy, config_str, l); | |
| 964 config_copy[l] = 0; | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
965 config->PatchOriginal(config_copy); |
| 0 | 966 delete[] config_copy; |
| 967 } | |
| 968 } | |
| 969 flag.LoadSys(savedata); | |
| 970 grp_exec.LoadSys(savedata); | |
| 971 char* save = strstr(savedata, "\n[TextRead]\n"); | |
| 972 if (save) { | |
| 973 save += strlen("\n[TextRead]\n"); | |
| 974 do { | |
| 975 if (save[0] == '[') break; // next section | |
| 976 char* next_save = strchr(save, '\n'); | |
| 977 if (next_save) { | |
| 978 *next_save++ = 0; | |
| 979 } | |
| 980 // T<XXXXX>=YYY,YYY,YYY,... | |
| 981 if (strncmp(save,"T<",2) == 0) { | |
| 982 int scn_num = atoi(save+2); | |
| 983 set<int>& read_flag = text_readflag[scn_num]; | |
| 984 save += strlen("T<XXXXX>="); | |
| 985 while(save && *save) { | |
| 986 if (save[0] >= '0' && save[0] <= '9') { | |
| 987 int num = atoi(save); | |
| 988 read_flag.insert(num); | |
| 989 } | |
| 990 save = strchr(save, ','); | |
| 991 if (save) save++; | |
| 992 } | |
| 993 } | |
| 994 save = next_save; | |
| 995 } while(save); | |
| 996 } | |
| 997 | |
| 998 } | |
| 999 delete[] savedata; | |
| 1000 } | |
| 1001 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1002 /* 初期化 */ |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
1003 int scn_start; config->GetParam("#SEEN_START", 1, &scn_start); |
| 0 | 1004 ChangeScript(scn_start, 0); |
| 1005 save_scn = 0; | |
| 1006 save_point = 0; | |
| 1007 window_title = ""; | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
1008 const char* window_title_config = config->GetParaStr("#CAPTION"); |
| 0 | 1009 if (window_title_config) window_title = window_title_config; |
| 1010 parent.Root().SetWindowCaption(kconv(window_title).c_str()); | |
| 1011 stack.clear(); | |
| 1012 cmd_stack.clear(); | |
| 1013 cmd_stack_str = cmd_stack_str_orig; | |
| 1014 | |
| 1015 return; | |
| 1016 } | |
| 1017 | |
| 1018 bool Scn2k::StatSaveFile(int num, int& year, int& month, int& day, int& wday, int& hour,int& min, int& sec, int& msec, string& title) const { | |
| 1019 char buf[1024]; | |
| 1020 string path = MakeSaveFile(); | |
| 19 | 1021 if (num <= 0 || num > 100) return false; |
| 0 | 1022 sprintf(buf,".%d",num); |
| 1023 path += buf; | |
| 1024 | |
| 1025 struct stat sb; | |
| 1026 if (stat(path.c_str(), &sb) == -1) return false; | |
| 1027 struct tm* t = localtime(&sb.st_mtime); | |
|
16
92765a5661f7
added "new" label on last savegame and corrected StatSaveFile
thib
parents:
15
diff
changeset
|
1028 year = t->tm_year; |
| 0 | 1029 month = t->tm_mon + 1; |
| 1030 day = t->tm_mday; | |
| 1031 hour = t->tm_hour; | |
| 1032 min = t->tm_min; | |
|
16
92765a5661f7
added "new" label on last savegame and corrected StatSaveFile
thib
parents:
15
diff
changeset
|
1033 sec = t->tm_sec; |
|
92765a5661f7
added "new" label on last savegame and corrected StatSaveFile
thib
parents:
15
diff
changeset
|
1034 msec = 0; |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1035 /* タイトルの取得 */ |
| 0 | 1036 FILE* savefile = fopen(path.c_str(), "rb"); |
| 52 | 1037 if (savefile == NULL) return false; |
| 0 | 1038 char regname[1024]; |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
1039 sprintf(regname, "KEY=%s\n", config->GetParaStr("#REGNAME")); |
| 0 | 1040 fgets(buf,1000,savefile); |
| 1041 if (strncmp(regname, buf, strlen(regname)) != 0) { | |
| 1042 fprintf(stderr,"invalid save file %s (registory name is not %s)\n",path.c_str(),regname); | |
| 1043 fclose(savefile); | |
| 1044 return false; | |
| 1045 } | |
| 1046 title="none"; | |
| 1047 while(!feof(savefile)) { | |
| 1048 fgets(buf,1000,savefile); | |
| 1049 if (strncmp(buf,"Title=",6) == 0) { | |
| 1050 if (buf[strlen(buf)-2] == 0x0a) buf[strlen(buf)-2] = 0; | |
| 1051 if (strlen(buf) > 20) buf[20] = 0, buf[21] = 0; | |
| 1052 title = kconv(buf+6); | |
| 1053 break; | |
| 1054 } | |
| 1055 } | |
| 1056 fclose(savefile); | |
| 1057 return true; | |
| 1058 } | |
| 1059 | |
| 1060 void Scn2k::SaveRollback(void) { | |
| 1061 fprintf(stderr,"Save rollback\n"); | |
| 1062 new_rollback_save = ""; | |
| 1063 string save_sys; SaveImpl(save_sys); | |
| 1064 string save_flag; flag.Save(save_flag); | |
| 1065 string save_text; text_exec.Save(save_text, true); | |
| 1066 string save_grp; grp_exec.Save(save_grp); | |
| 1067 new_rollback_save += save_sys; | |
| 1068 new_rollback_save += save_flag; | |
| 1069 new_rollback_save += save_text; | |
| 1070 new_rollback_save += save_grp; | |
| 1071 } | |
| 1072 | |
| 1073 void Scn2k::LoadRollback(Cmd& cmd) { | |
| 1074 if (rollback_save.empty()) return; | |
| 1075 new_rollback_save = ""; | |
| 1076 string savedata = rollback_save.back(); | |
| 1077 rollback_save.pop_back(); | |
| 1078 LoadImpl(savedata.c_str()); | |
| 1079 flag.Load(savedata.c_str()); | |
| 1080 text_exec.Load(savedata.c_str()); | |
| 1081 grp_exec.Load(savedata.c_str()); | |
| 1082 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1083 /* 画面の回復など */ |
| 0 | 1084 SetSkipMode(SKIP_NO); |
| 1085 vector<CmdSimplified>::iterator it; | |
| 1086 cmd.clear(); | |
| 1087 for (it = cmd_stack.begin(); it != cmd_stack.end(); it++) { | |
| 1088 cmd.read(*it); | |
| 1089 cmd.cmd_type = CMD_OTHER; | |
| 1090 flag.Exec(cmd); | |
| 1091 text_exec.Exec(cmd); | |
| 1092 grp_exec.Exec(cmd); | |
| 1093 } | |
| 1094 cmd.clear(); | |
| 1095 return; | |
| 1096 } | |
| 1097 | |
| 1098 void Scn2k::Save(Cmd& cmd) { | |
| 1099 if (cmd.cmd_type == CMD_SAVEREQ) { | |
| 52 | 1100 if (menu == NULL) { |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1101 SetSkipMode(SKIP_IN_MENU); // テキストスキップ等はここで中断 |
| 0 | 1102 menu = new Scn2kMenu(Scn2kMenu::MENU_SAVE, *this, flag, text_exec, system_version); |
| 1103 menu->InitPanel(event, parent); | |
| 1104 menu->InitTitle(Scn2kSaveTitle(*this)); | |
| 1105 if (mouse_surface) menu_mouseshown = true; | |
| 1106 else menu_mouseshown = false; | |
| 1107 ShowCursor(); | |
| 1108 return; | |
| 1109 } | |
| 1110 } | |
| 1111 char buf[1024]; | |
| 1112 string save; | |
| 52 | 1113 FILE* f = NULL; |
| 0 | 1114 if (save_scn == 0) { |
| 1115 fprintf(stderr,"Cannot decide save point\n"); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1116 return; // セーブ位置が保存されてない |
| 0 | 1117 } |
| 1118 string path = MakeSaveFile(); | |
| 1119 int file_number = 1; | |
| 1120 if (cmd.args.size() == 1) | |
| 1121 file_number = cmd.args[0].value + 1; | |
| 1122 if (file_number <= 0) { | |
| 1123 fprintf(stderr, "Cannot open save file %s\n",path.c_str()); | |
| 1124 return; | |
| 1125 } | |
| 1126 sprintf(buf, ".%d",file_number); | |
| 1127 path += buf; | |
| 1128 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1129 /* セーブファイル確認 */ |
| 0 | 1130 |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
1131 sprintf(buf, "KEY=%s\n", config->GetParaStr("#REGNAME")); save += buf; |
| 0 | 1132 string save_sys; SaveImpl(save_sys); |
| 1133 string save_flag; flag.Save(save_flag); | |
| 1134 string save_text; text_exec.Save(save_text, false); | |
| 1135 string save_grp; grp_exec.Save(save_grp); | |
| 1136 save += save_sys; | |
| 1137 save += save_flag; | |
| 1138 save += save_text; | |
| 1139 save += save_grp; | |
| 1140 vector<string>::iterator it; | |
| 1141 for (it=rollback_save.begin(); it != rollback_save.end(); it++) { | |
| 1142 save += "[Rollback Data]\n"; | |
| 1143 save += *it; | |
| 1144 save += "[Rollback End]\n"; | |
| 1145 } | |
| 1146 | |
| 1147 f = fopen(path.c_str(), "w"); | |
| 52 | 1148 if (f == NULL) { |
| 0 | 1149 fprintf(stderr,"Cannot open save file %s\n",path.c_str()); |
| 1150 return; | |
| 1151 } | |
| 1152 fwrite(save.c_str(), save.length(), 1, f); | |
| 1153 fclose(f); | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
1154 config->SetParam("#LASTSAVE", 1, file_number); |
| 0 | 1155 cmd.clear(); |
| 1156 } | |
| 1157 | |
| 1158 void Scn2k::Load(Cmd& cmd) { | |
| 1159 if (cmd.cmd_type == CMD_LOADREQ) { | |
| 52 | 1160 if (menu == NULL) { |
| 0 | 1161 menu = new Scn2kMenu(Scn2kMenu::MENU_LOAD, *this, flag, text_exec, system_version); |
| 1162 menu->InitPanel(event, parent); | |
| 1163 menu->InitTitle(Scn2kSaveTitle(*this)); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1164 SetSkipMode(SKIP_IN_MENU); // テキストスキップ等はここで中断 |
| 0 | 1165 if (mouse_surface) menu_mouseshown = true; |
| 1166 else menu_mouseshown = false; | |
| 1167 ShowCursor(); | |
| 1168 return; | |
| 1169 } | |
| 1170 } | |
| 1171 char buf[1024]; | |
| 1172 string path = MakeSaveFile(); | |
| 1173 int file_number = 1; | |
| 1174 if (cmd.args.size() == 1) | |
| 1175 file_number = cmd.args[0].value + 1; | |
| 1176 sprintf(buf, ".%d",file_number); | |
| 1177 path += buf; | |
| 52 | 1178 FILE* f = NULL; |
| 0 | 1179 if (file_number > 0) f = fopen(path.c_str(), "r"); |
| 52 | 1180 if (f == NULL) { |
| 0 | 1181 fprintf(stderr, "Cannot open save file %s\n",path.c_str()); |
| 1182 return; | |
| 1183 } | |
| 1184 | |
| 52 | 1185 fseek(f, 0, SEEK_END); |
| 0 | 1186 int sz = ftell(f); |
| 52 | 1187 fseek(f, 0, SEEK_SET); |
| 0 | 1188 char* savedata = new char[sz+1]; |
| 1189 fread(savedata, sz, 1, f); | |
| 1190 savedata[sz] = 0; | |
| 1191 fclose(f); | |
| 1192 | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
1193 sprintf(buf, "KEY=%s\n", config->GetParaStr("#REGNAME")); |
| 0 | 1194 if (strncmp(savedata, buf, strlen(buf)) != 0) { |
|
43
01aa5ddf7dc8
A lot of very minor improvements (deleted some unused variables, and other things like that...)
thib
parents:
19
diff
changeset
|
1195 fprintf(stderr,"Invalid header in save file %s: it must be started with \"%s\"\n", path.c_str(), buf); |
| 0 | 1196 delete[] savedata; |
| 1197 return; | |
| 1198 } | |
| 1199 LoadImpl(savedata); | |
| 1200 flag.Load(savedata); | |
| 1201 text_exec.Load(savedata); | |
| 1202 grp_exec.Load(savedata); | |
| 1203 rollback_save.clear(); | |
| 1204 new_rollback_save = ""; | |
| 1205 char* rollback_data = savedata; | |
| 52 | 1206 while( (rollback_data = strstr(rollback_data,"[Rollback Data]\n")) != NULL) { |
| 0 | 1207 rollback_data += strlen("[Rollback Data]\n"); |
| 1208 char* rollback_end = strstr(rollback_data, "[Rollback End]\n"); | |
| 52 | 1209 if (rollback_end == NULL) rollback_end = rollback_data + strlen(rollback_data); |
| 0 | 1210 string s(rollback_data, rollback_end); |
| 1211 rollback_save.push_back(s); | |
| 1212 rollback_data = rollback_end; | |
| 1213 } | |
| 1214 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1215 /* 画面の回復など */ |
| 0 | 1216 SetSkipMode(SKIP_NO); |
| 1217 vector<CmdSimplified>::iterator it; | |
| 1218 for (it = cmd_stack.begin(); it != cmd_stack.end(); it++) { | |
| 1219 cmd.read(*it); | |
| 1220 cmd.cmd_type = CMD_OTHER; | |
| 1221 flag.Exec(cmd); | |
| 1222 text_exec.Exec(cmd); | |
| 1223 grp_exec.Exec(cmd); | |
| 1224 } | |
| 1225 cmd.clear(); | |
| 50 | 1226 |
| 1227 delete[] savedata; | |
| 0 | 1228 } |
| 1229 | |
| 1230 void Scn2k::SaveImpl(string& save) { | |
| 1231 char buf[1024]; | |
| 1232 | |
| 1233 /* save point */ | |
| 1234 sprintf(buf, "\n[SCENARIO]\nScn=%d\nPoint=%d\n",save_scn, save_point); save += buf; | |
| 1235 sprintf(buf, "Title=%s\nMouseType=%d\nMouseShown=1\n",window_title.c_str(), mouse_type); save += buf; | |
| 1236 vector<StackItem>::iterator sit; | |
| 1237 for (sit=stack.begin(); sit!=stack.end(); sit++) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1238 if (sit->scn_number == SCN_INFO && sit->scn_pt == SCN_INFO_MENU) break; // メニューに入る直前までのスタックを保存 |
| 0 | 1239 sprintf(buf, "Stack=%d,%d\n",sit->scn_number,sit->scn_pt); |
| 1240 save += buf; | |
| 1241 } | |
| 1242 vector<string>::reverse_iterator ssit; | |
| 1243 for (ssit=stack_strbuffer.rbegin(); ssit != stack_strbuffer.rend(); ssit++) { | |
| 1244 sprintf(buf, "StackStr=%s\n",ssit->c_str()); | |
| 1245 save += buf; | |
| 1246 } | |
| 1247 vector<CmdSimplified>::iterator cit; | |
| 1248 for (cit=cmd_stack.begin(); cit != cmd_stack.end(); cit++) { | |
| 1249 if (cit->type == CMD_SAVECMDGRP || cit->type == CMD_SAVECMDGRP_ONCE || cit->type == CMD_SAVECMDGRP_START) { | |
| 1250 save += "CmdG="; | |
| 1251 } else { | |
| 1252 save += "Cmd="; | |
| 1253 } | |
| 1254 string s; cit->Save(s); | |
| 1255 save += s; | |
| 1256 save += "\n"; | |
| 1257 } | |
| 1258 } | |
| 1259 | |
| 1260 void Scn2k::LoadImpl(const char* save) { | |
| 1261 save_scn = 0; | |
| 1262 save_point = 0; | |
| 1263 window_title = ""; | |
| 1264 stack.clear(); | |
| 1265 cmd_stack.clear(); | |
| 1266 cmd_stack_str = cmd_stack_str_orig; | |
| 1267 | |
| 1268 save = strstr(save, "\n[SCENARIO]\n"); | |
| 52 | 1269 if (save == NULL) return; |
| 0 | 1270 save += strlen("\n[SCENARIO]\n"); |
| 1271 while(save[0] != 0 && save[0] != '[') { // while next section start | |
| 1272 if (strncmp(save, "Scn=", 4) == 0) { | |
| 1273 sscanf(save, "Scn=%d", &save_scn); | |
| 1274 } else if (strncmp(save, "Point=", 6) == 0) { | |
| 1275 sscanf(save, "Point=%d", &save_point); | |
| 1276 } else if (strncmp(save, "Title=", 6) == 0) { | |
| 1277 save += 6; | |
|
62
3b1593186f12
fix pointers used to get strchr result
Thibaut GIRKA <thib@sitedethib.com>
parents:
61
diff
changeset
|
1278 const char* s = strchr(save, '\n'); |
| 52 | 1279 if (s == NULL) window_title = save; |
| 0 | 1280 else window_title.assign(save, s-save); |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
1281 const char* config_name = config->GetParaStr("#CAPTION"); |
| 52 | 1282 if (config_name == NULL) config_name = ""; |
| 0 | 1283 string setname = kconv(string(config_name)+" "+window_title); |
| 1284 parent.Root().SetWindowCaption(setname.c_str()); | |
| 1285 } else if (strncmp(save, "MouseType=", 10) == 0) { | |
| 1286 sscanf(save, "MouseType=%d", &mouse_type); | |
| 1287 } else if (strncmp(save, "MouseShown=", 11) == 0) { | |
| 1288 int v; | |
| 1289 sscanf(save, "MouseShown=%d", &v); | |
| 1290 if (v) ShowCursor(); | |
| 1291 else HideCursor(); | |
| 1292 } else if (strncmp(save, "Stack=", 6) == 0) { | |
| 1293 int scn, pt; | |
| 1294 sscanf(save, "Stack=%d,%d", &scn, &pt); | |
| 1295 stack.push_back( StackItem(scn, pt)); | |
| 1296 } else if (strncmp(save, "StackStr=", 9) == 0) { | |
| 1297 save += 9; | |
|
62
3b1593186f12
fix pointers used to get strchr result
Thibaut GIRKA <thib@sitedethib.com>
parents:
61
diff
changeset
|
1298 const char* s = strchr(save, '\n'); |
| 52 | 1299 if (s == NULL) stack_strbuffer.push_back(""); |
| 0 | 1300 else stack_strbuffer.push_back(string(save, s-save)); |
| 1301 } else if (strncmp(save, "Cmd=", 4) == 0) { | |
| 1302 CmdSimplified cmd; | |
| 1303 cmd.Load(save+4, cmd_stack_str); | |
| 1304 cmd_stack.push_back(cmd); | |
| 1305 } else if (strncmp(save, "CmdG=", 5) == 0) { | |
| 1306 CmdSimplified cmd; | |
| 1307 cmd.Load(save+5, cmd_stack_str); | |
| 1308 cmd.type = CMD_SAVECMDGRP; | |
| 1309 cmd_stack.push_back(cmd); | |
| 1310 } | |
| 1311 save = strchr(save, '\n'); | |
| 52 | 1312 if (save != NULL) save++; |
| 0 | 1313 } |
| 1314 ChangeScript(save_scn, 0); | |
| 1315 script = script_start + save_point; | |
| 1316 } | |
| 52 | 1317 |
| 0 | 1318 void Scn2k::SetSkipMode(SkipMode mode) { |
| 1319 if (skip_mode != mode) { | |
| 1320 skip_mode = mode; | |
| 1321 text_exec.SetSkipMode(mode); | |
| 1322 grp_exec.SetSkipMode(mode); | |
| 1323 } | |
| 1324 } | |
| 1325 | |
| 1326 /*********************************************************** | |
| 1327 ** | |
| 1328 ** DLL Call Implementation | |
| 1329 ** | |
| 1330 **/ | |
| 1331 static double* lb_ef_param = 0; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1332 void DLLCall_LB_EF00_0(Cmd& cmd, Flags& flags) { // エフェクトの設定 |
| 0 | 1333 if (lb_ef_param == 0) { |
| 1334 lb_ef_param = new double[sizeof(double) * 0x60 * 8]; | |
| 1335 } | |
| 1336 int i,j; | |
| 1337 int param_top, param_size; | |
| 1338 if (cmd.args[2].value == 1) { | |
| 1339 param_top = 0; | |
| 1340 param_size = 0x20; | |
| 1341 } else { | |
| 1342 param_top = cmd.args[3].value; | |
| 1343 param_size = cmd.args[4].value; | |
| 1344 if (param_top < 0) param_top = 0; | |
| 1345 if (param_top > 0x20) param_top = 0x20; | |
| 1346 if (param_size+param_top > 0x20) param_size = 0x20 - param_top; | |
| 1347 } | |
| 1348 for (i=0; i<8; i++) { | |
| 1349 double* param = lb_ef_param + i*0x60 + param_top*3; | |
| 1350 for (j=0; j<param_size; j++) { | |
| 1351 *param++ = random() % 800 - 400; | |
| 1352 *param++ = random() % 600 - 300; | |
| 1353 *param++ = random() % 700 - 350; | |
| 1354 } | |
| 1355 } | |
| 1356 if (cmd.args[5].value != 1) return; | |
| 52 | 1357 |
| 1358 static int random_dirtable[] = { | |
| 0 | 1359 0, 2, 1, 3, 0, 2, 1, 3, |
| 1360 1, 3, 2, 0, 1, 3, 2, 0, | |
| 1361 0, 0, 0, 0, 3, 1, 2, 0, | |
| 1362 3, 1, 3, 1, 0, 2, 3, 1 | |
| 1363 }; | |
| 52 | 1364 |
| 0 | 1365 int* dir = &random_dirtable[(random()&3) * 8]; |
| 1366 for (i=0; i<8; i++) { | |
| 1367 double* param = lb_ef_param + i*0x60; | |
| 1368 double x = random()%600 - 300; | |
| 1369 double y = random()%480-240; | |
| 1370 if (x < 0) x -= 80; | |
| 1371 else x += 80; | |
| 1372 if (y < 0) y -= 80; | |
| 1373 else y += 80; | |
| 1374 switch(*dir++) { | |
| 1375 case 0: | |
| 1376 if (x < 0) x = -x; | |
| 1377 if (y < 0) y = -y; | |
| 1378 break; | |
| 1379 case 1: | |
| 1380 if (x > 0) x = -x; | |
| 1381 if (y < 0) y = -y; | |
| 1382 break; | |
| 1383 case 2: | |
| 1384 if (x < 0) x = -x; | |
| 1385 if (y > 0) y = -y; | |
| 1386 break; | |
| 1387 case 4: | |
| 1388 if (x > 0) x = -x; | |
| 1389 if (y > 0) y = -y; | |
| 1390 break; | |
| 1391 } | |
| 1392 param[9] = x*1.2; | |
| 1393 param[10] = y*1.2; | |
| 1394 param[11] *= 1.2; | |
| 1395 param[12] *= -0.08; | |
| 1396 param[13] *= -0.08; | |
| 1397 param[14] *= -0.08; | |
| 1398 param[15] = -param[9]; | |
| 1399 param[16] = -param[10]; | |
| 1400 param[17] = -param[11]; | |
| 1401 } | |
| 1402 return; | |
| 1403 } | |
| 52 | 1404 |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1405 void DLLCall_LB_EF00_1(Cmd& cmd, Flags& flags) { // 計算を行う |
| 0 | 1406 if (lb_ef_param == 0) { |
| 1407 fprintf(stderr,"Warning : DLLCall_LB_EF00_1 : Script error : effect calculation was called before setting\n"); | |
| 1408 return; | |
| 1409 } | |
| 1410 int index = cmd.args[2].value; | |
| 1411 int v5_1154 = flags.Get(5, 1154+index); | |
| 1412 int j = ((v5_1154) & 0x1f) + index * 0x20; | |
| 1413 int k = ((v5_1154+1) & 0x1f) + index * 0x20; | |
| 1414 int l = ((v5_1154+2) & 0x1f) + index * 0x20; | |
| 1415 int m = ((v5_1154+3) & 0x1f) + index * 0x20; | |
| 1416 j *= 3; | |
| 1417 k *= 3; | |
| 1418 l *= 3; | |
| 1419 m *= 3; | |
| 1420 | |
| 1421 // 0 < x < 1 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1422 // va - vd は 0-1 の範囲で対称性を持つ３次関数 |
| 0 | 1423 double x = double(flags.Get(5, 1162 + index)) * 0.001; |
| 1424 double va = (x * x * x)/6; | |
| 1425 double vb = (-x*x*x + 3*x*x - 3*x + 1) / 6; | |
| 1426 double vc = (3*x*x*x - 6*x*x + 4) / 6; | |
| 1427 double vd = (-3*x*x*x+3*x*x+3*x+1) / 6; | |
| 1428 | |
| 1429 double r1 = va * lb_ef_param[m+3] + vd * lb_ef_param[l+3] + vc * lb_ef_param[k+3] + vb * lb_ef_param[j+3]; | |
| 1430 double r2 = va * lb_ef_param[m+2] + vd * lb_ef_param[l+2] + vc * lb_ef_param[k+2] + vb * lb_ef_param[j+2]; | |
| 1431 double r3 = va * lb_ef_param[m+1] + vd * lb_ef_param[l+1] + vc * lb_ef_param[k+1] + vb * lb_ef_param[j+1]; | |
| 1432 if (r1 != 400) { | |
| 1433 r2 = r2 * 800 / (400-r1); | |
| 1434 r3 = r3 * 700 / (400-r1); | |
| 1435 } | |
| 1436 VarInfo var; | |
| 1437 var.type = 5; | |
| 1438 var.number = 1151; | |
| 1439 flags.Set(var, int(r2)); | |
| 1440 var.number = 1152; | |
| 1441 flags.Set(var, int(r3)); | |
| 1442 var.number = 1153; | |
| 1443 flags.Set(var, int(r1)); | |
| 1444 return; | |
| 1445 } | |
| 1446 | |
| 1447 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1448 void DllCall_LB(Cmd& cmd, Flags& flags) { // リトルバスターズ！の EF00.dll をエミュレート |
| 0 | 1449 if (cmd.args[0].value == 1) { |
| 1450 // "EF00.dll" | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1451 if (cmd.args[1].value == 0) { // エフェクトの設定 |
| 0 | 1452 DLLCall_LB_EF00_0(cmd, flags); |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1453 } else if (cmd.args[1].value == 1) { // 計算を行う |
| 0 | 1454 DLLCall_LB_EF00_1(cmd, flags); |
| 1455 } | |
| 1456 } else { | |
| 1457 fprintf(stderr,"Unsupported DLL call for DLL<%d>\n",cmd.args[0].value); | |
| 1458 } | |
| 1459 return; | |
| 1460 } | |
| 1461 | |
| 1462 /********************************************************** | |
| 1463 ** | |
| 1464 ** MenuImpl | |
| 1465 ** | |
| 1466 */ | |
| 1467 | |
| 52 | 1468 #include "window/widget.h" |
| 1469 #include "window/menuitem.h" | |
| 0 | 1470 |
| 1471 void DSurfaceFill(Surface* src, const Rect& rect, int r, int g, int b, int a = 0xff); | |
| 1472 | |
| 1473 struct Scn2kMenuImpl { | |
| 1474 Scn2kMenu& interface; | |
| 1475 MenuItem* menu; | |
| 1476 Event::Container* pevent; | |
| 1477 PicContainer* pparent; | |
| 1478 | |
| 1479 virtual void InitPanel(Event::Container& event, PicContainer& parent) = 0; | |
| 1480 virtual void InitTitle(const SaveTitle&) = 0; | |
| 1481 virtual void Cancel(void) = 0; | |
| 1482 virtual void Exec(Cmd& cmd) = 0; | |
| 1483 Scn2kMenuImpl(Scn2kMenu& _interface) : interface(_interface) { | |
| 52 | 1484 menu = NULL; |
| 1485 pevent = NULL; | |
| 1486 pparent = NULL; | |
| 0 | 1487 } |
| 1488 virtual ~Scn2kMenuImpl() { | |
| 1489 if (menu) delete menu; | |
| 52 | 1490 menu = NULL; |
| 0 | 1491 } |
| 1492 }; | |
| 1493 | |
| 1494 struct LoadMenu : Scn2kMenuImpl { | |
| 1495 vector<string> title; | |
| 1496 vector<int> title_valid; | |
| 1497 RadioButton* btn_local; | |
| 1498 RadioButton* btn_page; | |
| 1499 RadioButton* btn_set; | |
| 1500 Scale* btn_scale; | |
| 1501 Dialog* awk_dialog; | |
| 1502 int btn_page_val, btn_set_val, btn_local_val, select_page, select_value; | |
| 1503 LoadMenu(Scn2kMenu& _interface); | |
| 1504 ~LoadMenu(); | |
| 1505 void InitPanel(Event::Container& event, PicContainer& parent); | |
| 1506 void InitTitle(const SaveTitle&); | |
| 1507 void Cancel(void); | |
| 1508 void Exec(Cmd& cmd); | |
| 1509 static void ChangeBtnPage(void* pointer, MenuItem* widget); | |
| 1510 static void ChangeBtnLocal(void* pointer, MenuItem* widget); | |
| 1511 static void ChangeBtnScale(void* pointer, Scale* widget); | |
| 1512 static void ChangeBtnSet(void* pointer, MenuItem* widget); | |
| 1513 static void ChangeDialog(void* pointer, Dialog* widget); | |
| 1514 bool in_setpage; | |
| 1515 void SetPage(int new_page); | |
| 1516 void SetValue(int new_value); | |
| 1517 void PressOk(void); | |
| 1518 }; | |
| 1519 LoadMenu::LoadMenu(Scn2kMenu& _interface) : Scn2kMenuImpl(_interface) { | |
| 52 | 1520 btn_local = NULL; |
| 1521 btn_scale = NULL; | |
| 1522 btn_set = NULL; | |
| 0 | 1523 btn_page_val = 0; |
| 1524 btn_set_val = -1; | |
| 1525 btn_local_val = -1; | |
| 52 | 1526 awk_dialog = NULL; |
| 0 | 1527 in_setpage = false; |
| 1528 select_page = 0; | |
| 1529 select_value = -1; | |
| 1530 } | |
| 1531 LoadMenu::~LoadMenu() { | |
| 1532 if (awk_dialog) delete awk_dialog; | |
| 1533 } | |
| 1534 void LoadMenu::InitPanel(Event::Container& event, PicContainer& parent) { | |
| 1535 pevent = &event; | |
| 1536 pparent = &parent; | |
| 1537 | |
| 1538 if (menu) delete menu; | |
| 52 | 1539 menu = NULL; |
| 0 | 1540 menu = new MenuItem(&parent, Rect(80,30,560, 450), 1, 3, 0); |
| 1541 Surface* surface = parent.Root().NewSurface(menu->Pic()->Width(), menu->Pic()->Height(), ALPHA_MASK); | |
| 1542 if (interface.type == Scn2kMenu::MENU_LOAD) { | |
| 1543 menu->SetLabelTop(new Label(menu->PicNode(), Rect(0,0), true, "Load", 26), Rect(0,0,10,0), Rect(0,0,0,20)); | |
| 1544 DSurfaceFill(surface, Rect(*surface), 0, 0, 0x80, 0x80); | |
| 1545 } else { | |
| 1546 menu->SetLabelTop(new Label(menu->PicNode(), Rect(0,0), true, "Save", 26), Rect(0,0,10,0), Rect(0,0,0,20)); | |
| 1547 DSurfaceFill(surface, Rect(*surface), 0, 0x80, 0, 0x80); | |
| 1548 } | |
| 1549 menu->Pic()->SetSurface(surface, 0, 0); | |
| 1550 menu->Pic()->SetSurfaceFreeFlag(); | |
| 1551 | |
| 1552 btn_page = new RadioButton(event, menu->PicNode(), Rect(0, 0, 480, 40), 10, 1, &btn_page_val, | |
| 1553 Rect(0,0,0,0), 18, Color(0,0,0),Color(0xff,0,0),Color(0xff,0x80,0)); | |
| 1554 btn_page->set_func = &ChangeBtnPage; | |
| 1555 btn_page->set_pointer = this; | |
| 1556 btn_page->SetLabelLeft(new Label(btn_page->PicNode(), Rect(0,0), true, "Page", 18), Rect(0, 0, 180, 0), Rect(0,0)); | |
| 1557 btn_page->Add(" 1 "); | |
| 1558 btn_page->Add(" 2 "); | |
| 1559 btn_page->Add(" 3 "); | |
| 1560 btn_page->Add(" 4 "); | |
| 1561 btn_page->Add(" 5 "); | |
| 1562 btn_page->Add(" 6 "); | |
| 1563 btn_page->Add(" 7 "); | |
| 1564 btn_page->Add(" 8 "); | |
| 1565 btn_page->Add(" 9 "); | |
| 1566 btn_page->Add(" 10 "); | |
| 1567 btn_page->pack(); | |
| 1568 /* | |
| 1569 surface = parent.Root().NewSurface(btn_page->Pic()->Width(), btn_page->Pic()->Height(), ALPHA_MASK); | |
| 1570 DSurfaceFill(surface, Rect(*surface), 0xff, 0, 0, 0x80); | |
| 1571 btn_page->Pic()->SetSurface(surface, 0, 0); | |
| 1572 btn_page->Pic()->SetSurfaceFreeFlag(); | |
| 1573 */ | |
| 1574 menu->item[0] = btn_page; | |
| 1575 btn_set = new RadioButton(event, menu->PicNode(), Rect(0, 0, 480, 40), 2, 1, &btn_set_val, | |
| 1576 Rect(0,0,0,0), 18, Color(0,0,0),Color(0xff,0,0),Color(0xff,0x80,0)); | |
| 1577 btn_set->set_func = &ChangeBtnSet; | |
| 1578 btn_set->set_pointer = this; | |
| 1579 btn_set->SetLabelLeft(new Label(btn_set->PicNode(), Rect(0,0)), Rect(0,0,200,0), Rect(0,0)); | |
| 1580 if (interface.type == Scn2kMenu::MENU_LOAD) { | |
| 1581 btn_set->Add(" Load "); | |
| 1582 } else { | |
| 1583 btn_set->Add(" Save "); | |
| 1584 } | |
| 1585 btn_set->Add(" Cancel "); | |
| 1586 btn_set->pack(); | |
| 1587 /* | |
| 1588 surface = parent.Root().NewSurface(btn_set->Pic()->Width(), btn_set->Pic()->Height(), ALPHA_MASK); | |
| 1589 DSurfaceFill(surface, Rect(*surface), 0, 0, 0xff, 0x80); | |
| 1590 btn_set->Pic()->SetSurface(surface, 0, 0); | |
| 1591 btn_set->Pic()->SetSurfaceFreeFlag(); | |
| 1592 */ | |
| 1593 menu->item[2] = btn_set; | |
| 1594 // void btn_set_press(void* pointer, MenuItem* widget); | |
| 1595 // btn_set->set_func = btn_set_press; | |
| 1596 // btn_set->set_pointer = this; | |
| 1597 btn_local = new RadioButton(*pevent, menu->PicNode(), Rect(0, 0, 480, 300), 1, 100, &btn_local_val, | |
| 1598 Rect(0,0,300,30), 18, Color(0,0,0),Color(0xff,0,0),Color(0xff,0x80,0)); | |
| 1599 btn_local->set_func = &ChangeBtnLocal; | |
| 1600 btn_local->set_pointer = this; | |
| 1601 /* | |
| 1602 surface = pparent->Root().NewSurface(btn_local->Pic()->Width(), btn_local->Pic()->Height(), ALPHA_MASK); | |
| 1603 DSurfaceFill(surface, Rect(*surface), 0, 0xff, 0, 0x80); | |
| 1604 btn_local->Pic()->SetSurface(surface, 0, 0); | |
| 1605 btn_local->Pic()->SetSurfaceFreeFlag(); | |
| 1606 */ | |
| 1607 menu->item[1] = btn_local; | |
| 1608 int i; | |
| 1609 for (i=0; i<12; i++) | |
| 1610 btn_local->Add("",false); | |
| 1611 btn_local->pack(); | |
| 1612 btn_local->show_all(); | |
| 1613 menu->pack(); | |
| 1614 | |
| 1615 PicBase* local_pic = btn_local->Pic(); | |
| 1616 int local_x2 = local_pic->PosX() + local_pic->Width(); | |
| 1617 int local_y2 = local_pic->PosY() + local_pic->Height(); | |
| 1618 btn_scale = new Scale(*pevent, menu->PicNode(), Rect(local_x2-16, local_pic->PosY(), local_x2, local_y2), Color(0xff, 0x80, 0), true); | |
| 1619 btn_scale->SetRange(0, 900); | |
| 1620 btn_scale->InitCursor(1024/10); | |
| 1621 btn_scale->SetValue(0); | |
| 1622 btn_scale->change_func = &ChangeBtnScale; | |
| 1623 btn_scale->change_pointer = this; | |
| 1624 | |
| 1625 menu->PicNode()->show_all(); | |
| 1626 } | |
| 1627 | |
| 1628 void LoadMenu::InitTitle(const SaveTitle& title_op) { | |
| 1629 title.clear(); | |
| 1630 int i; | |
| 1631 for (i=1; i<=100; i++) { | |
| 1632 char buf[100]; | |
| 1633 sprintf(buf,"%2d:",i); | |
| 1634 string t = title_op(i); | |
| 1635 string s = string(buf) + t; | |
| 1636 if (t.length() == 0) { | |
| 1637 string s = string(buf) + "--------"; | |
| 1638 title_valid.push_back(0); | |
| 1639 } else { | |
| 1640 title_valid.push_back(1); | |
| 1641 } | |
| 1642 title.push_back(s); | |
| 1643 } | |
| 1644 if (btn_local==0) return; | |
| 1645 for (i=0; i<10; i++) { | |
| 1646 TextButton* button = dynamic_cast<TextButton*>(btn_local->item[i]); | |
| 1647 if (button) button->SetText(title[i].c_str()); | |
| 1648 } | |
| 1649 } | |
| 1650 | |
| 1651 void LoadMenu::SetPage(int new_page) { | |
| 1652 if (new_page < 0) new_page = 0; | |
| 1653 if (new_page > 900) new_page = 900; | |
| 1654 if (select_page == new_page) return; | |
| 1655 if (in_setpage) return; | |
| 1656 in_setpage = true; | |
| 1657 | |
| 1658 int prev_page = select_page / 10; | |
| 1659 int cur_page = new_page / 10; | |
| 1660 int prev_point = select_page%10; | |
| 1661 int new_point = new_page%10; | |
| 1662 select_page = new_page; | |
| 1663 if (prev_page != cur_page) { | |
| 1664 int i; | |
| 1665 for (i=0; i<12; i++) { | |
| 1666 TextButton* button = dynamic_cast<TextButton*>(btn_local->item[i]); | |
| 1667 if (button) { | |
| 1668 if (cur_page+i < title.size()) button->SetText(title[cur_page+i].c_str()); | |
| 1669 else button->SetText("----"); | |
| 1670 } | |
| 1671 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1672 // ボタンの内容を変更する |
| 0 | 1673 if (select_value < cur_page || select_value > cur_page+12) |
| 1674 btn_local->SetValue(-1); | |
| 1675 else | |
| 1676 btn_local->SetValue(select_value - cur_page); | |
| 1677 } | |
| 1678 if (prev_point != new_point) { | |
| 1679 int i; | |
| 1680 for (i=0; i<12; i++) { | |
| 1681 int old_x = btn_local->item[i]->Pic()->PosX(); | |
| 1682 btn_local->item[i]->Pic()->Move(old_x, i*30-new_point*3); | |
| 1683 } | |
| 1684 } | |
| 52 | 1685 if (btn_page != NULL) { |
| 0 | 1686 if (select_page%100 == 0) btn_page->SetValue(select_page/100); |
| 1687 else btn_page->SetValue(-1); | |
| 1688 } | |
| 52 | 1689 if (btn_scale != NULL) { |
| 0 | 1690 btn_scale->SetValue(select_page); |
| 1691 } | |
| 1692 in_setpage = false; | |
| 1693 } | |
| 52 | 1694 |
| 0 | 1695 void LoadMenu::SetValue(int new_value) { |
| 1696 if (in_setpage) return; | |
| 1697 in_setpage = true; | |
| 1698 | |
| 1699 if (new_value < 0 || new_value > title.size() || | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1700 (interface.type == Scn2kMenu::MENU_LOAD && title_valid[new_value] == 0) ) { // 無効な選択肢 |
| 0 | 1701 if (select_value < select_page/10 || select_value > select_page/10+12) |
| 1702 btn_local->SetValue(-1); | |
| 1703 else | |
| 1704 btn_local->SetValue(select_value-select_page/10); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1705 } else { // 選択肢を変更する |
| 0 | 1706 if (select_value == new_value) { |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1707 PressOk(); // ダブルクリック |
| 0 | 1708 } else { |
| 1709 select_value = new_value; | |
| 1710 if (interface.type == Scn2kMenu::MENU_SAVE && title_valid[select_value] == 0) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1711 PressOk(); // 新しいセーブデータなら無条件に選択 |
| 0 | 1712 } |
| 1713 } | |
| 1714 } | |
| 1715 | |
| 1716 in_setpage = false; | |
| 1717 } | |
| 52 | 1718 |
| 0 | 1719 void LoadMenu::PressOk(void) { |
| 1720 if (select_value == -1) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1721 btn_set->SetValue(-1); // なにもしない |
| 0 | 1722 return; |
| 1723 } | |
| 1724 menu->deactivate(); | |
| 1725 if (interface.type == Scn2kMenu::MENU_LOAD) { | |
| 1726 interface.cmd.cmd_type = CMD_LOAD; | |
| 1727 interface.cmd.args.push_back(VarInfo(select_value)); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1728 awk_dialog = new Dialog(*pevent, pparent, "ファイルをロードしますか？", true); |
| 0 | 1729 awk_dialog->set_pointer = this; |
| 1730 awk_dialog->set_func = ChangeDialog; | |
| 1731 } else {// MENU_SAVE | |
| 1732 interface.cmd.cmd_type = CMD_SAVE; | |
| 1733 interface.cmd.args.push_back(VarInfo(select_value)); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1734 if (title_valid[select_value] == 0) { // 新しいセーブデータ |
| 0 | 1735 interface.status = Scn2kMenu::MenuStatus(Scn2kMenu::MENU_CMD | Scn2kMenu::MENU_DELETE); |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1736 } else { // セーブデータを上書き：確認 |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1737 awk_dialog = new Dialog(*pevent, pparent, "データを上書きしますか？", true); |
| 0 | 1738 awk_dialog->set_pointer = this; |
| 1739 awk_dialog->set_func = ChangeDialog; | |
| 1740 } | |
| 1741 } | |
| 1742 } | |
| 52 | 1743 |
| 0 | 1744 void LoadMenu::Cancel(void) { |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1745 if (awk_dialog != NULL) { // ダイアログのキャンセル |
| 0 | 1746 awk_dialog->status = Dialog::CANCEL; |
| 1747 ChangeDialog(this, awk_dialog); | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1748 } else { // 一般キャンセル |
| 0 | 1749 btn_set->SetValue(1); |
| 1750 } | |
| 1751 } | |
| 52 | 1752 |
| 0 | 1753 void LoadMenu::Exec(Cmd& cmd) { |
| 1754 } | |
| 52 | 1755 |
| 0 | 1756 void LoadMenu::ChangeBtnPage(void* pointer, MenuItem* widget) { |
| 1757 LoadMenu* instance = (LoadMenu*)pointer; | |
| 1758 if (instance->btn_page_val == -1) return; | |
| 1759 instance->SetPage(instance->btn_page_val*100); | |
| 1760 } | |
| 52 | 1761 |
| 0 | 1762 void LoadMenu::ChangeBtnScale(void* pointer, Scale* from) { |
| 1763 LoadMenu* instance = (LoadMenu*)pointer; | |
| 1764 int value = from->GetValue(); | |
| 1765 instance->SetPage(value); | |
| 1766 } | |
| 52 | 1767 |
| 0 | 1768 void LoadMenu::ChangeBtnSet(void* pointer, MenuItem* widget) { |
| 1769 LoadMenu* instance = (LoadMenu*)pointer; | |
| 1770 if (instance->btn_set_val == 1) { // cancel | |
| 1771 instance->interface.status = Scn2kMenu::MENU_DELETE; | |
| 1772 return; | |
| 1773 } else if (instance->btn_set_val == 0) { // OK | |
| 1774 instance->PressOk(); | |
| 1775 } | |
| 1776 } | |
| 52 | 1777 |
| 0 | 1778 void LoadMenu::ChangeDialog(void* pointer, Dialog* widget) { |
| 1779 LoadMenu* instance = (LoadMenu*)pointer; | |
| 1780 if (widget->status == Dialog::CANCEL) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1781 // ダイアログ消去、OK ボタン復帰 |
| 0 | 1782 delete instance->awk_dialog; |
| 52 | 1783 instance->awk_dialog = NULL; |
| 0 | 1784 instance->menu->activate(); |
| 1785 instance->btn_set->SetValue(-1); | |
| 1786 return; | |
| 1787 } else if (widget->status == Dialog::OK) { | |
| 1788 instance->interface.status = Scn2kMenu::MenuStatus(Scn2kMenu::MENU_CMD | Scn2kMenu::MENU_DELETE); | |
| 1789 return; | |
| 1790 } | |
| 1791 } | |
| 52 | 1792 |
| 0 | 1793 void LoadMenu::ChangeBtnLocal(void* pointer, MenuItem* widget) { |
| 1794 LoadMenu* instance = (LoadMenu*)pointer; | |
| 1795 if (instance->btn_local_val == -1) return; | |
| 1796 instance->SetValue( (instance->select_page/10) + instance->btn_local_val); | |
| 1797 } | |
| 1798 | |
| 1799 struct BacklogMenu : Scn2kMenuImpl { | |
| 1800 Scn2k& scn_impl; | |
| 1801 Text& text_exec; | |
| 1802 bool backlog_update; | |
| 1803 int backlog_cnt; | |
| 1804 BacklogMenu(Scn2kMenu& _interface, Scn2k& scn_impl, Text& text_exec); | |
| 1805 ~BacklogMenu(); | |
| 1806 void InitPanel(Event::Container& event, PicContainer& parent); | |
| 1807 void InitTitle(const SaveTitle&); | |
| 1808 void Cancel(void); | |
| 1809 void Exec(Cmd& cmd); | |
| 1810 }; | |
| 52 | 1811 |
| 0 | 1812 BacklogMenu::BacklogMenu(Scn2kMenu& _interface, Scn2k& _scn, Text& parent_text_exec) : Scn2kMenuImpl(_interface), scn_impl(_scn), text_exec(parent_text_exec) { |
| 1813 backlog_cnt = -1; | |
| 1814 backlog_update = false; | |
| 1815 } | |
| 52 | 1816 |
| 0 | 1817 BacklogMenu::~BacklogMenu() { |
| 1818 } | |
| 52 | 1819 |
| 0 | 1820 void BacklogMenu::InitPanel(Event::Container& event, PicContainer& parent) { |
| 1821 pevent = &event; | |
| 1822 } | |
| 1823 | |
| 1824 void BacklogMenu::InitTitle(const SaveTitle& title_op) { | |
| 1825 } | |
| 52 | 1826 |
| 0 | 1827 void BacklogMenu::Cancel(void) { |
| 1828 interface.status = Scn2kMenu::MenuStatus(Scn2kMenu::MENU_DELETE); | |
| 1829 } | |
| 52 | 1830 |
| 0 | 1831 void BacklogMenu::Exec(Cmd& cmd) { |
| 1832 int command_direction = 0; // forward | |
| 1833 if (cmd.cmd_type == CMD_NOP) text_exec.Wait(0xffffffffUL, cmd); | |
| 1834 if (cmd.cmd_type == CMD_BACKLOGREQ || pevent->presscount(MOUSE_UP)) { | |
| 1835 if (cmd.cmd_type == CMD_BACKLOGREQ) cmd.clear(); | |
| 1836 backlog_cnt++; | |
| 1837 backlog_update = false; | |
| 1838 command_direction = 1; | |
| 1839 } | |
| 1840 if (cmd.cmd_type == CMD_BACKLOGREQ_FWD || pevent->presscount(MOUSE_DOWN)) { | |
| 1841 if (cmd.cmd_type == CMD_BACKLOGREQ_FWD) cmd.clear(); | |
| 1842 backlog_cnt--; | |
| 1843 backlog_update = false; | |
| 1844 if (backlog_cnt == -2 || ( | |
| 1845 (backlog_cnt == -1 && text_exec.backlog_item.scn == -1 && text_exec.backlog_item.pos == -1)) ){ | |
| 1846 Cancel(); | |
| 1847 return; | |
| 1848 } | |
| 1849 command_direction = -1; | |
| 1850 } | |
| 1851 if (cmd.cmd_type != CMD_NOP) return; | |
| 1852 if (backlog_update) return; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
62
diff
changeset
|
1853 // backlog を最新の状態に更新 |
| 0 | 1854 cmd.clear(); |
| 1855 BacklogItem item; | |
| 1856 | |
| 1857 retry: | |
| 1858 if (backlog_cnt < -1) backlog_cnt = -1; | |
| 1859 if (backlog_cnt >= int(text_exec.backlog.size())) backlog_cnt = text_exec.backlog.size() - 1; | |
| 1860 | |
| 1861 if (backlog_cnt == -1) { | |
| 1862 if (text_exec.backlog_item.scn == -1 && text_exec.backlog_item.pos == -1) { | |
| 1863 if (text_exec.backlog.size() == 0 || command_direction < 0) { | |
| 1864 Cancel(); | |
| 1865 return; | |
| 1866 } | |
| 1867 item = text_exec.backlog.back(); | |
| 1868 backlog_cnt = 0; | |
| 1869 } else { | |
| 1870 // item = text_exec.backlog.back(); | |
| 1871 item = text_exec.backlog_item; | |
| 1872 } | |
| 1873 } else { | |
| 1874 item = text_exec.backlog[text_exec.backlog.size()-1-backlog_cnt]; | |
| 1875 } | |
| 1876 if (item.scn == BacklogItem::SaveSelect) { // select marker ; skip this item | |
| 1877 if (command_direction == 0) command_direction = 1; | |
| 1878 backlog_cnt += command_direction; | |
| 1879 goto retry; | |
| 1880 } | |
| 1881 if (item.scn == 0 && item.pos == -1) ; // not read cmd | |
| 1882 else { | |
| 1883 scn_impl.ReadCmdAt(cmd, item.scn, item.pos); | |
| 1884 } | |
| 1885 text_exec.DrawBacklog(item, cmd); | |
| 1886 cmd.clear(); | |
| 1887 backlog_update = true; | |
| 1888 } | |
| 1889 | |
| 1890 /******************************************************************************* | |
| 1891 ** | |
| 1892 ** | |
| 1893 */ | |
| 1894 | |
| 1895 Scn2kMenu::Scn2kMenu(MenuType _type, Scn2k& scn_impl, const Flags& flags, Text& text_exec, int system_version) : | |
| 1896 cmd(flags, system_version), type(_type) { | |
| 52 | 1897 pimpl = NULL; |
| 0 | 1898 status = MENU_CONTINUE; |
| 1899 switch(type) { | |
| 1900 case MENU_LOAD: pimpl = new LoadMenu(*this); break; | |
| 1901 case MENU_SAVE: pimpl = new LoadMenu(*this); break; | |
| 1902 case MENU_BACKLOG: pimpl = new BacklogMenu(*this, scn_impl, text_exec); break; | |
| 1903 } | |
| 1904 } | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
1905 |
| 0 | 1906 Scn2kMenu::~Scn2kMenu() { |
| 1907 if (pimpl) delete pimpl; | |
| 52 | 1908 pimpl = NULL; |
| 0 | 1909 } |
| 52 | 1910 |
| 0 | 1911 void Scn2kMenu::InitPanel(Event::Container& event, PicContainer& parent) { |
| 52 | 1912 if (pimpl != NULL) pimpl->InitPanel(event, parent); |
| 0 | 1913 } |
| 52 | 1914 |
| 0 | 1915 void Scn2kMenu::InitTitle(const SaveTitle& t) { |
| 52 | 1916 if (pimpl != NULL) pimpl->InitTitle(t); |
| 0 | 1917 } |
| 52 | 1918 |
| 0 | 1919 void Scn2kMenu::Cancel(void) { |
| 1920 if (pimpl) pimpl->Cancel(); | |
| 1921 } | |
| 52 | 1922 |
| 0 | 1923 void Scn2kMenu::Exec(Cmd& ret_cmd) { |
| 52 | 1924 if (pimpl == NULL) return; |
| 0 | 1925 pimpl->Exec(ret_cmd); |
| 1926 if (pimpl->pevent->presscount(MOUSE_RIGHT)) { | |
| 1927 Cancel(); | |
| 1928 } | |
| 1929 if (status & MENU_CMD && cmd.cmd_type != CMD_NOP) { | |
| 1930 status = Scn2kMenu::MenuStatus(status & (~Scn2kMenu::MENU_CMD) ); | |
| 1931 CmdSimplified tmp_cmd; | |
| 1932 char cmd_str[32768]; | |
| 1933 char* tmp_cmd_str = cmd_str; | |
| 1934 cmd.write(tmp_cmd, tmp_cmd_str); | |
| 1935 ret_cmd.read(tmp_cmd); | |
| 1936 } | |
| 1937 } | |
| 52 | 1938 |
| 0 | 1939 void Scn2kMenu::activate(void) { |
| 52 | 1940 if (pimpl != NULL && pimpl->menu) pimpl->menu->activate(); |
| 0 | 1941 } |
| 1942 | |
| 52 | 1943 void Scn2kMenu::deactivate(void) { |
| 1944 if (pimpl != NULL && pimpl->menu) pimpl->menu->deactivate(); | |
| 1945 } | |
| 1946 |