mirror of https://git.sr.ht/~rabbits/uxn
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
53 lines
1.1 KiB
53 lines
1.1 KiB
( devices ) |
|
|
|
|00 @System [ &vector $2 &wst $1 &rst $1 &pad $4 &r $2 &g $2 &b $2 &debug $1 &halt $1 ] |
|
|10 @Console [ &vector $2 &read $1 &pad $5 &write $1 &error $1 ] |
|
|a0 @File [ &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2 ] |
|
|
|
( vectors ) |
|
|
|
|0100 @reset |
|
( |
|
Set the log level for helping to debug stuff. |
|
Its value is the bitwise OR of all the following output types: |
|
#01 prints the number of lines in the source code, |
|
#04 dumps all defined labels at end, and |
|
#08 prints the heap usage. |
|
) |
|
#09 ;asma/log-level STA |
|
|
|
;asma-heap ;heap STA2 |
|
|
|
;on-input .Console/vector DEO2 |
|
BRK |
|
|
|
@on-input ( -> ) |
|
.Console/read DEI |
|
DUP #0a EQU ,&newline JCN |
|
;append-heap-byte JSR2 |
|
BRK |
|
|
|
&newline ( 0a ) |
|
DUP EOR ( 00 ) |
|
;append-heap-byte JSR2 ( ) |
|
|
|
,&output-file LDR2 ORA ,&run JCN |
|
;heap LDA2 ,&output-file STR2 |
|
BRK |
|
|
|
&run |
|
;asma-heap LIT2 &output-file $2 ;asma-assemble-file JSR2 |
|
#01 .System/halt DEO |
|
BRK |
|
|
|
~projects/library/asma.tal |
|
|
|
@asma-heap |
|
|e000 &end |
|
|
|
@asma-read-buffer |
|
|f800 &end |
|
|
|
@asma-write-buffer |
|
|ffff &end |
|
|
|
|