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 const int BD_DIR_UP = 0;
46 const int BD_DIR_DN = 1;
47 const int BD_DIR_LF = 2;
48 const int BD_DIR_RT = 3;
51 string autocvar_sv_minigames_bulldozer_startlevel = "level1";
54 // find same game piece given its tile name
55 entity bd_find_piece(entity minig, string tile, bool check_target)
58 while ( ( e = findentity(e,owner,minig) ) )
59 if ( e.classname == "minigame_board_piece" && e.netname == tile && ((check_target) ? e.bd_tiletype == BD_TILE_TARGET : e.bd_tiletype != BD_TILE_TARGET) )
64 // check if the tile name is valid (15x15 grid)
65 bool bd_valid_tile(string tile)
69 int number = minigame_tile_number(tile);
70 int letter = minigame_tile_letter(tile);
71 return 0 <= number && number < BD_NUM_CNT && 0 <= letter && letter < BD_LET_CNT;
74 entity bd_find_dozer(entity minig)
77 while ( ( e = findentity(e,owner,minig) ) )
78 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
83 void bd_check_winner(entity minig)
85 int total = 0, valid = 0;
87 while ( ( e = findentity(e,owner,minig) ) )
88 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_TARGET )
91 if(bd_find_piece(minig, e.netname, false).bd_tiletype == BD_TILE_BOULDER)
97 minig.minigame_flags = BD_TURN_WIN;
98 minigame_server_sendflags(minig,MINIG_SF_UPDATE);
102 vector bd_get_dir(int bdir)
106 case BD_DIR_UP: return '0 1 0'; // up
108 case BD_DIR_DN: return '0 -1 0'; // down
109 case BD_DIR_LF: return '-1 0 0'; // left
110 case BD_DIR_RT: return '1 0 0'; // right
114 string bd_get_dir_name(int bdir)
118 case BD_DIR_UP: return "u"; // up
120 case BD_DIR_DN: return "d"; // down
121 case BD_DIR_LF: return "l"; // left
122 case BD_DIR_RT: return "r"; // right
126 int bd_dir_fromname(string bdir)
128 if(bdir == "up" || bdir == "u")
129 return BD_DIR_UP; // up
130 if(bdir == "down" || bdir == "dn" || bdir == "d")
131 return BD_DIR_DN; /// down
132 if(bdir == "left" || bdir == "lt" || bdir == "l")
133 return BD_DIR_LF; // left
134 if(bdir == "right" || bdir == "rt" || bdir == "r")
135 return BD_DIR_RT; // right
137 return BD_DIR_DN; // down
140 bool bd_canfill(int ttype)
151 case BD_TILE_BRICK1: return true;
157 bool bd_move_dozer(entity minigame, entity dozer)
160 //return false; // nope!
162 int myx = minigame_tile_letter(dozer.netname);
163 int myy = minigame_tile_number(dozer.netname);
165 vector dir = bd_get_dir(dozer.bd_dir);
170 string newpos = minigame_tile_buildname(myx, myy);
171 entity hit = bd_find_piece(minigame, newpos, false);
173 if(!bd_valid_tile(newpos))
177 switch(hit.bd_tiletype)
179 case BD_TILE_DOZER: // wtf, but let's do this incase
187 case BD_TILE_BRICK1: return false;
188 case BD_TILE_BOULDER:
191 int tx = minigame_tile_letter(hit.netname);
192 int ty = minigame_tile_number(hit.netname);
197 testpos = minigame_tile_buildname(tx, ty);
198 entity testhit = bd_find_piece(minigame, testpos, false);
200 if(!bd_valid_tile(testpos) || testhit)
203 if(hit.netname) { strunzone(hit.netname); }
204 hit.netname = strzone(testpos);
205 minigame_server_sendflags(hit,MINIG_SF_UPDATE);
210 if(dozer.netname) { strunzone(dozer.netname); }
211 dozer.netname = strzone(newpos);
217 void bd_move(entity minigame, entity player, string dir)
219 if ( minigame.minigame_flags & BD_TURN_MOVE )
222 //if ( bd_valid_tile(pos) )
223 //if ( bd_find_piece(minigame, pos, false) )
225 entity dozer = bd_find_dozer(minigame);
228 LOG_INFO("Dozer wasn't found!\n");
229 return; // should not happen... TODO: end match?
232 string thedir = strtolower(dir);
233 int bdir = bd_dir_fromname(thedir);
237 while ( ( e = findentity(e,owner,minigame) ) )
238 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
242 if(bd_move_dozer(minigame, e))
245 minigame_server_sendflags(e,MINIG_SF_UPDATE); // update anyway
251 bd_check_winner(minigame);
253 minigame_server_sendflags(player,BD_SF_PLAYERMOVES);
254 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
260 void bd_editor_place(entity minigame, entity player, string pos, int thetile, string thedir)
262 if ( minigame.minigame_flags & BD_TURN_EDIT )
263 if ( pos && thetile )
265 if ( bd_valid_tile(pos) )
267 entity found_piece = bd_find_piece(minigame, pos, false);
268 entity targ = bd_find_piece(minigame, pos, true);
270 if(found_piece.bd_tiletype == BD_TILE_DOZER && thedir != "")
272 string newdir = strtolower(thedir);
273 int bdir = bd_dir_fromname(newdir);
275 found_piece.bd_dir = bdir;
276 minigame_server_sendflags(found_piece,MINIG_SF_UPDATE); // update anyway
280 //entity dozer = bd_find_dozer(minigame);
281 //if(dozer && thetile == BD_TILE_DOZER && pos != dozer.netname)
282 //return; // nice try
284 if(found_piece || (targ && thetile != BD_TILE_BOULDER))
286 entity piece = bd_find_piece(minigame, pos, false);
287 if(!piece) piece = bd_find_piece(minigame, pos, true);
291 if(piece.netname) { strunzone(piece.netname); }
293 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
297 entity piece = msle_spawn(minigame,"minigame_board_piece");
299 piece.netname = strzone(pos);
300 piece.bd_tiletype = thetile;
302 minigame_server_sendflags(piece,MINIG_SF_UPDATE);
304 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
309 void bd_do_move(entity minigame, entity player, string dir, string thetile, string thedir)
311 if(minigame.minigame_flags & BD_TURN_MOVE)
312 bd_move(minigame, player, dir);
314 if(minigame.minigame_flags & BD_TURN_EDIT)
315 bd_editor_place(minigame, player, dir, stof(thetile), thedir);
318 void bd_fill_recurse(entity minigame, entity player, int thetype, int letter, int number)
320 string pos = minigame_tile_buildname(letter,number);
321 if(!bd_valid_tile(pos))
323 if(bd_find_piece(minigame, pos, false) || bd_find_piece(minigame, pos, true))
326 bd_editor_place(minigame, player, pos, thetype, "");
328 bd_fill_recurse(minigame, player, thetype, letter - 1, number);
329 bd_fill_recurse(minigame, player, thetype, letter + 1, number);
330 bd_fill_recurse(minigame, player, thetype, letter, number - 1);
331 bd_fill_recurse(minigame, player, thetype, letter, number + 1);
334 void bd_unfill_recurse(entity minigame, entity player, int thetype, int letter, int number)
336 string pos = minigame_tile_buildname(letter,number);
337 if(!bd_valid_tile(pos))
340 entity targ = bd_find_piece(minigame, pos, true);
341 entity piece = bd_find_piece(minigame, pos, false);
343 if(targ && thetype == targ.bd_tiletype)
345 if(targ.netname) { strunzone(targ.netname); }
348 else if(piece && thetype == piece.bd_tiletype)
350 if(piece.netname) { strunzone(piece.netname); }
355 bd_unfill_recurse(minigame, player, thetype, letter - 1, number);
356 bd_unfill_recurse(minigame, player, thetype, letter + 1, number);
357 bd_unfill_recurse(minigame, player, thetype, letter, number - 1);
358 bd_unfill_recurse(minigame, player, thetype, letter, number + 1);
361 void bd_do_fill(entity minigame, entity player, string dir, string thetile)
364 if(!player.minigame_players.bd_canedit)
366 sprint(player.minigame_players, "You're not allowed to edit levels, sorry!\n");
371 if(minigame.minigame_flags & BD_TURN_EDIT)
373 int thetype = stof(thetile);
375 entity targ = bd_find_piece(minigame, dir, true);
376 entity piece = bd_find_piece(minigame, dir, false);
378 if(!bd_canfill(thetype) || (piece || targ))
382 if(targ) { killtype = targ.bd_tiletype; }
383 if(piece) { killtype = piece.bd_tiletype; }
387 int letter = minigame_tile_letter(dir);
388 int number = minigame_tile_number(dir);
389 bd_unfill_recurse(minigame, player, killtype, letter, number);
395 int letter = minigame_tile_letter(dir);
396 int number = minigame_tile_number(dir);
398 bd_fill_recurse(minigame, player, thetype, letter, number);
402 void bd_reset_moves(entity minigame)
406 for(e = minigame.minigame_players; e; e = e.list_next)
409 while( (e = findentity(e,owner,minigame)) )
410 if ( e.classname == "minigame_player" )
414 minigame_server_sendflags(e,BD_SF_PLAYERMOVES);
418 void bd_load_level(entity minigame);
419 void bd_setup_pieces(entity minigame)
422 while( (e = findentity(e, owner, minigame)) )
423 if(e.classname == "minigame_board_piece")
425 if(e.netname) { strunzone(e.netname); }
429 bd_load_level(minigame);
432 void bd_do_next_match(entity minigame, entity player)
434 minigame.minigame_flags = BD_TURN_MOVE;
435 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
437 if(minigame.bd_nextlevel && minigame.bd_nextlevel != "")
439 if(minigame.bd_levelname) { strunzone(minigame.bd_levelname); }
440 minigame.bd_levelname = strzone(minigame.bd_nextlevel);
443 bd_setup_pieces(minigame);
445 bd_reset_moves(minigame);
448 void bd_set_next_match(entity minigame, string next)
450 if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
451 minigame.bd_nextlevel = strzone(next);
454 void bd_next_match(entity minigame, entity player, string next)
456 if(minigame.minigame_flags & BD_TURN_WIN)
457 bd_do_next_match(minigame, player);
458 if(minigame.minigame_flags & BD_TURN_EDIT)
459 bd_set_next_match(minigame, next);
462 // request a new match
463 void bd_restart_match(entity minigame, entity player)
465 minigame.minigame_flags = BD_TURN_MOVE;
466 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
468 bd_setup_pieces(minigame);
470 bd_reset_moves(minigame);
473 void bd_activate_editor(entity minigame, entity player)
476 if(!player.minigame_players.bd_canedit)
478 sprint(player.minigame_players, "You're not allowed to edit levels, sorry!\n");
483 minigame.minigame_flags = BD_TURN_EDIT;
484 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
486 bd_reset_moves(minigame);
488 bd_setup_pieces(minigame);
491 string bd_save_piece(entity minigame, entity e)
493 string bd_string = "";
495 bd_string = strcat(bd_string, "\"", e.netname, "\" ");
496 bd_string = strcat(bd_string, ftos(e.bd_tiletype), " ");
497 bd_string = strcat(bd_string, ftos(e.bd_dir));
502 void bd_set_nextlevel(entity minigame, string s)
506 if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
507 minigame.bd_nextlevel = strzone(argv(2));
510 int bd_fix_dir(vector dir)
512 if(dir.x == 0 && dir.y == 1) { return BD_DIR_UP; } // up
513 if(dir.x == 0 && dir.y == -1) { return BD_DIR_DN; } // down
514 if(dir.x == -1 && dir.y == 0) { return BD_DIR_LF; } // left
515 if(dir.x == 1 && dir.y == 0) { return BD_DIR_RT; } // right
517 return BD_DIR_DN; // down if all else fails
520 entity bd_load_piece(entity minigame, string s)
522 // separate pieces between the ; symbols
523 string bd_string = s;
525 tokenize_console(bd_string);
527 entity e = msle_spawn(minigame,"minigame_board_piece");
532 e.netname = strzone(argv(argv_num)); ++argv_num;
533 e.bd_tiletype = stof(argv(argv_num)); ++argv_num;
534 e.bd_dir = stoi(argv(argv_num)); ++argv_num;
536 minigame_server_sendflags(e,MINIG_SF_ALL);
541 bool bd_save_level(entity minigame)
543 if(minigame.bd_levelname && minigame.bd_levelname != "")
545 int target_count = 0, boulder_count = 0;
547 while((piece = findentity(piece,owner,minigame)))
548 if(piece.classname == "minigame_board_piece")
549 if(piece.bd_tiletype == BD_TILE_BOULDER)
551 else if(piece.bd_tiletype == BD_TILE_TARGET)
554 if(boulder_count != target_count)
556 LOG_INFO("Not enough targets or boulders, fix your level!\n");
560 // saves all objects to the database file
564 file_name = strcat("minigames/bulldozer/storage_", minigame.bd_levelname, ".txt");
565 file_get = fopen(file_name, FILE_WRITE);
566 fputs(file_get, strcat("// bulldozer storage \"", minigame.bd_levelname, "\" last updated ", strftime(true, "%d-%m-%Y %H:%M:%S"), "\n"));
568 if(minigame.bd_nextlevel && minigame.bd_nextlevel != "" && fexists(strcat("minigames/bulldozer/storage_", minigame.bd_nextlevel, ".txt")))
569 fputs(file_get, strcat("nextlevel = \"", minigame.bd_nextlevel, "\"\n"));
572 while ( ( e = findentity(e,owner,minigame) ) )
573 if ( e.classname == "minigame_board_piece" )
575 // use a line of text for each object, listing all properties
576 fputs(file_get, strcat(bd_save_piece(minigame, e), "\n"));
586 void bd_load_level(entity minigame)
588 // loads all items from the database file
589 string file_read, file_name;
592 file_name = strcat("minigames/bulldozer/storage_", minigame.bd_levelname, ".txt");
593 file_get = fopen(file_name, FILE_READ);
596 LOG_INFO("^3BULLDOZER: ^7could not find storage file ^3", file_name, "^7, no items were loaded\n");
602 file_read = fgets(file_get);
605 if(substring(file_read, 0, 2) == "//")
607 if(substring(file_read, 0, 1) == "#")
609 if(substring(file_read, 0, 9) == "nextlevel")
611 bd_set_nextlevel(minigame, file_read);
616 e = bd_load_piece(minigame, file_read);
622 void bd_close_editor(entity minigame, entity player)
625 if(!player.minigame_players.bd_canedit)
627 sprint(player.minigame_players, "You're not allowed to edit levels, sorry!\n");
632 entity dozer = bd_find_dozer(minigame);
635 LOG_INFO("You need to place a bulldozer on the level to save it!\n");
639 if(bd_save_level(minigame))
641 minigame.minigame_flags = BD_TURN_MOVE;
642 minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
646 LOG_INFO("You need to set the level name!\n");
653 // required function, handle server side events
654 int bd_server_event(entity minigame, string event, ...)
660 if(minigame.bd_levelname) { strunzone(minigame.bd_levelname); }
661 minigame.bd_levelname = strzone(autocvar_sv_minigames_bulldozer_startlevel);
662 bd_setup_pieces(minigame);
663 minigame.minigame_flags = BD_TURN_MOVE;
670 while( (e = findentity(e, owner, minigame)) )
671 if(e.classname == "minigame_board_piece")
673 if(e.netname) { strunzone(e.netname); }
677 if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
678 if(minigame.bd_levelname) { strunzone(minigame.bd_levelname); }
683 int pl_num = minigame_count_players(minigame);
685 if(pl_num >= BD_TEAMS) { return false; }
694 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));
697 bd_next_match(minigame,...(0,entity), ((...(1,int) >= 2 ? argv(1) : string_null)));
700 bd_restart_match(minigame,...(0,entity));
703 bd_activate_editor(minigame,...(0,entity));
706 bd_close_editor(minigame,...(0,entity));
709 bd_do_fill(minigame, ...(0,entity), ((...(1,int)) >= 2 ? argv(1) : string_null), ((...(1,int)) >= 3 ? argv(2) : string_null));
717 entity sent = ...(0,entity);
719 if ( sent.classname == "minigame_board_piece" && (sf & MINIG_SF_UPDATE) )
721 int letter = minigame_tile_letter(sent.netname);
722 int number = minigame_tile_number(sent.netname);
724 WriteByte(MSG_ENTITY,letter);
725 WriteByte(MSG_ENTITY,number);
727 WriteByte(MSG_ENTITY,sent.bd_tiletype);
729 WriteByte(MSG_ENTITY,sent.bd_dir);
731 else if(sent.classname == "minigame_player" && (sf & BD_SF_PLAYERMOVES))
732 WriteShort(MSG_ENTITY,sent.bd_moves);
749 vector bd_boardpos; // HUD board position
750 vector bd_boardsize;// HUD board size
752 string bd_get_tile_pic(int tileid)
756 case BD_TILE_BOULDER: return "bd/boulder";
757 case BD_TILE_BRICK1: return "bd/brick1";
758 case BD_TILE_BRICK2: return "bd/brick2";
759 case BD_TILE_BRICK3: return "bd/brick3";
760 case BD_TILE_BRICK4: return "bd/brick4";
761 case BD_TILE_BRICK5: return "bd/brick5";
762 case BD_TILE_BRICK6: return "bd/brick6";
763 case BD_TILE_BRICK7: return "bd/brick7";
764 case BD_TILE_BRICK8: return "bd/brick8";
765 case BD_TILE_TARGET: return "bd/target";
766 case BD_TILE_DOZER: return "bd/dozer";
772 // Required function, draw the game board
773 void bd_hud_board(vector pos, vector mySize)
775 minigame_hud_fitsqare(pos, mySize);
777 bd_boardsize = mySize;
779 minigame_hud_simpleboard(pos,mySize,minigame_texture("bd/board"));
781 vector tile_size = minigame_hud_denormalize_size('1 1 0' / BD_TILE_SIZE,pos,mySize);
785 FOREACH_MINIGAME_ENTITY(e)
787 if(e.classname == "minigame_board_piece")
789 if(e.bd_tiletype == BD_TILE_TARGET)
792 e.bd_enemy = bd_find_piece(active_minigame, e.netname, false);
794 else if(e.bd_tiletype == BD_TILE_BOULDER)
796 e.bd_hide = false; // reset either way
797 e.bd_hide = ((bd_find_piece(active_minigame, e.netname, true)) != NULL);
801 FOREACH_MINIGAME_ENTITY(e)
803 if ( e.classname == "minigame_board_piece" )
805 if(e.bd_tiletype != BD_TILE_DOZER && !e.bd_hide) // hide boulders
807 tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
808 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
810 string thepiece = bd_get_tile_pic(e.bd_tiletype);
813 thepiece = "bd/boulder_target";
815 minigame_drawpic_centered( tile_pos,
816 minigame_texture(thepiece),
817 tile_size, '1 1 1', panel_fg_alpha, DRAWFLAG_NORMAL );
822 // draw dozers on top, always
823 FOREACH_MINIGAME_ENTITY(e)
825 if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
827 tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
828 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
835 case BD_DIR_UP: theang = 0; break;
837 case BD_DIR_DN: theang = M_PI; break;
838 case BD_DIR_LF: theang = M_PI * 3 / 2; break;
839 case BD_DIR_RT: theang = M_PI / 2; break;
842 drawrotpic(tile_pos, theang, minigame_texture("bd/dozer"),
843 tile_size, tile_size/2, '1 1 1',
844 panel_fg_alpha, DRAWFLAG_NORMAL );
848 if(active_minigame.minigame_flags & BD_TURN_EDIT)
849 if(bd_valid_tile(bd_curr_pos))
851 entity piece = bd_find_piece(active_minigame, bd_curr_pos, false);
852 entity targ = bd_find_piece(active_minigame, bd_curr_pos, true);
853 string thepiece = ((piece || (targ && bd_curr_tile != BD_TILE_BOULDER)) ? "bd/delete" : bd_get_tile_pic(bd_curr_tile));
855 tile_pos = minigame_tile_pos(bd_curr_pos,BD_LET_CNT,BD_NUM_CNT);
856 tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
857 if(bd_curr_tile == BD_TILE_DOZER)
859 drawrotpic(tile_pos, M_PI, minigame_texture("bd/dozer"),
860 tile_size, tile_size/2, '1 1 1',
861 panel_fg_alpha/2, DRAWFLAG_NORMAL );
865 minigame_drawpic_centered( tile_pos,
866 minigame_texture(thepiece),
867 tile_size, '1 1 1', panel_fg_alpha/2, DRAWFLAG_NORMAL );
871 if ( (active_minigame.minigame_flags & BD_TURN_LOSS) || (active_minigame.minigame_flags & BD_TURN_WIN) )
873 vector winfs = hud_fontsize*2;
874 string victory_text = "Game over!";
876 if(active_minigame.minigame_flags & BD_TURN_WIN)
877 victory_text = "Well done! Click 'Next Level' to continue";
879 vector win_pos = pos+eY*(mySize_y-winfs_y)/2;
881 win_sz = minigame_drawcolorcodedstring_wrapped(mySize_x,win_pos,
882 sprintf("%s", victory_text),
883 winfs, 0, DRAWFLAG_NORMAL, 0.5);
885 drawfill(win_pos-eY*hud_fontsize_y,win_sz+2*eY*hud_fontsize_y,'0.3 0.3 1',0.8,DRAWFLAG_ADDITIVE);
887 minigame_drawcolorcodedstring_wrapped(mySize_x,win_pos,
888 sprintf("%s", victory_text),
889 winfs, panel_fg_alpha, DRAWFLAG_NORMAL, 0.5);
894 // Required function, draw the game status panel
895 void bd_hud_status(vector pos, vector mySize)
899 ts = minigame_drawstring_wrapped(mySize_x,pos,active_minigame.descriptor.message,
900 hud_fontsize * 2, '0.25 0.47 0.72', panel_fg_alpha, DRAWFLAG_NORMAL,0.5);
905 vector player_fontsize = hud_fontsize * 1.75;
906 ts_y = ( mySize_y - 2*player_fontsize_y ) / BD_TEAMS;
909 vector tile_size = '48 48 0';
912 drawfill(mypos,eX*mySize_x+eY*player_fontsize_y,'1 1 1',0.5,DRAWFLAG_ADDITIVE);
913 mypos_y += player_fontsize_y;
914 drawfill(mypos,eX*mySize_x+eY*tile_size_y,'1 1 1',0.25,DRAWFLAG_ADDITIVE);
917 FOREACH_MINIGAME_ENTITY(e)
919 if ( e.classname == "minigame_player" )
922 minigame_drawcolorcodedstring_trunc(mySize_x,mypos,
923 entcs_GetName(e.minigame_playerslot-1),
924 player_fontsize, panel_fg_alpha, DRAWFLAG_NORMAL);
926 mypos_y += player_fontsize_y;
927 string thepiece = "bd/dozer";
928 if(active_minigame.minigame_flags & BD_TURN_EDIT)
929 thepiece = bd_get_tile_pic(bd_curr_tile);
931 minigame_texture(thepiece),
932 tile_size * 0.7, '1 1 1', panel_fg_alpha, DRAWFLAG_NORMAL );
934 mypos_x += tile_size_x;
936 drawstring(mypos,ftos(e.bd_moves),tile_size,
937 '0.7 0.84 1', panel_fg_alpha, DRAWFLAG_NORMAL);
942 // Turn a set of flags into a help message
943 string bd_turn_to_string(int turnflags)
945 if ( turnflags & BD_TURN_LOSS )
946 return _("Better luck next time!");
948 if ( turnflags & BD_TURN_WIN )
950 return _("Tubular! Press \"Next Level\" to continue!");
952 return _("Wicked! Press \"Next Level\" to continue!");
954 if( turnflags & BD_TURN_EDIT )
955 return _("Press the space bar to change your currently selected tile");
957 if ( turnflags & BD_TURN_MOVE )
958 return _("Push the boulders onto the targets");
963 // Make the correct move
964 void bd_make_move(entity minigame, string dir)
966 if ( minigame.minigame_flags == BD_TURN_MOVE )
968 minigame_cmd("move ", dir);
972 void bd_editor_make_move(entity minigame, string dir)
974 if ( minigame.minigame_flags == BD_TURN_EDIT )
976 minigame_cmd("move ", bd_curr_pos, " ", ftos(bd_curr_tile), " ", dir);
980 void bd_editor_fill(entity minigame)
982 if ( minigame.minigame_flags == BD_TURN_EDIT )
984 minigame_cmd("fill ", bd_curr_pos, " ", ftos(bd_curr_tile));
988 void bd_set_curr_pos(string s)
991 strunzone(bd_curr_pos);
997 bool bd_normal_move(entity minigame, int themove)
1002 case K_KP_RIGHTARROW:
1003 bd_make_move(minigame, "r");
1006 case K_KP_LEFTARROW:
1007 bd_make_move(minigame, "l");
1011 bd_make_move(minigame, "u");
1014 case K_KP_DOWNARROW:
1015 bd_make_move(minigame, "d");
1022 bool bd_change_dozer_angle(entity minigame)
1024 entity dozer = bd_find_piece(minigame, bd_curr_pos, false);
1025 if(!dozer || dozer.bd_tiletype != BD_TILE_DOZER)
1028 switch(dozer.bd_dir)
1030 case BD_DIR_UP: dozer.bd_dir = BD_DIR_LF; break; // up -> left
1032 case BD_DIR_DN: dozer.bd_dir = BD_DIR_RT; break; // down -> right
1033 case BD_DIR_LF: dozer.bd_dir = BD_DIR_DN; break; // left -> down
1034 case BD_DIR_RT: dozer.bd_dir = BD_DIR_UP; break; // right -> up
1036 string thedir = bd_get_dir_name(dozer.bd_dir);
1038 bd_editor_make_move(minigame, thedir);
1042 bool bd_editor_move(entity minigame, int themove)
1047 case K_KP_RIGHTARROW:
1048 if ( ! bd_curr_pos )
1049 bd_set_curr_pos("a3");
1051 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,1,0,BD_NUM_CNT,BD_LET_CNT));
1054 case K_KP_LEFTARROW:
1055 if ( ! bd_curr_pos )
1056 bd_set_curr_pos("c3");
1058 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,-1,0,BD_NUM_CNT,BD_LET_CNT));
1062 if ( ! bd_curr_pos )
1063 bd_set_curr_pos("a1");
1065 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,0,1,BD_NUM_CNT,BD_LET_CNT));
1068 case K_KP_DOWNARROW:
1069 if ( ! bd_curr_pos )
1070 bd_set_curr_pos("a3");
1072 bd_set_curr_pos(minigame_relative_tile(bd_curr_pos,0,-1,BD_NUM_CNT,BD_LET_CNT));
1076 bd_editor_make_move(minigame, "");
1079 if(bd_change_dozer_angle(minigame))
1082 if(bd_curr_tile > BD_TILE_LAST)
1090 // Required function, handle client events
1091 int bd_client_event(entity minigame, string event, ...)
1097 minigame.message = bd_turn_to_string(minigame.minigame_flags);
1098 bd_set_curr_pos("");
1099 bd_curr_tile = BD_TILE_BRICK1;
1104 if(minigame.minigame_flags & BD_TURN_MOVE)
1106 if(bd_normal_move(minigame, ...(0,int)))
1110 if(minigame.minigame_flags & BD_TURN_EDIT)
1112 if(bd_editor_move(minigame, ...(0,int)))
1118 case "mouse_pressed":
1120 if(minigame.minigame_flags & BD_TURN_EDIT)
1122 if(...(0,int) == K_MOUSE1)
1124 bd_editor_make_move(minigame, "");
1128 if(...(0,int) == K_MOUSE2)
1130 bd_editor_fill(minigame);
1139 if(minigame.minigame_flags & BD_TURN_EDIT)
1141 vector mouse_pos = minigame_hud_normalize(mousepos,bd_boardpos,bd_boardsize);
1142 bd_set_curr_pos(minigame_tile_name(mouse_pos,BD_LET_CNT,BD_NUM_CNT));
1143 if ( ! bd_valid_tile(bd_curr_pos) )
1144 bd_set_curr_pos("");
1148 case "network_receive":
1150 entity sent = ...(0,entity);
1151 int sf = ...(1,int);
1152 if ( sent.classname == "minigame" )
1154 if ( sf & MINIG_SF_UPDATE )
1156 sent.message = bd_turn_to_string(sent.minigame_flags);
1157 //if ( sent.minigame_flags & minigame_self.team )
1161 else if(sent.classname == "minigame_board_piece")
1163 if(sf & MINIG_SF_UPDATE)
1165 int letter = ReadByte();
1166 int number = ReadByte();
1167 if(sent.netname) { strunzone(sent.netname); }
1168 sent.netname = strzone(minigame_tile_buildname(letter, number));
1170 sent.bd_tiletype = ReadByte();
1172 sent.bd_dir = ReadByte();
1175 else if(sent.classname == "minigame_player" && (sf & BD_SF_PLAYERMOVES))
1176 sent.bd_moves = ReadShort(); // make this a byte when possible
1182 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Next Level"),"next");
1183 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Restart"),"restart");
1184 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Editor"),"edit");
1185 HUD_MinigameMenu_CustomEntry(...(0,entity),_("Save"),"save");
1190 if(...(0,string) == "next")
1191 minigame_cmd("next");
1192 if(...(0,string) == "restart")
1193 minigame_cmd("restart");
1194 if(...(0,string) == "edit")
1195 minigame_cmd("edit");
1196 if(...(0,string) == "save")
1197 minigame_cmd("save");