From a5593bec79978dc60281e3c2b9f1c901d9923bd5 Mon Sep 17 00:00:00 2001
From: Thomas Harte <thomas.harte@gmail.com>
Date: Thu, 10 Aug 2017 15:00:14 -0400
Subject: [PATCH] Threw in support for the light-pen trigger.

---
 Components/6845/CRTC6845.hpp | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/Components/6845/CRTC6845.hpp b/Components/6845/CRTC6845.hpp
index 419c4dc63..1fe909a51 100644
--- a/Components/6845/CRTC6845.hpp
+++ b/Components/6845/CRTC6845.hpp
@@ -169,6 +169,11 @@ template <class T> class CRTC6845 {
 				registers_[selected_register_] = value & masks[selected_register_];
 		}
 
+		void trigger_light_pen() {
+			registers_[17] = bus_state_.refresh_address & 0xff;
+			registers_[16] = bus_state_.refresh_address >> 8;
+		}
+
 	private:
 		Personality personality_;
 		T &bus_handler_;