1 | /* |
1 | /* |
2 | * This file is part of Crossfire TRT, the Roguelike Realtime MORPG. |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
3 | * |
3 | * |
4 | * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team |
4 | * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team |
5 | * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
7 | * |
7 | * |
8 | * Crossfire TRT is free software: you can redistribute it and/or modify |
8 | * Deliantra is free software: you can redistribute it and/or modify |
9 | * it under the terms of the GNU General Public License as published by |
9 | * it under the terms of the GNU General Public License as published by |
10 | * the Free Software Foundation, either version 3 of the License, or |
10 | * the Free Software Foundation, either version 3 of the License, or |
11 | * (at your option) any later version. |
11 | * (at your option) any later version. |
12 | * |
12 | * |
13 | * This program is distributed in the hope that it will be useful, |
13 | * This program is distributed in the hope that it will be useful, |
… | |
… | |
16 | * GNU General Public License for more details. |
16 | * GNU General Public License for more details. |
17 | * |
17 | * |
18 | * You should have received a copy of the GNU General Public License |
18 | * You should have received a copy of the GNU General Public License |
19 | * along with this program. If not, see <http://www.gnu.org/licenses/>. |
19 | * along with this program. If not, see <http://www.gnu.org/licenses/>. |
20 | * |
20 | * |
21 | * The authors can be reached via e-mail to <crossfire@schmorp.de> |
21 | * The authors can be reached via e-mail to <support@deliantra.net> |
22 | */ |
22 | */ |
23 | |
23 | |
24 | /** |
24 | /** |
25 | * \file |
25 | * \file |
26 | * Client/server logic. |
26 | * Client/server logic. |
… | |
… | |
800 | tag_t tag = net_uint32 ((uint8 *)data + 1); |
800 | tag_t tag = net_uint32 ((uint8 *)data + 1); |
801 | object *op = esrv_get_ob_from_count (pl->ob, tag); |
801 | object *op = esrv_get_ob_from_count (pl->ob, tag); |
802 | |
802 | |
803 | if (!op) |
803 | if (!op) |
804 | { |
804 | { |
805 | new_draw_info (NDI_UNIQUE, 0, pl->ob, "Could not find object to lock/unlock"); |
805 | pl->failmsg ("Could not find object to lock/unlock"); |
806 | return; |
806 | return; |
807 | } |
807 | } |
808 | |
808 | |
809 | if (!flag) |
809 | if (!flag) |
810 | CLEAR_FLAG (op, FLAG_INV_LOCKED); |
810 | CLEAR_FLAG (op, FLAG_INV_LOCKED); |
… | |
… | |
821 | tag_t tag = net_uint32 ((uint8 *)data); |
821 | tag_t tag = net_uint32 ((uint8 *)data); |
822 | object *op = esrv_get_ob_from_count (pl->ob, tag); |
822 | object *op = esrv_get_ob_from_count (pl->ob, tag); |
823 | |
823 | |
824 | if (!op) |
824 | if (!op) |
825 | { |
825 | { |
826 | new_draw_info (NDI_UNIQUE, 0, pl->ob, "Could not find object to mark"); |
826 | pl->failmsg ("Could not find object to mark"); |
827 | return; |
827 | return; |
828 | } |
828 | } |
829 | |
829 | |
830 | pl->mark = op; |
830 | pl->mark = op; |
831 | new_draw_info_format (NDI_UNIQUE, 0, pl->ob, "Marked item %s", query_name (op)); |
831 | pl->ob->statusmsg (format ("Marked item %s", query_name (op))); |
832 | } |
832 | } |
833 | |
833 | |
834 | /** |
834 | /** |
835 | * look_at prints items on the specified square. |
835 | * look_at prints items on the specified square. |
836 | * |
836 | * |
… | |
… | |
838 | * Tero.Haatanen@lut.fi ] |
838 | * Tero.Haatanen@lut.fi ] |
839 | */ |
839 | */ |
840 | static void |
840 | static void |
841 | look_at (player *pl, int dx, int dy) |
841 | look_at (player *pl, int dx, int dy) |
842 | { |
842 | { |
|
|
843 | dynbuf_text buf; |
843 | object *ob = pl->ob; |
844 | object *ob = pl->ob; |
844 | |
845 | |
845 | maptile *m = pl->observe->map; |
846 | if (!pl->observe->map) |
846 | sint16 x = pl->observe->x + dx; |
|
|
847 | sint16 y = pl->observe->y + dy; |
|
|
848 | |
|
|
849 | if (!m) |
|
|
850 | return; |
847 | return; |
851 | |
848 | |
852 | if (!xy_normalise (m, x, y)) |
849 | mapxy pos (pl->observe); |
853 | { |
850 | pos.move (dx, dy); |
854 | new_draw_info (NDI_UNIQUE, 0, ob, "You see nothing there."); |
|
|
855 | return; |
|
|
856 | } |
|
|
857 | |
851 | |
858 | int flag = 0; |
852 | if (pos.normalise ()) |
859 | |
|
|
860 | for (object *tmp = m->at (x, y).top; tmp; tmp = tmp->below) |
853 | for (object *tmp = pos->top; tmp; tmp = tmp->below) |
861 | { |
854 | { |
862 | if (tmp->invisible && !QUERY_FLAG (ob, FLAG_WIZ)) |
855 | if (tmp->invisible && !QUERY_FLAG (ob, FLAG_WIZ)) |
863 | continue; |
856 | continue; |
864 | |
857 | |
865 | if (!flag) |
|
|
866 | { |
|
|
867 | if (dx || dy) |
|
|
868 | new_draw_info (NDI_UNIQUE, 0, ob, "There you see:"); |
|
|
869 | else |
|
|
870 | new_draw_info (NDI_UNIQUE, 0, ob, "You see:"); |
|
|
871 | |
|
|
872 | flag = 1; |
|
|
873 | } |
|
|
874 | |
|
|
875 | if (QUERY_FLAG (ob, FLAG_WIZ)) |
858 | if (QUERY_FLAG (ob, FLAG_WIZ)) |
876 | new_draw_info_format (NDI_UNIQUE, 0, ob, "- %s (%d).", query_name (tmp), tmp->count); |
859 | buf.printf ("- %s (%d).\n", query_name (tmp), tmp->count); |
877 | else |
860 | else |
878 | new_draw_info_format (NDI_UNIQUE, 0, ob, "- %s.", query_name (tmp)); |
861 | buf.printf ("- %s.\n", query_name (tmp)); |
879 | |
862 | |
880 | if (((tmp->inv != NULL || (tmp->head && tmp->head->inv)) && |
863 | object *head = tmp->head_ (); |
881 | (tmp->type != CONTAINER && tmp->type != FLESH)) || QUERY_FLAG (ob, FLAG_WIZ)) |
|
|
882 | inventory (ob, tmp->head == NULL ? tmp : tmp->head); |
|
|
883 | |
864 | |
|
|
865 | if (head->inv) |
|
|
866 | if ((head->type != CONTAINER && head->type != FLESH) |
|
|
867 | || QUERY_FLAG (ob, FLAG_WIZ)) |
|
|
868 | buf << head->query_inventory (ob, " "); |
|
|
869 | |
884 | if (QUERY_FLAG (tmp, FLAG_IS_FLOOR) && !QUERY_FLAG (ob, FLAG_WIZ)) /* don't continue under the floor */ |
870 | if (QUERY_FLAG (tmp, FLAG_IS_FLOOR) && !QUERY_FLAG (ob, FLAG_WIZ)) /* don't continue under the floor */ |
885 | break; |
871 | break; |
886 | } |
872 | } |
887 | |
873 | |
888 | if (!flag) |
874 | if (buf.empty ()) |
889 | { |
875 | pl->failmsg ("You see nothing there."); |
890 | if (dx || dy) |
|
|
891 | new_draw_info (NDI_UNIQUE, 0, ob, "You see nothing there."); |
|
|
892 | else |
876 | else |
893 | new_draw_info (NDI_UNIQUE, 0, ob, "You see nothing."); |
877 | pl->infobox (MSG_CHANNEL ("lookat"), buf); |
894 | } |
|
|
895 | } |
878 | } |
896 | |
879 | |
897 | /** Client wants to look at some object. Lets do so. */ |
880 | /** Client wants to look at some object. Lets do so. */ |
898 | void |
881 | void |
899 | LookAt (char *buf, int len, player *pl) |
882 | LookAt (char *buf, int len, player *pl) |
… | |
… | |
942 | */ |
925 | */ |
943 | if (op->inv && QUERY_FLAG (op, FLAG_APPLIED)) |
926 | if (op->inv && QUERY_FLAG (op, FLAG_APPLIED)) |
944 | { |
927 | { |
945 | object *current, *next; |
928 | object *current, *next; |
946 | |
929 | |
|
|
930 | int cnt = MAX_ITEM_PER_DROP; |
|
|
931 | |
947 | for (current = op->inv; current != NULL; current = next) |
932 | for (current = op->inv; current != NULL; current = next) |
948 | { |
933 | { |
949 | next = current->below; |
934 | next = current->below; |
950 | drop_object (pl, current, 0); |
935 | drop_object (pl, current, 0); |
|
|
936 | |
|
|
937 | if (--cnt <= 0) break; |
951 | } |
938 | } |
|
|
939 | |
|
|
940 | if (cnt <= 0) |
|
|
941 | op->failmsg ("Only dropped some items, can't drop that many items at once."); |
952 | |
942 | |
953 | esrv_update_item (UPD_WEIGHT, pl, op); |
943 | esrv_update_item (UPD_WEIGHT, pl, op); |
954 | } |
944 | } |
955 | else |
945 | else |
956 | drop_object (pl, op, nrof); |
946 | drop_object (pl, op, nrof); |
|
|
947 | |
|
|
948 | update_after_inventory_change (pl); |
957 | |
949 | |
958 | return; |
950 | return; |
959 | } |
951 | } |
960 | else if (to == pl->count) |
952 | else if (to == pl->count) |
961 | { /* pick it up to the inventory */ |
953 | { /* pick it up to the inventory */ |
… | |
… | |
979 | * has already been done (eg, it can be picked up and fits in |
971 | * has already been done (eg, it can be picked up and fits in |
980 | * in a sack, so check for those things. We should also check |
972 | * in a sack, so check for those things. We should also check |
981 | * an make sure env is in fact a container for that matter. |
973 | * an make sure env is in fact a container for that matter. |
982 | */ |
974 | */ |
983 | if (env->type == CONTAINER && can_pick (pl, op) && sack_can_hold (pl, env, op, nrof)) |
975 | if (env->type == CONTAINER && can_pick (pl, op) && sack_can_hold (pl, env, op, nrof)) |
|
|
976 | { |
984 | put_object_in_sack (pl, env, op, nrof); |
977 | put_object_in_sack (pl, env, op, nrof); |
|
|
978 | update_after_inventory_change (pl); |
|
|
979 | } |
985 | } |
980 | } |
986 | |
981 | |