]> de.git.xonotic.org Git - xonotic/xonotic-data.pk3dir.git/blobdiff - qcsrc/common/minigames/minigame/bd.qc
Merge branch 'master' into Mario/overkill
[xonotic/xonotic-data.pk3dir.git] / qcsrc / common / minigames / minigame / bd.qc
index a311005b7fd5ebb377cba2f9c08533d4d60be6ec..09fae55d80ef2f08ab17d8097633646b1a641069 100644 (file)
@@ -1,3 +1,4 @@
+#include "bd.qh"
 REGISTER_MINIGAME(bd, "Bulldozer");
 
 const int BD_TURN_MOVE  = 0x0100; // player must move the bulldozer
@@ -16,7 +17,7 @@ const int BD_TILE_SIZE = 20;
 
 const int BD_TEAMS = 1;
 
-.vector bd_dir;
+.int bd_dir;
 
 .int bd_moves;
 
@@ -41,16 +42,23 @@ const int BD_TILE_BRICK7 = 10;
 const int BD_TILE_BRICK8 = 11;
 const int BD_TILE_LAST = 11;
 
+const int BD_DIR_UP = 0;
+const int BD_DIR_DN = 1;
+const int BD_DIR_LF = 2;
+const int BD_DIR_RT = 3;
+
+#ifdef SVQC
 string autocvar_sv_minigames_bulldozer_startlevel = "level1";
+#endif
 
 // find same game piece given its tile name
 entity bd_find_piece(entity minig, string tile, bool check_target)
 {
-       entity e = world;
+       entity e = NULL;
        while ( ( e = findentity(e,owner,minig) ) )
                if ( e.classname == "minigame_board_piece" && e.netname == tile && ((check_target) ? e.bd_tiletype == BD_TILE_TARGET : e.bd_tiletype != BD_TILE_TARGET) )
                        return e;
-       return world;
+       return NULL;
 }
 
 // check if the tile name is valid (15x15 grid)
@@ -65,17 +73,17 @@ bool bd_valid_tile(string tile)
 
 entity bd_find_dozer(entity minig)
 {
-       entity e = world;
+       entity e = NULL;
        while ( ( e = findentity(e,owner,minig) ) )
                if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
                        return e;
-       return world;
+       return NULL;
 }
 
 void bd_check_winner(entity minig)
 {
        int total = 0, valid = 0;
-       entity e = world;
+       entity e = NULL;
        while ( ( e = findentity(e,owner,minig) ) )
                if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_TARGET )
                {
@@ -91,6 +99,44 @@ void bd_check_winner(entity minig)
        }
 }
 
