fumblefingers

[fig-forth-6809/fig-forth-6809.git] / 6800to6809.pl

diff --git a/6800to6809.pl b/6800to6809.pl
index 03d54b3..f1a6cf5 100755 (executable)
--- a/6800to6809.pl
+++ b/6800to6809.pl
@@ -1,11 +1,18 @@
 #!/usr/bin/env perl
 
+# Script to convert M6800 source code to non-optimal M6809 source code.
+# By Joel Matthew Rees, Amagasaki, Japan, September 2018.
+# Copyright 2018 Joel Matthew Rees
+# 
+# Permission to use current version for personal research, entertainment, 
+# and other non-commercial purposes hereby granted, 
+# on condition that authorship and copyright notice are left intact.
+# For other uses, contact the author on social media.
+
   use v5.010.000;
   use warnings;
   use strict;
 
-#  say "Hello World!";
-
 #  print $ARGV[ 1 ];
 
 # Including stuff we don't need, in case I get ambitious.