Add f)lirt command. All it does right now is shoot a tilde.

[rogue-pphs.git] / romance.c

diff --git a/romance.c b/romance.c
new file mode 100644 (file)
index 0000000..70a06a1
--- /dev/null
+++ b/romance.c
@@ -0,0 +1,33 @@
+/*
+ * Functions for dealing with problems of the heart
+ *
+ * @(#)romance.c       3.2 (Berkeley) 6/15/81
+ *
+ * Rogue: Exploring the Dungeons of Doom
+ * Copyright (C) 1980, 1981 Michael Toy, Ken Arnold and Glenn Wichman
+ * All rights reserved.
+ *
+ * See the file LICENSE.TXT for full copyright and licensing information.
+ */
+
+#include "curses.h"
+#include <ctype.h>
+#include <string.h>
+#include "rogue.h"
+
+/*
+ * flirt:
+ *     Make eyes in the given direction
+ */
+
+flirt(ydelta, xdelta)
+int ydelta, xdelta;
+{
+    register struct linked_list *item, *nitem;
+    struct object obj;
+
+    obj.o_pos = hero;
+    obj.o_type = '~';
+    do_motion(&obj, ydelta, xdelta);
+    mvwaddch(cw, hero.y, hero.x, PLAYER);
+}