From 36e49ee394e1df50e5434051f33d1d5a3eef0d5d Mon Sep 17 00:00:00 2001
From: Joël Simoneau <simoneaujoel@gmail.com>
Date: Wed, 29 Jan 2025 22:12:35 -0500
Subject: Event 16.

---
 events.txt | 33 ++++++++++++++++++++++++++++++---
 1 file changed, 30 insertions(+), 3 deletions(-)

(limited to 'events.txt')

diff --git a/events.txt b/events.txt
index 64b3546..0ce4b08 100644
--- a/events.txt
+++ b/events.txt
@@ -196,10 +196,37 @@ SHADED 15
 	endspace
 
 EVENT 16
-	log "NOT IMPLEMENTED"
+	current BK
+	asm game.vm.count = 0
+	repeat 3
+		prompt `Place up to ${3-game.vm.count} Amirs adjacent to Gulbarga.`
+		space_opt 1 is_adjacent_to_city(C_GULBARGA, s) && can_place_piece(s, BK, ELITE)
+			auto_place BK ELITE
+			asm (game.vm.count += 1)
+		endspace
+	endrepeat
+	prompt "Place a Fort adjacent to Gulbarga."
+	space 1 is_adjacent_to_city(C_GULBARGA, s) && can_place_piece(s, BK, DISC)
+		auto_place BK DISC
+	endspace
 
 SHADED 16
-	log "NOT IMPLEMENTED"
+	current [DS VE]
+	if game.current === DS
+		prompt "Free March into a Province with a Fort, then remove the Fort."
+		space_opt 1 has_piece(s, BK, DISC) && can_march_in_space(s)
+			free_march
+			asm game.vm.p = find_piece(game.vm.s, BK, DISC)
+			remove
+		endspace
+	else
+		prompt "Free Migrate into a Province with a Fort, then remove the Fort."
+		space_opt 1 has_piece(s, BK, DISC) && can_migrate_in_space(s)
+			free_migrate
+			asm game.vm.p = find_piece(game.vm.s, BK, DISC)
+			remove
+		endspace
+	endif
 
 EVENT 17
 	log "NOT IMPLEMENTED"
@@ -429,7 +456,7 @@ EVENT 36
 	asm game.vm.count = 0
 	repeat 4
 		prompt `Place up to ${4-game.vm.count} Rajas adjacent to Chittor.`
-		space_opt 1 is_adjacent_to_city(C_CHITTOR, s)
+		space_opt 1 is_adjacent_to_city(C_CHITTOR, s) && can_place_piece(s, VE, ELITE)
 			auto_place VE ELITE
 			asm (game.vm.count += 1)
 		endspace
-- 
cgit v1.2.3