[ ShowVerbSub address lines da meta i j; if (((noun->#dict_par1) & 1) == 0) "Try typing ~showverb~ and then the name of a verb."; meta=((noun->#dict_par1) & 2)/2; i = $ff-(noun->#dict_par2); address = (0-->7)-->i; lines = address->0; address++; print "Verb "; if (meta) print "meta "; da = 0-->4; for (j=0:j < (da+5)-->0:j++) if (da->(j*9 + 14) == $ff-i) print "'", (address) (da + 9*j + 7), "' "; new_line; if (lines == 0) "has no grammar lines."; for (:lines > 0:lines--) { address = UnpackGrammarLine(address); print " "; DebugGrammarLine(); new_line; } ];