1 files changed, 24 insertions, 0 deletions

diff --git a/src/tg/reply-keyboard-markup.lisp b/src/tg/reply-keyboard-markup.lisp
new file mode 100644
index 0000000..2674c10
--- /dev/null
+++ b/src/tg/reply-keyboard-markup.lisp
@@ -0,0 +1,24 @@
+;; SPDX-License-Identifier: EUPL-1.2
+;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
+(defpackage :ukkoclot/tg/reply-keyboard-markup
+  (:use :c2cl :ukkoclot/tg/keyboard-button :ukkoclot/tg/macros)
+  (:export
+   #:reply-keyboard-markup
+   #:make-reply-keyboard-markup
+   #:reply-keyboard-markup-p
+   #:copy-reply-keyboard-markup
+   #:reply-keyboard-markup-keyboard
+   #:reply-keyboard-markup-is-persistent
+   #:reply-keyboard-markup-resize-keyboard
+   #:reply-keyboard-markup-one-time-keyboard
+   #:reply-keyboard-markup-input-field-placeholder
+   #:reply-keyboard-markup-selective))
+(in-package :ukkoclot/tg/reply-keyboard-markup)
+
+(define-tg-type reply-keyboard-markup
+  (keyboard (array (array keyboard-button)))
+  (is-persistent boolean nil)
+  (resize-keyboard boolean nil)
+  (one-time-keyboard boolean nil)
+  (input-field-placeholder (or string null) nil)
+  (selective boolean nil))