+ if (artifact_index == 0)
+ return;
+
+ if ((a_info[artifact_index].cur_num == 0) && create_named_art(player_ptr, artifact_index, *qtwg_ptr->y, *qtwg_ptr->x)) {
+ a_info[artifact_index].cur_num = 1;
+ return;
+ }
+
+ KIND_OBJECT_IDX k_idx = lookup_kind(TV_SCROLL, SV_SCROLL_ACQUIREMENT);
+ object_type forge;
+ object_type *q_ptr = &forge;
+ object_prep(q_ptr, k_idx);
+ drop_here(player_ptr->current_floor_ptr, q_ptr, *qtwg_ptr->y, *qtwg_ptr->x);
+}
+
+static void parse_qtw_D(player_type *player_ptr, qtwg_type *qtwg_ptr, char *s)
+{
+ *qtwg_ptr->x = qtwg_ptr->xmin;