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.
48 lines
1010 B
48 lines
1010 B
( 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 &offset-hs $2 &offset-ls $2 &name $2 &length $2 &load $2 &save $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 ( ) |
|
|
|
;asma-heap #0000 ;asma-assemble-file JSR2 |
|
#01 .System/halt DEO |
|
BRK |
|
|
|
include projects/library/asma.tal |
|
|
|
@asma-heap |
|
|e000 &end |
|
|
|
@asma-read-buffer |
|
|f800 &end |
|
|
|
@asma-write-buffer |
|
|ffff &end |
|
|
|
|