From efc08126f7119569112b336f0cd73eefdf9737b5 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Tue, 18 Jan 2022 17:18:06 -0600
Subject: Um

---
 lisp/fibs.el | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100644 lisp/fibs.el

(limited to 'lisp/fibs.el')

diff --git a/lisp/fibs.el b/lisp/fibs.el
new file mode 100644
index 0000000..545c2a7
--- /dev/null
+++ b/lisp/fibs.el
@@ -0,0 +1,37 @@
+;;; fibs.el --- Play backgammon with FIBS -*- lexical-binding: t; -*-
+
+;;; Commentary:
+
+;; fibs.com is one of the oldest backgammon servers out there, and it's
+;; accessible via telnet.  This package provides a wrapper to enable you to play
+;; backgammon on fibs.com more easily than just opening a telnet session
+;; yourself.
+
+;;; TODO:
+
+;; - Automatically log in.
+;; - Add a `fibs-quit' function to kill the telnet server and buffer.
+
+;;; Code:
+
+(require 'telnet)
+
+(defgroup fibs nil
+  "Customizations for FIBS, the First Internet Backgammon Server."
+  :group 'games)
+
+(defcustom fibs-server "fibs.com"
+  "The server to connect to FIBS with."
+  :type 'string)
+
+(defcustom fibs-port 4321
+  "The port to connect to FIBS with."
+  :type 'number)
+
+;;;###autoload
+(defun fibs ()
+  (interactive)
+  (telnet fibs-server fibs-port))
+
+(provide 'fibs)
+;;; fibs.el ends here
-- 
cgit 1.4.1-21-gabe81