In two non-related sentences all the words were replaced each by a couple of numbers separated by a slash:
1st sent:,,,,,,, 23/2 26/3 28/2 98/5
2nd sent: .....56/4 31/4 28/2 79/4 31/4
The 1st number stands for the sum of numerical values of the English ABC (A=1,B=2,...Z=26) and the 2nd specifies the number of letters,
e.g. the sentence I LOVE YOU would be represented by 9/1 54/4 61/3
Please restore the original phrases.
Possible answers:
In God we trust.
This dime is your cash.
This blob is your meal.
This Dufy is your gain.
This cola is your meal.
This land is your land. That must be it.
23/2 26/3 28/2 98/5 0/3 56/4 31/4 28/2 79/4
The possible words:
er ate is musty arvo ager is fuzz ager
ho bio mo proxy aryl agin mo lutz agin
in cub om ritzy aunt alme om sizy alme
oh dim si runty azon ambo si toys ambo
re dog we strut bony anoa we urus anoa
eat sturt bots arak vows arak
eng trust brrr baht your baht
eta xylyl buns bath oxus bath
fas yours coss bees pnyx bees
foe zloty cult bell bell
gar lizzy curn bias bias
gen powys dors blob blob
god ursus down bock bock
hem drum calo calo
jig erns cash cash
kif flow cave cave
lam foot cere cere
lei fops cine cine
lie fowl coal coal
mid goos cola cola
obi gorp cube cube
pee gowk daft daft
pia gulp dags dags
rag hist debt debt
rec hits dime dime
tae hons doff doff
tea hush doge doge
vac inns echo echo
wab inro epee epee
eli iron fall fall
ibo junk gads gads
jute gain gain
kays gear gear
knop gene gene
kues gleg gleg
lest hard hard
lets heme heme
lips hick hick
lisp idem idem
loon ilia ilia
loti isba isba
lure jiff jiff
maws kane kane
meow kief kief
mess lame lame
mint land land
miso loca loca
moth male male
noir meal meal
nolo nice nice
nori odic odic
nosh pack pack
nubs qaid qaid
odyl raff raff
oldy rage rage
oven redd redd
past safe safe
pats aude aude
peps efik efik
plew gina gina
plug inga inga
poet moab moab
prau waaf waaf
prim
prog
qoph
rods
rule
scum
shit
sith
slip
snub
sord
spat
stob
swam
taps
tels
term
thew
this
thug
toil
tong
tope
torc
tuna
ukes
ulva
updo
vans
warn
wauk
whet
whip
will
wise
wolf
yaks
yird
yogi
yoke
zing
arup
dufy
emmy
gunn
isis
lyra
marx
nupe
pils
tshi
walt
done
from
DefDbl A-Z
Option Base 1
Dim crlf$, sumlet As Variant, numlet As Variant, ansline(200) As String * 50
Dim ctwdnum(10)
Private Sub Form_Load()
Form1.Visible = True
Text1.Text = ""
crlf = Chr$(13) + Chr$(10)
sumlet = Array(23, 26, 28, 98, 0, 56, 31, 28, 79, 31)
numlet = Array(2, 3, 2, 5, 3, 4, 4, 2, 4, 4)
For i = 1 To 200
ansline(i) = Space(50)
Next
For i = 1 To 9
Text1.Text = Text1.Text & sumlet(i) & "/" & numlet(i) & " "
Next
Open "\words\words.txt" For Input As #1
Do
Line Input #1, l$
l = LCase(l)
If Len(l) < 6 And Len(l) > 1 Then
totlet = 0
For i = 1 To Len(l)
totlet = totlet + InStr("abcdefghijklmnopqrstuvwxyz", Mid(l, i, 1))
Next
For i = 1 To 10
If numlet(i) = Len(l) Then
If sumlet(i) = totlet Then
ctwdnum(i) = ctwdnum(i) + 1
psn = 1
For j = 1 To i - 1
psn = psn + numlet(j) + 1
Next
Mid(ansline(ctwdnum(i)), psn, Len(l)) = l
End If
End If
Next
End If
Loop Until EOF(1)
Text1.Text = Text1.Text & crlf
For i = 1 To 10
If ctwdnum(i) > mx Then mx = ctwdnum(i)
Next
For i = 1 To mx
Text1.Text = Text1.Text & ansline(i) & crlf
Next
Close 1
Text1.Text = Text1.Text & crlf & " done"
End Sub
|
Posted by Charlie
on 2015-07-27 14:20:25 |