2 REGISTER_MINIGAME(bd, "Bulldozer");
4 const int BD_TURN_MOVE = 0x0100; // player must move the bulldozer
5 const int BD_TURN_WIN = 0x0200; // victory
6 const int BD_TURN_LOSS = 0x0400; // they did it?!
7 const int BD_TURN_EDIT = 0x0800; // editing mode
8 const int BD_TURN_TYPE = 0x0f00; // turn type mask
10 const int BD_SF_PLAYERMOVES = MINIG_SF_CUSTOM;
13 const int BD_LET_CNT = 20;
14 const int BD_NUM_CNT = 20;
16 const int BD_TILE_SIZE = 20;
18 const int BD_TEAMS = 1;
32 const int BD_TILE_DOZER = 1;
33 const int BD_TILE_TARGET = 2;
34 const int BD_TILE_BOULDER = 3;
35 const int BD_TILE_BRICK1 = 4;
36 const int BD_TILE_BRICK2 = 5;
37 const int BD_TILE_BRICK3 = 6;
38 const int BD_TILE_BRICK4 = 7;
39 const int BD_TILE_BRICK5 = 8;
40 const int BD_TILE_BRICK6 = 9;
41 const int BD_TILE_BRICK7 = 10;
42 const int BD_TILE_BRICK8 = 11;
43 const int BD_TILE_LAST = 11;
45 string autocvar_sv_minigames_bulldozer_startlevel = "level1";
47 // find same game piece given its tile name
48 entity bd_find_piece(entity minig, string tile, bool check_target)
51 while ( ( e = findentity(e,owner,minig) ) )
52 if ( e.classname == "minigame_board_piece" && e.netname == tile && ((check_target) ? e.bd_tiletype == BD_TILE_TARGET : e.bd_tiletype != BD_TILE_TARGET) )
57 // check if the tile name is valid (15x15 grid)
58 bool bd_valid_tile(string tile)
62 int number = minigame_tile_number(tile);
63 int letter = minigame_tile_letter(tile);
64 return 0 <= number && number < BD_NUM_CNT && 0 <= letter && letter < BD_LET_CNT;
67 entity bd_find_dozer(entity minig)
70 while ( ( e = findentity(e,owner,minig) ) )
71 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
76 void bd_check_winner(entity minig)
78 int total = 0, valid = 0;
80 while ( ( e = findentity(e,owner,minig) ) )
81 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_TARGET )
84 if(bd_find_piece(minig, e.netname, false).bd_tiletype == BD_TILE_BOULDER)
90 minig.minigame_flags = BD_TURN_WIN;
91 minigame_server_sendflags(minig,MINIG_SF_UPDATE);
95 bool bd_canfill(int ttype)
106 case BD_TILE_BRICK1: return true;
112 bool bd_move_dozer(entity minigame, entity dozer)
114 if(!dozer.bd_dir_x && !dozer.bd_dir_y)
115 return false; // nope!
117 int myx = minigame_tile_letter(dozer.netname);
118 int myy = minigame_tile_number(dozer.netname);
120 myx += dozer.bd_dir_x;
121 myy += dozer.bd_dir_y;
123 string newpos = minigame_tile_buildname(myx, myy);
124 entity hit = bd_find_piece(minigame, newpos, false);
126 if(!bd_valid_tile(newpos))
130 switch(hit.bd_tiletype)
132 case BD_TILE_DOZER: // wtf, but let's do this incase
140 case BD_TILE_BRICK1: return false;
141 case BD_TILE_BOULDER:
144 int tx = minigame_tile_letter(hit.netname);
145 int ty = minigame_tile_number(hit.netname);
147 tx += dozer.bd_dir_x;
148 ty += dozer.bd_dir_y;
150 testpos = minigame_tile_buildname(tx, ty);
151 entity testhit = bd_find_piece(minigame, testpos, false);
153 if(!bd_valid_tile(testpos) || testhit)
156 if(hit.netname) { strunzone(hit.netname); }
157 hit.netname = strzone(testpos);
158 minigame_server_sendflags(hit,MINIG_SF_UPDATE);
163 if(dozer.netname) { strunzone(dozer.netname); }
164 dozer.netname = strzone(newpos);
170 void bd_move(entity minigame, entity player, string dir)
172 if ( minigame.minigame_flags & BD_TURN_MOVE )
175 //if ( bd_valid_tile(pos) )
176 //if ( bd_find_piece(minigame, pos, false) )
178 entity dozer = bd_find_dozer(minigame);
181 LOG_INFO("Dozer wasn't found!\n");
182 return; // should not happen... TODO: end match?
185 int dxs = 0, dys = 0;
186 string thedir = strtolower(dir);
187 if(thedir == "up" || thedir == "u") { dxs = 0; dys = 1; }
188 if(thedir == "down" || thedir == "dn" || thedir == "d") { dxs = 0; dys = -1; }
189 if(thedir == "left" || thedir == "lt" || thedir == "l") { dxs = -1; dys = 0; }
190 if(thedir == "right" || thedir == "rt" || thedir == "r") { dxs = 1; dys = 0; }
192 int dx = bound(-1, dxs, 1);
193 int dy = bound(-1, dys, 1);
197 while ( ( e = findentity(e,owner,minigame) ) )
198 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
204 if(bd_move_dozer(minigame, e))
207 minigame_server_sendflags(e,MINIG_SF_UPDATE); // update anyway
213 bd_check_winner(minigame);
215 minigame_server_sendflags(player,BD_SF_PLAYERMOVES);
216 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
222 void bd_editor_place(entity minigame, entity player, string pos, int thetile, string thedir)
224 if ( minigame.minigame_flags & BD_TURN_EDIT )
225 if ( pos && thetile )
227 if ( bd_valid_tile(pos) )
229 entity found_piece = bd_find_piece(minigame, pos, false);
230 entity targ = bd_find_piece(minigame, pos, true);
232 if(found_piece.bd_tiletype == BD_TILE_DOZER && thedir != "")
234 int dxs = 0, dys = 0;
235 string newdir = strtolower(thedir);
236 if(newdir == "up" || newdir == "u") { dxs = 0; dys = 1; }
237 if(newdir == "down" || newdir == "dn" || newdir == "d") { dxs = 0; dys = -1; }
238 if(newdir == "left" || newdir == "lt" || newdir == "l") { dxs = -1; dys = 0; }
239 if(newdir == "right" || newdir == "rt" || newdir == "r") { dxs = 1; dys = 0; }
241 int dx = bound(-1, dxs, 1);
242 int dy = bound(-1, dys, 1);
244 found_piece.bd_dir_x = dx;
245 found_piece.bd_dir_y = dy;
246 found_piece.bd_dir_z = 0;
247 minigame_server_sendflags(found_piece,MINIG_SF_UPDATE); // update anyway
251 //entity dozer = bd_find_dozer(minigame);
252 //if(dozer && thetile == BD_TILE_DOZER && pos != dozer.netname)
253 //return; // nice try
255 if(found_piece || (targ && thetile != BD_TILE_BOULDER))
257 entity piece = bd_find_piece(minigame, pos, false);
258 if(!piece) piece = bd_find_piece(minigame, pos, true);
262 if(piece.netname) { strunzone(piece.netname); }
264 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
268 entity piece = msle_spawn(minigame,"minigame_board_piece");
270 piece.netname = strzone(pos);
271 piece.bd_tiletype = thetile;
272 piece.bd_dir = '0 -1 0';
273 minigame_server_sendflags(piece,MINIG_SF_UPDATE);
275 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
280 void bd_do_move(entity minigame, entity player, string dir, string thetile, string thedir)
282 if(minigame.minigame_flags & BD_TURN_MOVE)
283 bd_move(minigame, player, dir);
285 if(minigame.minigame_flags & BD_TURN_EDIT)
286 bd_editor_place(minigame, player, dir, stof(thetile), thedir);
289 void bd_fill_recurse(entity minigame, entity player, int thetype, int letter, int number)
291 string pos = minigame_tile_buildname(letter,number);
292 if(!bd_valid_tile(pos))
294 if(bd_find_piece(minigame, pos, false) || bd_find_piece(minigame, pos, true))
297 bd_editor_place(minigame, player, pos, thetype, "");
299 bd_fill_recurse(minigame, player, thetype, letter - 1, number);
300 bd_fill_recurse(minigame, player, thetype, letter + 1, number);
301 bd_fill_recurse(minigame, player, thetype, letter, number - 1);
302 bd_fill_recurse(minigame, player, thetype, letter, number + 1);
305 void bd_unfill_recurse(entity minigame, entity player, int thetype, int letter, int number)
307 string pos = minigame_tile_buildname(letter,number);
308 if(!bd_valid_tile(pos))
311 entity targ = bd_find_piece(minigame, pos, true);
312 entity piece = bd_find_piece(minigame, pos, false);
314 if(targ && thetype == targ.bd_tiletype)
316 if(targ.netname) { strunzone(targ.netname); }
319 else if(piece && thetype == piece.bd_tiletype)
321 if(piece.netname) { strunzone(piece.netname); }
326 bd_unfill_recurse(minigame, player, thetype, letter - 1, number);
327 bd_unfill_recurse(minigame, player, thetype, letter + 1, number);
328 bd_unfill_recurse(minigame, player, thetype, letter, number - 1);
329 bd_unfill_recurse(minigame, player, thetype, letter, number + 1);
332 void bd_do_fill(entity minigame, entity player, string dir, string thetile)
335 if(!player.minigame_players.bd_canedit)
337 sprint(player.minigame_players, "You're not allowed to edit levels, sorry!\n");
342 if(minigame.minigame_flags & BD_TURN_EDIT)
344 int thetype = stof(thetile);
346 entity targ = bd_find_piece(minigame, dir, true);
347 entity piece = bd_find_piece(minigame, dir, false);
349 if(!bd_canfill(thetype) || (piece || targ))
353 if(targ) { killtype = targ.bd_tiletype; }
354 if(piece) { killtype = piece.bd_tiletype; }
358 int letter = minigame_tile_letter(dir);
359 int number = minigame_tile_number(dir);
360 bd_unfill_recurse(minigame, player, killtype, letter, number);
366 int letter = minigame_tile_letter(dir);
367 int number = minigame_tile_number(dir);
369 bd_fill_recurse(minigame, player, thetype, letter, number);
373 void bd_reset_moves(entity minigame)
377 for(e = minigame.minigame_players; e; e = e.list_next)
380 while( (e = findentity(e,owner,minigame)) )
381 if ( e.classname == "minigame_player" )
385 minigame_server_sendflags(e,BD_SF_PLAYERMOVES);
389 void bd_load_level(entity minigame);
390 void bd_setup_pieces(entity minigame)
393 while( (e = findentity(e, owner, minigame)) )
394 if(e.classname == "minigame_board_piece")
396 if(e.netname) { strunzone(e.netname); }
400 bd_load_level(minigame);
403 void bd_do_next_match(entity minigame, entity player)
405 minigame.minigame_flags = BD_TURN_MOVE;
406 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
408 if(minigame.bd_nextlevel && minigame.bd_nextlevel != "")
410 if(minigame.bd_levelname) { strunzone(minigame.bd_levelname); }
411 minigame.bd_levelname = strzone(minigame.bd_nextlevel);
414 bd_setup_pieces(minigame);
416 bd_reset_moves(minigame);
419 void bd_set_next_match(entity minigame, string next)
421 if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
422 minigame.bd_nextlevel = strzone(next);
425 void bd_next_match(entity minigame, entity player, string next)
427 if(minigame.minigame_flags & BD_TURN_WIN)
428 bd_do_next_match(minigame, player);
429 if(minigame.minigame_flags & BD_TURN_EDIT)
430 bd_set_next_match(minigame, next);
433 // request a new match
434 void bd_restart_match(entity minigame, entity player)
436 minigame.minigame_flags = BD_TURN_MOVE;
437 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
439 bd_setup_pieces(minigame);
441 bd_reset_moves(minigame);
444 void bd_activate_editor(entity minigame, entity player)
447 if(!player.minigame_players.bd_canedit)
449 sprint(player.minigame_players, "You're not allowed to edit levels, sorry!\n");
454 minigame.minigame_flags = BD_TURN_EDIT;
455 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
457 bd_reset_moves(minigame);
459 bd_setup_pieces(minigame);
462 string bd_save_piece(entity minigame, entity e)
464 string bd_string = "";
466 bd_string = strcat(bd_string, "\"", e.netname, "\" ");
467 bd_string = strcat(bd_string, ftos(e.bd_tiletype), " ");
468 bd_string = strcat(bd_string, sprintf("\"%.9v\"", e.bd_dir));
473 void bd_set_nextlevel(entity minigame, string s)
477 if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
478 minigame.bd_nextlevel = strzone(argv(2));
481 entity bd_load_piece(entity minigame, string s)
483 // separate pieces between the ; symbols
484 string bd_string = s;
486 tokenize_console(bd_string);
488 entity e = msle_spawn(minigame,"minigame_board_piece");
493 e.netname = strzone(argv(argv_num)); ++argv_num;
494 e.bd_tiletype = stof(argv(argv_num)); ++argv_num;
495 e.bd_dir = stov(argv(argv_num)); ++argv_num;
497 minigame_server_sendflags(e,MINIG_SF_ALL);
502 bool bd_save_level(entity minigame)
504 if(minigame.bd_levelname && minigame.bd_levelname != "")
506 int target_count = 0, boulder_count = 0;
508 while((piece = findentity(piece,owner,minigame)))
509 if(piece.classname == "minigame_board_piece")
510 if(piece.bd_tiletype == BD_TILE_BOULDER)
512 else if(piece.bd_tiletype == BD_TILE_TARGET)
515 if(boulder_count != target_count)
517 LOG_INFO("Not enough targets or boulders, fix your level!\n");
521 // saves all objects to the database file
525 file_name = strcat("minigames/bulldozer/storage_", minigame.bd_levelname, ".txt");
526 file_get = fopen(file_name, FILE_WRITE);
527 fputs(file_get, strcat("// bulldozer storage \"", minigame.bd_levelname, "\" last updated ", strftime(true, "%d-%m-%Y %H:%M:%S"), "\n"));
529 if(minigame.bd_nextlevel && minigame.bd_nextlevel != "" && fexists(strcat("minigames/bulldozer/storage_", minigame.bd_nextlevel, ".txt")))
530 fputs(file_get, strcat("nextlevel = \"", minigame.bd_nextlevel, "\"\n"));
533 while ( ( e = findentity(e,owner,minigame) ) )
534 if ( e.classname == "minigame_board_piece" )
536 // use a line of text for each object, listing all properties
537 fputs(file_get, strcat(bd_save_piece(minigame, e), "\n"));
547 void bd_load_level(entity minigame)
549 // loads all items from the database file
550 string file_read, file_name;
553 file_name = strcat("minigames/bulldozer/storage_", minigame.bd_levelname, ".txt");
554 file_get = fopen(file_name, FILE_READ);
557 LOG_INFO("^3BULLDOZER: ^7could not find storage file ^3", file_name, "^7, no items were loaded\n");
563 file_read = fgets(file_get);
566 if(substring(file_read, 0, 2) == "//")
568 if(substring(file_read, 0, 1) == "#")
570 if(substring(file_read, 0, 9) == "nextlevel")
572 bd_set_nextlevel(minigame, file_read);
577 e = bd_load_piece(minigame, file_read);
583 void bd_close_editor(entity minigame, entity player)
586 if(!player.minigame_players.bd_canedit)
588 sprint(player.minigame_players, "You're not allowed to edit levels, sorry!\n");
593 entity dozer = bd_find_dozer(minigame);
596 LOG_INFO("You need to place a bulldozer on the level to save it!\n");
600 if(bd_save_level(minigame))
602 minigame.minigame_flags = BD_TURN_MOVE;
603 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
607 LOG_INFO("You need to set the level name!\n");
614 // required function, handle server side events
615 int bd_server_event(entity minigame, string event, ...)
621 if(minigame.bd_levelname) { strunzone(minigame.bd_levelname); }
622 minigame.bd_levelname = strzone(autocvar_sv_minigames_bulldozer_startlevel);
623 bd_setup_pieces(minigame);
624 minigame.minigame_flags = BD_TURN_MOVE;
631 while( (e = findentity(e, owner, minigame)) )
632 if(e.classname == "minigame_board_piece")
634 if(e.netname) { strunzone(e.netname); }
638 if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
639 if(minigame.bd_levelname) { strunzone(minigame.bd_levelname); }
644 int pl_num = minigame_count_players(minigame);
646 if(pl_num >= BD_TEAMS) { return false; }
655 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));
658 bd_next_match(minigame,...(0,entity), ((...(1,int) >= 2 ? argv(1) : string_null)));
661 bd_restart_match(minigame,...(0,entity));
664 bd_activate_editor(minigame,...(0,entity));
667 bd_close_editor(minigame,...(0,entity));
670 bd_do_fill(minigame, ...(0,entity), ((...(1,int)) >= 2 ? argv(1) : string_null), ((...(1,int)) >= 3 ? argv(2) : string_null));
678 entity sent = ...(0,entity);
680 if ( sent.classname == "minigame_board_piece" && (sf & MINIG_SF_UPDATE) )
682 int letter = minigame_tile_letter(sent.netname);
683 int number = minigame_tile_number(sent.netname);
685 WriteByte(MSG_ENTITY,letter);
686 WriteByte(MSG_ENTITY,number);
688 WriteByte(MSG_ENTITY,sent.bd_tiletype);
690 int dx = sent.bd_dir_x;
691 int dy = sent.bd_dir_y;
694 WriteByte(MSG_ENTITY,dx);
695 WriteByte(MSG_ENTITY,dy);
697 else if(sent.classname == "minigame_player" && (sf & BD_SF_PLAYERMOVES))
698 WriteShort(MSG_ENTITY,sent.bd_moves);
715 vector bd_boardpos; // HUD board position
716 vector bd_boardsize;// HUD board size
718 string bd_get_tile_pic(int tileid)
722 case BD_TILE_BOULDER: return "bd/boulder";
723 case BD_TILE_BRICK1: return "bd/brick1";
724 case BD_TILE_BRICK2: return "bd/brick2";
725 case BD_TILE_BRICK3: return "bd/brick3";
726 case BD_TILE_BRICK4: return "bd/brick4";
727 case BD_TILE_BRICK5: return "bd/brick5";
728 case BD_TILE_BRICK6: return "bd/brick6";
729 case BD_TILE_BRICK7: return "bd/brick7";
730 case BD_TILE_BRICK8: return "bd/brick8";
731 case BD_TILE_TARGET: return "bd/target";
732 case BD_TILE_DOZER: return "bd/dozer";
738 // Required function, draw the game board
739 void bd_hud_board(vector pos, vector mySize)
741 minigame_hud_fitsqare(pos, mySize);
743 bd_boardsize = mySize;
745 minigame_hud_simpleboard(pos,mySize,minigame_texture("bd/board"));
747 vector tile_size = minigame_hud_denormalize_size('1 1 0' / BD_TILE_SIZE,pos,mySize);
751 FOREACH_MINIGAME_ENTITY(e)
753 if(e.classname == "minigame_board_piece")
755 if(e.bd_tiletype == BD_TILE_TARGET)
758 e.bd_enemy = bd_find_piece(active_minigame, e.netname, false);
760 else if(e.bd_tiletype == BD_TILE_BOULDER)
762 e.bd_hide = false; // reset either way
763 e.bd_hide = ((bd_find_piece(active_minigame, e.netname, true)) != NULL);
767 FOREACH_MINIGAME_ENTITY(e)
769 if ( e.classname == "minigame_board_piece" )
771 if(e.bd_tiletype != BD_TILE_DOZER && !e.bd_hide) // hide boulders
773 tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
774 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
776 string thepiece = bd_get_tile_pic(e.bd_tiletype);
779 thepiece = "bd/boulder_target";
781 minigame_drawpic_centered( tile_pos,
782 minigame_texture(thepiece),
783 tile_size, '1 1 1', panel_fg_alpha, DRAWFLAG_NORMAL );
788 // draw dozers on top, always
789 FOREACH_MINIGAME_ENTITY(e)
791 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
793 tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
794 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
796 vector thedir = e.bd_dir;
799 if(thedir_y == -1) { theang = M_PI; }
800 if(thedir_x == 1) { theang = M_PI/2; }
801 if(thedir_x == -1) { theang = M_PI*3/2; }
803 drawrotpic(tile_pos, theang, minigame_texture("bd/dozer"),
804 tile_size, tile_size/2, '1 1 1',
805 panel_fg_alpha, DRAWFLAG_NORMAL );
809 if(active_minigame.minigame_flags & BD_TURN_EDIT)
810 if(bd_valid_tile(bd_curr_pos))
812 entity piece = bd_find_piece(active_minigame, bd_curr_pos, false);
813 entity targ = bd_find_piece(active_minigame, bd_curr_pos, true);
814 string thepiece = ((piece || (targ && bd_curr_tile != BD_TILE_BOULDER)) ? "bd/delete" : bd_get_tile_pic(bd_curr_tile));
816 tile_pos = minigame_tile_pos(bd_curr_pos,BD_LET_CNT,BD_NUM_CNT);
817 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
818 if(bd_curr_tile == BD_TILE_DOZER)
820 drawrotpic(tile_pos, M_PI, minigame_texture("bd/dozer"),
821 tile_size, tile_size/2, '1 1 1',
822 panel_fg_alpha/2, DRAWFLAG_NORMAL );
826 minigame_drawpic_centered( tile_pos,
827 minigame_texture(thepiece),
828 tile_size, '1 1 1', panel_fg_alpha/2, DRAWFLAG_NORMAL );
832 if ( (active_minigame.minigame_flags & BD_TURN_LOSS) || (active_minigame.minigame_flags & BD_TURN_WIN) )
834 vector winfs = hud_fontsize*2;
835 string victory_text = "Game over!";
837 if(active_minigame.minigame_flags & BD_TURN_WIN)
838 victory_text = "Well done! Click 'Next Level' to continue";
840 vector win_pos = pos+eY*(mySize_y-winfs_y)/2;
842 win_sz = minigame_drawcolorcodedstring_wrapped(mySize_x,win_pos,
843 sprintf("%s", victory_text),
844 winfs, 0, DRAWFLAG_NORMAL, 0.5);
846 drawfill(win_pos-eY*hud_fontsize_y,win_sz+2*eY*hud_fontsize_y,'0.3 0.3 1',0.8,DRAWFLAG_ADDITIVE);
848 minigame_drawcolorcodedstring_wrapped(mySize_x,win_pos,
849 sprintf("%s", victory_text),
850 winfs, panel_fg_alpha, DRAWFLAG_NORMAL, 0.5);
855 // Required function, draw the game status panel
856 void bd_hud_status(vector pos, vector mySize)
860 ts = minigame_drawstring_wrapped(mySize_x,pos,active_minigame.descriptor.message,
861 hud_fontsize * 2, '0.25 0.47 0.72', panel_fg_alpha, DRAWFLAG_NORMAL,0.5);
866 vector player_fontsize = hud_fontsize * 1.75;
867 ts_y = ( mySize_y - 2*player_fontsize_y ) / BD_TEAMS;
870 vector tile_size = '48 48 0';
873 drawfill(mypos,eX*mySize_x+eY*player_fontsize_y,'1 1 1',0.5,DRAWFLAG_ADDITIVE);
874 mypos_y += player_fontsize_y;
875 drawfill(mypos,eX*mySize_x+eY*tile_size_y,'1 1 1',0.25,DRAWFLAG_ADDITIVE);
878 FOREACH_MINIGAME_ENTITY(e)
880 if ( e.classname == "minigame_player" )
883 minigame_drawcolorcodedstring_trunc(mySize_x,mypos,
884 entcs_GetName(e.minigame_playerslot-1),
885 player_fontsize, panel_fg_alpha, DRAWFLAG_NORMAL);
887 mypos_y += player_fontsize_y;
888 string thepiece = "bd/dozer";
889 if(active_minigame.minigame_flags & BD_TURN_EDIT)
890 thepiece = bd_get_tile_pic(bd_curr_tile);
892 minigame_texture(thepiece),
893 tile_size * 0.7, '1 1 1', panel_fg_alpha, DRAWFLAG_NORMAL );
895 mypos_x += tile_size_x;
897 drawstring(mypos,ftos(e.bd_moves),tile_size,
898 '0.7 0.84 1', panel_fg_alpha, DRAWFLAG_NORMAL);
903 // Turn a set of flags into a help message
904 string bd_turn_to_string(int turnflags)
906 if ( turnflags & BD_TURN_LOSS )
907 return _("Better luck next time!");
909 if ( turnflags & BD_TURN_WIN )
911 return _("Tubular! Press \"Next Level\" to continue!");
913 return _("Wicked! Press \"Next Level\" to continue!");
915 if( turnflags & BD_TURN_EDIT )
916 return _("Press the space bar to change your currently selected tile");
918 if ( turnflags & BD_TURN_MOVE )
919 return _("Push the boulders onto the targets");
924 // Make the correct move
925 void bd_make_move(entity minigame, string dir)
927 if ( minigame.minigame_flags == BD_TURN_MOVE )
929 minigame_cmd("move ", dir);
933 void bd_editor_make_move(entity minigame, string dir)
935 if ( minigame.minigame_flags == BD_TURN_EDIT )
937 minigame_cmd("move ", bd_curr_pos, " ", ftos(bd_curr_tile), " ", dir);
941 void bd_editor_fill(entity minigame)
943 if ( minigame.minigame_flags == BD_TURN_EDIT )
945 minigame_cmd("fill ", bd_curr_pos, " ", ftos(bd_curr_tile));
949 void bd_set_curr_pos(string s)
952 strunzone(bd_curr_pos);
958 bool bd_normal_move(entity minigame, int themove)
963 case K_KP_RIGHTARROW:
964 bd_make_move(minigame, "r");
968 bd_make_move(minigame, "l");
972 bd_make_move(minigame, "u");
976 bd_make_move(minigame, "d");
983 bool bd_change_dozer_angle(entity minigame)
985 entity dozer = bd_find_piece(minigame, bd_curr_pos, false);
986 if(!dozer || dozer.bd_tiletype != BD_TILE_DOZER)
990 vector dir = dozer.bd_dir;
991 if(dir.x == 0 && dir.y == 0) { thedir = "r"; }
993 if(dir.x == 0 && dir.y == 1) { thedir = "r"; }
994 if(dir.x == 0 && dir.y ==-1) { thedir = "l"; }
995 if(dir.x ==-1 && dir.y == 0) { thedir = "u"; }
996 if(dir.x == 1 && dir.y == 0) { thedir = "d"; }
998 bd_editor_make_move(minigame, thedir);
1002 bool bd_editor_move(entity minigame, int themove)
1007 case K_KP_RIGHTARROW:
1008 if ( ! bd_curr_pos )
1009 bd_set_curr_pos("a3");
1011 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,1,0,BD_NUM_CNT,BD_LET_CNT));
1014 case K_KP_LEFTARROW:
1015 if ( ! bd_curr_pos )
1016 bd_set_curr_pos("c3");
1018 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,-1,0,BD_NUM_CNT,BD_LET_CNT));
1022 if ( ! bd_curr_pos )
1023 bd_set_curr_pos("a1");
1025 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,0,1,BD_NUM_CNT,BD_LET_CNT));
1028 case K_KP_DOWNARROW:
1029 if ( ! bd_curr_pos )
1030 bd_set_curr_pos("a3");
1032 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,0,-1,BD_NUM_CNT,BD_LET_CNT));
1036 bd_editor_make_move(minigame, "");
1039 if(bd_change_dozer_angle(minigame))
1042 if(bd_curr_tile > BD_TILE_LAST)
1050 // Required function, handle client events
1051 int bd_client_event(entity minigame, string event, ...)
1057 minigame.message = bd_turn_to_string(minigame.minigame_flags);
1058 bd_set_curr_pos("");
1059 bd_curr_tile = BD_TILE_BRICK1;
1064 if(minigame.minigame_flags & BD_TURN_MOVE)
1066 if(bd_normal_move(minigame, ...(0,int)))
1070 if(minigame.minigame_flags & BD_TURN_EDIT)
1072 if(bd_editor_move(minigame, ...(0,int)))
1078 case "mouse_pressed":
1080 if(minigame.minigame_flags & BD_TURN_EDIT)
1082 if(...(0,int) == K_MOUSE1)
1084 bd_editor_make_move(minigame, "");
1088 if(...(0,int) == K_MOUSE2)
1090 bd_editor_fill(minigame);
1099 if(minigame.minigame_flags & BD_TURN_EDIT)
1101 vector mouse_pos = minigame_hud_normalize(mousepos,bd_boardpos,bd_boardsize);
1102 bd_set_curr_pos(minigame_tile_name(mouse_pos,BD_LET_CNT,BD_NUM_CNT));
1103 if ( ! bd_valid_tile(bd_curr_pos) )
1104 bd_set_curr_pos("");
1108 case "network_receive":
1110 entity sent = ...(0,entity);
1111 int sf = ...(1,int);
1112 if ( sent.classname == "minigame" )
1114 if ( sf & MINIG_SF_UPDATE )
1116 sent.message = bd_turn_to_string(sent.minigame_flags);
1117 //if ( sent.minigame_flags & minigame_self.team )
1121 else if(sent.classname == "minigame_board_piece")
1123 if(sf & MINIG_SF_UPDATE)
1125 int letter = ReadByte();
1126 int number = ReadByte();
1127 if(sent.netname) { strunzone(sent.netname); }
1128 sent.netname = strzone(minigame_tile_buildname(letter, number));
1130 sent.bd_tiletype = ReadByte();
1132 int dx = ReadByte();
1133 int dy = ReadByte();
1135 if(dx == 2) dx = -1;
1136 if(dy == 2) dy = -1;
1143 else if(sent.classname == "minigame_player" && (sf & BD_SF_PLAYERMOVES))
1144 sent.bd_moves = ReadShort(); // make this a byte when possible
1150 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Next Level"),"next");
1151 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Restart"),"restart");
1152 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Editor"),"edit");
1153 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Save"),"save");
1158 if(...(0,string) == "next")
1159 minigame_cmd("next");
1160 if(...(0,string) == "restart")
1161 minigame_cmd("restart");
1162 if(...(0,string) == "edit")
1163 minigame_cmd("edit");
1164 if(...(0,string) == "save")
1165 minigame_cmd("save");