+vector bd_get_dir(int bdir)
+{
+       switch(bdir)
+       {
+               case BD_DIR_UP: return '0 1 0'; // up
+               default:
+               case BD_DIR_DN: return '0 -1 0'; // down
+               case BD_DIR_LF: return '-1 0 0'; // left
+               case BD_DIR_RT: return '1 0 0'; // right
+       }
+}
+
+string bd_get_dir_name(int bdir)
+{
+       switch(bdir)
+       {
+               case BD_DIR_UP: return "u"; // up
+               default:
+               case BD_DIR_DN: return "d"; // down
+               case BD_DIR_LF: return "l"; // left
+               case BD_DIR_RT: return "r"; // right
+       }
+}
+
+int bd_dir_fromname(string bdir)
+{
+       if(bdir == "up" || bdir == "u")
+               return BD_DIR_UP; // up
+       if(bdir == "down" || bdir == "dn" || bdir == "d")
+               return BD_DIR_DN; /// down
+       if(bdir == "left" || bdir == "lt" || bdir == "l")
+               return BD_DIR_LF; // left
+       if(bdir == "right" || bdir == "rt" || bdir == "r")
+               return BD_DIR_RT; // right
+
+       return BD_DIR_DN; // down
+}
+
 bool bd_canfill(int ttype)
 {
        switch(ttype)
@@ -110,14 +156,16 @@ bool bd_canfill(int ttype)
 
 bool bd_move_dozer(entity minigame, entity dozer)
 {
-       if(!dozer.bd_dir_x && !dozer.bd_dir_y)
-               return false; // nope!
+       //if(!dozer.bd_dir)
+               //return false; // nope!
 
        int myx = minigame_tile_letter(dozer.netname);
        int myy = minigame_tile_number(dozer.netname);
 
-       myx += dozer.bd_dir_x;
-       myy += dozer.bd_dir_y;
+       vector dir = bd_get_dir(dozer.bd_dir);
+
+       myx += dir.x;
+       myy += dir.y;
 
        string newpos = minigame_tile_buildname(myx, myy);
        entity hit = bd_find_piece(minigame, newpos, false);
@@ -143,8 +191,8 @@ bool bd_move_dozer(entity minigame, entity dozer)
                        int tx = minigame_tile_letter(hit.netname);
                        int ty = minigame_tile_number(hit.netname);
 
-                       tx += dozer.bd_dir_x;
-                       ty += dozer.bd_dir_y;
+                       tx += dir.x;
+                       ty += dir.y;
 
                        testpos = minigame_tile_buildname(tx, ty);
                        entity testhit = bd_find_piece(minigame, testpos, false);
@@ -181,26 +229,27 @@ void bd_move(entity minigame, entity player, string dir)
                                return; // should not happen... TODO: end match?
                        }
 
-                       int dxs = 0, dys = 0;
                        string thedir = strtolower(dir);
-                       if(thedir == "up" || thedir == "u") { dxs = 0; dys = 1; }
-                       if(thedir == "down" || thedir == "dn" || thedir == "d") { dxs = 0; dys = -1; }
-                       if(thedir == "left" || thedir == "lt" || thedir == "l") { dxs = -1; dys = 0; }
-                       if(thedir == "right" || thedir == "rt" || thedir == "r") { dxs = 1; dys = 0; }
+                       int bdir = bd_dir_fromname(thedir);
 
-                       int dx = bound(-1, dxs, 1);
-                       int dy = bound(-1, dys, 1);
+                       int moved = 0;
+                       entity e = NULL;
+                       while ( ( e = findentity(e,owner,minigame) ) )
+                               if ( e.classname == "minigame_board_piece" && e.bd_tiletype == BD_TILE_DOZER )
+                               {
+                                       e.bd_dir = bdir;
 
-                       dozer.bd_dir_x = dx;
-                       dozer.bd_dir_y = dy;
-                       dozer.bd_dir_z = 0;
+                                       if(bd_move_dozer(minigame, e))
+                                               ++moved;
 
-                       if(bd_move_dozer(minigame, dozer))
+                                       minigame_server_sendflags(e,MINIG_SF_UPDATE); // update anyway
+                               }
+
+                       if(moved)
                                player.bd_moves++;
 
                        bd_check_winner(minigame);
 
-                       minigame_server_sendflags(dozer,MINIG_SF_UPDATE); // update anyway
                        minigame_server_sendflags(player,BD_SF_PLAYERMOVES);
                        minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
                }
