diff --git a/examples/whitepaper.py b/examples/whitepaper.py
new file mode 100755
index 00000000..62643f59
--- /dev/null
+++ b/examples/whitepaper.py
@@ -0,0 +1,39 @@
+#!/usr/bin/env python3
+#
+# mmgen = Multi-Mode GENerator, a command-line cryptocurrency wallet
+# Copyright (C)2013-2023 The MMGen Project <mmgen@tuta.io>
+# Licensed under the GNU General Public License, Version 3:
+#   https://www.gnu.org/licenses
+# Public project repositories:
+#   https://github.com/mmgen/mmgen
+#   https://gitlab.com/mmgen/mmgen
+
+"""
+examples/whitepaper.py: extract the Bitcoin whitepaper from the blockchain
+"""
+
+import asyncio
+from mmgen.cfg import Config
+from mmgen.rpc import rpc_init
+
+txid = '54e48e5f5c656b26c3bca14a8c95aa583d07ebe84dde3b7dd4a78f4e4186e713'
+fn = 'bitcoin.pdf'
+
+async def main():
+
+	cfg = Config(process_opts=True)
+
+	assert cfg.coin == 'BTC' and cfg.network == 'mainnet', 'This script works only on BTC mainnet!'
+
+	c = await rpc_init(cfg)
+
+	tx = await c.call('getrawtransaction',txid,True)
+
+	chunks = [''.join( d['scriptPubKey']['asm'].split()[1:4] ) for d in tx['vout']]
+
+	with open(fn,'wb') as f:
+		f.write(bytes.fromhex( ''.join(chunks)[16:368600] ))
+
+	print(f'Wrote {fn}')
+
+asyncio.run(main())
diff --git a/mmgen/data/release_date b/mmgen/data/release_date
index c3932d1a..c8277aeb 100644
--- a/mmgen/data/release_date
+++ b/mmgen/data/release_date
@@ -1 +1 @@
-June 2023
+July 2023
diff --git a/mmgen/data/version b/mmgen/data/version
index ac565bc1..ffb33a6c 100644
--- a/mmgen/data/version
+++ b/mmgen/data/version
@@ -1 +1 @@
-13.3.0
+14.0.dev0