bash + iconv + DosBox / x86 makine kodu (104 97 96 95 karakter)
echo ↾각슈삨₲ɻ庲錿ʴ⇍罋곹삄ૃ蘊尧⺓⺂粘ㄾ㸸ਾ岈⺎➉⸠粓蜊㹏褾鄮漧粐蠊蝜⾈葜⾇⼠⺂ꤧ樠獧惇|iconv -futf8 -tucs2>o.com;dosbox o*
Bunu betiğe boş bir dizine koymayı öneriyorum, neredeyse bir terminale kopyalamanın her şeyi bozacağını garanti ediyorum; daha da iyisi, hazır senaryoyu burada bulabilirsiniz .
Beklenen çıktı:
Nasıl çalışır
Bash kısmı betiğin UTF-8 karakterlerinden iconv
bir .com
dosyayı "açmak" için kullanılan ve DosBox ile başlatan sadece bir başlatıcı .
Tüm girdi dizileri iconv
şikayet etmeden UCS-2 olarak yorumlanamadığından, içeriğe bazı sınırlamalar getirdiğine dikkat edin ; Örneğin, bazı nedenlerden dolayı, bx
sicilleri içeren birçok işlem, onları kullandığım yere bağlı olarak çok büyük zarar gördü , bu yüzden birkaç kez bu problemi çözmek zorunda kaldım.
Şimdi, Unicode meselesi sadece "karakter sayısı" kurallarından faydalanmak; komut dosyasının gerçek boyutu (bayt olarak) orijinal .COM
dosyadan çok daha büyük .
Çıkarılan .com
dosya
00000000 be 21 01 ac 88 c2 a8 c0 7d 0a b2 20 7b 02 b2 5e |.!......}.. {..^|
00000010 83 e0 3f 93 b4 02 cd 21 4b 7f f9 ac 84 c0 75 e4 |..?....!K.....u.|
00000020 c3 0a 0a 86 27 5c 93 2e 82 2e 98 7c 3e 31 38 3e |....'\.....|>18>|
00000030 3e 0a 88 5c 8e 2e 89 27 20 2e 93 7c 0a 87 4f 3e |>..\...' ..|..O>|
00000040 3e 89 2e 91 27 6f 90 7c 0a 88 5c 87 2e a6 7c 0a |>...'o.|..\...|.|
00000050 88 2f 5c 84 2e a8 7c 0a 87 2f 20 2f 82 2e 27 a9 |./\...|../ /..'.|
00000060 7c 0a 20 6a 67 73 c7 60 f3 0a 0a 00 ||. jgs.`....|
0000006c
ve 108 bayt uzunluğundadır. Bunun için NASM kaynağı:
org 100h
start:
; si: pointer to current position in data
mov si,data
; load the character in al
lodsb
mainloop:
; bx: repetition count
; - zero at startup
; - -1 after each RLE run
; - one less than each iteration after each "literal" run
; the constant decrement is not really a problem, as print
; always does at least one print, and there aren't enough
; consecutive literal values to have wraparound
; if the high bit is not set, we have a "literal" byte;
; we prepare it in dl just in case
mov dl,al
; then check if it's not set and branch straight to print
; notice that bx=0 is fine, as print prints always at least one character
; test the top two bits (we need the 6th bit below)
test al,0xc0
; to see if the top bit was set, we interpret it as the sign bit,
; and branch if the number is positive or zero (top bit not set)
jge print
rle:
; it wasn't a literal, but a caret/space with a repetition count
; space if 6th bit not set, caret otherwise
mov dl,' '
; exploit the parity bit to see if the 6th bit was set
jnp nocaret
mov dl,'^'
nocaret:
; lower 6 bits: repetition count
; and away the top bits and move in bx
; we and ax and not al because we have to get rid of the 02h in ah
and ax,3fh
xchg ax,bx
print:
; print bx times
mov ah,2
int 21h
dec bx
jg print
; read next character
lodsb
test al,al
; rinse & repeat unless we got a zero
jnz mainloop
end:
ret
data:
; here be data
incbin "compressed.dat"
; NUL terminator
db 0
Bütün bunlar, compressed.dat
formatı aşağıdaki gibidir:
- yüksek bit ayarlanmamışsa, karakteri olduğu gibi yazdırın;
- aksi takdirde, düşük 6 bit, tekrar sayımıdır ve ikinci en yüksek bit, boşluk (bit ayarlanmamış) veya bir şapka (bit ayar) yazdırması gerekip gerekmediğini belirtir.
compressed.dat
sırayla, orijinal metinden bir Python betiği kullanılarak üretilir .
Her şey burada bulunabilir .