/* object.c - Object manipulation opcodes
- * Copyright (c) 1995-1997 Stefan Jokisch
+ * Copyright (c) 1995-1997 Stefan Jokisch
*
* This file is part of Frotz.
*
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
*/
#include "frotz.h"
static zword object_address (zword obj)
{
-/* zchar obj_num[10]; */
-
/* Check object number */
if (obj > ((h_version <= V3) ? 255 : MAX_OBJECT)) {
/* If we are monitoring attribute assignment display a short note */
- if (f_setup.attribute_assignment) {
+ if (option_attribute_assignment) {
stream_mssg_on ();
print_string ("@clear_attr ");
print_object (zargs[0]);
/* If we are monitoring object locating display a short note */
- if (f_setup.object_locating) {
+ if (option_object_locating) {
stream_mssg_on ();
print_string ("@jin ");
print_object (zargs[0]);
/* If we are monitoring object locating display a short note */
- if (f_setup.object_locating) {
+ if (option_object_locating) {
stream_mssg_on ();
print_string ("@get_child ");
print_object (zargs[0]);
/* If we are monitoring object locating display a short note */
- if (f_setup.object_locating) {
+ if (option_object_locating) {
stream_mssg_on ();
print_string ("@get_parent ");
print_object (zargs[0]);
/* If we are monitoring object movements display a short note */
- if (f_setup.object_movement) {
+ if (option_object_movement) {
stream_mssg_on ();
print_string ("@move_obj ");
print_object (obj1);
/* If we are monitoring object movements display a short note */
- if (f_setup.object_movement) {
+ if (option_object_movement) {
stream_mssg_on ();
print_string ("@remove_obj ");
print_object (zargs[0]);
/* If we are monitoring attribute assignment display a short note */
- if (f_setup.attribute_assignment) {
+ if (option_attribute_assignment) {
stream_mssg_on ();
print_string ("@set_attr ");
print_object (zargs[0]);
/* If we are monitoring attribute testing display a short note */
- if (f_setup.attribute_testing) {
+ if (option_attribute_testing) {
stream_mssg_on ();
print_string ("@test_attr ");
print_object (zargs[0]);