Retina 0.8.2, (削除) 100 (削除ここまで) 69 bytes
2080$*.
M!`.{65}
33=`.
0
+s`.(?<=(0\.\.|\.0.|\..0).{65})
0
.(.+).
1ドル
Try it online! Explanation:
2080$*.
Insert 2080 .s.
M!`.{65}
Split it into 32 lines of 65 ..
33=`.
0
Change the middle . on the first line to a 0.
+`
Repeat the following change until no more .s can be changed into 0s.
s`.(?<=(0\.\.|\.0.|\..0).{65})
0
Change all .s to 0s if there is either 0.., .00, .0. or ..0 on the line above.
.(.+).
1ドル
Remove the left and right columns.
Neil
- 184.4k
- 12
- 76
- 290