Mercurial > repo
annotate bin/distort @ 12245:f3f954c4c8fa draft
<b_jonas> addwhatis whatis(5hackeso) - no description
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Thu, 05 Dec 2019 23:40:42 +0000 |
parents | 3544b44147db |
children |
rev | line source |
---|---|
9075 | 1 #!/usr/bin/env python |
10969
65ecc583baf2
<oerjan> sled bin/distort//2s:, math::;8cmw = len(int(2*s/N))-1
HackBot
parents:
10968
diff
changeset
|
2 import sys |
11993
3544b44147db
<int-e> ` sed -i 3s/459/447/ bin/distort
HackEso <hackeso@esolangs.org>
parents:
11817
diff
changeset
|
3 N = 447 |
9075 | 4 name = sys.argv[1] if len(sys.argv) > 1 else "/dev/stdin" |
5 with open(name, "r") as f: | |
6 data = ' \\ '.join(f.read().splitlines()) | |
10968
75d67a002697
<oerjan> fetch bin/distort https://hackego.esolangs.org/get/bin/distort
HackBot
parents:
9929
diff
changeset
|
7 s = len(data) |
10972 | 8 mw = len(str(2*s/N))-1 |
10968
75d67a002697
<oerjan> fetch bin/distort https://hackego.esolangs.org/get/bin/distort
HackBot
parents:
9929
diff
changeset
|
9 mw += s > ((N-2)*9-18*mw+1)*((10**mw-1)/9)-mw |
75d67a002697
<oerjan> fetch bin/distort https://hackego.esolangs.org/get/bin/distort
HackBot
parents:
9929
diff
changeset
|
10 p=0 |
75d67a002697
<oerjan> fetch bin/distort https://hackego.esolangs.org/get/bin/distort
HackBot
parents:
9929
diff
changeset
|
11 i=1 |
75d67a002697
<oerjan> fetch bin/distort https://hackego.esolangs.org/get/bin/distort
HackBot
parents:
9929
diff
changeset
|
12 while (p<s): |
75d67a002697
<oerjan> fetch bin/distort https://hackego.esolangs.org/get/bin/distort
HackBot
parents:
9929
diff
changeset
|
13 lw = N-mw-2-len(`i`) |
10971 | 14 print data[p:p+lw] |
10968
75d67a002697
<oerjan> fetch bin/distort https://hackego.esolangs.org/get/bin/distort
HackBot
parents:
9929
diff
changeset
|
15 i+=1 |
75d67a002697
<oerjan> fetch bin/distort https://hackego.esolangs.org/get/bin/distort
HackBot
parents:
9929
diff
changeset
|
16 p+=lw |