diff options
| author | Aleksey Veresov <aleksey@veresov.pro> | 2020-10-19 00:07:46 +0300 |
|---|---|---|
| committer | Aleksey Veresov <aleksey@veresov.pro> | 2020-10-19 00:07:46 +0300 |
| commit | 981f7aa46434e94d78dcbd78f1c840627f1853e3 (patch) | |
| tree | 2360397a8629277d4e70b5b8b911983fed1b6138 | |
| parent | 6f41f04184cbd1fac433dae61ec3574cb3f6f77f (diff) | |
| download | cryptrobber-981f7aa46434e94d78dcbd78f1c840627f1853e3.tar cryptrobber-981f7aa46434e94d78dcbd78f1c840627f1853e3.tar.xz cryptrobber-981f7aa46434e94d78dcbd78f1c840627f1853e3.zip | |
Fix of output.
| -rw-r--r-- | cryptrobber.sts | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/cryptrobber.sts b/cryptrobber.sts index 35f338b..22cb06d 100644 --- a/cryptrobber.sts +++ b/cryptrobber.sts @@ -149,7 +149,7 @@ set_entry float_init ; this is program with floats 0 do dup length = until swap drop 1 + od drop keylen - od as langcode drop + od as langcode ; output language langcode 1 = if @@ -179,10 +179,10 @@ set_entry float_init ; this is program with floats ; output text length do 1 - dup word_size mul plaintext + @ sys_write - dup 1 = untilod drop + dup 0 = untilod drop length do 1 - swap drop - dup 1 = untilod drop + dup 0 = untilod drop ; output key keylen do 1 - |