9 21 944 26 6*575 N0385R7

Distinct digits (0 to 9) and an asterisk (*) represent distinct letters.
The letters N and R were Not Replaced and they appear in their correct locations in the text.

OPEN "\words\words7.txt" FOR BINARY AS #1
w$ = SPACE$(7)
DO
  GET #1, , w$
  IF EOF(1) THEN EXIT DO
  good = 1
  FOR i = 1 TO 6
    IF INSTR(MID$(w$, i + 1), MID$(w$, i, 1)) THEN good = 0: EXIT FOR
  NEXT
  IF good THEN
    IF LEFT$(w$, 1) = "n" AND MID$(w$, 6, 1) = "r" THEN PRINT w$
  END IF
LOOP
CLOSE

finds that the following words fit the pattern of the final word in the quote:

nailers
nectars
nectary
network
nickers
nudgers
numbers

Posted by Charlie on 2011-06-13 12:35:00