1 REGISTER_MINIGAME(bd, "Bulldozer");
3 const int BD_TURN_MOVE = 0x0100; // player must move the bulldozer
4 const int BD_TURN_WIN = 0x0200; // victory
5 const int BD_TURN_LOSS = 0x0400; // they did it?!
6 const int BD_TURN_EDIT = 0x0800; // editing mode
7 const int BD_TURN_TYPE = 0x0f00; // turn type mask
9 const int BD_SF_PLAYERMOVES = MINIG_SF_CUSTOM;
12 const int BD_LET_CNT = 20;
13 const int BD_NUM_CNT = 20;
15 const int BD_TILE_SIZE = 20;
17 const int BD_TEAMS = 1;
31 const int BD_TILE_DOZER = 1;
32 const int BD_TILE_TARGET = 2;
33 const int BD_TILE_BOULDER = 3;
34 const int BD_TILE_BRICK1 = 4;
35 const int BD_TILE_BRICK2 = 5;
36 const int BD_TILE_BRICK3 = 6;
37 const int BD_TILE_BRICK4 = 7;
38 const int BD_TILE_LAST = 7;
40 string autocvar_sv_minigames_bulldozer_startlevel = "level1";
42 // find same game piece given its tile name
43 entity bd_find_piece(entity minig, string tile, bool check_target)
46 while ( ( e = findentity(e,owner,minig) ) )
47 if ( e.classname == "minigame_board_piece" && e.netname == tile && ((check_target) ? e.bd_tiletype == BD_TILE_TARGET : e.bd_tiletype != BD_TILE_TARGET) )
52 // check if the tile name is valid (15x15 grid)
53 bool bd_valid_tile(string tile)
57 int number = minigame_tile_number(tile);
58 int letter = minigame_tile_letter(tile);
59 return 0 <= number && number < BD_NUM_CNT && 0 <= letter && letter < BD_LET_CNT;
62 entity bd_find_dozer(entity minig)
65 while ( ( e = findentity(e,owner,minig) ) )
66 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
71 void bd_check_winner(entity minig)
73 int total = 0, valid = 0;
75 while ( ( e = findentity(e,owner,minig) ) )
76 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_TARGET )
79 if(bd_find_piece(minig, e.netname, false).bd_tiletype == BD_TILE_BOULDER)
85 minig.minigame_flags = BD_TURN_WIN;
86 minigame_server_sendflags(minig,MINIG_SF_UPDATE);
90 bool bd_canfill(int ttype)
97 case BD_TILE_BRICK4: return true;
103 bool bd_move_dozer(entity minigame, entity dozer)
105 if(!dozer.bd_dir_x && !dozer.bd_dir_y)
106 return false; // nope!
108 int myx = minigame_tile_letter(dozer.netname);
109 int myy = minigame_tile_number(dozer.netname);
111 myx += dozer.bd_dir_x;
112 myy += dozer.bd_dir_y;
114 string newpos = minigame_tile_buildname(myx, myy);
115 entity hit = bd_find_piece(minigame, newpos, false);
117 if(!bd_valid_tile(newpos))
121 switch(hit.bd_tiletype)
123 case BD_TILE_DOZER: // wtf, but let's do this incase
127 case BD_TILE_BRICK4: return false;
128 case BD_TILE_BOULDER:
131 int tx = minigame_tile_letter(hit.netname);
132 int ty = minigame_tile_number(hit.netname);
134 tx += dozer.bd_dir_x;
135 ty += dozer.bd_dir_y;
137 testpos = minigame_tile_buildname(tx, ty);
138 entity testhit = bd_find_piece(minigame, testpos, false);
140 if(!bd_valid_tile(testpos) || testhit)
143 if(hit.netname) { strunzone(hit.netname); }
144 hit.netname = strzone(testpos);
145 minigame_server_sendflags(hit,MINIG_SF_UPDATE);
150 if(dozer.netname) { strunzone(dozer.netname); }
151 dozer.netname = strzone(newpos);
157 void bd_move(entity minigame, entity player, string dir)
159 if ( minigame.minigame_flags & BD_TURN_MOVE )
162 //if ( bd_valid_tile(pos) )
163 //if ( bd_find_piece(minigame, pos, false) )
165 entity dozer = bd_find_dozer(minigame);
168 LOG_INFO("Dozer wasn't found!\n");
169 return; // should not happen... TODO: end match?
172 int dxs = 0, dys = 0;
173 string thedir = strtolower(dir);
174 if(thedir == "up" || thedir == "u") { dxs = 0; dys = 1; }
175 if(thedir == "down" || thedir == "dn" || thedir == "d") { dxs = 0; dys = -1; }
176 if(thedir == "left" || thedir == "lt" || thedir == "l") { dxs = -1; dys = 0; }
177 if(thedir == "right" || thedir == "rt" || thedir == "r") { dxs = 1; dys = 0; }
179 int dx = bound(-1, dxs, 1);
180 int dy = bound(-1, dys, 1);
186 if(bd_move_dozer(minigame, dozer))
189 bd_check_winner(minigame);
191 minigame_server_sendflags(dozer,MINIG_SF_UPDATE); // update anyway
192 minigame_server_sendflags(player,BD_SF_PLAYERMOVES);
193 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
199 void bd_editor_place(entity minigame, entity player, string pos, int thetile, string thedir)
201 if ( minigame.minigame_flags & BD_TURN_EDIT )
202 if ( pos && thetile )
204 if ( bd_valid_tile(pos) )
206 entity found_piece = bd_find_piece(minigame, pos, false);
207 entity targ = bd_find_piece(minigame, pos, true);
209 if(found_piece.bd_tiletype == BD_TILE_DOZER && thedir != "")
211 int dxs = 0, dys = 0;
212 string newdir = strtolower(thedir);
213 if(newdir == "up" || newdir == "u") { dxs = 0; dys = 1; }
214 if(newdir == "down" || newdir == "dn" || newdir == "d") { dxs = 0; dys = -1; }
215 if(newdir == "left" || newdir == "lt" || newdir == "l") { dxs = -1; dys = 0; }
216 if(newdir == "right" || newdir == "rt" || newdir == "r") { dxs = 1; dys = 0; }
218 int dx = bound(-1, dxs, 1);
219 int dy = bound(-1, dys, 1);
221 found_piece.bd_dir_x = dx;
222 found_piece.bd_dir_y = dy;
223 found_piece.bd_dir_z = 0;
224 minigame_server_sendflags(found_piece,MINIG_SF_UPDATE); // update anyway
228 entity dozer = bd_find_dozer(minigame);
229 if(dozer && thetile == BD_TILE_DOZER && pos != dozer.netname)
232 if(found_piece || (targ && thetile != BD_TILE_BOULDER))
234 entity piece = bd_find_piece(minigame, pos, false);
235 if(!piece) piece = bd_find_piece(minigame, pos, true);
239 if(piece.netname) { strunzone(piece.netname); }
241 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
245 entity piece = msle_spawn(minigame,"minigame_board_piece");
247 piece.netname = strzone(pos);
248 piece.bd_tiletype = thetile;
249 piece.bd_dir = '0 -1 0';
250 minigame_server_sendflags(piece,MINIG_SF_UPDATE);
252 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
257 void bd_do_move(entity minigame, entity player, string dir, string thetile, string thedir)
259 if(minigame.minigame_flags & BD_TURN_MOVE)
260 bd_move(minigame, player, dir);
262 if(minigame.minigame_flags & BD_TURN_EDIT)
263 bd_editor_place(minigame, player, dir, stof(thetile), thedir);
266 void bd_fill_recurse(entity minigame, entity player, int thetype, int letter, int number)
268 string pos = minigame_tile_buildname(letter,number);
269 if(!bd_valid_tile(pos))
271 if(bd_find_piece(minigame, pos, false) || bd_find_piece(minigame, pos, true))
274 bd_editor_place(minigame, player, pos, thetype, "");
276 bd_fill_recurse(minigame, player, thetype, letter - 1, number);
277 bd_fill_recurse(minigame, player, thetype, letter + 1, number);
278 bd_fill_recurse(minigame, player, thetype, letter, number - 1);
279 bd_fill_recurse(minigame, player, thetype, letter, number + 1);
282 void bd_do_fill(entity minigame, entity player, string dir, string thetile)
284 if(minigame.minigame_flags & BD_TURN_EDIT)
286 int thetype = stof(thetile);
288 if(!bd_canfill(thetype))
291 int letter = minigame_tile_letter(dir);
292 int number = minigame_tile_number(dir);
294 bd_fill_recurse(minigame, player, thetype, letter, number);
298 void bd_reset_moves(entity minigame)
302 for(e = minigame.minigame_players; e; e = e.list_next)
305 while( (e = findentity(e,owner,minigame)) )
306 if ( e.classname == "minigame_player" )
310 minigame_server_sendflags(e,BD_SF_PLAYERMOVES);
314 void bd_load_level(entity minigame);
315 void bd_setup_pieces(entity minigame)
318 while( (e = findentity(e, owner, minigame)) )
319 if(e.classname == "minigame_board_piece")
321 if(e.netname) { strunzone(e.netname); }
325 bd_load_level(minigame);
328 void bd_do_next_match(entity minigame, entity player)
330 minigame.minigame_flags = BD_TURN_MOVE;
331 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
333 if(minigame.bd_nextlevel && minigame.bd_nextlevel != "")
335 if(minigame.bd_levelname) { strunzone(minigame.bd_levelname); }
336 minigame.bd_levelname = strzone(minigame.bd_nextlevel);
339 bd_setup_pieces(minigame);
341 bd_reset_moves(minigame);
344 void bd_set_next_match(entity minigame, string next)
346 if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
347 minigame.bd_nextlevel = strzone(next);
350 void bd_next_match(entity minigame, entity player, string next)
352 if(minigame.minigame_flags & BD_TURN_WIN)
353 bd_do_next_match(minigame, player);
354 if(minigame.minigame_flags & BD_TURN_EDIT)
355 bd_set_next_match(minigame, next);
358 // request a new match
359 void bd_restart_match(entity minigame, entity player)
361 minigame.minigame_flags = BD_TURN_MOVE;
362 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
364 bd_setup_pieces(minigame);
366 bd_reset_moves(minigame);
369 void bd_activate_editor(entity minigame, entity player)
372 if(!player.minigame_players.bd_canedit)
374 sprint(player.minigame_players, "You're not allowed to edit levels, sorry!\n");
379 minigame.minigame_flags = BD_TURN_EDIT;
380 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
382 bd_reset_moves(minigame);
384 bd_setup_pieces(minigame);
387 string bd_save_piece(entity minigame, entity e)
389 string bd_string = "";
391 bd_string = strcat(bd_string, "\"", e.netname, "\" ");
392 bd_string = strcat(bd_string, ftos(e.bd_tiletype), " ");
393 bd_string = strcat(bd_string, sprintf("\"%.9v\"", e.bd_dir), " ");
394 bd_string = strcat(bd_string, "; ");
399 void bd_set_nextlevel(entity minigame, string s)
403 if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
404 minigame.bd_nextlevel = strzone(argv(2));
407 entity bd_load_piece(entity minigame, string s)
409 // separate pieces between the ; symbols
410 tokenizebyseparator(s, "; ");
411 string bd_string = argv(0);
413 tokenize_console(bd_string);
415 entity e = msle_spawn(minigame,"minigame_board_piece");
420 e.netname = strzone(argv(argv_num)); ++argv_num;
421 e.bd_tiletype = stof(argv(argv_num)); ++argv_num;
422 e.bd_dir = stov(argv(argv_num)); ++argv_num;
424 minigame_server_sendflags(e,MINIG_SF_ALL);
429 bool bd_save_level(entity minigame)
431 if(minigame.bd_levelname && minigame.bd_levelname != "")
433 int target_count = 0, boulder_count = 0;
434 entity piece = world;
435 while((piece = findentity(piece,owner,minigame)))
436 if(piece.classname == "minigame_board_piece")
437 if(piece.bd_tiletype == BD_TILE_BOULDER)
439 else if(piece.bd_tiletype == BD_TILE_TARGET)
442 if(boulder_count != target_count)
444 LOG_INFO("Not enough targets or boulders, fix your level!\n");
448 // saves all objects to the database file
452 file_name = strcat("minigames/bulldozer/storage_", minigame.bd_levelname, ".txt");
453 file_get = fopen(file_name, FILE_WRITE);
454 fputs(file_get, strcat("// bulldozer storage \"", minigame.bd_levelname, "\" last updated ", strftime(true, "%d-%m-%Y %H:%M:%S"), "\n"));
456 if(minigame.bd_nextlevel && minigame.bd_nextlevel != "" && fexists(strcat("minigames/bulldozer/storage_", minigame.bd_nextlevel, ".txt")))
457 fputs(file_get, strcat("nextlevel = \"", minigame.bd_nextlevel, "\"\n"));
460 while ( ( e = findentity(e,owner,minigame) ) )
461 if ( e.classname == "minigame_board_piece" )
463 // use a line of text for each object, listing all properties
464 fputs(file_get, strcat(bd_save_piece(minigame, e), "\n"));
474 void bd_load_level(entity minigame)
476 // loads all items from the database file
477 string file_read, file_name;
480 file_name = strcat("minigames/bulldozer/storage_", minigame.bd_levelname, ".txt");
481 file_get = fopen(file_name, FILE_READ);
484 LOG_INFO("^3BULLDOZER: ^7could not find storage file ^3", file_name, "^7, no items were loaded\n");
490 file_read = fgets(file_get);
493 if(substring(file_read, 0, 2) == "//")
495 if(substring(file_read, 0, 1) == "#")
497 if(substring(file_read, 0, 9) == "nextlevel")
499 bd_set_nextlevel(minigame, file_read);
504 e = bd_load_piece(minigame, file_read);
510 void bd_close_editor(entity minigame)
512 entity dozer = bd_find_dozer(minigame);
515 LOG_INFO("You need to place a bulldozer on the level to save it!\n");
519 if(bd_save_level(minigame))
521 minigame.minigame_flags = BD_TURN_MOVE;
522 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
526 LOG_INFO("You need to set the level name!\n");
533 // required function, handle server side events
534 int bd_server_event(entity minigame, string event, ...)
540 if(minigame.bd_levelname) { strunzone(minigame.bd_levelname); }
541 minigame.bd_levelname = strzone(autocvar_sv_minigames_bulldozer_startlevel);
542 bd_setup_pieces(minigame);
543 minigame.minigame_flags = BD_TURN_MOVE;
550 while( (e = findentity(e, owner, minigame)) )
551 if(e.classname == "minigame_board_piece")
553 if(e.netname) { strunzone(e.netname); }
557 if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
558 if(minigame.bd_levelname) { strunzone(minigame.bd_levelname); }
563 int pl_num = minigame_count_players(minigame);
565 if(pl_num >= BD_TEAMS) { return false; }
574 bd_do_move(minigame, ...(0,entity), ((...(1,int)) >= 2 ? argv(1) : string_null), ((...(1,int)) >= 3 ? argv(2) : string_null), ((...(1,int)) >= 4 ? argv(3) : string_null));
577 bd_next_match(minigame,...(0,entity), ((...(1,int) >= 2 ? argv(1) : string_null)));
580 bd_restart_match(minigame,...(0,entity));
583 bd_activate_editor(minigame,...(0,entity));
586 bd_close_editor(minigame);
589 bd_do_fill(minigame, ...(0,entity), ((...(1,int)) >= 2 ? argv(1) : string_null), ((...(1,int)) >= 3 ? argv(2) : string_null));
597 entity sent = ...(0,entity);
599 if ( sent.classname == "minigame_board_piece" && (sf & MINIG_SF_UPDATE) )
601 int letter = minigame_tile_letter(sent.netname);
602 int number = minigame_tile_number(sent.netname);
604 WriteByte(MSG_ENTITY,letter);
605 WriteByte(MSG_ENTITY,number);
607 WriteByte(MSG_ENTITY,sent.bd_tiletype);
609 int dx = sent.bd_dir_x;
610 int dy = sent.bd_dir_y;
613 WriteByte(MSG_ENTITY,dx);
614 WriteByte(MSG_ENTITY,dy);
616 else if(sent.classname == "minigame_player" && (sf & BD_SF_PLAYERMOVES))
617 WriteShort(MSG_ENTITY,sent.bd_moves);
631 vector bd_boardpos; // HUD board position
632 vector bd_boardsize;// HUD board size
634 string bd_get_tile_pic(int tileid)
638 case BD_TILE_BOULDER: return "bd/boulder";
639 case BD_TILE_BRICK1: return "bd/brick1";
640 case BD_TILE_BRICK2: return "bd/brick2";
641 case BD_TILE_BRICK3: return "bd/brick3";
642 case BD_TILE_BRICK4: return "bd/brick4";
643 case BD_TILE_TARGET: return "bd/target";
644 case BD_TILE_DOZER: return "bd/dozer";
650 // Required function, draw the game board
651 void bd_hud_board(vector pos, vector mySize)
653 minigame_hud_fitsqare(pos, mySize);
655 bd_boardsize = mySize;
657 minigame_hud_simpleboard(pos,mySize,minigame_texture("bd/board"));
659 vector tile_size = minigame_hud_denormalize_size('1 1 0' / BD_TILE_SIZE,pos,mySize);
663 FOREACH_MINIGAME_ENTITY(e)
665 if ( e.classname == "minigame_board_piece" && e.bd_tiletype != BD_TILE_TARGET && e.bd_tiletype != BD_TILE_DOZER )
667 tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
668 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
670 string thepiece = bd_get_tile_pic(e.bd_tiletype);
672 minigame_drawpic_centered( tile_pos,
673 minigame_texture(thepiece),
674 tile_size, '1 1 1', panel_fg_alpha, DRAWFLAG_NORMAL );
677 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_TARGET && e.bd_tiletype != BD_TILE_DOZER )
679 tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
680 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
682 minigame_drawpic_centered( tile_pos,
683 minigame_texture("bd/target"),
684 tile_size, '1 1 1', panel_fg_alpha, DRAWFLAG_NORMAL );
687 if ( e.classname == "minigame_board_piece" && e.bd_tiletype != BD_TILE_TARGET && e.bd_tiletype == BD_TILE_DOZER )
689 tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
690 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
692 vector thedir = e.bd_dir;
695 if(thedir_y == -1) { theang = M_PI; }
696 if(thedir_x == 1) { theang = M_PI/2; }
697 if(thedir_x == -1) { theang = M_PI*3/2; }
699 drawrotpic(tile_pos, theang, minigame_texture("bd/dozer"),
700 tile_size, tile_size/2, '1 1 1',
701 panel_fg_alpha, DRAWFLAG_NORMAL );
705 FOREACH_MINIGAME_ENTITY(e)
707 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_TARGET )
709 tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
710 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
712 minigame_drawpic_centered( tile_pos,
713 minigame_texture("bd/target"),
714 tile_size, '1 1 1', panel_fg_alpha, DRAWFLAG_NORMAL );
718 FOREACH_MINIGAME_ENTITY(e)
720 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
722 tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
723 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
725 vector thedir = e.bd_dir;
728 if(thedir_y == -1) { theang = M_PI; }
729 if(thedir_x == 1) { theang = M_PI/2; }
730 if(thedir_x == -1) { theang = M_PI*3/2; }
732 drawrotpic(tile_pos, theang, minigame_texture("bd/dozer"),
733 tile_size, tile_size/2, '1 1 1',
734 panel_fg_alpha, DRAWFLAG_NORMAL );
738 if(active_minigame.minigame_flags & BD_TURN_EDIT)
739 if(bd_valid_tile(bd_curr_pos))
741 entity piece = bd_find_piece(active_minigame, bd_curr_pos, false);
742 entity targ = bd_find_piece(active_minigame, bd_curr_pos, true);
743 string thepiece = ((piece || (targ && bd_curr_tile != BD_TILE_BOULDER)) ? "bd/delete" : bd_get_tile_pic(bd_curr_tile));
745 tile_pos = minigame_tile_pos(bd_curr_pos,BD_LET_CNT,BD_NUM_CNT);
746 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
747 minigame_drawpic_centered( tile_pos,
748 minigame_texture(thepiece),
749 tile_size, '1 1 1', panel_fg_alpha/2, DRAWFLAG_NORMAL );
752 if ( (active_minigame.minigame_flags & BD_TURN_LOSS) || (active_minigame.minigame_flags & BD_TURN_WIN) )
754 vector winfs = hud_fontsize*2;
755 string victory_text = "Game over!";
757 if(active_minigame.minigame_flags & BD_TURN_WIN)
758 victory_text = "You win!";
760 vector win_pos = pos+eY*(mySize_y-winfs_y)/2;
762 win_sz = minigame_drawcolorcodedstring_wrapped(mySize_x,win_pos,
763 sprintf("%s", victory_text),
764 winfs, 0, DRAWFLAG_NORMAL, 0.5);
766 drawfill(win_pos-eY*hud_fontsize_y,win_sz+2*eY*hud_fontsize_y,'0.3 0.3 1',0.8,DRAWFLAG_ADDITIVE);
768 minigame_drawcolorcodedstring_wrapped(mySize_x,win_pos,
769 sprintf("%s", victory_text),
770 winfs, panel_fg_alpha, DRAWFLAG_NORMAL, 0.5);
775 // Required function, draw the game status panel
776 void bd_hud_status(vector pos, vector mySize)
780 ts = minigame_drawstring_wrapped(mySize_x,pos,active_minigame.descriptor.message,
781 hud_fontsize * 2, '0.25 0.47 0.72', panel_fg_alpha, DRAWFLAG_NORMAL,0.5);
786 vector player_fontsize = hud_fontsize * 1.75;
787 ts_y = ( mySize_y - 2*player_fontsize_y ) / BD_TEAMS;
790 vector tile_size = '48 48 0';
793 drawfill(mypos,eX*mySize_x+eY*player_fontsize_y,'1 1 1',0.5,DRAWFLAG_ADDITIVE);
794 mypos_y += player_fontsize_y;
795 drawfill(mypos,eX*mySize_x+eY*tile_size_y,'1 1 1',0.25,DRAWFLAG_ADDITIVE);
798 FOREACH_MINIGAME_ENTITY(e)
800 if ( e.classname == "minigame_player" )
803 minigame_drawcolorcodedstring_trunc(mySize_x,mypos,
804 GetPlayerName(e.minigame_playerslot-1),
805 player_fontsize, panel_fg_alpha, DRAWFLAG_NORMAL);
807 mypos_y += player_fontsize_y;
808 string thepiece = "bd/dozer";
809 if(active_minigame.minigame_flags & BD_TURN_EDIT)
810 thepiece = bd_get_tile_pic(bd_curr_tile);
812 minigame_texture(thepiece),
813 tile_size * 0.7, '1 1 1', panel_fg_alpha, DRAWFLAG_NORMAL );
815 mypos_x += tile_size_x;
817 drawstring(mypos,ftos(e.bd_moves),tile_size,
818 '0.7 0.84 1', panel_fg_alpha, DRAWFLAG_NORMAL);
823 // Turn a set of flags into a help message
824 string bd_turn_to_string(int turnflags)
826 if ( turnflags & BD_TURN_LOSS )
827 return _("Better luck next time!");
829 if ( turnflags & BD_TURN_WIN )
831 return _("Tubular! Press ""Next Level"" to continue!");
833 return _("Wicked! Press ""Next Level"" to continue!");
835 if( turnflags & BD_TURN_EDIT )
836 return _("Press the space bar to change your currently selected tile");
838 if ( turnflags & BD_TURN_MOVE )
839 return _("Push the boulders onto the targets");
844 // Make the correct move
845 void bd_make_move(entity minigame, string dir)
847 if ( minigame.minigame_flags == BD_TURN_MOVE )
849 minigame_cmd("move ", dir);
853 void bd_editor_make_move(entity minigame, string dir)
855 if ( minigame.minigame_flags == BD_TURN_EDIT )
857 minigame_cmd("move ", bd_curr_pos, " ", ftos(bd_curr_tile), " ", dir);
861 void bd_editor_fill(entity minigame)
863 if ( minigame.minigame_flags == BD_TURN_EDIT )
865 minigame_cmd("fill ", bd_curr_pos, " ", ftos(bd_curr_tile));
869 void bd_set_curr_pos(string s)
872 strunzone(bd_curr_pos);
878 bool bd_normal_move(entity minigame, int themove)
883 case K_KP_RIGHTARROW:
884 bd_make_move(minigame, "r");
888 bd_make_move(minigame, "l");
892 bd_make_move(minigame, "u");
896 bd_make_move(minigame, "d");
903 bool bd_change_dozer_angle(entity minigame)
905 entity dozer = bd_find_piece(minigame, bd_curr_pos, false);
906 if(!dozer || dozer.bd_tiletype != BD_TILE_DOZER)
910 vector dir = dozer.bd_dir;
911 if(dir.x == 0 && dir.y == 0) { thedir = "r"; }
913 if(dir.x == 0 && dir.y == 1) { thedir = "r"; }
914 if(dir.x == 0 && dir.y ==-1) { thedir = "l"; }
915 if(dir.x ==-1 && dir.y == 0) { thedir = "u"; }
916 if(dir.x == 1 && dir.y == 0) { thedir = "d"; }
918 bd_editor_make_move(minigame, thedir);
922 bool bd_editor_move(entity minigame, int themove)
927 case K_KP_RIGHTARROW:
929 bd_set_curr_pos("a3");
931 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,1,0,BD_NUM_CNT,BD_LET_CNT));
936 bd_set_curr_pos("c3");
938 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,-1,0,BD_NUM_CNT,BD_LET_CNT));
943 bd_set_curr_pos("a1");
945 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,0,1,BD_NUM_CNT,BD_LET_CNT));
950 bd_set_curr_pos("a3");
952 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,0,-1,BD_NUM_CNT,BD_LET_CNT));
956 bd_editor_make_move(minigame, "");
959 if(bd_change_dozer_angle(minigame))
962 if(bd_curr_tile > BD_TILE_LAST)
970 // Required function, handle client events
971 int bd_client_event(entity minigame, string event, ...)
977 minigame.message = bd_turn_to_string(minigame.minigame_flags);
979 bd_curr_tile = BD_TILE_BRICK1;
984 if(minigame.minigame_flags & BD_TURN_MOVE)
986 if(bd_normal_move(minigame, ...(0,int)))
990 if(minigame.minigame_flags & BD_TURN_EDIT)
992 if(bd_editor_move(minigame, ...(0,int)))
998 case "mouse_pressed":
1000 if(minigame.minigame_flags & BD_TURN_EDIT)
1002 if(...(0,int) == K_MOUSE1)
1004 bd_editor_make_move(minigame, "");
1008 if(...(0,int) == K_MOUSE2)
1010 bd_editor_fill(minigame);
1019 if(minigame.minigame_flags & BD_TURN_EDIT)
1021 vector mouse_pos = minigame_hud_normalize(mousepos,bd_boardpos,bd_boardsize);
1022 bd_set_curr_pos(minigame_tile_name(mouse_pos,BD_LET_CNT,BD_NUM_CNT));
1023 if ( ! bd_valid_tile(bd_curr_pos) )
1024 bd_set_curr_pos("");
1028 case "network_receive":
1030 entity sent = ...(0,entity);
1031 int sf = ...(1,int);
1032 if ( sent.classname == "minigame" )
1034 if ( sf & MINIG_SF_UPDATE )
1036 sent.message = bd_turn_to_string(sent.minigame_flags);
1037 //if ( sent.minigame_flags & minigame_self.team )
1041 else if(sent.classname == "minigame_board_piece")
1043 if(sf & MINIG_SF_UPDATE)
1045 int letter = ReadByte();
1046 int number = ReadByte();
1047 if(sent.netname) { strunzone(sent.netname); }
1048 sent.netname = strzone(minigame_tile_buildname(letter, number));
1050 sent.bd_tiletype = ReadByte();
1052 int dx = ReadByte();
1053 int dy = ReadByte();
1055 if(dx == 2) dx = -1;
1056 if(dy == 2) dy = -1;
1063 else if(sent.classname == "minigame_player" && (sf & BD_SF_PLAYERMOVES))
1064 sent.bd_moves = ReadShort(); // make this a byte when possible
1070 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Next Level"),"next");
1071 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Restart"),"restart");
1072 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Editor"),"edit");
1073 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Save"),"save");
1078 if(...(0,string) == "next")
1079 minigame_cmd("next");
1080 if(...(0,string) == "restart")
1081 minigame_cmd("restart");
1082 if(...(0,string) == "edit")
1083 minigame_cmd("edit");
1084 if(...(0,string) == "save")
1085 minigame_cmd("save");