@@ -220,26 +269,17 @@ void bd_editor_place(entity minigame, entity player, string pos, int thetile, st
 
                        if(found_piece.bd_tiletype == BD_TILE_DOZER && thedir != "")
                        {
-                               int dxs = 0, dys = 0;
                                string newdir = strtolower(thedir);
-                               if(newdir == "up" || newdir == "u") { dxs = 0; dys = 1; }
-                               if(newdir == "down" || newdir == "dn" || newdir == "d") { dxs = 0; dys = -1; }
-                               if(newdir == "left" || newdir == "lt" || newdir == "l") { dxs = -1; dys = 0; }
-                               if(newdir == "right" || newdir == "rt" || newdir == "r") { dxs = 1; dys = 0; }
-
-                               int dx = bound(-1, dxs, 1);
-                               int dy = bound(-1, dys, 1);
+                               int bdir = bd_dir_fromname(newdir);
 
-                               found_piece.bd_dir_x = dx;
-                               found_piece.bd_dir_y = dy;
-                               found_piece.bd_dir_z = 0;
+                               found_piece.bd_dir = bdir;
                                minigame_server_sendflags(found_piece,MINIG_SF_UPDATE); // update anyway
                                return;
                        }
 
-                       entity dozer = bd_find_dozer(minigame);
-                       if(dozer && thetile == BD_TILE_DOZER && pos != dozer.netname)
-                               return; // nice try
+                       //entity dozer = bd_find_dozer(minigame);
+                       //if(dozer && thetile == BD_TILE_DOZER && pos != dozer.netname)
+                               //return; // nice try
 
                        if(found_piece || (targ && thetile != BD_TILE_BOULDER))
                        {
@@ -249,7 +289,7 @@ void bd_editor_place(entity minigame, entity player, string pos, int thetile, st
                                        return; // how?!
 
                                if(piece.netname) { strunzone(piece.netname); }
-                               remove(piece);
+                               delete(piece);
                                minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
                                return;
                        }
@@ -258,7 +298,7 @@ void bd_editor_place(entity minigame, entity player, string pos, int thetile, st
                        piece.team = 1;
                        piece.netname = strzone(pos);
                        piece.bd_tiletype = thetile;
-                       piece.bd_dir = '0 -1 0';
+                       piece.bd_dir = 0;
                        minigame_server_sendflags(piece,MINIG_SF_UPDATE);
 
                        minigame_server_sendflags(minigame,MINIG_SF_UPDATE);
@@ -303,12 +343,12 @@ void bd_unfill_recurse(entity minigame, entity player, int thetype, int letter,
        if(targ && thetype == targ.bd_tiletype)
        {
                if(targ.netname) { strunzone(targ.netname); }
-               remove(targ);
+               delete(targ);
        }
        else if(piece && thetype == piece.bd_tiletype)
        {
                if(piece.netname) { strunzone(piece.netname); }
-               remove(piece);
+               delete(piece);
        }
        else return;
 
@@ -320,6 +360,14 @@ void bd_unfill_recurse(entity minigame, entity player, int thetype, int letter,
 
 void bd_do_fill(entity minigame, entity player, string dir, string thetile)
 {
+#ifdef SVQC
+       if(!player.minigame_players.bd_canedit)
+       {
+               sprint(player.minigame_players, "You're not allowed to edit levels, sorry!\n");
+               return;
+       }
+#endif
+
        if(minigame.minigame_flags & BD_TURN_EDIT)
        {
                int thetype = stof(thetile);
@@ -357,7 +405,7 @@ void bd_reset_moves(entity minigame)
 #ifdef SVQC
        for(e = minigame.minigame_players; e; e = e.list_next)
 #elif defined(CSQC)
-       e = world;
+       e = NULL;
        while( (e = findentity(e,owner,minigame)) )
                if ( e.classname == "minigame_player" )
 #endif
@@ -370,12 +418,12 @@ void bd_reset_moves(entity minigame)
 void bd_load_level(entity minigame);
 void bd_setup_pieces(entity minigame)
 {
-       entity e = world;
+       entity e = NULL;
        while( (e = findentity(e, owner, minigame)) )
                if(e.classname == "minigame_board_piece")
                {
                        if(e.netname) { strunzone(e.netname); }
-                       remove(e);
+                       delete(e);
                }
 
        bd_load_level(minigame);
@@ -446,7 +494,7 @@ string bd_save_piece(entity minigame, entity e)
 
        bd_string = strcat(bd_string, "\"", e.netname, "\" ");
        bd_string = strcat(bd_string, ftos(e.bd_tiletype), " ");
-       bd_string = strcat(bd_string, sprintf("\"%.9v\"", e.bd_dir));
+       bd_string = strcat(bd_string, ftos(e.bd_dir));
 
        return bd_string;
 }
@@ -459,6 +507,16 @@ void bd_set_nextlevel(entity minigame, string s)
        minigame.bd_nextlevel = strzone(argv(2));
 }
 
+int bd_fix_dir(vector dir)
+{
+       if(dir.x == 0 && dir.y == 1) { return BD_DIR_UP; } // up
+       if(dir.x == 0 && dir.y == -1) { return BD_DIR_DN; } // down
+       if(dir.x == -1 && dir.y == 0) { return BD_DIR_LF; } // left
+       if(dir.x == 1 && dir.y == 0) { return BD_DIR_RT; } // right
+
+       return BD_DIR_DN; // down if all else fails
+}
+
 entity bd_load_piece(entity minigame, string s)
 {
        // separate pieces between the ; symbols
@@ -468,12 +526,12 @@ entity bd_load_piece(entity minigame, string s)
 
        entity e = msle_spawn(minigame,"minigame_board_piece");
        e.team = 1;
-       e.bd_dir = '0 -1 0';
+       e.bd_dir = 0;
 
        int argv_num = 0;
        e.netname = strzone(argv(argv_num)); ++argv_num;
        e.bd_tiletype = stof(argv(argv_num)); ++argv_num;
-       e.bd_dir = stov(argv(argv_num)); ++argv_num;
+       e.bd_dir = stoi(argv(argv_num)); ++argv_num;
 
        minigame_server_sendflags(e,MINIG_SF_ALL);
 
@@ -485,7 +543,7 @@ bool bd_save_level(entity minigame)
        if(minigame.bd_levelname && minigame.bd_levelname != "")
        {
                int target_count = 0, boulder_count = 0;
-               entity piece = world;
+               entity piece = NULL;
                while((piece = findentity(piece,owner,minigame)))
                if(piece.classname == "minigame_board_piece")
                        if(piece.bd_tiletype == BD_TILE_BOULDER)
@@ -510,7 +568,7 @@ bool bd_save_level(entity minigame)
                if(minigame.bd_nextlevel && minigame.bd_nextlevel != "" && fexists(strcat("minigames/bulldozer/storage_", minigame.bd_nextlevel, ".txt")))
                        fputs(file_get, strcat("nextlevel = \"", minigame.bd_nextlevel, "\"\n"));
 
-               entity e = world;
+               entity e = NULL;
                while ( ( e = findentity(e,owner,minigame) ) )
                if ( e.classname == "minigame_board_piece" )
                {
@@ -561,8 +619,16 @@ void bd_load_level(entity minigame)
        fclose(file_get);
 }
 
-void bd_close_editor(entity minigame)
+void bd_close_editor(entity minigame, entity player)
 {
+#ifdef SVQC
+       if(!player.minigame_players.bd_canedit)
+       {
+               sprint(player.minigame_players, "You're not allowed to edit levels, sorry!\n");
+               return;
+       }
+#endif
+
        entity dozer = bd_find_dozer(minigame);
        if(!dozer)
        {
@@ -595,17 +661,17 @@ int bd_server_event(entity minigame, string event, ...)
                        minigame.bd_levelname = strzone(autocvar_sv_minigames_bulldozer_startlevel);
                        bd_setup_pieces(minigame);
                        minigame.minigame_flags = BD_TURN_MOVE;
-                       
+
                        return true;
                }
                case "end":
                {
-                       entity e = world;
+                       entity e = NULL;
                        while( (e = findentity(e, owner, minigame)) )
                        if(e.classname == "minigame_board_piece")
                        {
                                if(e.netname) { strunzone(e.netname); }
-                               remove(e);
+                               delete(e);
                        }
 
                        if(minigame.bd_nextlevel) { strunzone(minigame.bd_nextlevel); }
@@ -625,7 +691,7 @@ int bd_server_event(entity minigame, string event, ...)
                        switch(argv(0))
                        {
                                case "move":
-                                       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)); 
+                                       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));
                                        return true;
                                case "next":
                                        bd_next_match(minigame,...(0,entity), ((...(1,int) >= 2 ? argv(1) : string_null)));
@@ -637,10 +703,10 @@ int bd_server_event(entity minigame, string event, ...)
                                        bd_activate_editor(minigame,...(0,entity));
                                        return true;
                                case "save":
-                                       bd_close_editor(minigame);
+                                       bd_close_editor(minigame,...(0,entity));
                                        return true;
                                case "fill":
-                                       bd_do_fill(minigame, ...(0,entity), ((...(1,int)) >= 2 ? argv(1) : string_null), ((...(1,int)) >= 3 ? argv(2) : string_null)); 
+                                       bd_do_fill(minigame, ...(0,entity), ((...(1,int)) >= 2 ? argv(1) : string_null), ((...(1,int)) >= 3 ? argv(2) : string_null));
                                        return true;
                        }
 
@@ -660,19 +726,14 @@ int bd_server_event(entity minigame, string event, ...)
 
                                WriteByte(MSG_ENTITY,sent.bd_tiletype);
 
-                               int dx = sent.bd_dir_x;
-                               int dy = sent.bd_dir_y;
-                               if(dx == -1) dx = 2;
-                               if(dy == -1) dy = 2;
-                               WriteByte(MSG_ENTITY,dx);
-                               WriteByte(MSG_ENTITY,dy);
+                               WriteByte(MSG_ENTITY,sent.bd_dir);
                        }
                        else if(sent.classname == "minigame_player" && (sf & BD_SF_PLAYERMOVES))
                                WriteShort(MSG_ENTITY,sent.bd_moves);
                        return false;
                }
        }
-       
+
        return false;
 }
 
@@ -714,7 +775,7 @@ void bd_hud_board(vector pos, vector mySize)
        minigame_hud_fitsqare(pos, mySize);
        bd_boardpos = pos;
        bd_boardsize = mySize;
-       
+
        minigame_hud_simpleboard(pos,mySize,minigame_texture("bd/board"));
 
        vector tile_size = minigame_hud_denormalize_size('1 1 0' / BD_TILE_SIZE,pos,mySize);
@@ -727,13 +788,13 @@ void bd_hud_board(vector pos, vector mySize)
                {
                        if(e.bd_tiletype == BD_TILE_TARGET)
                        {
-                               e.bd_enemy = world;
+                               e.bd_enemy = NULL;
                                e.bd_enemy = bd_find_piece(active_minigame, e.netname, false);
                        }
                        else if(e.bd_tiletype == BD_TILE_BOULDER)
                        {
                                e.bd_hide = false; // reset either way
-                               e.bd_hide = ((bd_find_piece(active_minigame, e.netname, true)) != world);
+                               e.bd_hide = ((bd_find_piece(active_minigame, e.netname, true)) != NULL);
                        }
                }
        }
@@ -751,10 +812,10 @@ void bd_hud_board(vector pos, vector mySize)
                                if(e.bd_enemy)
                                        thepiece = "bd/boulder_target";
 
-                               minigame_drawpic_centered( tile_pos,  
+                               minigame_drawpic_centered( tile_pos,
                                                minigame_texture(thepiece),
                                                tile_size, '1 1 1', panel_fg_alpha, DRAWFLAG_NORMAL );
-                       }       
+                       }
                }
        }
 
