summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--markov.lpr5
1 files changed, 5 insertions, 0 deletions
diff --git a/markov.lpr b/markov.lpr
index c2d27a0..005bf35 100644
--- a/markov.lpr
+++ b/markov.lpr
@@ -127,6 +127,11 @@ begin
break
else
s:=s+i2c[current mod (length(i2c)+1)];
+ if length(s)>256 then begin
+ dec(count);
+ s:=f[0];
+ break;
+ end;
until false;
if not f.hatZeile(s,false) then begin;
writeln(s);