diff options
| author | Aleksey Veresov <aleksey@veresov.pro> | 2020-10-18 01:01:03 +0300 |
|---|---|---|
| committer | Aleksey Veresov <aleksey@veresov.pro> | 2020-10-18 01:01:03 +0300 |
| commit | e7bc8f97c763a8fa31c2c14a4b437c6fd9502c6a (patch) | |
| tree | bf89d55a81c83534452dde97992709c3f12beb7a /main.sts | |
| parent | 5d1fc997d86afb4ad359f7fde66afb598c83a14f (diff) | |
| download | cryptrobber-e7bc8f97c763a8fa31c2c14a4b437c6fd9502c6a.tar cryptrobber-e7bc8f97c763a8fa31c2c14a4b437c6fd9502c6a.tar.xz cryptrobber-e7bc8f97c763a8fa31c2c14a4b437c6fd9502c6a.zip | |
Fix.
Diffstat (limited to 'main.sts')
| -rw-r--r-- | main.sts | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -45,19 +45,18 @@ defword checktext checktext.count @ 1 + checktext.count ! fi drop dup 0 = untilod drop + 1b print_stack newline sys_write ; ZERO DIVISION SHALL NOT PASS checktext.count 0 = if drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop drop 0 exit fi - checktext.count @ print_hex newline sys_write ; normalize: 0 do dup 1a = until dup word_size mul checktext.fr + dup @ float_iload checktext.count float_iload float_div float_fstore swap ! 1 + od drop - 1a print_stack newline sys_write ; Decide if text is real: freq_eng calcdist if 1 else 0 fi |