diff --git a/src/other/wktopr.s b/src/other/wktopr.s
new file mode 100644
index 0000000..7b87b7d
--- /dev/null
+++ b/src/other/wktopr.s
@@ -0,0 +1,95 @@
+. = 01000000
+.. = 4096
+save = 1
+getuid = 2
+open = 3
+read = 4
+write = 5
+creat = 6
+seek = 7
+tell = 8
+close = 9
+link = 10
+unlink = 11
+setuid = 12
+rename = 13
+exit = 14
+time = 15
+intrp = 16
+chdir = 17
+chmod = 18
+chown = 19
+sysloc = 21
+capt = 23
+rele = 24
+status = 25
+smes = 27
+rmes = 28
+fork = 29
+sys = 0020000
+i = 0020000
+dac = 0040000
+jms = 0100000
+dzm = 0140000
+lac = 0200000
+xor = 0240000
+add = 0300000
+tad = 0340000
+xct = 0400000
+isz = 0440000
+and = 0500000
+sad = 0540000
+jmp = 0600000
+eae = 0640000
+osc = 0640001
+omq = 0640002
+cmq = 0640004
+div = 0640323
+norm = 0640444
+lls = 0640600
+als = 0640700
+lrs = 0640500
+lacs = 0641001
+lacq = 0641002
+abs = 0644000
+divs = 0644323
+clq = 0650000
+frdiv = 0650323
+lmq = 0652000
+mul = 0653122
+idiv = 0653323
+idivs = 0657323
+frdivs = 0654323
+muls = 0657122
+norms = 0660444
+gsm = 0664000
+lrss = 0660500
+llss = 0660600
+alss = 0660700
+opr = 0740000
+nop = 0740000
+cma = 0740001
+cml = 0740002
+oas = 0740004
+ral = 0740010
+rar = 0740020
+hlt = 0740040
+xx = 0740040
+sma = 0740100
+sza = 0740200
+snl = 0740400
+skp = 0741000
+spa = 0741100
+sna = 0741200
+szl = 0741400
+rtl = 0742010
+rtr = 0742020
+cll = 0744000
+stl = 0744002
+rcl = 0744010
+rcr = 0744020
+cla = 0750000
+clc = 0750001
+las = 0750004
+glk = 0750010
+law = 0760000