Spam-Vorschlag: 763 Südostafrikaner zimmern Gewächshäuser.
y = Int((i - 1) / 9) + 1
x = i - (y - 1) * 9
feldxy(x, y) = hintfeld(i)
delpos4feld i
Do
solve
If solved = True Then
Exit Sub
Else
makehint
hintfeld(newhint.index) = newhint.num
feld(newhint.index) = hintfeld(newhint.index)
y = Int((newhint.index - 1) / 9) + 1
x = newhint.index - (y - 1) * 9
feldxy(x, y) = hintfeld(newhint.index)
delpos4feld newhint.index
End If
Loop
Spam-Vorschlag: Das Skispringen liest hin und wieder Fernsehsender.