( advent of code 2025, day xx )

%dbg { #100e DEO }

|00

|100
@on-reset ( -> )
	banner
	BRK

@banner ( -- )
	;/str
	&loop
		LDAk #18 DEO
		INC2 LDAk ?/loop
	POP2 JMP2r
@banner/str
	"advent 20 "of 20 "code, 20 "day 20 "xx 0a 00


@Input/filename "xx.input 00
@Input/read ( callback* -- )
	;/filename #a8 DEO2
	#01ab DEO2
	
	&loop
		DUP2
		;/byte #ac DEO2
		#a3 DEI #00 EQU ?/endloop	( EOF )
		[ LIT &byte $1 ]
		ROT ROT JSR2
		!/loop

	&endloop
	POP2 JMP2r


@first-star ( -- )
@on-input ( -> )
	#12 DEI
	
	
	BRK


@Number/one-byte ( b -- )
	#00 SWP
	LIT "0 SUB
	[ LIT2 &val 00 &val2 00 ]
	#000a MUL2 ADD2
	,/val STR2
	JMP2r
@Number/get2 ( -- n* )
	,/val LDR2 JMP2r
@Number/get1 ( -- n )
	,/val2 LDR JMP2r
@Number/reset ( -- )
	#0000 ,/val STR2 JMP2r