Código de máquina 8086, 82 80
Conteúdo do x.com
arquivo:
B7 3D 89 DF B1 80 F3 AA 0D 0A 24 B4 01 CD 21 42
38 D8 74 F7 38 17 77 02 88 17 88 C3 31 D2 3C 0D
75 E9 BF 21 3D B1 5E 31 C0 F3 AE E3 EE 4F BB 04
01 8A 05 D4 0A 86 E0 0D 30 30 89 47 02 3C 30 77
04 88 67 03 43 89 3F 89 DA B4 09 CD 21 47 EB D7
Ele suporta apenas repetições de até 99 caracteres.
Código fonte (servido como entrada para o debug.com
assembler), com comentários!
a
mov bh, 3d ; storage of 128 bytes at address 3d00
mov di, bx
mov cl, 80
rep stosb ; zero the array
db 0d 0a 24
; 10b
mov ah, 1
int 21 ; input a char
inc dx ; calculate the run length
cmp al, bl ; is it a repeated character?
je 10b
cmp [bx], dl ; is the new run length greater than previous?
ja 11a
mov [bx], dl ; store the new run length
; 11a
mov bl, al ; remember current repeating character
xor dx, dx ; initialize run length to 0
cmp al, d ; end of input?
jne 10b ; no - repeat
mov di, 3d21 ; start printing run lengths with char 21
mov cl, 5e ; num of iterations = num of printable characters
; 127
xor ax, ax
repe scasb ; look for a nonzero run length
jcxz 11b ; no nonzero length - exit
dec di
mov bx, 104 ; address of output string
mov al, [di] ; read the run length
aam ; convert to decimal
xchg al, ah
or ax, 3030
mov [bx+2], ax
cmp al, 30 ; was it less than 10?
ja 145
mov [bx+3], ah ; output only one digit
inc bx ; adjust for shorter string
; 145
mov [bx], di ; store "x=" into output string
mov dx, bx ; print it
mov ah, 9
int 21
inc di
jmp 127 ; repeat
; 150
rcx 50
n my.com
w
q
Aqui estão algumas técnicas de golfe usadas aqui que eu acho divertidas:
- O endereço do array é
3d00
onde 3d
está o código ASCII =
. Dessa forma, o endereço para a entrada da matriz para caractere x
é 3d78
. Quando interpretado como uma sequência de 2 caracteres, é x=
.
- O buffer de saída está no endereço
104
; ele substitui o código de inicialização que não é mais necessário. A sequência de fim de linha 0D 0A 24
é executada como código inofensivo.
- As
aam
instruções aqui não fornecem golfe, embora possam ...
- Escreva o número duas vezes, primeiro assumindo que é maior que 10 e depois corrigindo se é menor.
- As instruções de saída estão em um endereço obscuro
11b
, que contém o código de máquina necessário C3
por sorte.