diff --git a/LICENSE b/LICENSE
new file mode 100644
index 0000000..addde5d
--- /dev/null
+++ b/LICENSE
@@ -0,0 +1 @@
+PForth by Nore/Novatux, licensed under the CC-BY
diff --git a/forth2.fth b/forth2.fth
index c6e7430..590bc37 100644
--- a/forth2.fth
+++ b/forth2.fth
@@ -172,7 +172,7 @@ FORTH
 : BEGIN HERE ; IMMEDIATE
 : FIND-WORD-DICO SWAP >R BEGIN DUP 4 - RSTR R@ = IF 2 PICK R@ STR= IF NIP R> DROP EXIT THEN ELSE DROP THEN 3 - @ DUP 0= UNTIL NIP R> DROP ;
 : FIND-WORD LATEST @ FIND-WORD-DICO ;
-: FIND COUNT OVER SWAP FIND-WORD DUP IF NIP DUP 1- C@ 128 AND IF 1 ELSE -1 THEN THEN ;
+: FIND DUP COUNT FIND-WORD DUP IF NIP DUP 1- C@ 128 AND IF 1 ELSE -1 THEN THEN ;
 : ' PARSE-WORD FIND-WORD ;
 : POSTPONE ' DUP 1- C@ 128 AND IF , ELSE ['] (lit) , , ['] , , THEN ; IMMEDIATE
 \ : LITERAL [ ' (lit) , ] , , ; IMMEDIATE