@@ -766,12 +827,17 @@ void bd_hud_board(vector pos, vector mySize)
                        tile_pos = minigame_tile_pos(e.netname,BD_NUM_CNT,BD_LET_CNT);
                        tile_pos = minigame_hud_denormalize(tile_pos,pos,mySize);
 
-                       vector thedir = e.bd_dir;
+                       int bdir = e.bd_dir;
                        float theang = 0;
 
-                       if(thedir_y == -1) { theang = M_PI; }
-                       if(thedir_x == 1) { theang = M_PI/2; }
-                       if(thedir_x == -1) { theang = M_PI*3/2; }
+                       switch(bdir)
+                       {
+                               case BD_DIR_UP: theang = 0; break;
+                               default:
+                               case BD_DIR_DN: theang = M_PI; break;
+                               case BD_DIR_LF: theang = M_PI * 3 / 2; break;
+                               case BD_DIR_RT: theang = M_PI / 2; break; 
+                       }
 
                        drawrotpic(tile_pos, theang, minigame_texture("bd/dozer"),
                                                tile_size, tile_size/2, '1 1 1',
@@ -809,17 +875,17 @@ void bd_hud_board(vector pos, vector mySize)
 
                if(active_minigame.minigame_flags & BD_TURN_WIN)
                        victory_text = "Well done! Click 'Next Level' to continue";
-               
+
                vector win_pos = pos+eY*(mySize_y-winfs_y)/2;
                vector win_sz;
                win_sz = minigame_drawcolorcodedstring_wrapped(mySize_x,win_pos,
-                       sprintf("%s", victory_text), 
+                       sprintf("%s", victory_text),
                        winfs, 0, DRAWFLAG_NORMAL, 0.5);
-               
+
                drawfill(win_pos-eY*hud_fontsize_y,win_sz+2*eY*hud_fontsize_y,'0.3 0.3 1',0.8,DRAWFLAG_ADDITIVE);
-               
+
                minigame_drawcolorcodedstring_wrapped(mySize_x,win_pos,
-                       sprintf("%s", victory_text), 
+                       sprintf("%s", victory_text),
                        winfs, panel_fg_alpha, DRAWFLAG_NORMAL, 0.5);
        }
 }
