uxn/projects/examples/dev.console.usm

( dev/console )

%RTN { JMP2r }

( devices )

|10 @Console    [ &pad $8 &char $1 ]

( init )

|0100 ( -> )
	
	;hello-word ;print JSR2
	
BRK

@print ( addr -- )
	
	&loop
		( send ) DUP2 GET .Console/char DEO
		( incr ) #0001 ADD2
		( loop ) DUP2 GET #00 NEQ ,&loop JNZ
	POP2

RTN

@hello-word "hello 20 "World!
Ported the keys example 2021-04-21 16:09:18 +00:00			`( dev/console )`
Rewrote the devscreen example 2021-02-20 23:00:34 +00:00
Removed RTN 2021-03-16 04:29:44 +00:00			`%RTN { JMP2r }`

Allow device memory offsets in assembler 2021-04-21 12:45:17 +00:00			`( devices )`

			`\|10 @Console [ &pad $8 &char $1 ]`

Ported mouse example 2021-04-21 16:48:04 +00:00			`( init )`
Allow device memory offsets in assembler 2021-04-21 12:45:17 +00:00
Ported mouse example 2021-04-21 16:48:04 +00:00			`\|0100 ( -> )`
Rewrote the devscreen example 2021-02-20 23:00:34 +00:00
Ported the hello-world example 2021-04-20 18:32:26 +00:00			`;hello-word ;print JSR2`

Rewrote the devscreen example 2021-02-20 23:00:34 +00:00			`BRK`

Ported the hello-world example 2021-04-20 18:32:26 +00:00			`@print ( addr -- )`
Jump experiments 2021-03-11 20:19:59 +00:00
Ported the hello-world example 2021-04-20 18:32:26 +00:00			`&loop`
Ported some of the examples to the new accessors 2021-04-21 18:12:42 +00:00			`( send ) DUP2 GET .Console/char DEO`
Jump experiments 2021-03-11 20:19:59 +00:00			`( incr ) #0001 ADD2`
Implemented PEK/POK/GET/PUT 2021-04-21 17:23:58 +00:00			`( loop ) DUP2 GET #00 NEQ ,&loop JNZ`
Started implementing structs everywhere 2021-02-23 21:49:36 +00:00			`POP2`
Improved hover example 2021-03-01 16:55:16 +00:00
Ported the hello-world example 2021-04-20 18:32:26 +00:00			`RTN`
Rewrote the devscreen example 2021-02-20 23:00:34 +00:00
Ported some of the examples to the new accessors 2021-04-21 18:12:42 +00:00			`@hello-word "hello 20 "World!`