Sanalista

; push registers except rax
%macro r1_push 0
	push rbx
	push rcx
	push rdx
	push r8
	push r9
	push r10
	push r11
%endmacro
; pop registers except rax
%macro r1_pop 0
	pop r11
	pop r10
	pop r9
	pop r8
	pop rdx
	pop rcx
	pop rbx
%endmacro
; push registers including rax
%macro r_push 0
	push rax
	r1_push
%endmacro
; pop registers including rax
%macro r_pop 0
	r1_pop
	pop rax
%endmacro

%define N 32100

	section .bss
	ibuf resb N
	obuf resb N
	taulu resq 256

	section .text
	global _start
_start:
	; read ibuf
	xor rax, rax
	xor rdi, rdi
	mov rsi, ibuf
	mov rdx, N
	syscall
 
	mov rsi, ibuf
	mov rdi, obuf ; älä sotke rdi:tä..

	call stoi
	mov rcx, rax

	xor r9, r9

.s:
	push rcx
	
	mov rcx, taulu
	add rcx, 122*8
	mov rax, taulu
	add rax, 97*8
.ss:
	mov qword [rax], 0
	lea rax, [rax + 8]
	cmp rax, rcx
	jle .ss

	jmp .nxtchr_b
.nxtchr_a:
	inc rsi
.nxtchr_b:
	xor rax, rax
	lodsb
	cmp al, 97
	jl .nxtchr_a
	cmp al, 122
	jg .nxtchr_a
	
.chkchr_a:
	lea rbx, [taulu + rax * 8]
	inc qword [rbx]
	xor rax, rax
	lodsb
	cmp al, 97
	jl .chkchr_b
	cmp al, 122
	jg .chkchr_b
	jmp .chkchr_a
.chkchr_b:

	mov rcx, taulu
	add rcx, 122*8
	mov rax, taulu
	add rax, 97*8
	mov r8, 1
.chkres_a:
	mov rbx, [rax]
	and rbx, 1
	cmp rbx, 0
	je .chkres_b
	mov r8, 0
.chkres_b:
	lea rax, [rax + 8]
	cmp rax, rcx
	jle .chkres_a

	add r9, r8

	pop rcx
	dec rcx
	cmp rcx, 0
	jg .s

	mov rax, r9
	call printi

	mov rax, 0xa
	stosb

	; output obuf
	sub rdi, obuf
	mov rdx, rdi
	mov rdi, 1
	mov rax, 1
	mov rsi, obuf
	syscall
	
	; exit syscall
	mov rax, 0x3c
	xor rdi, rdi
	syscall
 
stoi: ; reads in integer from rsi's buffer and outputs it to rax
	r1_push
	xor r8,r8
	mov r9, 1
.a_stoi:
	xor rax, rax
	lodsb
	cmp al, 45
	jne .b_stoi
	mov r9, -1
	jmp .a_stoi
.b_stoi:
	cmp al, 32
	je .c_stoi
 
	cmp al, 10
	je .c_stoi
 
	cmp al, 0
	je .c_stoi
 
	sub al, 48
	mov rdx, 10
	imul r8, rdx
	add r8, rax
	jmp .a_stoi
.c_stoi:
	mov rax, r8
	imul rax, r9
	r1_pop
	ret

printi: ; outputs an integer rdi's buffer
	push rax
	r1_push
	xor rbx, rbx
	cmp rax, 0
	jnl .a_printi
	imul rax, -1
	push rax
	mov rax, 45
	stosb
	pop rax
.a_printi:
	xor rdx, rdx
	mov rcx, 10
	idiv rcx
	add rdx, 48
	push rdx
	inc rbx
	cmp rax, 0
	jne .a_printi
	mov rcx, rbx
.b_printi:
	pop rax
	stosb
	loop .b_printi
	mov rax, rdi
	r1_pop
	mov rdi, rax
	pop rax
	ret

Test 1

Verdict: ACCEPTED

Test 2

Verdict: ACCEPTED

Test 3

Verdict: ACCEPTED