@@ -828,7 +894,7 @@ void bd_hud_board(vector pos, vector mySize)
 // Required function, draw the game status panel
 void bd_hud_status(vector pos, vector mySize)
 {
-       HUD_Panel_DrawBg(1);
+       HUD_Panel_DrawBg();
        vector ts;
        ts = minigame_drawstring_wrapped(mySize_x,pos,active_minigame.descriptor.message,
                hud_fontsize * 2, '0.25 0.47 0.72', panel_fg_alpha, DRAWFLAG_NORMAL,0.5);
@@ -854,7 +920,7 @@ void bd_hud_status(vector pos, vector mySize)
                {
                        mypos = pos;
                        minigame_drawcolorcodedstring_trunc(mySize_x,mypos,
-                               GetPlayerName(e.minigame_playerslot-1),
+                               entcs_GetName(e.minigame_playerslot-1),
                                player_fontsize, panel_fg_alpha, DRAWFLAG_NORMAL);
 
                        mypos_y += player_fontsize_y;
@@ -890,7 +956,7 @@ string bd_turn_to_string(int turnflags)
 
        if ( turnflags & BD_TURN_MOVE )
                return _("Push the boulders onto the targets");
-       
+
        return "";
 }
 
@@ -959,14 +1025,15 @@ bool bd_change_dozer_angle(entity minigame)
        if(!dozer || dozer.bd_tiletype != BD_TILE_DOZER)
                return false;
 
-       string thedir = "";
-       vector dir = dozer.bd_dir;
-       if(dir.x == 0 && dir.y == 0) { thedir = "r"; }
-
-       if(dir.x == 0 && dir.y == 1) { thedir = "r"; }
-       if(dir.x == 0 && dir.y ==-1) { thedir = "l"; }
-       if(dir.x ==-1 && dir.y == 0) { thedir = "u"; }
-       if(dir.x == 1 && dir.y == 0) { thedir = "d"; }
+       switch(dozer.bd_dir)
+       {
+               case BD_DIR_UP: dozer.bd_dir = BD_DIR_LF; break; // up -> left
+               default:
+               case BD_DIR_DN: dozer.bd_dir = BD_DIR_RT; break; // down -> right
+               case BD_DIR_LF: dozer.bd_dir = BD_DIR_DN; break; // left -> down
+               case BD_DIR_RT: dozer.bd_dir = BD_DIR_UP; break; // right -> up
+       }
+       string thedir = bd_get_dir_name(dozer.bd_dir);
 
        bd_editor_make_move(minigame, thedir);
        return true;
@@ -1102,15 +1169,7 @@ int bd_client_event(entity minigame, string event, ...)
 
                                        sent.bd_tiletype = ReadByte();
 
-                                       int dx = ReadByte();
-                                       int dy = ReadByte();
-
-                                       if(dx == 2) dx = -1;
-                                       if(dy == 2) dy = -1;
-
-                                       sent.bd_dir_x = dx;
-                                       sent.bd_dir_y = dy;
-                                       sent.bd_dir_z = 0;
+                                       sent.bd_dir = ReadByte();
                                }
                        }
                        else if(sent.classname == "minigame_player" && (sf & BD_SF_PLAYERMOVES))
@@ -1143,4 +1202,4 @@ int bd_client_event(entity minigame, string event, ...)
        return false;
 }
 
-#endif
\ No newline at end of file
+#endif