.include "lib/macros.xyw"

; Get random number and calculate modulo 6
system.random LDB $06 MOD

; Print result+1 and new line
$31 ADD PUTC
NL